FACTOR.BAS/O
FILE INFORMATION
FILENAME(S): FACTOR.BAS/O
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-30 21:26:13
APPEARS ON: 1 disk(s)
FILE HASH
9ec4c6e6f3c93985df73574e8ebbb3a50df178e25dbb112abdaaa09e6da29ed9
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DEMO 4 | FACTOR.BAS/O | PRG | DuncanTwain | 10 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 4C 08 01 00 20 20 89 20 31 30 30 20 20 20 |..L... . 100 |
00000010: 20 20 20 20 20 20 3A 8F 20 44 52 41 41 49 45 4E | :. DRAAIEN|
00000020: 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000030: 50 52 4F 47 52 41 4D 4D 41 20 20 20 3A 20 20 46 |PROGRAMMA : F|
00000040: 41 43 54 4F 52 2E 42 41 53 20 20 2E 00 91 08 02 |ACTOR.BAS .....|
00000050: 00 20 20 89 20 31 30 30 20 20 20 20 20 20 20 20 |. . 100 |
00000060: 20 3A 8F 20 44 52 41 41 49 45 4E 2E 20 20 20 20 | :. DRAAIEN. |
00000070: 20 20 20 20 20 20 20 20 20 20 20 53 43 48 49 4A | SCHIJ|
00000080: 46 20 20 20 20 20 20 3A 20 20 44 45 4D 4F 2D 34 |F : DEMO-4|
00000090: 2E 00 D5 08 03 00 20 20 89 20 33 35 30 20 20 20 |...... . 350 |
000000A0: 20 20 20 20 20 20 3A 8F 20 56 45 52 53 49 45 5A | :. VERSIEZ|
000000B0: 45 54 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 |ET. |
000000C0: 54 41 41 4C 20 20 20 20 20 20 20 20 3A 20 20 42 |TAAL : B|
000000D0: 41 53 49 43 2E 00 1F 09 04 00 20 20 89 20 34 30 |ASIC...... . 40|
000000E0: 30 20 20 20 20 20 20 20 20 20 3A 8F 20 4C 49 4A |0 :. LIJ|
000000F0: 53 54 45 4E 20 4F 50 20 50 52 49 4E 54 45 52 2E |STEN OP PRINTER.|
00000100: 20 20 20 20 44 41 54 55 4D 20 20 20 20 20 20 20 | DATUM |
00000110: 3A 20 20 31 33 20 44 45 43 2E 31 39 39 31 2E 00 |: 13 DEC.1991..|
00000120: 6A 09 05 00 20 20 89 20 34 30 35 20 20 20 20 20 |j... . 405 |
00000130: 20 20 20 20 3A 8F 20 48 45 52 5A 45 54 20 50 52 | :. HERZET PR|
00000140: 49 4E 54 45 52 2E 20 20 20 20 20 20 20 20 50 52 |INTER. PR|
00000150: 4F 47 52 41 4D 4D 45 55 52 20 3A 20 20 4A 2E 48 |OGRAMMEUR : J.H|
00000160: 2E 56 41 4E 20 52 49 4A 4E 2E 00 B8 09 06 00 20 |.VAN RIJN...... |
00000170: 20 8F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001A0: 20 20 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A 2A | *******|
000001B0: 2A 2A 2A 2A 2A 2A 2A 2A 00 C0 09 07 00 20 20 8F |********..... .|
000001C0: 00 F6 09 08 00 20 20 8F 20 20 44 49 54 20 50 52 |..... . DIT PR|
000001D0: 4F 47 52 41 4D 4D 41 20 4F 4E 54 42 49 4E 44 54 |OGRAMMA ONTBINDT|
000001E0: 20 47 45 54 41 4C 4C 45 4E 20 49 4E 20 46 41 43 | GETALLEN IN FAC|
000001F0: 54 4F 52 45 4E 2E 00 22 0A 09 00 20 20 8F 20 20 |TOREN.."... . |
00000200: 4C 41 54 45 52 20 49 4E 20 41 53 53 45 4D 42 4C |LATER IN ASSEMBL|
00000210: 45 52 54 41 41 4C 20 54 45 20 42 52 45 4E 47 45 |ERTAAL TE BRENGE|
00000220: 4E 2E 00 57 0A 32 00 20 8B 20 50 B2 32 20 A7 20 |N..W.2. . P.2 . |
00000230: 50 B2 33 3A 8E 20 20 20 20 20 20 20 20 20 20 20 |P.3:. |
00000240: 20 20 20 20 20 20 3A 8F 20 56 4F 4C 47 45 4E 44 | :. VOLGEND|
00000250: 20 50 52 49 45 4D 2E 00 77 0A 33 00 20 50 B2 50 | PRIEM..w.3. P.P|
00000260: AA 32 3A 49 B2 B5 28 50 AD 33 29 3A 8B 20 50 B1 |.2:I..(P.3):. P.|
00000270: 33 AC 49 20 A7 20 8E 00 84 0A 34 00 20 50 B2 50 |3.I . ....4. P.P|
00000280: AA 32 3A 8E 00 C1 0A 46 00 20 4E 24 B2 22 43 4F |.2:....F. N$."CO|
00000290: 44 2E 48 4F 4E 54 41 4C 22 3A 8D 20 34 31 30 20 |D.HONTAL":. 410 |
000002A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 | :. |
000002B0: 4C 41 41 44 20 4D 41 43 48 49 4E 45 43 4F 44 45 |LAAD MACHINECODE|
000002C0: 2E 00 01 0B 47 00 20 8B 20 4C 56 B3 32 20 A7 20 |....G. . LV.2 . |
000002D0: 8D 20 34 32 30 3A 8E 20 20 20 20 20 20 20 20 20 |. 420:. |
000002E0: 20 3A 8F 20 4F 4B 45 45 3F 20 4A 41 3A 53 4C 55 | :. OKEE? JA:SLU|
000002F0: 49 54 3B 20 41 4E 44 45 52 53 20 41 4C 41 52 4D |IT; ANDERS ALARM|
00000300: 2E 00 34 0B 48 00 20 99 3A 99 20 22 4D 41 43 48 |..4.H. .:. "MACH|
00000310: 49 4E 45 43 4F 44 45 20 22 4E 24 22 20 4C 41 41 |INECODE "N$" LAA|
00000320: 44 46 4F 55 54 22 53 54 3B C7 28 31 35 37 29 22 |DFOUT"ST;.(157)"|
00000330: 2E 22 3A 8E 00 64 0B 64 00 97 20 35 33 32 38 30 |.":..d.d.. 53280|
00000340: 2C 31 31 3A 97 20 35 33 32 38 31 2C 31 31 20 20 |,11:. 53281,11 |
00000350: 20 20 20 20 20 20 20 20 20 20 3A 8F 20 49 4E 4C | :. INL|
00000360: 4F 4F 50 2E 00 87 0B 65 00 97 20 36 34 36 2C 31 |OOP....e.. 646,1|
00000370: 35 3A 97 20 35 32 2C 31 31 32 3A 97 20 35 36 2C |5:. 52,112:. 56,|
00000380: C2 28 35 32 29 3A 9C 00 A7 0B 69 00 8F 20 47 4F |.(52):....i.. GO|
00000390: 53 55 42 20 37 30 3A 49 46 20 4C 56 3D 32 20 54 |SUB 70:IF LV=2 T|
000003A0: 48 45 4E 20 33 34 39 00 E6 0B 6E 00 85 20 22 47 |HEN 349...n.. "G|
000003B0: 45 54 41 4C 20 28 45 49 4E 44 3D 31 29 3B 47 20 |ETAL (EIND=1);G |
000003C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :|
000003D0: 52 45 4D 20 49 4E 47 45 56 45 4E 20 56 41 4E 20 |REM INGEVEN VAN |
000003E0: 47 45 54 41 4C 2E 00 16 0C 78 00 8B 20 47 B3 32 |GETAL....x.. G.2|
000003F0: 20 A7 20 32 39 30 20 20 20 20 20 20 20 20 20 20 | . 290 |
00000400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F | :.|
00000410: 20 45 49 4E 44 3F 00 52 0C 82 00 52 B2 47 3A 50 | EIND?.R...R.G:P|
00000420: B2 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.2 |
00000430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000440: 20 20 3A 8F 20 45 45 52 53 54 45 20 50 52 49 45 | :. EERSTE PRIE|
00000450: 4D 2E 00 90 0C 8C 00 48 B2 B5 28 52 AD 50 29 3A |M......H..(R.P):|
00000460: 49 B2 52 AB 50 AC 48 20 20 20 20 20 20 20 20 20 |I.R.P.H |
00000470: 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 51 | :. Q|
00000480: 55 4F 54 49 45 4E 54 20 45 4E 20 52 45 53 54 2E |UOTIENT EN REST.|
00000490: 00 CD 0C 96 00 8B 20 49 B2 30 20 A7 20 32 30 30 |...... I.0 . 200|
000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004B0: 20 20 20 20 20 20 20 20 3A 8F 20 52 20 44 45 45 | :. R DEE|
000004C0: 4C 42 41 41 52 20 44 4F 4F 52 20 50 3F 00 03 0D |LBAAR DOOR P?...|
000004D0: A0 00 8B 20 48 B3 50 20 A7 20 8D 20 35 30 3A 89 |... H.P . . 50:.|
000004E0: 20 31 34 30 20 20 20 20 20 20 20 20 20 20 3A 8F | 140 :.|
000004F0: 20 4E 45 45 4E 3A 20 41 4C 4C 45 53 20 47 45 48 | NEEN: ALLES GEH|
00000500: 41 44 3F 00 45 0D AA 00 99 20 52 3A 89 20 31 31 |AD?.E.... R:. 11|
00000510: 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |0 |
00000520: 20 20 20 20 20 20 20 20 3A 8F 20 4A 41 3A 4C 41 | :. JA:LA|
00000530: 41 54 53 54 45 20 52 45 53 54 20 4F 50 20 53 43 |ATSTE REST OP SC|
00000540: 48 45 52 4D 2E 00 8B 0D C8 00 99 20 50 3A 52 B2 |HERM....... P:R.|
00000550: 48 3A 8B 20 52 B1 31 20 A7 20 31 34 30 20 20 20 |H:. R.1 . 140 |
00000560: 20 20 20 20 20 20 20 20 20 3A 8F 20 50 20 44 45 | :. P DE|
00000570: 45 4C 54 20 52 20 44 41 4E 20 46 41 43 54 4F 52 |ELT R DAN FACTOR|
00000580: 20 4F 50 20 53 43 48 45 52 4D 2E 00 95 0D D2 00 | OP SCHERM......|
00000590: 89 20 31 31 30 00 D5 0D 22 01 80 20 20 20 20 20 |. 110...".. |
000005A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :|
000005C0: 8F 20 45 49 4E 44 20 56 41 4E 20 4F 4E 54 42 49 |. EIND VAN ONTBI|
000005D0: 4E 44 45 4E 2E 00 07 0E 5D 01 80 20 20 20 20 20 |NDEN....].. |
000005E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :|
00000600: 8F 20 45 49 4E 44 2E 00 2F 0E 5E 01 94 20 20 20 |. EIND../.^.. |
00000610: 22 54 45 4D 46 22 2C 38 3A 99 3A 99 20 22 47 45 |"TEMF",8:.:. "GE|
00000620: 52 45 44 20 4E 41 41 52 20 54 45 4D 46 2E 22 00 |RED NAAR TEMF.".|
00000630: 58 0E 63 01 95 20 22 54 45 4D 46 22 2C 38 3A 99 |X.c.. "TEMF",8:.|
00000640: 3A 99 20 22 54 45 4D 46 20 47 45 43 4F 4E 54 52 |:. "TEMF GECONTR|
00000650: 4F 4C 45 45 52 44 2E 22 00 77 0E 68 01 9F 20 35 |OLEERD.".w.h.. 5|
00000660: 2C 38 2C 31 35 2C 22 53 30 3A 46 41 43 54 4F 52 |,8,15,"S0:FACTOR|
00000670: 2E 42 41 53 2F 4F 22 00 A1 0E 6D 01 98 35 2C 20 |.BAS/O"...m..5, |
00000680: 20 20 20 22 52 30 3A 46 41 43 54 4F 52 2E 42 41 | "R0:FACTOR.BA|
00000690: 53 2F 4F 3D 30 3A 46 41 43 54 4F 52 2E 42 41 53 |S/O=0:FACTOR.BAS|
000006A0: 22 00 C3 0E 72 01 98 35 2C 20 20 20 20 22 52 30 |"...r..5, "R0|
000006B0: 3A 46 41 43 54 4F 52 2E 42 41 53 3D 30 3A 54 45 |:FACTOR.BAS=0:TE|
000006C0: 4D 46 22 00 CB 0E 77 01 A0 20 35 00 F1 0E 7C 01 |MF"...w.. 5...|.|
000006D0: 99 3A 99 20 22 56 45 52 53 49 45 5A 45 54 20 46 |.:. "VERSIEZET F|
000006E0: 41 43 54 4F 52 2E 42 41 53 20 4B 4C 41 41 52 2E |ACTOR.BAS KLAAR.|
000006F0: 22 00 F7 0E 86 01 80 00 27 0F 90 01 9F 20 32 2C |".......'.... 2,|
00000700: 34 3A 98 32 2C C7 28 32 37 29 22 42 22 C7 28 30 |4:.2,.(27)"B".(0|
00000710: 32 29 C7 28 32 37 29 22 4D 22 C7 28 31 30 29 C7 |2).(27)"M".(10).|
00000720: 28 32 37 29 22 30 22 00 31 0F 91 01 9D 20 32 3A |(27)"0".1.... 2:|
00000730: 80 00 56 0F 95 01 98 32 2C C7 28 32 37 29 22 40 |..V....2,.(27)"@|
00000740: 20 45 49 4E 44 20 56 41 4E 20 4C 49 53 54 2E 22 | EIND VAN LIST."|
00000750: 3A A0 20 32 3A 80 00 9E 0F 9A 01 41 B2 35 30 30 |:. 2:......A.500|
00000760: 30 30 3A 42 B2 41 AA 36 3A 43 B2 42 AA 36 3A 44 |00:B.A.6:C.B.6:D|
00000770: B2 43 AA 36 3A 45 B2 44 AA 36 20 20 20 20 20 20 |.C.6:E.D.6 |
00000780: 20 20 3A 8F 20 4C 41 41 44 20 4D 41 43 48 49 4E | :. LAAD MACHIN|
00000790: 45 43 4F 44 45 20 46 49 4C 45 20 4E 24 2E 00 DC |ECODE FILE N$...|
000007A0: 0F 9B 01 97 41 AA 30 2C 31 36 39 3A 97 41 AA 31 |....A.0,169:.A.1|
000007B0: 2C 30 30 31 3A 97 41 AA 32 2C 31 36 32 20 20 20 |,001:.A.2,162 |
000007C0: 20 3A 97 41 AA 33 2C 30 30 38 3A 97 41 AA 34 2C | :.A.3,008:.A.4,|
000007D0: 31 36 30 3A 97 41 AA 35 2C 30 30 31 00 1A 10 9C |160:.A.5,001....|
000007E0: 01 97 42 AA 30 2C 30 33 32 3A 97 42 AA 31 2C 31 |..B.0,032:.B.1,1|
000007F0: 38 36 3A 97 42 AA 32 2C 32 35 35 20 20 20 20 3A |86:.B.2,255 :|
00000800: 97 42 AA 33 2C 31 37 33 3A 97 42 AA 34 2C 32 32 |.B.3,173:.B.4,22|
00000810: 38 3A 97 42 AA 35 2C 30 30 32 00 58 10 9D 01 97 |8:.B.5,002.X....|
00000820: 43 AA 30 2C 31 36 32 3A 97 43 AA 31 2C 32 32 39 |C.0,162:.C.1,229|
00000830: 3A 97 43 AA 32 2C 31 36 30 20 20 20 20 3A 97 43 |:.C.2,160 :.C|
00000840: AA 33 2C 30 30 32 3A 97 43 AA 34 2C 30 33 32 3A |.3,002:.C.4,032:|
00000850: 97 43 AA 35 2C 31 38 39 00 96 10 9E 01 97 44 AA |.C.5,189......D.|
00000860: 30 2C 32 35 35 3A 97 44 AA 31 2C 31 36 39 3A 97 |0,255:.D.1,169:.|
00000870: 44 AA 32 2C 30 30 30 20 20 20 20 3A 97 44 AA 33 |D.2,000 :.D.3|
00000880: 2C 31 36 32 3A 97 44 AA 34 2C 32 35 35 3A 97 44 |,162:.D.4,255:.D|
00000890: AA 35 2C 31 36 30 00 D4 10 9F 01 97 45 AA 30 2C |.5,160......E.0,|
000008A0: 32 35 35 3A 97 45 AA 31 2C 30 33 32 3A 97 45 AA |255:.E.1,032:.E.|
000008B0: 32 2C 32 31 33 20 20 20 20 3A 97 45 AA 33 2C 32 |2,213 :.E.3,2|
000008C0: 35 35 3A 97 45 AA 34 2C 30 39 36 3A 97 45 AA 35 |55:.E.4,096:.E.5|
000008D0: 2C 30 30 30 00 E8 10 A0 01 4C B2 C3 28 4E 24 29 |,000.....L..(N$)|
000008E0: 3A 97 20 37 34 30 2C 4C 00 25 11 A1 01 81 20 49 |:. 740,L.%.... I|
000008F0: B2 31 20 A4 20 4C 3A 97 20 37 34 30 AA 49 2C C6 |.1 . L:. 740.I,.|
00000900: 28 CA 28 4E 24 2C 49 2C 31 29 29 3A 82 20 49 3A |(.(N$,I,1)):. I:|
00000910: 4C 56 B2 30 3A 99 20 22 4C 41 41 44 20 22 4E 24 |LV.0:. "LAAD "N$|
00000920: 22 2E 2E 2E 22 00 69 11 A2 01 9E 20 41 3A 4C 56 |"...".i.... A:LV|
00000930: B2 32 AA 28 53 54 B2 36 34 29 20 20 20 20 20 20 |.2.(ST.64) |
00000940: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3A | :|
00000950: 8F 20 56 4C 41 47 20 31 3D 4E 4F 52 4D 41 41 4C |. VLAG 1=NORMAAL|
00000960: 2C 20 32 3D 46 4F 55 54 2E 00 6F 11 A3 01 8E 00 |, 2=FOUT..o.....|
00000970: B9 11 A4 01 41 B2 35 30 30 34 30 3A 42 B2 41 AA |....A.50040:B.A.|
00000980: 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |6 |
00000990: 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 53 | :. S|
000009A0: 4C 55 49 54 20 4C 41 41 44 20 4D 41 43 48 49 4E |LUIT LAAD MACHIN|
000009B0: 45 43 4F 44 45 20 4E 24 2E 00 F7 11 A5 01 97 41 |ECODE N$.......A|
000009C0: AA 30 2C 31 36 39 3A 97 41 AA 31 2C 30 30 31 3A |.0,169:.A.1,001:|
000009D0: 97 41 AA 32 2C 30 33 32 20 20 20 20 3A 97 41 AA |.A.2,032 :.A.|
000009E0: 33 2C 31 39 35 3A 97 41 AA 34 2C 32 35 35 3A 97 |3,195:.A.4,255:.|
000009F0: 41 AA 35 2C 30 33 32 00 35 12 A6 01 97 42 AA 30 |A.5,032.5....B.0|
00000A00: 2C 32 33 31 3A 97 42 AA 31 2C 32 35 35 3A 97 42 |,231:.B.1,255:.B|
00000A10: AA 32 2C 30 39 36 20 20 20 20 3A 97 42 AA 33 2C |.2,096 :.B.3,|
00000A20: 30 30 30 3A 97 42 AA 34 2C 30 30 30 3A 97 42 AA |000:.B.4,000:.B.|
00000A30: 35 2C 30 30 30 00 3F 12 A7 01 9E 20 41 3A 8E 00 |5,000.?.... A:..|
00000A40: 5D 12 C2 01 9F 20 31 35 2C 38 2C 31 35 3A 84 31 |].... 15,8,15:.1|
00000A50: 35 2C 41 24 2C 42 24 2C 43 24 2C 44 24 00 7B 12 |5,A$,B$,C$,D$.{.|
00000A60: C3 01 99 20 41 24 22 2C 20 22 42 24 22 2C 20 22 |... A$", "B$", "|
00000A70: 43 24 22 2C 20 22 44 24 22 2E 22 00 86 12 C4 01 |C$", "D$".".....|
00000A80: A0 20 31 35 3A 8E 00 B6 12 E8 03 97 20 35 33 32 |. 15:....... 532|
00000A90: 38 30 2C 31 31 3A 97 20 35 33 32 38 31 2C 31 31 |80,11:. 53281,11|
00000AA0: 20 20 20 20 20 20 20 20 20 20 20 20 3A 8F 20 49 | :. I|
00000AB0: 4E 4C 4F 4F 50 2E 00 D9 12 F2 03 97 20 36 34 36 |NLOOP....... 646|
00000AC0: 2C 31 35 3A 97 20 35 32 2C 31 31 32 3A 97 20 35 |,15:. 52,112:. 5|
00000AD0: 36 2C C2 28 35 32 29 3A 9C 00 E5 12 FC 03 48 B2 |6,.(52):......H.|
00000AE0: 32 38 36 37 32 00 09 13 06 04 87 20 4B 3A 8B 20 |28672...... K:. |
00000AF0: 4B B1 B2 30 20 A7 20 97 20 48 2C 4B 3A 48 B2 48 |K..0 . . H,K:H.H|
00000B00: AA 31 3A 89 20 31 30 33 30 00 3C 13 10 04 85 20 |.1:. 1030.<.... |
00000B10: 22 49 4E 42 59 54 45 20 28 30 30 30 2E 2E 32 35 |"INBYTE (000..25|
00000B20: 35 29 2C 20 2D 31 3D 45 49 4E 44 45 22 3B 49 3A |5), -1=EINDE";I:|
00000B30: 8B 20 49 B3 30 20 A7 20 31 30 39 30 00 5B 13 15 |. I.0 . 1090.[..|
00000B40: 04 8B 20 49 B1 32 35 35 20 A7 20 99 20 22 46 4F |.. I.255 . . "FO|
00000B50: 55 54 2E 22 3A 89 20 31 30 34 30 00 76 13 1A 04 |UT.":. 1040.v...|
00000B60: 4A B2 49 3A 8B 20 4A B1 B2 31 32 38 20 A7 20 4A |J.I:. J..128 . J|
00000B70: B2 4A AB 32 35 36 00 8A 13 1F 04 97 20 37 38 30 |.J.256...... 780|
00000B80: 2C 49 3A 9E 20 32 38 36 37 32 00 A2 13 24 04 41 |,I:. 28672...$.A|
00000B90: 31 B2 C2 28 37 38 31 29 3A 41 30 B2 C2 28 37 38 |1..(781):A0..(78|
00000BA0: 30 29 00 BC 13 29 04 8B 20 41 30 B1 B2 31 32 38 |0)...).. A0..128|
00000BB0: 20 A7 20 41 30 B2 41 30 AB 32 35 36 00 D6 13 2E | . A0.A0.256....|
00000BC0: 04 8B 20 41 31 B1 B2 31 32 38 20 A7 20 41 31 B2 |.. A1..128 . A1.|
00000BD0: 41 31 AB 32 35 36 00 EE 13 33 04 99 20 4A 22 2D |A1.256...3.. J"-|
00000BE0: 3E 22 41 31 22 2A 31 30 30 22 41 30 3A 99 00 F9 |>"A1"*100"A0:...|
00000BF0: 13 38 04 89 20 31 30 34 30 00 FF 13 42 04 80 00 |.8.. 1040...B...|
00000C00: 3F 14 4C 04 83 20 20 20 31 36 32 2C 30 30 30 2C |?.L.. 162,000,|
00000C10: 32 30 31 2C 30 35 30 2C 31 34 34 2C 30 31 35 2C |201,050,144,015,|
00000C20: 32 30 31 2C 31 32 38 2C 31 37 36 2C 30 30 34 2C |201,128,176,004,|
00000C30: 31 30 35 2C 31 35 36 2C 32 33 32 2C 30 39 36 00 |105,156,232,096.|
00000C40: 6B 14 56 04 83 20 20 20 32 30 31 2C 32 30 36 2C |k.V.. 201,206,|
00000C50: 31 37 36 2C 30 30 33 2C 31 30 35 2C 31 30 30 2C |176,003,105,100,|
00000C60: 32 30 32 2C 30 39 36 2C 2D 30 31 00 00 00 |202,096,-01... |
..L... . 100 :. DRAAIEN.
PROGRAMMA : FACTOR.BAS .....
. . 100 :. DRAAIEN.
SCHIJF : DEMO-4..U... . 350
:. VERSIEZET. TAAL
: BASIC...... . 400 :. LIJ
STEN OP PRINTER. DATUM : 13 DE
C.1991..J... . 405 :. HERZET PR
INTER. PROGRAMMEUR : J.H.VAN RIJ
N...... .
***************
..... ...... . DIT PROGRAMMA ONTBINDT
GETALLEN IN FACTOREN.."... . LATER IN
ASSEMBLERTAAL TE BRENGEN..W.2. . P.2 .
P.3:. :. VOLGEND PRIEM..
W.3. P.P.2:I..(P.3):. P.3.I . ....4. P.P
.2:..A.F. N$."COD.HONTAL":. 410
:. LAAD MACHINECODE....G. . LV.2 .
. 420:. :. OKEE? JA:SLUIT; ANDE
RS ALARM..4.H. .:. "MACHINECODE "N$" LAA
DFOUT"ST;G(157)".":..D.D.. 53280,11:. 53
281,11 :. INLOOP....E.. 646,1
5:. 52,112:. 56,B(52):....I.. GOSUB 70:I
F LV=2 THEN 349...N.. "GETAL (EIND=1);G
:REM INGEVEN VAN GETAL...
.X.. G.2 . 290 :.
EIND?.R...R.G:P.2
:. EERSTE PRIEM......H..(R.P):
I.R.P.H :. QUOTIENT
EN REST..M.... I.0 . 200
:. R DEELBAAR DOOR P?... .. H.P
. . 50:. 140 :. NEEN: ALLES GEH
AD?.E.... R:. 110
:. JA:LAATSTE REST OP SCHERM....H.. P:R.
H:. R.1 . 140 :. P DEELT R DA
N FACTOR OP SCHERM....R.. 110.U."..
:. EIND V
AN ONTBINDEN....]..
:. EIND../.^.. "TEMF",8
:.:. "GERED NAAR TEMF.".X.C.. "TEMF",8:.
:. "TEMF GECONTROLEERD.".W.H.. 5,8,15,"S
0:FACTOR.BAS/O"...M..5, "R0:FACTOR.BA
S/O=0:FACTOR.BAS".C.R..5, "R0:FACTOR.
BAS=0:TEMF".K.W. 5...|..:. "VERSIEZET F
ACTOR.BAS KLAAR.".......'.... 2,4:.2,G(2
7)"B"G(02)G(27)"M"G(10)G(27)"0".1.... 2:
..V....2,G(27)"@ EIND VAN LIST.": 2:...
...A.50000:B.A.6:C.B.6:D.C.6:E.D.6
:. LAAD MACHINECODE FILE N$.......A.0,
169:.A.1,001:.A.2,162 :.A.3,008:.A.4,
160:.A.5,001......B.0,032:.B.1,186:.B.2,
255 :.B.3,173:.B.4,228:.B.5,002.X....
C.0,162:.C.1,229:.C.2,160 :.C.3,002:.
C.4,032:.C.5,189......D.0,255:.D.1,169:.
D.2,000 :.D.3,162:.D.4,255:.D.5,160.T
....E.0,255:.E.1,032:.E.2,213 :.E.3,2
55:.E.4,096:.E.5,000... .L.C(N$):. 740,L
.%.... I.1 . L:. 740.I,F(J(N$,I,1)):. I:
LV.0:. "LAAD "N$"...".I.... A:LV.2.(ST.6
4) :. VLAG 1=NORMAAL
, 2=FOUT..O.........A.50040:B.A.6
:. SLUIT LAAD MACHIN
ECODE N$.......A.0,169:.A.1,001:.A.2,032
:.A.3,195:.A.4,255:.A.5,032.5....B.0
,231:.B.1,255:.B.2,096 :.B.3,000:.B.4
,000:.B.5,000.?.... A:..].B.. 15,8,15:.1
5,A$,B$,C$,D$.{.C.. A$", "B$", "C$", "D$
"."...D. 15:....... 53280,11:. 53281,11
:. INLOOP..Y.... 646,15:. 52
,112:. 56,B(52):......H.28672...... K:.
K..0 . . H,K:H.H.1:. 1030.<.... "INBYTE
(000..255), -1=EINDE";I:. I.0 . 1090.[..
.. I.255 . . "FOUT.":. 1040.V...J.I:. J.
.128 . J.J.256...... 780,I:. 28672...$.A
1.B(781):A0.B(780)...).. A0..128 . A0.A0
.256.V.... A1..128 . A1.A1.256...3.. J"-
>"A1"*100"A0:....8.. 1040...B...?.L..
162,000,201,050,144,015,201,128,176,004,
105,156,232,096.K.V.. 201,206,176,003,
105,100,202,096,-01...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL