I/P DATA
FILE INFORMATION
FILENAME(S): I/P DATA
FILE TYPE(S): PRG
FILE SIZE: 3.5K
FIRST SEEN: 2025-11-30 21:29:20
APPEARS ON: 1 disk(s)
FILE HASH
d79d71d9027030eb3f59090f2e5f4e27c5dd719fa88c06f9a1f98171519b0a43
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PRIME | I/P DATA | PRG | DuncanTwain | 13 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 15 08 0A 00 97 35 35 2C 30 3A 97 35 36 2C |.......55,0:.56,| 00000010: 31 32 38 3A 9C 00 32 08 0F 00 97 35 33 32 38 30 |128:..2....53280| 00000020: 2C 30 3A 97 35 33 32 38 31 2C 38 3A 97 36 34 36 |,0:.53281,8:.646| 00000030: 2C 37 00 4D 08 14 00 86 4B 24 28 35 29 3A 81 5A |,7.M....K$(5):.Z| 00000040: B2 31 A4 35 3A 87 4B 24 28 5A 29 3A 82 00 59 08 |.1.5:.K$(Z):..Y.| 00000050: 19 00 86 44 24 28 32 30 29 00 75 08 1E 00 99 22 |...D$(20).u...."| 00000060: 93 11 22 A3 31 33 29 22 2A 2A 2A 20 4D 45 4E 55 |..".13)"*** MENU| 00000070: 20 2A 2A 2A 22 00 8E 08 23 00 97 32 31 31 2C 34 | ***"...#..211,4| 00000080: 3A 97 32 31 34 2C 33 3A 9E 35 38 37 33 32 00 AE |:.214,3:.58732..| 00000090: 08 28 00 99 A3 31 30 29 22 31 2E 43 48 45 43 4B |.(...10)"1.CHECK| 000000A0: 20 44 45 43 49 4D 41 4C 20 44 41 54 41 22 00 CB | DECIMAL DATA"..| 000000B0: 08 2D 00 99 A3 31 30 29 22 32 2E 43 48 45 43 4B |.-...10)"2.CHECK| 000000C0: 20 48 45 58 2E 20 44 41 54 41 22 00 E5 08 32 00 | HEX. DATA"...2.| 000000D0: 99 A3 31 30 29 22 33 2E 54 4F 20 4C 4F 41 44 20 |..10)"3.TO LOAD | 000000E0: 44 41 54 41 22 00 05 09 37 00 99 A3 31 30 29 22 |DATA"...7...10)"| 000000F0: 34 2E 45 4E 54 45 52 20 44 45 43 49 4D 41 4C 20 |4.ENTER DECIMAL | 00000100: 44 41 54 41 22 00 22 09 3C 00 99 A3 31 30 29 22 |DATA".".<...10)"| 00000110: 35 2E 45 4E 54 45 52 20 48 45 58 2E 20 44 41 54 |5.ENTER HEX. DAT| 00000120: 41 22 00 3C 09 41 00 99 3A 99 A3 31 33 29 22 45 |A".<.A..:..13)"E| 00000130: 4E 54 45 52 20 4E 55 4D 42 45 52 22 00 4E 09 46 |NTER NUMBER".N.F| 00000140: 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 37 30 00 5A |..A$:.A$."".70.Z| 00000150: 09 4B 00 4A B2 C5 28 41 24 29 00 6A 09 50 00 8B |.K.J..(A$).j.P..| 00000160: 4A B3 31 B0 4A B1 35 A7 37 30 00 78 09 55 00 8B |J.1.J.5.70.x.U..| 00000170: 4A B2 33 A7 8D 35 37 35 00 B2 09 5A 00 97 32 31 |J.3..575...Z..21| 00000180: 31 2C 30 3A 97 32 31 34 2C 39 3A 9E 35 38 37 33 |1,0:.214,9:.5873| 00000190: 32 3A 99 22 20 20 20 20 20 20 20 20 20 20 2E 2E |2:." ..| 000001A0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................| 000001B0: 2E 22 00 D9 09 5F 00 97 32 31 31 2C 31 33 3A 97 |."..._..211,13:.| 000001C0: 32 31 34 2C 31 31 3A 9E 35 38 37 33 32 3A 99 4B |214,11:.58732:.K| 000001D0: 24 28 4A 29 3A 8D 34 30 30 00 E8 09 64 00 8B 42 |$(J):.400...d..B| 000001E0: 24 B3 B1 22 59 22 A7 8A 00 FD 09 69 00 53 53 B2 |$.."Y".....i.SS.| 000001F0: 41 44 AA 28 28 4C AB 31 29 AC 4C 51 29 00 23 0A |AD.((L.1).LQ).#.| 00000200: 6E 00 99 22 93 22 3A 97 32 31 31 2C 31 32 3A 97 |n..".":.211,12:.| 00000210: 32 31 34 2C 32 3A 9E 35 38 37 33 32 3A 99 4B 24 |214,2:.58732:.K$| 00000220: 28 4A 29 00 50 0A 73 00 97 32 31 31 2C 31 30 3A |(J).P.s..211,10:| 00000230: 97 32 31 34 2C 34 3A 9E 35 38 37 33 32 3A 99 22 |.214,4:.58732:."| 00000240: 53 54 41 52 54 20 41 44 44 52 45 53 53 22 41 44 |START ADDRESS"AD| 00000250: 00 8B 0A 78 00 97 32 31 31 2C 34 3A 97 32 31 34 |...x..211,4:.214| 00000260: 2C 38 3A 9E 35 38 37 33 32 3A 99 22 4C 49 4E 45 |,8:.58732:."LINE| 00000270: 20 4E 4F 2E 20 20 20 20 20 20 20 43 55 52 52 45 | NO. CURRE| 00000280: 4E 54 20 41 44 44 52 45 53 53 22 00 A8 0A 7D 00 |NT ADDRESS"...}.| 00000290: 97 32 31 31 2C 35 3A 97 32 31 34 2C 31 30 3A 9E |.211,5:.214,10:.| 000002A0: 35 38 37 33 32 3A 99 4C 00 D0 0A 7F 00 97 32 31 |58732:.L......21| 000002B0: 31 2C 32 33 3A 97 32 31 34 2C 31 30 3A 9E 35 38 |1,23:.214,10:.58| 000002C0: 37 33 32 3A 99 53 53 3A 54 B2 30 3A 43 53 B2 30 |732:.SS:T.0:CS.0| 000002D0: 00 D6 0A 82 00 3A 00 E7 0A 87 00 8B 4A B2 31 B0 |.....:......J.1.| 000002E0: 4A B2 32 A7 32 38 35 00 ED 0A 8C 00 3A 00 F9 0A |J.2.285.....:...| 000002F0: 91 00 81 51 B2 31 A4 4C 51 00 09 0B 96 00 8B 43 |...Q.1.LQ......C| 00000300: 24 B2 22 52 22 A7 31 36 35 00 43 0B 9B 00 97 32 |$."R".165.C....2| 00000310: 31 31 2C 35 3A 97 32 31 34 2C 31 32 3A 9E 35 38 |11,5:.214,12:.58| 00000320: 37 33 32 3A 85 22 44 41 54 41 20 20 20 20 20 20 |732:."DATA | 00000330: 9D 9D 9D 9D 9D 9D 22 3B 56 24 3A 44 24 28 51 29 |......";V$:D$(Q)| 00000340: B2 56 24 00 5C 0B A0 00 8B 4A B2 35 AF C3 28 44 |.V$.\....J.5..(D| 00000350: 24 28 51 29 29 B3 B1 32 A7 31 35 35 00 87 0B A2 |$(Q))..2.155....| 00000360: 00 8B 4A B2 35 AF C8 28 44 24 28 51 29 2C 31 29 |..J.5..(D$(Q),1)| 00000370: B1 22 46 22 B0 CA 28 44 24 28 51 29 2C 32 29 B1 |."F"..(D$(Q),2).| 00000380: 22 46 22 A7 31 35 35 00 A8 0B A5 00 44 44 B2 C5 |"F".155.....DD..| 00000390: 28 44 24 28 51 29 29 3A 8B 44 44 B3 30 B0 44 44 |(D$(Q)):.DD.0.DD| 000003A0: B1 32 35 35 A7 31 35 35 00 BB 0B AA 00 8B 4A B2 |.255.155......J.| 000003B0: 35 A7 8D 34 38 30 3A 44 44 B2 47 00 C6 0B AF 00 |5..480:DD.G.....| 000003C0: 97 53 53 2C 44 44 00 E2 0B B4 00 97 32 31 31 2C |.SS,DD......211,| 000003D0: 30 AA 54 3A 97 32 31 34 2C 31 32 3A 9E 35 38 37 |0.T:.214,12:.587| 000003E0: 33 32 00 17 0C B9 00 49 B2 C3 28 44 24 28 51 29 |32.....I..(D$(Q)| 000003F0: 29 3A 99 3A 99 3A 99 A3 54 29 44 24 28 51 29 3B |):.:.:..T)D$(Q);| 00000400: 3A 8B 51 B3 B1 4C 51 A7 99 22 2C 22 3B 3A 54 B2 |:.Q..LQ..",";:T.| 00000410: 54 AA 28 49 AA 31 29 00 2C 0C BE 00 43 53 B2 43 |T.(I.1).,...CS.C| 00000420: 53 AA 44 44 3A 53 53 B2 53 53 AA 31 00 5B 0C C3 |S.DD:SS.SS.1.[..| 00000430: 00 97 32 31 31 2C 32 33 3A 97 32 31 34 2C 31 30 |..211,23:.214,10| 00000440: 3A 9E 35 38 37 33 32 3A 99 22 20 20 20 20 20 20 |:.58732:." | 00000450: 9D 9D 9D 9D 9D 9D 22 53 53 3A 82 00 98 0C C8 00 |......"SS:......| 00000460: 97 32 31 31 2C 34 3A 97 32 31 34 2C 31 37 3A 9E |.211,4:.214,17:.| 00000470: 35 38 37 33 32 3A 99 22 05 43 48 45 43 4B 53 55 |58732:.".CHECKSU| 00000480: 4D 3A 2D 22 43 53 22 20 20 43 4F 52 52 45 43 54 |M:-"CS" CORRECT| 00000490: 20 28 59 2F 4E 29 9E 22 00 C9 0C CD 00 97 32 31 | (Y/N)."......21| 000004A0: 31 2C 31 30 3A 97 32 31 34 2C 31 39 3A 9E 35 38 |1,10:.214,19:.58| 000004B0: 37 33 32 3A 99 22 27 4D 27 20 52 45 54 55 52 4E |732:."'M' RETURN| 000004C0: 20 54 4F 20 4D 45 4E 55 22 00 F5 0C D2 00 97 32 | TO MENU"......2| 000004D0: 31 31 2C 31 30 3A 97 32 31 34 2C 32 30 3A 9E 35 |11,10:.214,20:.5| 000004E0: 38 37 33 32 3A 99 22 27 53 27 20 53 41 56 45 20 |8732:."'S' SAVE | 000004F0: 44 41 54 41 22 00 28 0D D7 00 97 32 31 31 2C 31 |DATA".(....211,1| 00000500: 30 3A 97 32 31 34 2C 32 31 3A 9E 35 38 37 33 32 |0:.214,21:.58732| 00000510: 3A 99 22 27 52 27 20 52 45 50 45 41 54 20 4C 41 |:."'R' REPEAT LA| 00000520: 53 54 20 4C 49 4E 45 22 00 3B 0D E1 00 A1 43 24 |ST LINE".;....C$| 00000530: 3A 8B 43 24 B2 22 22 A7 32 32 35 00 5A 0D E6 00 |:.C$."".225.Z...| 00000540: 8B 43 24 B2 22 4E 22 A7 8D 34 36 30 3A 53 53 B2 |.C$."N"..460:SS.| 00000550: 53 53 AB 4C 51 3A 89 31 32 35 00 76 0D EB 00 8B |SS.LQ:.125.v....| 00000560: 43 24 B2 22 59 22 A7 8D 34 36 30 3A 4C B2 4C AA |C$."Y"..460:L.L.| 00000570: 31 3A 89 31 32 35 00 85 0D F0 00 8B 43 24 B2 22 |1:.125......C$."| 00000580: 4D 22 A7 33 30 00 95 0D F5 00 8B 43 24 B2 22 53 |M".30......C$."S| 00000590: 22 A7 35 32 35 00 B5 0D FA 00 8B 43 24 B2 22 52 |".525......C$."R| 000005A0: 22 A7 8D 34 36 30 3A 4C B2 4C AA 31 3A 51 B2 30 |"..460:L.L.1:Q.0| 000005B0: 3A 89 31 32 35 00 BE 0D 09 01 89 32 32 35 00 C4 |:.125......225..| 000005C0: 0D 0E 01 3A 00 DF 0D 13 01 8F 20 2A 2A 2A 2A 20 |...:...... **** | 000005D0: 43 48 45 43 4B 20 44 41 54 41 20 2A 2A 2A 2A 00 |CHECK DATA ****.| 000005E0: E5 0D 18 01 3A 00 F1 0D 1D 01 45 B2 30 3A 58 B2 |....:.....E.0:X.| 000005F0: 30 00 0E 0E 22 01 81 45 B2 30 A4 4C 51 AB 31 3A |0..."..E.0.LQ.1:| 00000600: 97 32 31 34 2C 31 32 3A 9E 35 38 37 33 32 00 20 |.214,12:.58732. | 00000610: 0E 27 01 50 B2 C2 28 53 53 AA 45 29 3A 44 B2 50 |.'.P..(SS.E):D.P| 00000620: 00 33 0E 2C 01 8B 4A B2 32 A7 8D 34 39 35 3A 89 |.3.,..J.2..495:.| 00000630: 33 31 30 00 57 0E 33 01 99 CA 28 C4 28 50 29 2C |310.W.3...(.(P),| 00000640: 32 29 3B 3A 8B 45 B3 B1 4C 51 AB 31 A7 99 22 2C |2);:.E..LQ.1..",| 00000650: 22 3B 3A 89 33 31 35 00 6F 0E 36 01 99 48 24 3B |";:.315.o.6..H$;| 00000660: 3A 8B 45 B3 B1 4C 51 AB 31 A7 99 22 2C 22 3B 00 |:.E..LQ.1..",";.| 00000670: 84 0E 3B 01 43 53 B2 43 53 AA 50 3A 48 24 B2 22 |..;.CS.CS.P:H$."| 00000680: 20 22 3A 82 00 A3 0E 40 01 97 32 31 31 2C 32 33 | ":....@..211,23| 00000690: 3A 97 32 31 34 2C 31 30 3A 9E 35 38 37 33 32 3A |:.214,10:.58732:| 000006A0: 99 53 53 00 C0 0E 42 01 97 32 31 31 2C 35 3A 97 |.SS...B..211,5:.| 000006B0: 32 31 34 2C 31 30 3A 9E 35 38 37 33 32 3A 99 4C |214,10:.58732:.L| 000006C0: 00 DB 0E 45 01 97 32 31 31 2C 31 32 3A 97 32 31 |...E..211,12:.21| 000006D0: 34 2C 31 36 3A 9E 35 38 37 33 32 00 F0 0E 4A 01 |4,16:.58732...J.| 000006E0: 99 22 05 43 48 45 43 4B 53 55 4D 3A 2D 22 43 53 |.".CHECKSUM:-"CS| 000006F0: 00 09 0F 4F 01 99 A3 31 31 29 22 11 05 27 4D 27 |...O...11)"..'M'| 00000700: 20 54 4F 20 4D 45 4E 55 22 00 27 0F 54 01 99 A3 | TO MENU".'.T...| 00000710: 31 31 29 22 05 27 2B 27 20 53 54 45 50 20 46 4F |11)".'+' STEP FO| 00000720: 52 57 41 52 44 9E 22 00 41 0F 59 01 99 A3 31 31 |RWARD.".A.Y...11| 00000730: 29 22 05 27 53 27 20 53 41 56 45 20 44 41 54 41 |)".'S' SAVE DATA| 00000740: 22 00 61 0F 5E 01 99 A3 31 31 29 22 05 27 45 27 |".a.^...11)".'E'| 00000750: 20 45 4E 54 45 52 20 4E 45 57 20 4C 49 4E 45 9E | ENTER NEW LINE.| 00000760: 22 00 74 0F 63 01 A1 46 24 3A 8B 46 24 B2 22 22 |".t.c..F$:.F$.""| 00000770: A7 33 35 35 00 83 0F 68 01 8B 46 24 B2 22 4D 22 |.355...h..F$."M"| 00000780: A7 33 30 00 93 0F 6D 01 8B 46 24 B2 22 53 22 A7 |.30...m..F$."S".| 00000790: 35 32 35 00 BD 0F 72 01 8B 46 24 B2 22 2B 22 A7 |525...r..F$."+".| 000007A0: 53 53 B2 53 53 AA 4C 51 3A 4C B2 4C AA 31 3A 43 |SS.SS.LQ:L.L.1:C| 000007B0: 53 B2 30 3A 8D 34 36 30 3A 89 32 38 35 00 D6 0F |S.0:.460:.285...| 000007C0: 77 01 8B 46 24 B2 22 45 22 AF 4A B2 31 A7 4A B2 |w..F$."E".J.1.J.| 000007D0: 34 3A 89 31 31 30 00 EF 0F 7C 01 8B 46 24 B2 22 |4:.110...|..F$."| 000007E0: 45 22 AF 4A B2 32 A7 4A B2 35 3A 89 31 31 30 00 |E".J.2.J.5:.110.| 000007F0: F8 0F 81 01 89 33 35 35 00 FE 0F 86 01 80 00 04 |.....355........| 00000800: 10 8B 01 3A 00 23 10 90 01 8F 20 2A 2A 2A 2A 20 |...:.#.... **** | 00000810: 49 4E 50 55 54 20 52 4F 55 54 49 4E 45 53 20 2A |INPUT ROUTINES *| 00000820: 2A 2A 2A 00 29 10 95 01 3A 00 5A 10 9A 01 97 32 |***.)...:.Z....2| 00000830: 31 31 2C 39 3A 97 32 31 34 2C 31 33 3A 9E 35 38 |11,9:.214,13:.58| 00000840: 37 33 32 3A 99 22 45 4E 54 45 52 20 41 44 44 52 |732:."ENTER ADDR| 00000850: 45 53 53 20 22 3B 3A 85 41 44 00 8B 10 9F 01 8F |ESS ";:.AD......| 00000860: 20 20 49 46 41 44 3C 31 32 32 38 38 54 48 45 4E | IFAD<12288THEN| 00000870: 50 4F 4B 45 37 38 31 2C 31 33 3A 53 59 53 35 39 |POKE781,13:SYS59| 00000880: 39 30 33 3A 47 4F 54 4F 34 31 30 00 BB 10 A4 01 |903:GOTO410.....| 00000890: 97 32 31 31 2C 39 3A 97 32 31 34 2C 31 35 3A 9E |.211,9:.214,15:.| 000008A0: 35 38 37 33 32 3A 99 22 46 49 52 53 54 20 4C 49 |58732:."FIRST LI| 000008B0: 4E 45 20 4E 4F 2E 22 3B 3A 85 4C 00 D8 10 A9 01 |NE NO.";:.L.....| 000008C0: 8B 4C B3 31 A7 97 37 38 31 2C 31 35 3A 9E 35 39 |.L.1..781,15:.59| 000008D0: 39 30 33 3A 89 34 32 30 00 09 11 AE 01 97 32 31 |903:.420......21| 000008E0: 31 2C 39 3A 97 32 31 34 2C 31 37 3A 9E 35 38 37 |1,9:.214,17:.587| 000008F0: 33 32 3A 99 22 49 54 45 4D 53 20 50 45 52 20 4C |32:."ITEMS PER L| 00000900: 49 4E 45 22 3B 3A 85 4C 51 00 2D 11 B3 01 8B 4C |INE";:.LQ.-....L| 00000910: 51 B3 31 B0 4C 51 B1 32 30 A7 97 37 38 31 2C 31 |Q.1.LQ.20..781,1| 00000920: 37 3A 9E 35 39 39 30 33 3A 89 34 33 30 00 48 11 |7:.59903:.430.H.| 00000930: B8 01 99 3A 99 A3 31 33 29 22 43 4F 52 52 45 43 |...:..13)"CORREC| 00000940: 54 20 28 59 2F 4E 29 22 00 5B 11 BD 01 A1 42 24 |T (Y/N)".[....B$| 00000950: 3A 8B 42 24 B2 22 22 A7 34 34 35 00 74 11 C2 01 |:.B$."".445.t...| 00000960: 8B 42 24 B3 B1 22 59 22 AF 42 24 B3 B1 22 4E 22 |.B$.."Y".B$.."N"| 00000970: A7 34 34 35 00 7A 11 C7 01 8E 00 99 11 CC 01 81 |.445.z..........| 00000980: 59 B2 31 32 A4 32 32 3A 97 37 38 31 2C 59 3A 9E |Y.12.22:.781,Y:.| 00000990: 35 39 39 30 33 3A 82 3A 8E 00 9F 11 D1 01 3A 00 |59903:.:......:.| 000009A0: BB 11 D6 01 8F 20 2A 2A 2A 2A 20 48 45 58 2E 54 |..... **** HEX.T| 000009B0: 4F 20 44 45 43 2E 20 2A 2A 2A 2A 00 C1 11 DB 01 |O DEC. ****.....| 000009C0: 3A 00 00 12 E0 01 47 B2 30 3A 81 57 B2 31 A4 32 |:.....G.0:.W.1.2| 000009D0: 3A 47 25 B2 C6 28 CA 28 44 24 28 51 29 2C 57 29 |:G%..(.(D$(Q),W)| 000009E0: 29 3A 47 25 B2 47 25 AB 34 38 AA 28 47 25 B1 36 |):G%.G%.48.(G%.6| 000009F0: 34 29 AC 37 3A 47 B2 31 36 AC 47 AA 47 25 3A 82 |4).7:G.16.G.G%:.| 00000A00: 00 06 12 E5 01 8E 00 1A 12 EA 01 8F 2A 2A 20 44 |............** D| 00000A10: 45 43 2F 48 45 58 20 2A 2A 2A 00 4C 12 EF 01 48 |EC/HEX ***.L...H| 00000A20: 24 B2 C7 28 B5 28 44 AD 31 36 29 AB 28 B5 28 44 |$..(.(D.16).(.(D| 00000A30: AD 31 36 29 B1 39 29 AC 37 AA 34 38 29 3A 44 B2 |.16).9).7.48):D.| 00000A40: 44 AB B5 28 44 AD 31 36 29 AC 31 36 00 6A 12 F4 |D..(D.16).16.j..| 00000A50: 01 48 24 B2 48 24 AA C7 28 44 AB 28 44 B1 39 29 |.H$.H$..(D.(D.9)| 00000A60: AC 37 AA 34 38 29 3A 44 B2 30 00 70 12 F9 01 8E |.7.48):D.0.p....| 00000A70: 00 76 12 FE 01 3A 00 93 12 03 02 8F 20 2A 2A 2A |.v...:...... ***| 00000A80: 2A 20 53 41 56 45 20 52 4F 55 54 49 4E 45 20 2A |* SAVE ROUTINE *| 00000A90: 2A 2A 2A 00 99 12 08 02 3A 00 AF 12 0D 02 8B 4A |***.....:......J| 00000AA0: B2 31 B0 4A B2 32 A7 53 53 B2 53 53 AA 4C 51 00 |.1.J.2.SS.SS.LQ.| 00000AB0: D5 12 12 02 99 22 93 11 11 1D 1D 53 54 41 52 54 |.....".....START| 00000AC0: 20 41 44 2E 22 41 44 22 2A 2A 20 45 4E 44 20 41 | AD."AD"** END A| 00000AD0: 44 2E 22 53 53 00 EF 12 17 02 99 22 11 22 3A 85 |D."SS......".":.| 00000AE0: 22 53 54 41 52 54 20 41 44 44 2E 22 3B 41 44 00 |"START ADD.";AD.| 00000AF0: 02 13 1C 02 85 22 45 4E 44 20 41 44 44 2E 22 3B |....."END ADD.";| 00000B00: 53 53 00 25 13 21 02 97 31 39 34 2C 41 44 AD 32 |SS.%.!..194,AD.2| 00000B10: 35 36 3A 97 31 39 33 2C 41 44 AB C2 28 31 39 34 |56:.193,AD..(194| 00000B20: 29 AC 32 35 36 00 48 13 26 02 97 31 37 35 2C 53 |).256.H.&..175,S| 00000B30: 53 AD 32 35 36 3A 97 31 37 34 2C 53 53 AB C2 28 |S.256:.174,SS..(| 00000B40: 31 37 35 29 AC 32 35 36 00 6C 13 2B 02 97 31 38 |175).256.l.+..18| 00000B50: 37 2C 30 3A 97 31 38 38 2C 34 3A 97 31 38 36 2C |7,0:.188,4:.186,| 00000B60: 31 3A 9E 36 32 39 35 34 3A 89 33 30 00 72 13 30 |1:.62954:.30.r.0| 00000B70: 02 3A 00 8F 13 35 02 8F 20 2A 2A 2A 2A 20 4C 4F |.:...5.. **** LO| 00000B80: 41 44 20 52 4F 55 54 49 4E 45 20 2A 2A 2A 2A 00 |AD ROUTINE ****.| 00000B90: 95 13 3A 02 3A 00 A8 13 3F 02 99 22 93 11 22 A3 |..:.:...?.."..".| 00000BA0: 31 33 29 4B 24 28 4A 29 00 B3 13 44 02 97 31 34 |13)K$(J)...D..14| 00000BB0: 37 2C 30 00 C4 13 49 02 9E 35 37 38 31 32 22 22 |7,0...I..57812""| 00000BC0: 2C 31 2C 31 00 CF 13 4E 02 9E 36 32 36 33 31 00 |,1,1...N..62631.| 00000BD0: D7 13 53 02 89 33 30 00 23 14 58 02 83 22 05 43 |..S..30.#.X..".C| 00000BE0: 48 45 43 4B 20 44 45 43 2E 44 41 54 41 9E 22 2C |HECK DEC.DATA.",| 00000BF0: 22 05 43 48 45 43 4B 20 48 45 58 2E 44 41 54 41 |".CHECK HEX.DATA| 00000C00: 9E 22 2C 22 05 4C 4F 41 44 20 44 41 54 41 9E 22 |.",".LOAD DATA."| 00000C10: 2C 22 05 45 4E 54 45 52 20 44 45 43 2E 44 41 54 |,".ENTER DEC.DAT| 00000C20: 41 9E 22 00 3B 14 5D 02 83 22 05 45 4E 54 45 52 |A.".;.]..".ENTER| 00000C30: 20 48 45 58 2E 44 41 54 41 9E 22 00 00 00 8A 8A | HEX.DATA.".....| 00000C40: 80 8A FF 8A 0A AA 8A 82 7F 77 75 7F 7F 7F 77 35 |.........wu...w5| 00000C50: 2A 7F 75 75 75 75 7F 75 75 7F 75 75 7D 7F 75 7D |*.uuuu.uu.uu}.u}| 00000C60: 7F 7D 75 7D 7F FF 75 75 7F 75 7F 7F 7F 75 75 77 |.}u}..uu.u...uuw| 00000C70: 7F 7D 7F 7D 7F 7F 75 75 48 7F 75 F5 75 7F 7F 75 |.}.}..uuH.u.u..u| 00000C80: 7F FF 75 7F 7F 7D 7F FF 80 AA 80 80 8A 80 88 9C |..u..}..........| 00000C90: ED 80 00 88 88 C8 8A 48 8A C0 8A 80 80 80 88 80 |.......H........| 00000CA0: 8A 80 8A 80 8A 80 80 AA 8A A2 8A 82 8A 8A 80 8A |................| 00000CB0: 80 AA 80 80 80 80 80 80 8A 80 8A 80 55 80 80 80 |............U...| 00000CC0: 8A 80 F5 80 00 A0 95 88 75 7D 7F 75 75 77 7D 3D |........u}.uuw}=| 00000CD0: 20 77 7F 7F 7F 7F 75 7D 7F 75 7F 7F 77 75 7F 7F | w....u}.u..wu..| 00000CE0: 75 77 7F 7F 75 F5 7F 7F 75 7F 75 75 75 7F 7D 7F |uw..u...u.uuu.}.| 00000CF0: 75 75 75 75 7D 75 7F 7F 48 75 7D FF 7F 75 75 7F |uuuu}u..Hu}..uu.| 00000D00: 75 F5 7D 75 75 77 75 75 8A A0 8A 8A 80 8A 80 96 |u.}uuwuu........| 00000D10: E7 8A 8A 80 80 88 80 E0 80 8A 80 8A 8A 8A 82 8A |................| 00000D20: 80 8A 80 8A 80 8A CA 80 80 88 80 80 80 80 8A 80 |................| 00000D30: 8B 80 8A 8A 8A 8A 8A 8A 80 8A 80 8A 9F 8A 8A 8A |................| 00000D40: 80 8A FF 8A 0A AA 8A 82 7F 77 75 7F 7F 7F 77 75 |.........wu...wu| 00000D50: 2A 7F 75 75 75 75 7F 75 75 7F 75 75 7D 7F 75 7D |*.uuuu.uu.uu}.u}| 00000D60: 7F 7D 75 7D 7F FF 75 75 7F 75 7F 7F 7F 75 75 77 |.}u}..uu.u...uuw| 00000D70: 7F 7D 7F 7D 7F 7F 75 75 48 7F 75 F5 7D 7F 7F 75 |.}.}..uuH.u.}..u| 00000D80: 7F FF 75 7F 7F 7D 7F FF 80 AA 80 80 8A 80 8A 9C |..u..}..........| 00000D90: EF 80 00 8A 8A C8 8A C8 8A C0 8A 80 80 80 88 80 |................| 00000DA0: 8A 80 8A 80 8A 80 80 AA 8A A2 8A 8A 8A 8A 80 8A |................| 00000DB0: 80 AA 80 80 80 80 80 80 8A 80 8A 80 55 80 80 80 |............U...| 00000DC0: 8A 80 F5 80 00 A0 95 88 75 7D 7F 75 75 7F 7D 7D |........u}.uu.}}| 00000DD0: 20 77 7F 7F 7F 7F 75 7F 7F 75 7F 7F 77 77 7F 7F | w....u..u..ww..| 00000DE0: 75 77 7F 7F 75 F5 7F 7F 75 7F 7D 75 75 7F 7F 7F |uw..u...u.}uu...| 00000DF0: 7D 77 75 7D 7D 75 7F 7F 48 75 7D FF 7F 75 75 7F |}wu}}u..Hu}..uu.| 00000E00: 75 F5 7F 75 75 77 75 75 8A A0 8A 8A 80 8A 80 96 |u..uuwuu........| 00000E10: E7 8A 8A 80 80 88 80 A0 80 8A 80 8A 8A 8A 82 44 |...............D| 00000E20: 41 54 41 20 49 2F 50 2E |ATA I/P. |
.......55,0:.56,128:..2....53280,0:.5328 1,8:.646,7.M....K$(5):.Z.1.5:.K$(Z):..Y. ...D$(20).U...."..".13)"*** MENU ***"... #..211,4:.214,3:.58732...(...10)"1.CHECK DECIMAL DATA".K.-...10)"2.CHECK HEX. DA TA"...2...10)"3.TO LOAD DATA"...7...10)" 4.ENTER DECIMAL DATA".".<...10)"5.ENTER HEX. DATA".<.A..:..13)"ENTER NUMBER".N.F ..A$:.A$."".70.Z.K.J.E(A$).J.P..J.1.J.5. 70.X.U..J.3..575...Z..211,0:.214,9:.5873 2:." ...................".Y._.. 211,13:.214,11:.58732:.K$(J):.400...D..B $.."Y".....I.SS.AD.((L.1).LQ).#.N..".":. 211,12:.214,2:.58732:.K$(J).P.S..211,10: .214,4:.58732:."START ADDRESS"AD...X..21 1,4:.214,8:.58732:."LINE NO. CURRE NT ADDRESS"...}..211,5:.214,10:.58732:.L .P...211,23:.214,10:.58732:.SS:T.0:CS.0 .V...:......J.1.J.2.285.....:......Q.1.L Q......C$."R".165.C....211,5:.214,12:.58 732:."DATA ......";V$:D$(Q).V$.\. . .J.5.C(D$(Q))..2.155......J.5.H(D$(Q),1) ."F".J(D$(Q),2)."F".155.....DD.E(D$(Q)): .DD.0.DD.255.155......J.5..480:DD.G.F... .SS,DD......211,0.T:.214,12:.58732.....I .C(D$(Q)):.:.:..T)D$(Q);:.Q..LQ..",";:T. T.(I.1).,...CS.CS.DD:SS.SS.1.[.C..211,23 :.214,10:.58732:." ......"SS:....H. .211,4:.214,17:.58732:.".CHECKSUM:-"CS" CORRECT (Y/N).".I.M..211,10:.214,19:.58 732:."'M' RETURN TO MENU"...R..211,10:.2 14,20:.58732:."'S' SAVE DATA".(.W..211,1 0:.214,21:.58732:."'R' REPEAT LAST LINE" .;....C$:.C$."".225.Z....C$."N"..460:SS. SS.LQ:.125.V....C$."Y"..460:L.L.1:.125.. ....C$."M".30......C$."S".525......C$."R "..460:L.L.1:Q.0:.125......225.D...:.... .. **** CHECK DATA ****.....:.....E.0:X. 0..."..E.0.LQ.1:.214,12:.58732. .'.P.B(S S.E):D.P.3.,..J.2..495:.310.W.3..J(D(P), 2);:.E..LQ.1..",";:.315.O.6..H$;:.E..LQ. 1..",";...;.CS.CS.P:H$." ":....@..211,23 :.214,10:.58732:.SS...B..211,5:.214,10:. 58732:.L...E..211,12:.214,16:.58732...J. .".CHECKSUM:-"CS...O...11)"..'M' TO MENU ".'.T...11)".'+' STEP FORWARD.".A.Y...11 )".'S' SAVE DATA".A.^...11)".'E' ENTER N EW LINE.".T.C..F$:.F$."".355...H..F$."M" .30...M..F$."S".525...R..F$."+".SS.SS.LQ :L.L.1:CS.0:.460:.285.V.W..F$."E".J.1.J. 4:.110...|..F$."E".J.2.J.5:.110......355 ...........:.#.... **** INPUT ROUTINES * ***.)...:.Z....211,9:.214,13:.58732:."EN TER ADDRESS ";:.AD...... IFAD<12288THEN POKE781,13:SYS59903:GOTO410......211,9:. 214,15:.58732:."FIRST LINE NO.";:.L.X... .L.1..781,15:.59903:.420......211,9:.214 ,17:.58732:."ITEMS PER LINE";:.LQ.-....L Q.1.LQ.20..781,17:.59903:.430.H....:..13 )"CORRECT (Y/N)".[....B$:.B$."".445.T.B. .B$.."Y".B$.."N".445.Z.G.....L..Y.12.22: .781,Y:.59903:.:....Q.:...V.. **** HEX.T O DEC. ****.A...:.....G.0:.W.1.2:G%.F(J( D$(Q),W)):G%.G%.48.(G%.64).7:G.16.G.G%:. ............** DEC/HEX ***.L...H$.G(.(D. 16).(.(D.16).9).7.48):D.D..(D.16).16.J.. .H$.H$.G(D.(D.9).7.48):D.0.P.....V...:.. .... **** SAVE ROUTINE ****.....:......J .1.J.2.SS.SS.LQ.U....".....START AD."AD" ** END AD."SS......".":."START ADD.";AD. ....."END ADD.";SS.%.!..194,AD.256:.193, AD.B(194).256.H.&..175,SS.256:.174,SS.B( 175).256.L.+..187,0:.188,4:.186,1:.62954 :.30.R.0.:...5.. **** LOAD ROUTINE ****. ..:.:...?.."..".13)K$(J)...D..147,0.D.I. .57812"",1,1.O.N..62631.W.S..30.#.X..".C HECK DEC.DATA.",".CHECK HEX.DATA.",".LOA D DATA.",".ENTER DEC.DATA.".;.]..".ENTER HEX.DATA.".............WUW5*UUUUU UUU}U}}U}.UUUUUW}}UUHU.UU .U}..............H.H................ ....................U........ ..U}UUW}= WU}UWUUWU.UUUU}UUUU}U HU}.UUU.}UUWUU. ...................... ......J................................. WUWU*UUUUUUUU}U}}U}.UUUUUW }}UUHU.}U.U}..............H.H ....................................U... ..... ..U}UU}} WUUWWUWU. U}UU}WU}}UHU}.UUU.UUWUU. ...... ....... .......DATA I/P.
> CLICK IMAGE PREVIEW FOR FULL MODAL