PRIM-FAK-ZERLEG
FILE INFORMATION
FILENAME(S): PRIM-FAK-ZERLEG
FILE TYPE(S): PRG
FILE SIZE: 4.4K
FIRST SEEN: 2025-11-30 01:07:52
APPEARS ON: 2 disk(s)
FILE HASH
9001211d8858c107b928d9caf3a707936de18a7c24b7cecca9b6e17a25217908
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| L EHRNEN | PRIM-FAK-ZERLEG | PRG | Treasure Chest - Wolfgang Rauprich | 20 | 8 | DOWNLOAD FILE |
| FREESOFT DISK NR | PRIM-FAK-ZERLEG | PRG | Treasure Chest - Wolfgang Rauprich | 20 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..'.d.. ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 00 47 08 6E 00 8F 20 50 52 |*******.G.n.. PR|
00000030: 4F 47 52 41 4D 4D 3A 20 50 52 49 4D 2D 46 41 4B |OGRAMM: PRIM-FAK|
00000040: 2D 5A 45 52 4C 45 47 00 6D 08 78 00 8F 20 2D 2D |-ZERLEG.m.x.. --|
00000050: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 90 08 |-------------...|
00000070: 7A 00 8F 20 46 55 4E 4B 54 49 4F 4E 3A 20 49 4D |z.. FUNKTION: IM|
00000080: 20 50 52 4F 47 52 2E 20 45 52 4B 4C 41 45 52 54 | PROGR. ERKLAERT|
00000090: 00 B6 08 7C 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |...|.. ---------|
000000A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000B0: 2D 2D 2D 2D 2D 2D 00 D5 08 82 00 8F 20 56 45 52 |------...... VER|
000000C0: 53 49 4F 4E 3A 20 20 31 33 2D 30 37 2D 38 33 2F |SION: 13-07-83/|
000000D0: 31 30 3A 30 30 00 FB 08 8C 00 8F 20 2D 2D 2D 2D |10:00...... ----|
000000E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 18 09 96 00 |-----------.....|
00000100: 8F 20 51 55 45 4C 4C 45 3A 20 20 20 52 4F 4C 41 |. QUELLE: ROLA|
00000110: 4E 44 20 42 41 55 45 52 00 33 09 AA 00 8F 20 20 |ND BAUER.3.... |
00000120: 20 20 20 20 20 20 20 20 20 4C 49 4E 5A 2F 44 4F | LINZ/DO|
00000130: 4E 41 55 00 59 09 B4 00 8F 20 2D 2D 2D 2D 2D 2D |NAU.Y.... ------|
00000140: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000150: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 75 09 BE 00 8F 20 |---------.u.... |
00000160: 44 49 53 4B 45 54 54 45 3A 20 44 49 53 4B 45 54 |DISKETTE: DISKET|
00000170: 54 45 20 23 31 00 9B 09 C8 00 8F 20 2D 2D 2D 2D |TE #1...... ----|
00000180: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000190: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 AB 09 D2 00 |-----------.....|
000001A0: 8F 20 56 41 52 41 42 4C 45 4E 3A 00 B1 09 DC 00 |. VARABLEN:.....|
000001B0: 8F 00 D4 09 E6 00 8F 20 4E 2E 2E 2E 2E 2E 2E 2E |....... N.......|
000001C0: 2E 2E 5A 55 20 5A 45 52 4C 45 47 45 4E 44 45 20 |..ZU ZERLEGENDE |
000001D0: 5A 41 48 4C 00 F9 09 F0 00 8F 20 48 2E 2E 2E 2E |ZAHL...... H....|
000001E0: 2E 2E 2E 2E 2E 48 3D 4E 2C 20 57 49 52 44 20 4E |.....H=N, WIRD N|
000001F0: 49 43 48 54 20 56 45 52 2D 00 11 0A FA 00 8F 20 |ICHT VER-...... |
00000200: 20 20 20 20 20 20 20 20 20 20 41 45 4E 44 45 52 | AENDER|
00000210: 54 00 33 0A 04 01 8F 20 49 2E 2E 2E 2E 2E 2E 2E |T.3.... I.......|
00000220: 2E 2E 49 4E 44 45 58 20 46 55 45 52 20 54 45 49 |..INDEX FUER TEI|
00000230: 4C 45 52 00 4D 0A 09 01 8F 20 54 2E 2E 2E 2E 2E |LER.M.... T.....|
00000240: 2E 2E 2E 2E 48 49 4C 46 53 56 41 52 2E 00 70 0A |....HILFSVAR..p.|
00000250: 0A 01 8F 20 20 20 20 20 20 20 20 20 20 20 28 41 |... (A|
00000260: 4B 54 55 45 4C 4C 45 52 20 54 45 49 4C 45 52 29 |KTUELLER TEILER)|
00000270: 00 8D 0A 0E 01 8F 20 54 28 49 29 2E 2E 2E 2E 2E |...... T(I).....|
00000280: 2E 54 45 49 4C 45 52 20 56 4F 4E 20 4E 00 B0 0A |.TEILER VON N...|
00000290: 13 01 8F 20 20 20 20 20 20 20 20 20 20 20 28 4F |... (O|
000002A0: 48 4E 45 20 56 49 45 4C 46 41 43 48 48 45 49 54 |HNE VIELFACHHEIT|
000002B0: 00 D5 0A 14 01 8F 20 20 20 20 20 20 20 20 20 20 |...... |
000002C0: 20 5A 55 20 42 45 52 55 45 43 4B 53 49 43 48 54 | ZU BERUECKSICHT|
000002D0: 49 47 45 4E 29 00 F5 0A 18 01 8F 20 49 4D 41 58 |IGEN)...... IMAX|
000002E0: 2E 2E 2E 2E 2E 2E 41 4E 5A 2E 20 44 45 52 20 54 |......ANZ. DER T|
000002F0: 45 49 4C 45 52 00 18 0B 22 01 8F 20 41 24 2E 2E |EILER...".. A$..|
00000300: 2E 2E 2E 2E 2E 2E 48 49 4C 46 53 56 41 52 2E 20 |......HILFSVAR. |
00000310: 46 2E 20 27 47 45 54 27 00 3D 0B 2C 01 8F 20 4A |F. 'GET'.=.,.. J|
00000320: 2E 2E 2E 2E 2E 2E 2E 2E 2E 49 4E 44 45 58 20 46 |.........INDEX F|
00000330: 2E 20 54 45 49 4C 45 52 2C 20 44 49 45 00 5F 0B |. TEILER, DIE._.|
00000340: 36 01 8F 20 20 20 20 20 20 20 20 20 20 20 41 55 |6.. AU|
00000350: 53 47 45 47 45 42 45 4E 20 57 45 52 44 45 4E 00 |SGEGEBEN WERDEN.|
00000360: 82 0B 40 01 8F 20 41 54 28 4A 29 2E 2E 2E 2E 2E |..@.. AT(J).....|
00000370: 54 45 49 4C 45 52 2C 20 44 45 52 20 41 55 53 47 |TEILER, DER AUSG|
00000380: 45 2D 00 9D 0B 4A 01 8F 20 20 20 20 20 20 20 20 |E-...J.. |
00000390: 20 20 20 47 45 42 45 4E 20 57 49 52 44 00 BE 0B | GEBEN WIRD...|
000003A0: 54 01 8F 20 41 41 28 4A 29 2E 2E 2E 2E 2E 56 49 |T.. AA(J).....VI|
000003B0: 45 4C 46 41 43 48 48 45 49 54 20 44 45 53 00 D6 |ELFACHHEIT DES..|
000003C0: 0B 5E 01 8F 20 20 20 20 20 20 20 20 20 20 20 54 |.^.. T|
000003D0: 45 49 4C 45 52 53 00 F7 0B 68 01 8F 20 58 2E 2E |EILERS...h.. X..|
000003E0: 2E 2E 2E 2E 2E 2E 2E 53 43 48 4C 45 49 46 45 4E |.......SCHLEIFEN|
000003F0: 5A 41 45 48 4C 45 52 00 1D 0C 72 01 8F 20 2A 2A |ZAEHLER...r.. **|
00000400: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000410: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 23 0C |*************.#.|
00000420: 7C 01 8F 00 29 0C 86 01 8F 00 2F 0C 90 01 8F 00 ||...)...../.....|
00000430: 35 0C 9A 01 8F 00 3B 0C A4 01 8F 00 41 0C AE 01 |5.....;.....A...|
00000440: 8F 00 47 0C B8 01 8F 00 4D 0C E8 03 8F 00 71 0C |..G.....M.....q.|
00000450: ED 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00000460: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000470: 2A 00 8C 0C F2 03 8F 20 50 52 4F 47 52 41 4D 4D |*...... PROGRAMM|
00000480: 2D 49 4E 46 4F 52 4D 41 54 49 4F 4E 00 B0 0C FC |-INFORMATION....|
00000490: 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
000004A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000004B0: 00 B6 0C 06 04 8F 00 CF 0C 10 04 97 35 33 32 38 |............5328|
000004C0: 30 2C 36 3A 99 22 05 22 3B 3A 99 22 93 22 3B 00 |0,6:.".";:.".";.|
000004D0: F0 0C 1A 04 99 22 D0 52 4F 47 52 41 4D 4D 3A 20 |.....".ROGRAMM: |
000004E0: 50 52 49 4D 2D 46 41 4B 2D 5A 45 52 4C 45 47 22 |PRIM-FAK-ZERLEG"|
000004F0: 00 FC 0C 24 04 8D 20 31 30 30 30 30 00 29 0D 2E |...$.. 10000.)..|
00000500: 04 99 22 C6 55 4E 4B 54 49 4F 4E 3A 20 D0 52 4F |..".UNKTION: .RO|
00000510: 47 52 41 4D 4D 20 5A 45 52 4C 45 47 54 20 44 49 |GRAMM ZERLEGT DI|
00000520: 45 20 45 49 4E 47 45 2D 22 00 54 0D 38 04 99 22 |E EINGE-".T.8.."|
00000530: 20 20 20 20 20 20 20 20 20 20 47 45 42 45 4E 45 | GEBENE|
00000540: 20 DA 41 48 4C 20 49 4E 20 49 48 52 45 20 D0 52 | .AHL IN IHRE .R|
00000550: 49 4D 2D 22 00 6F 0D 42 04 99 22 20 20 20 20 20 |IM-".o.B.." |
00000560: 20 20 20 20 20 46 41 4B 54 4F 52 45 4E 2E 22 00 | FAKTOREN.".|
00000570: 7B 0D 4C 04 8D 20 31 30 30 30 30 00 A6 0D 7E 04 |{.L.. 10000...~.|
00000580: 99 22 C5 49 4E 47 41 42 45 3A 20 20 4E 2C 20 44 |.".INGABE: N, D|
00000590: 49 45 20 5A 55 20 5A 45 52 4C 45 47 45 4E 44 45 |IE ZU ZERLEGENDE|
000005A0: 20 DA 41 48 4C 22 00 B1 0D 88 04 8D 31 30 30 30 | .AHL"......1000|
000005B0: 30 00 CF 0D 92 04 99 22 C1 55 53 47 41 42 45 3A |0......".USGABE:|
000005C0: 20 20 D0 52 49 4D 46 41 4B 54 4F 52 45 4E 22 00 | .RIMFAKTOREN".|
000005D0: DB 0D 93 04 8D 20 31 30 30 30 30 00 EC 0D 94 04 |..... 10000.....|
000005E0: 99 22 C2 45 49 53 50 49 45 4C 3A 22 00 F2 0D 95 |.".EISPIEL:"....|
000005F0: 04 99 00 11 0E 96 04 99 22 31 38 30 20 3D 20 32 |........"180 = 2|
00000600: 20 5E 20 32 20 2A 20 33 20 5E 20 32 20 2A 20 35 | ^ 2 * 3 ^ 2 * 5|
00000610: 22 00 27 0E 97 04 99 3A 99 3A 99 3A 99 3A 99 3A |".'....:.:.:.:.:|
00000620: 99 3A 99 3A 99 3A 99 00 33 0E 9C 04 8D 20 31 30 |.:.:.:..3.... 10|
00000630: 30 30 30 00 5A 0E A6 04 99 22 C2 49 54 54 45 20 |000.Z....".ITTE |
00000640: 44 52 55 45 43 4B 45 4E 20 D3 49 45 20 45 49 4E |DRUECKEN .IE EIN|
00000650: 45 20 D4 41 53 54 45 21 22 3B 00 73 0E B0 04 A1 |E .ASTE!";.s....|
00000660: 20 41 24 3A 20 8B 20 41 24 B2 22 22 20 A7 20 31 | A$: . A$."" . 1|
00000670: 32 30 30 00 79 0E 46 05 8F 00 9E 0E 50 05 8F 20 |200.y.F.....P.. |
00000680: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000690: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B4 |**************..|
000006A0: 0E 5A 05 8F 20 44 49 4D 45 4E 53 49 4F 4E 49 45 |.Z.. DIMENSIONIE|
000006B0: 52 55 4E 47 00 D9 0E 64 05 8F 20 2A 2A 2A 2A 2A |RUNG...d.. *****|
000006C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000006D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DF 0E 6E 05 8F 00 |*********...n...|
000006E0: FC 0E 78 05 86 20 54 28 31 30 30 29 2C 41 54 28 |..x.. T(100),AT(|
000006F0: 31 30 30 29 2C 41 41 28 31 30 30 29 00 02 0F 0E |100),AA(100)....|
00000700: 06 8F 00 27 0F 18 06 8F 20 2A 2A 2A 2A 2A 2A 2A |...'.... *******|
00000710: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000720: 2A 2A 2A 2A 2A 2A 2A 00 3B 0F 22 06 8F 20 45 49 |*******.;.".. EI|
00000730: 4E 47 41 42 45 20 56 4F 4E 20 4E 00 60 0F 2C 06 |NGABE VON N.`.,.|
00000740: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00000750: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000760: 00 66 0F 36 06 8F 00 70 0F 40 06 99 22 93 22 3B |.f.6...p.@..".";|
00000770: 00 8C 0F 4A 06 99 22 C2 49 54 54 45 20 47 45 42 |...J..".ITTE GEB|
00000780: 45 4E 20 D3 49 45 20 45 49 4E 3A 22 00 94 0F 54 |EN .IE EIN:"...T|
00000790: 06 99 3A 99 00 A2 0F 5E 06 85 22 4E 20 3D 20 22 |..:....^.."N = "|
000007A0: 3B 4E 00 AA 0F 68 06 48 B2 4E 00 B2 0F 72 06 99 |;N...h.H.N...r..|
000007B0: 3A 99 00 C6 0F 77 06 99 22 C2 49 54 54 45 20 57 |:....w..".ITTE W|
000007C0: 41 52 54 45 4E 21 00 D2 0F 79 06 99 3A 99 3A 99 |ARTEN!...y..:.:.|
000007D0: 3A 99 00 D8 0F 7C 06 8F 00 FD 0F 86 06 8F 20 2A |:....|........ *|
000007E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000007F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 16 10 |*************...|
00000800: 90 06 8F 20 55 45 42 45 52 50 52 55 45 46 45 4E |... UEBERPRUEFEN|
00000810: 20 56 4F 4E 20 4E 00 3B 10 9A 06 8F 20 2A 2A 2A | VON N.;.... ***|
00000820: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000830: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 41 10 A4 06 |***********.A...|
00000840: 8F 00 59 10 AE 06 8B 20 4E B3 B1 B5 28 4E 29 20 |..Y.... N...(N) |
00000850: A7 20 8D 20 31 34 30 30 30 00 61 10 B8 06 48 B2 |. . 14000.a...H.|
00000860: 4E 00 96 10 C2 06 8B 4E B3 B2 30 A7 99 22 CE 20 |N......N..0..". |
00000870: 4D 55 53 53 20 47 52 4F 45 53 53 45 52 20 41 4C |MUSS GROESSER AL|
00000880: 53 20 CE 55 4C 4C 20 53 45 49 4E 21 22 3A 99 3A |S .ULL SEIN!":.:|
00000890: 89 20 31 36 31 30 00 AF 10 CC 06 8B 20 4E B3 34 |. 1610...... N.4|
000008A0: 20 A7 20 49 B2 30 20 3A 20 89 20 32 30 32 30 00 | . I.0 : . 2020.|
000008B0: B5 10 08 07 8F 00 DA 10 12 07 8F 20 2A 2A 2A 2A |........... ****|
000008C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 EB 10 1C 07 8F |**********......|
000008E0: 20 42 45 52 45 43 48 4E 55 4E 47 00 10 11 26 07 | BERECHNUNG...&.|
000008F0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00000900: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000910: 00 16 11 30 07 8F 00 1E 11 44 07 49 B2 30 00 26 |...0.....D.I.0.&|
00000920: 11 4E 07 54 B2 32 00 42 11 58 07 8D 20 31 31 30 |.N.T.2.B.X.. 110|
00000930: 30 30 20 3A 20 8F 20 53 55 42 3A 20 54 45 49 4C |00 : . SUB: TEIL|
00000940: 45 4E 00 4A 11 62 07 54 B2 33 00 56 11 6C 07 8D |EN.J.b.T.3.V.l..|
00000950: 20 31 31 30 30 30 00 60 11 76 07 54 B2 54 AA 32 | 11000.`.v.T.T.2|
00000960: 00 78 11 80 07 8B 20 54 B3 28 BA 28 4E 29 AA 31 |.x.... T.(.(N).1|
00000970: 29 20 A7 20 31 39 30 30 00 89 11 8A 07 8B 20 4E |) . 1900...... N|
00000980: B2 31 20 A7 20 32 30 32 30 00 9A 11 94 07 8B 20 |.1 . 2020...... |
00000990: 4E B2 48 20 A7 20 32 30 32 30 00 AB 11 9E 07 49 |N.H . 2020.....I|
000009A0: B2 49 AA 31 3A 54 28 49 29 B2 4E 00 B1 11 D0 07 |.I.1:T(I).N.....|
000009B0: 8F 00 D6 11 DA 07 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....... ********|
000009C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009D0: 2A 2A 2A 2A 2A 2A 00 F5 11 E4 07 8F 20 55 45 42 |******...... UEB|
000009E0: 45 52 50 52 55 45 46 45 4E 20 4F 42 20 50 52 49 |ERPRUEFEN OB PRI|
000009F0: 4D 5A 41 48 4C 00 1A 12 EE 07 8F 20 2A 2A 2A 2A |MZAHL...... ****|
00000A00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 20 12 F8 07 8F |**********. ....|
00000A20: 00 30 12 02 08 8B 49 B3 B1 30 A7 20 32 31 35 30 |.0....I..0. 2150|
00000A30: 00 51 12 0C 08 99 22 9D 22 3B 48 20 3B 22 49 53 |.Q....".";H ;"IS|
00000A40: 54 20 45 49 4E 45 20 D0 52 49 4D 5A 41 48 4C 2E |T EINE .RIMZAHL.|
00000A50: 22 00 66 12 16 08 99 3A 99 3A 99 3A 20 99 3A 99 |".f....:.:.: .:.|
00000A60: 3A 99 3A 99 3A 99 00 83 12 20 08 8D 20 31 32 30 |:.:.:.... .. 120|
00000A70: 30 30 20 3A 20 8F 20 53 55 42 3A 20 57 45 49 54 |00 : . SUB: WEIT|
00000A80: 45 52 3F 00 8E 12 2A 08 89 20 31 35 37 30 00 94 |ER?...*.. 1570..|
00000A90: 12 48 08 8F 00 B9 12 52 08 8F 20 2A 2A 2A 2A 2A |.H.....R.. *****|
00000AA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000AB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DB 12 5C 08 8F 20 |*********...\.. |
00000AC0: 5A 41 45 48 4C 45 4E 20 44 45 52 20 47 4C 45 49 |ZAEHLEN DER GLEI|
00000AD0: 43 48 45 4E 20 54 45 49 4C 45 52 00 00 13 61 08 |CHEN TEILER...a.|
00000AE0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00000AF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B00: 00 06 13 66 08 8F 00 1D 13 67 08 49 4D 41 58 B2 |...f.....g.IMAX.|
00000B10: 49 3A 54 28 49 4D 41 58 AA 31 29 B2 30 00 23 13 |I:T(IMAX.1).0.#.|
00000B20: 6A 08 8F 00 29 13 70 08 8F 00 31 13 84 08 4A B2 |j...).p...1...J.|
00000B30: 31 00 39 13 8E 08 49 B2 31 00 48 13 98 08 41 54 |1.9...I.1.H...AT|
00000B40: 28 4A 29 B2 54 28 49 29 00 54 13 A2 08 41 41 28 |(J).T(I).T...AA(|
00000B50: 4A 29 B2 31 00 6A 13 AC 08 8B 20 49 B2 49 4D 41 |J).1.j.... I.IMA|
00000B60: 58 20 A7 20 20 20 32 33 32 30 00 99 13 B6 08 8B |X . 2320......|
00000B70: 54 28 49 29 B2 54 28 49 AA 31 29 20 A7 20 41 41 |T(I).T(I.1) . AA|
00000B80: 28 4A 29 B2 41 41 28 4A 29 AA 31 3A 49 B2 49 AA |(J).AA(J).1:I.I.|
00000B90: 31 20 3A 89 20 32 32 32 30 00 A3 13 C0 08 4A B2 |1 :. 2220.....J.|
00000BA0: 4A AA 31 00 AD 13 CA 08 49 B2 49 AA 31 00 B8 13 |J.1.....I.I.1...|
00000BB0: D4 08 89 20 32 32 30 30 00 BE 13 FC 08 8F 00 E3 |... 2200........|
00000BC0: 13 06 09 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********|
00000BD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000BE0: 2A 2A 2A 00 07 14 10 09 8F 20 47 52 4F 42 45 20 |***...... GROBE |
00000BF0: 4B 4F 4E 54 52 4F 4C 4C 45 20 44 45 52 20 5A 45 |KONTROLLE DER ZE|
00000C00: 52 4C 45 47 55 4E 47 00 2C 14 1A 09 8F 20 2A 2A |RLEGUNG.,.... **|
00000C10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000C20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 32 14 24 |************.2.$|
00000C30: 09 8F 00 54 14 29 09 4E B2 31 20 3A 20 8F 20 4E |...T.).N.1 : . N|
00000C40: 20 41 4C 53 20 48 49 4C 46 53 56 41 52 2E 20 56 | ALS HILFSVAR. V|
00000C50: 45 52 57 2E 00 61 14 2E 09 81 20 58 B2 31 A4 20 |ERW..a.... X.1. |
00000C60: 4A 00 75 14 38 09 4E B2 4E AC 41 54 28 58 29 AE |J.u.8.N.N.AT(X).|
00000C70: 41 41 28 58 29 00 7D 14 42 09 82 20 58 00 93 14 |AA(X).}.B.. X...|
00000C80: 4C 09 8B 20 B5 28 48 29 B2 B5 28 4E 29 A7 20 32 |L.. .(H)..(N). 2|
00000C90: 35 32 30 00 BE 14 56 09 99 22 D0 52 4F 47 52 41 |520...V..".ROGRA|
00000CA0: 4D 4D 20 4C 49 45 46 45 52 54 20 46 41 4C 53 43 |MM LIEFERT FALSC|
00000CB0: 48 45 20 DA 45 52 4C 45 47 55 4E 47 21 22 00 DC |HE .ERLEGUNG!"..|
00000CC0: 14 60 09 99 22 C1 4C 47 4F 52 49 54 48 4D 55 53 |.`..".LGORITHMUS|
00000CD0: 20 50 52 55 45 46 45 4E 21 21 21 22 00 E4 14 6A | PRUEFEN!!!"...j|
00000CE0: 09 99 3A 99 00 EA 14 C4 09 8F 00 0F 15 CE 09 8F |..:.............|
00000CF0: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00000D00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000D10: 1D 15 D8 09 8F 20 41 55 53 47 41 42 45 00 42 15 |..... AUSGABE.B.|
00000D20: E2 09 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00000D30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D40: 2A 2A 00 48 15 EC 09 8F 00 58 15 F1 09 99 22 9D |**.H.....X....".|
00000D50: 22 3B 48 3B 22 3D 22 3B 00 60 15 F6 09 58 B2 31 |";H;"=";.`...X.1|
00000D60: 00 6C 15 00 0A 99 41 54 28 58 29 3B 00 87 15 0A |.l....AT(X);....|
00000D70: 0A 8B 20 41 41 28 58 29 B1 31 20 A7 99 22 5E 22 |.. AA(X).1 .."^"|
00000D80: 3B 41 41 28 58 29 3B 00 A5 15 14 0A 8B 20 58 B3 |;AA(X);...... X.|
00000D90: 4A 20 A7 20 99 22 2A 22 3B 3A 58 B2 58 AA 31 3A |J . ."*";:X.X.1:|
00000DA0: 89 32 35 36 30 00 B5 15 3C 0A 99 3A 99 3A 99 3A |.2560...<..:.:.:|
00000DB0: 99 3A 99 3A 99 00 C1 15 46 0A 8D 20 31 32 30 30 |.:.:....F.. 1200|
00000DC0: 30 00 CB 15 50 0A 89 31 35 37 30 00 D1 15 10 27 |0...P..1570....'|
00000DD0: 8F 00 F5 15 1A 27 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |.....'. ********|
00000DE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000DF0: 2A 2A 2A 2A 2A 00 0C 16 24 27 8F 20 53 55 42 3A |*****...$'. SUB:|
00000E00: 20 54 52 45 4E 4E 53 54 52 49 43 48 00 30 16 2E | TRENNSTRICH.0..|
00000E10: 27 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |'. *************|
00000E20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E30: 00 36 16 38 27 8F 00 4C 16 42 27 81 20 58 B2 31 |.6.8'..L.B'. X.1|
00000E40: A4 34 30 3A 99 22 2D 22 3B 3A 82 58 00 52 16 4C |.40:."-";:.X.R.L|
00000E50: 27 8E 00 58 16 F8 2A 8F 00 7C 16 02 2B 8F 20 2A |'..X..*..|..+. *|
00000E60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8E 16 0C |************....|
00000E80: 2B 8F 20 53 55 42 3A 20 54 45 49 4C 45 4E 00 B2 |+. SUB: TEILEN..|
00000E90: 16 16 2B 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..+. ***********|
00000EA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EB0: 2A 2A 00 B8 16 20 2B 8F 00 CE 16 2A 2B 8B 20 28 |**... +....*+. (|
00000EC0: 4E AD 54 29 B3 B1 B5 28 4E AD 54 29 A7 8E 00 D8 |N.T)...(N.T)....|
00000ED0: 16 34 2B 49 B2 49 AA 31 00 E3 16 3E 2B 54 28 49 |.4+I.I.1...>+T(I|
00000EE0: 29 B2 54 00 ED 16 48 2B 4E B2 4E AD 54 00 F3 16 |).T...H+N.N.T...|
00000EF0: 49 2B 8F 00 F9 16 4B 2B 8F 00 05 17 52 2B 89 20 |I+....K+....R+. |
00000F00: 31 31 30 35 30 00 0B 17 E0 2E 8F 00 2F 17 EA 2E |11050......./...|
00000F10: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00000F20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000F30: 48 17 F4 2E 8F 20 53 55 42 3A 20 57 45 49 54 45 |H.... SUB: WEITE|
00000F40: 52 4D 41 43 48 45 4E 3F 00 6C 17 FE 2E 8F 20 2A |RMACHEN?.l.... *|
00000F50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000F60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 72 17 08 |************.r..|
00000F70: 2F 8F 00 7E 17 12 2F 8D 20 31 30 30 30 30 00 AC |/..~../. 10000..|
00000F80: 17 1C 2F 99 22 D7 4F 4C 4C 45 4E 20 D3 49 45 20 |../.".OLLEN .IE |
00000F90: 45 49 4E 45 20 57 45 49 54 45 52 45 20 DA 41 48 |EINE WEITERE .AH|
00000FA0: 4C 20 5A 45 52 4C 45 47 45 4E 3F 22 00 DA 17 26 |L ZERLEGEN?"...&|
00000FB0: 2F 99 22 D7 45 4E 4E 20 4E 45 49 4E 2C 20 44 52 |/.".ENN NEIN, DR|
00000FC0: 55 45 43 4B 45 4E 20 D3 49 45 20 27 CE 27 2C 20 |UECKEN .IE '.', |
00000FD0: 41 4E 53 4F 4E 53 54 45 4E 22 00 FF 17 30 2F 99 |ANSONSTEN"...0/.|
00000FE0: 22 45 49 4E 45 20 42 45 4C 49 45 42 49 47 45 20 |"EINE BELIEBIGE |
00000FF0: 41 4E 44 45 52 45 20 D4 41 53 54 45 21 22 3B 00 |ANDERE .ASTE!";.|
00001000: 07 18 3A 2F A1 41 24 00 1A 18 44 2F 8B 20 41 24 |..:/.A$...D/. A$|
00001010: B2 22 22 A7 20 31 32 30 39 30 00 33 18 4E 2F 8B |."". 12090.3.N/.|
00001020: 28 41 24 20 B2 22 4E 22 29 20 A7 20 20 20 31 32 |(A$ ."N") . 12|
00001030: 31 32 30 00 4A 18 53 2F 8B 28 41 24 B3 B1 22 CE |120.J.S/.(A$..".|
00001040: 22 29 20 A7 20 4E B2 30 3A 8E 00 64 18 58 2F 97 |") . N.0:..d.X/.|
00001050: 20 35 33 32 38 30 2C 31 34 3A 20 20 20 20 20 99 | 53280,14: .|
00001060: 22 93 22 3B 00 92 18 62 2F 99 3A 99 22 D0 52 4F |".";...b/.:.".RO|
00001070: 47 52 41 4D 4D 20 27 50 52 49 4D 2D 46 41 4B 2D |GRAMM 'PRIM-FAK-|
00001080: 5A 45 52 4C 45 47 27 20 57 55 52 44 45 20 41 55 |ZERLEG' WURDE AU|
00001090: 46 22 00 BD 18 6C 2F 99 22 C9 48 52 45 4E 20 D7 |F"...l/.".HREN .|
000010A0: 55 4E 53 43 48 20 41 42 47 45 42 52 4F 43 48 45 |UNSCH ABGEBROCHE|
000010B0: 4E 21 22 3A 99 3A 99 3A 99 3A 99 3A 99 00 C3 18 |N!":.:.:.:.:....|
000010C0: 76 2F 80 00 C9 18 B0 36 8F 00 ED 18 BA 36 8F 20 |v/.....6.....6. |
000010D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000010E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0E 19 |*************...|
000010F0: C4 36 8F 20 4E 20 49 4E 20 47 41 4E 5A 45 20 5A |.6. N IN GANZE Z|
00001100: 41 48 4C 20 56 45 52 57 41 4E 44 45 4C 4E 00 32 |AHL VERWANDELN.2|
00001110: 19 CE 36 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..6. ***********|
00001120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001130: 2A 2A 00 38 19 D8 36 8F 00 47 19 DD 36 4E B2 B5 |**.8..6..G..6N..|
00001140: 28 4E 29 3A 48 B2 4E 00 75 19 E2 36 99 22 CE 20 |(N):H.N.u..6.". |
00001150: 57 55 52 44 45 20 49 4E 20 45 49 4E 45 20 47 41 |WURDE IN EINE GA|
00001160: 4E 5A 45 20 DA 41 48 4C 20 56 45 52 57 41 4E 44 |NZE .AHL VERWAND|
00001170: 45 4C 54 21 22 00 7D 19 EC 36 99 3A 99 00 83 19 |ELT!".}..6.:....|
00001180: F6 36 8E 00 00 00 2D 00 |.6....-. |
..'.D.. *******************************.
G.N.. PROGRAMM: PRIM-FAK-ZERLEG.M.X.. --
-----------------------------...Z.. FUNK
TION: IM PROGR. ERKLAERT...|.. ---------
----------------------.U.... VERSION: 1
3-07-83/10:00...... --------------------
-----------...... QUELLE: ROLAND BAUER
.3.... LINZ/DONAU.Y.... ------
-------------------------.U.... DISKETTE
: DISKETTE #1...H.. --------------------
-----------...R.. VARABLEN:.......T....
N.........ZU ZERLEGENDE ZAHL...... H....
.....H=N, WIRD NICHT VER-......
AENDERT.3.... I.........INDEX FUER TEI
LER.M.... T.........HILFSVAR..P....
(AKTUELLER TEILER)...... T(I).....
.TEILER VON N...... (OHNE VIEL
FACHHEIT.U.... ZU BERUECKSICHT
IGEN)...... IMAX......ANZ. DER TEILER...
".. A$........HILFSVAR. F. 'GET'.=.,.. J
.........INDEX F. TEILER, DIE._.6..
AUSGEGEBEN WERDEN...@.. AT(J).....
TEILER, DER AUSGE-...J.. GEBEN
WIRD...T.. AA(J).....VIELFACHHEIT DES.V
.^.. TEILERS...H.. X.........S
CHLEIFENZAEHLER...R.. ******************
*************.#.|...)...../.....5.....;.
....A.....G.....M.....Q.... ************
*****************...... PROGRAMM-INFORMA
TION...... *****************************
.......O....53280,6:.".";:.".";......"PR
OGRAMM: PRIM-FAK-ZERLEG"...$.. 10000.)..
.."FUNKTION: PROGRAMM ZERLEGT DIE EINGE-
".T.8.." GEBENE ZAHL IN IHRE PR
IM-".O.B.." FAKTOREN.".{.L.. 10
000...~.."EINGABE: N, DIE ZU ZERLEGENDE
ZAHL"......10000.O...."AUSGABE: PRIMFA
KTOREN"...... 10000......"BEISPIEL:"....
........"180 = 2 ^ 2 * 3 ^ 2 * 5".'....:
.:.:.:.:.:.:.:..3.... 10000.Z...."BITTE
DRUECKEN SIE EINE TASTE!";.S.... A$: . A
$."" . 1200.Y.F.....P.. ****************
**************...Z.. DIMENSIONIERUNG.Y.D
.. ******************************...N...
..X.. T(100),AT(100),AA(100).......'....
******************************.;.".. EI
NGABE VON N.`.,.. **********************
********.F.6...P.@..".";...J.."BITTE GEB
EN SIE EIN:"...T..:....^.."N = ";N...H.H
.N...R..:..F.W.."BITTE WARTEN!.R.Y..:.:.
:..X.|........ *************************
*****...... UEBERPRUEFEN VON N.;.... ***
***************************.A.....Y....
N...(N) . . 14000.A...H.N...B..N..0.."N
MUSS GROESSER ALS NULL SEIN!":.:. 1610..
.L.. N.4 . I.0 : . 2020.......Z.... ****
**************************...... BERECHN
UNG...&.. ******************************
...0.....D.I.0.&.N.T.2.B.X.. 11000 : . S
UB: TEILEN.J.B.T.3.V.L.. 11000.`.V.T.T.2
.X.... T.(.(N).1) . 1900...... N.1 . 202
0...... N.H . 2020.....I.I.1:T(I).N...P.
..V.Z.. ******************************..
.... UEBERPRUEFEN OB PRIMZAHL...... ****
**************************. .....0....I.
.0. 2150.Q....".";H ;"IST EINE PRIMZAHL.
".F....:.:.: .:.:.:.:.... .. 12000 : . S
UB: WEITER?...*.. 1570...H.....R.. *****
*************************...\.. ZAEHLEN
DER GLEICHEN TEILER...A.. **************
****************...F.....G.IMAX.I:T(IMAX
.1).0.#.J...).P...1...J.1.9...I.1.H...AT
(J).T(I).T...AA(J).1.J.... I.IMAX . 23
20......T(I).T(I.1) . AA(J).AA(J).1:I.I.
1 :. 2220.....J.J.1...J.I.I.1...T.. 2200
............ ***************************
***...... GROBE KONTROLLE DER ZERLEGUNG.
,.... ******************************.2.$
...T.).N.1 : . N ALS HILFSVAR. VERW..A..
.. X.1. J.U.8.N.N.AT(X).AA(X).}.B.. X...
L.. .(H)..(N). 2520...V.."PROGRAMM LIEFE
RT FALSCHE ZERLEGUNG!"...`.."ALGORITHMUS
PRUEFEN!!!"...J..:....D.....N.. *******
***********************...X.. AUSGABE.B.
... ******************************.H....
.X....".";H;"=";.`...X.1.L....AT(X);....
.. AA(X).1 .."^";AA(X);...... X.J . ."*"
;:X.X.1:.2560...<..:.:.:.:.:..A.F.. 1200
0.K.P..1570.Q..'.....'. ****************
*************...$'. SUB: TRENNSTRICH.0..
'. *****************************.6.8'..L
.B'. X.1.40:."-";:.X.R.L'..X..*..|..+. *
****************************....+. SUB:
TEILEN....+. ***************************
**... +..N.*+. (N.T)...(N.T)...X.4+I.I.1
...>+T(I).T...H+N.N.T...I+....K+....R+.
11050......./.... **********************
*******.H.... SUB: WEITERMACHEN?.L.... *
****************************.R../..~../.
10000..../."WOLLEN SIE EINE WEITERE ZAH
L ZERLEGEN?".Z.&/."WENN NEIN, DRUECKEN S
IE 'N', ANSONSTEN"...0/."EINE BELIEBIGE
ANDERE TASTE!";...:/.A$...D/. A$."". 120
90.3.N/.(A$ ."N") . 12120.J.S/.(A$.."N
") . N.0:..D.X/. 53280,14: .".";...B
/.:."PROGRAMM 'PRIM-FAK-ZERLEG' WURDE AU
F"...L/."IHREN WUNSCH ABGEBROCHEN!":.:.:
.:.:..C.V/..I..6.....6. ****************
*************...D6. N IN GANZE ZAHL VERW
ANDELN.2.N6. ***************************
**.8.X6..G..6N..(N):H.N.U..6."N WURDE IN
EINE GANZE ZAHL VERWANDELT!".}..6.:....
.6....-.
> CLICK IMAGE PREVIEW FOR FULL MODAL