> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0F 08 01 00 8F 49 4D 47 54 4F 50 52 47 00 |.......IMGTOPRG.|
00000010: 35 08 02 00 8F 22 43 4F 50 59 52 49 47 48 54 2C |5...."COPYRIGHT,|
00000020: 20 31 39 38 33 2C 20 4A 4F 45 4C 20 4D 2E 20 52 | 1983, JOEL M. R|
00000030: 55 42 49 4E 22 00 60 08 03 00 8F 22 4D 41 59 20 |UBIN".`...."MAY |
00000040: 4E 4F 54 20 42 45 20 52 45 50 52 4F 44 55 43 45 |NOT BE REPRODUCE|
00000050: 44 20 43 4F 4D 4D 45 52 43 49 41 4C 4C 59 2E 22 |D COMMERCIALLY."|
00000060: 00 8C 08 04 00 8F 22 4D 41 59 20 42 45 20 47 49 |......"MAY BE GI|
00000070: 56 45 4E 20 41 57 41 59 2E 20 20 4D 41 59 20 4E |VEN AWAY. MAY N|
00000080: 4F 54 20 42 45 20 53 4F 4C 44 2E 22 00 96 08 0A |OT BE SOLD."....|
00000090: 00 89 31 30 37 30 00 A4 08 14 00 41 B2 31 31 3A |..1070.....A.11:|
000000A0: 8D 31 30 30 00 BA 08 1E 00 41 B2 35 3A 8D 31 30 |.100.....A.5:.10|
000000B0: 30 3A 8B 53 53 B2 30 A7 33 30 00 C6 08 28 00 A0 |0:.SS.0.30...(..|
000000C0: 32 3A A0 33 3A 80 00 E5 08 64 00 9E 38 39 36 3A |2:.3:....d..896:|
000000D0: 42 24 B2 C8 28 41 24 2C C2 28 31 34 32 29 29 3A |B$..(A$,.(142)):|
000000E0: 53 53 B2 53 54 00 01 09 C8 00 8B 28 C3 28 42 24 |SS.ST......(.(B$|
000000F0: 29 AF 31 29 B3 B1 30 A7 99 42 24 3A 89 32 30 30 |).1)..0..B$:.200|
00000100: 30 00 0B 09 D2 00 43 24 B2 22 22 00 20 09 DC 00 |0.....C$."". ...|
00000110: 99 CA 28 42 24 2C 33 2C 34 29 C7 28 31 34 35 29 |..(B$,3,4).(145)|
00000120: 00 3B 09 E6 00 53 B2 30 3A 4C B2 C3 28 42 24 29 |.;...S.0:L..(B$)|
00000130: AB 31 3A 81 49 B2 31 A4 4C A9 32 00 5B 09 F0 00 |.1:.I.1.L.2.[...|
00000140: 43 B2 C6 28 CA 28 42 24 2C 49 29 29 3A 44 B2 C6 |C..(.(B$,I)):D..|
00000150: 28 CA 28 42 24 2C 49 AA 31 29 29 00 6D 09 FA 00 |(.(B$,I.1)).m...|
00000160: 43 B2 43 AB 34 38 3A 44 B2 44 AB 34 38 00 7C 09 |C.C.48:D.D.48.|.|
00000170: 04 01 8B 43 B1 39 A7 43 B2 43 AB 37 00 8B 09 0E |...C.9.C.C.7....|
00000180: 01 8B 44 B1 39 A7 44 B2 44 AB 37 00 98 09 18 01 |..D.9.D.D.7.....|
00000190: 43 B2 43 AC 31 36 AA 44 00 C3 09 22 01 53 B2 53 |C.C.16.D...".S.S|
000001A0: AA 43 3A 8B 28 28 49 AA 31 29 AC 2E 35 B1 B2 41 |.C:.((I.1)..5..A|
000001B0: 29 AF 28 49 B3 B1 4C 29 A7 43 24 B2 43 24 AA C7 |).(I..L).C$.C$..|
000001C0: 28 43 29 00 C9 09 2C 01 82 00 DE 09 36 01 8B 28 |(C)...,.....6..(|
000001D0: 53 AF 32 35 35 29 B3 B1 30 A7 32 31 30 30 00 EB |S.255)..0.2100..|
000001E0: 09 40 01 98 33 2C 43 24 3B 3A 8E 00 05 0A F4 01 |.@..3,C$;:......|
000001F0: 9F 31 35 2C 38 2C 31 35 3A 99 C7 28 31 34 37 29 |.15,8,15:..(147)|
00000200: C7 28 31 34 29 00 18 0A FE 01 85 22 49 2F 50 20 |.(14)......"I/P |
00000210: 46 49 4C 45 22 3B 49 24 00 2D 0A 08 02 9F 32 2C |FILE";I$.-....2,|
00000220: 38 2C 32 2C 49 24 AA 22 2C 53 2C 52 22 00 54 0A |8,2,I$.",S,R".T.|
00000230: 12 02 84 31 35 2C 41 2C 42 24 2C 43 2C 44 3A 8B |...15,A,B$,C,D:.|
00000240: 41 B3 B1 30 A7 99 49 24 22 3A 20 20 22 42 24 3A |A..0..I$": "B$:|
00000250: A0 32 3A 80 00 67 0A 1C 02 85 22 4F 2F 50 20 46 |.2:..g...."O/P F|
00000260: 49 4C 45 22 3B 4F 24 00 7C 0A 26 02 9F 33 2C 38 |ILE";O$.|.&..3,8|
00000270: 2C 33 2C 4F 24 AA 22 2C 50 2C 57 22 00 A6 0A 30 |,3,O$.",P,W"...0|
00000280: 02 84 31 35 2C 41 2C 42 24 2C 43 2C 44 3A 8B 41 |..15,A,B$,C,D:.A|
00000290: B3 B1 30 A7 99 4F 24 22 3A 20 20 22 42 24 3A A0 |..0..O$": "B$:.|
000002A0: 32 3A A0 33 3A 80 00 EA 0A 3A 02 41 41 28 31 29 |2:.3:....:.AA(1)|
000002B0: B2 36 35 3A 41 41 28 32 29 B2 39 37 3A 41 41 28 |.65:AA(2).97:AA(|
000002C0: 33 29 B2 31 39 33 3A 99 3A 99 3A 99 22 44 49 44 |3).193:.:.:."DID|
000002D0: 20 59 4F 55 20 44 4F 57 4E 4C 4F 41 44 20 4C 45 | YOU DOWNLOAD LE|
000002E0: 54 54 45 52 53 20 20 41 53 3A 00 03 0B 3F 02 52 |TTERS AS:...?.R|
000002F0: 24 B2 C7 28 31 38 29 3A 4F 24 B2 C7 28 31 34 36 |$..(18):O$..(146|
00000300: 29 3A 99 00 34 0B 44 02 99 52 24 31 4F 24 22 50 |):..4.D..R$1O$"P|
00000310: 45 54 53 43 49 49 20 4C 4F 57 45 52 2D 43 41 53 |ETSCII LOWER-CAS|
00000320: 45 20 28 20 3D 20 41 53 43 49 49 20 55 50 50 45 |E ( = ASCII UPPE|
00000330: 52 20 29 22 00 51 0B 46 02 99 52 24 32 4F 24 22 |R )".Q.F..R$2O$"|
00000340: 41 53 43 49 49 20 4C 4F 57 45 52 2D 43 41 53 45 |ASCII LOWER-CASE|
00000350: 22 00 70 0B 48 02 99 52 24 33 4F 24 22 50 45 54 |".p.H..R$3O$"PET|
00000360: 53 43 49 49 20 55 50 50 45 52 2D 43 41 53 45 22 |SCII UPPER-CASE"|
00000370: 00 94 0B 4A 02 85 56 41 3A 56 41 B2 B5 28 56 41 |...J..VA:VA..(VA|
00000380: 29 3A 8B 28 56 41 B3 31 29 B0 28 56 41 B1 33 29 |):.(VA.1).(VA.3)|
00000390: A7 35 37 30 00 A2 0B 4C 02 56 41 B2 41 41 28 56 |.570...L.VA.AA(V|
000003A0: 41 29 00 BC 0B 62 02 97 39 33 30 2C 56 41 3A 97 |A)...b..930,VA:.|
000003B0: 39 33 34 2C 56 41 AA 36 3A 89 32 30 00 DC 0B 2E |934,VA.6:.20....|
000003C0: 04 8F 2A 2A 53 54 52 49 4E 47 54 48 49 4E 47 28 |..**STRINGTHING(|
000003D0: 55 4E 49 56 45 52 53 41 4C 29 2A 2A 00 F4 0B 38 |UNIVERSAL)**...8|
000003E0: 04 8F 2A 2A 4A 49 4D 42 55 54 54 45 52 46 49 45 |..**JIMBUTTERFIE|
000003F0: 4C 44 2A 2A 00 13 0C 42 04 8F 53 54 52 49 4E 47 |LD**...B..STRING|
00000400: 4D 55 53 54 42 45 46 49 52 53 54 56 41 52 49 41 |MUSTBEFIRSTVARIA|
00000410: 42 4C 45 00 2E 0C 4C 04 41 24 B2 22 41 42 43 44 |BLE...L.A$."ABCD|
00000420: 45 46 47 48 49 4A 4B 4C 4D 4E 4F 50 51 22 00 44 |EFGHIJKLMNOPQ".D|
00000430: 0C 56 04 41 24 B2 41 24 AA 41 24 AA 41 24 AA 41 |.V.A$.A$.A$.A$.A|
00000440: 24 AA 41 24 00 54 0C 60 04 41 24 B2 41 24 AA 41 |$.A$.T.`.A$.A$.A|
00000450: 24 AA 41 24 00 74 0C 6A 04 8F 41 42 4F 56 45 53 |$.A$.t.j..ABOVES|
00000460: 45 54 53 53 54 52 49 4E 47 46 4F 52 4D 41 58 28 |ETSSTRINGFORMAX(|
00000470: 32 35 35 29 00 94 0C B0 04 83 31 36 30 2C 32 2C |255)......160,2,|
00000480: 31 37 37 2C 34 35 2C 31 35 33 2C 31 33 37 2C 30 |177,45,153,137,0|
00000490: 2C 32 30 30 00 B4 0C B2 04 83 31 39 32 2C 36 2C |,200......192,6,|
000004A0: 32 30 38 2C 32 34 36 2C 31 36 32 2C 32 2C 33 32 |208,246,162,2,32|
000004B0: 2C 31 39 38 00 D6 0C B4 04 83 32 35 35 2C 33 32 |,198......255,32|
000004C0: 2C 32 32 38 2C 32 35 35 2C 32 30 31 2C 31 33 2C |,228,255,201,13,|
000004D0: 32 34 30 2C 33 34 00 F7 0C B6 04 83 35 36 2C 32 |240,34......56,2|
000004E0: 30 31 2C 34 38 2C 31 34 34 2C 32 35 2C 32 30 31 |01,48,144,25,201|
000004F0: 2C 35 38 2C 31 34 34 00 1A 0D B8 04 83 31 30 2C |,58,144......10,|
00000500: 32 30 31 2C 31 39 33 2C 31 34 34 2C 31 37 2C 32 |201,193,144,17,2|
00000510: 30 31 2C 31 39 38 2C 31 37 36 00 3C 0D BA 04 83 |01,198,176.<....|
00000520: 31 33 2C 34 31 2C 39 35 2C 31 36 34 2C 31 34 32 |13,41,95,164,142|
00000530: 2C 31 34 35 2C 31 34 30 2C 32 30 30 00 5F 0D BC |,145,140,200._..|
00000540: 04 83 31 33 32 2C 31 34 32 2C 31 39 36 2C 31 33 |..132,142,196,13|
00000550: 39 2C 32 34 30 2C 34 2C 31 36 35 2C 31 34 34 00 |9,240,4,165,144.|
00000560: 78 0D BE 04 83 32 34 30 2C 32 31 35 2C 37 36 2C |x....240,215,76,|
00000570: 32 30 34 2C 32 35 35 2C 00 98 0D E2 04 81 4A B2 |204,255,......J.|
00000580: 38 39 36 A4 39 35 36 3A 87 58 3A 97 4A 2C 58 3A |896.956:.X:.J,X:|
00000590: 54 B2 54 AA 58 3A 82 4A 00 A7 0D EC 04 8B 54 B3 |T.T.X:.J......T.|
000005A0: B1 38 32 38 37 A7 90 00 B0 0D F6 04 89 35 30 30 |.8287........500|
000005B0: 00 BB 0D C6 07 55 B2 31 32 30 30 00 E6 0D D0 07 |.....U.1200.....|
000005C0: 99 22 4C 49 4E 45 20 57 49 54 48 20 4F 44 44 20 |."LINE WITH ODD |
000005D0: 4E 55 4D 42 45 52 20 4F 46 20 48 45 58 20 44 49 |NUMBER OF HEX DI|
000005E0: 47 49 54 53 2E 22 00 0D 0E D5 07 99 22 28 4D 41 |GITS."......"(MA|
000005F0: 59 20 42 45 20 50 52 4F 4D 50 54 20 4F 52 20 43 |Y BE PROMPT OR C|
00000600: 4F 4D 4D 41 4E 44 20 4C 49 4E 45 29 22 00 15 0E |OMMAND LINE)"...|
00000610: DA 07 99 42 24 00 44 0E E4 07 99 52 24 22 52 22 |...B$.D....R$"R"|
00000620: 4F 24 22 45 4E 54 45 52 20 4C 49 4E 45 20 4F 52 |O$"ENTER LINE OR|
00000630: 20 22 52 24 22 53 22 4F 24 22 4B 49 50 20 4C 49 | "R$"S"O$"KIP LI|
00000640: 4E 45 3F 22 00 66 0E EE 07 85 48 24 3A 8B 28 48 |NE?".f....H$:.(H|
00000650: 24 B3 B1 22 52 22 29 AF 28 48 24 B3 B1 22 53 22 |$.."R").(H$.."S"|
00000660: 29 A7 32 30 32 30 00 86 0E F8 07 8B 48 24 B2 22 |).2020......H$."|
00000670: 52 22 A7 85 22 4E 45 57 20 4C 49 4E 45 22 3B 42 |R".."NEW LINE";B|
00000680: 24 3A 89 32 30 30 00 99 0E 02 08 8B 53 53 B3 B1 |$:.200......SS..|
00000690: 30 A7 A0 32 3A A0 33 3A 80 00 A2 0E 0C 08 89 31 |0..2:.3:.......1|
000006A0: 30 30 00 C6 0E 34 08 99 22 4C 49 4E 45 20 57 49 |00...4.."LINE WI|
000006B0: 54 48 20 42 41 44 20 43 48 45 43 4B 53 55 4D 20 |TH BAD CHECKSUM |
000006C0: 22 53 AF 32 35 35 00 ED 0E 39 08 99 22 28 4D 41 |"S.255...9.."(MA|
000006D0: 59 20 42 45 20 50 52 4F 4D 50 54 20 4F 52 20 43 |Y BE PROMPT OR C|
000006E0: 4F 4D 4D 41 4E 44 20 4C 49 4E 45 29 22 00 F5 0E |OMMAND LINE)"...|
000006F0: 3E 08 99 42 24 00 24 0F 48 08 99 52 24 22 52 22 |>..B$.$.H..R$"R"|
00000700: 4F 24 22 45 4E 54 45 52 20 4C 49 4E 45 20 4F 52 |O$"ENTER LINE OR|
00000710: 20 22 52 24 22 53 22 4F 24 22 4B 49 50 20 4C 49 | "R$"S"O$"KIP LI|
00000720: 4E 45 3F 22 00 46 0F 52 08 85 48 24 3A 8B 28 48 |NE?".F.R..H$:.(H|
00000730: 24 B3 B1 22 52 22 29 AF 28 48 24 B3 B1 22 53 22 |$.."R").(H$.."S"|
00000740: 29 A7 32 30 32 30 00 5B 0F 5C 08 8B 48 24 B2 22 |).2020.[.\..H$."|
00000750: 52 22 A7 85 42 24 3A 89 32 30 30 00 6E 0F 66 08 |R"..B$:.200.n.f.|
00000760: 8B 53 53 B3 B1 30 A7 A0 32 3A A0 33 3A 80 00 77 |.SS..0..2:.3:..w|
00000770: 0F 70 08 89 31 30 30 00 00 00 |.p..100... |
.......IMGTOPRG.5...."COPYRIGHT, 1983, J
OEL M. RUBIN".`...."MAY NOT BE REPRODUCE
D COMMERCIALLY."......"MAY BE GIVEN AWAY
. MAY NOT BE SOLD."......1070.....A.11:
.100.....A.5:.100:.SS.0.30.F.(. 2: 3:...
.D..896:B$.H(A$,B(142)):SS.ST...H..(C(B$
).1)..0..B$:.2000...R.C$."". ....J(B$,3,
4)G(145).;...S.0:L.C(B$).1:.I.1.L.2.[...
C.F(J(B$,I)):D.F(J(B$,I.1)).M...C.C.48:D
.D.48.|....C.9.C.C.7......D.9.D.D.7.....
C.C.16.D.C.".S.S.C:.((I.1)..5..A).(I..L)
.C$.C$.G(C).I.,.....6..(S.255)..0.2100..
.@..3,C$;:.......15,8,15:.G(147)G(14)...
..."I/P FILE";I$.-....2,8,2,I$.",S,R".T.
...15,A,B$,C,D:.A..0..I$": "B$: 2:..G..
.."O/P FILE";O$.|.&..3,8,3,O$.",P,W"...0
..15,A,B$,C,D:.A..0..O$": "B$: 2: 3:...
.:.AA(1).65:AA(2).97:AA(3).193:.:.:."DID
YOU DOWNLOAD LETTERS AS:...?.R$.G(18):
O$.G(146):..4.D..R$1O$"PETSCII LOWER-CAS
E ( = ASCII UPPER )".Q.F..R$2O$"ASCII LO
WER-CASE".P.H..R$3O$"PETSCII UPPER-CASE"
...J..VA:VA..(VA):.(VA.1).(VA.3).570...L
.VA.AA(VA)...B..930,VA:.934,VA.6:.20....
..**STRINGTHING(UNIVERSAL)**...8..**JIMB
UTTERFIELD**...B..STRINGMUSTBEFIRSTVARIA
BLE...L.A$."ABCDEFGHIJKLMNOPQ".D.V.A$.A$
.A$.A$.A$.A$.T.`.A$.A$.A$.A$.T.J..ABOVES
ETSSTRINGFORMAX(255)......160,2,177,45,1
53,137,0,200......192,6,208,246,162,2,32
,198.V....255,32,228,255,201,13,240,34..
....56,201,48,144,25,201,58,144......10,
201,193,144,17,201,198,176.<....13,41,95
,164,142,145,140,200._....132,142,196,13
9,240,4,165,144.X....240,215,76,204,255,
......J.896.956:.X:.J,X:T.T.X:.J......T.
.8287........500...F.U.1200...P.."LINE W
ITH ODD NUMBER OF HEX DIGITS."...U.."(MA
Y BE PROMPT OR COMMAND LINE)"...Z..B$.D.
...R$"R"O$"ENTER LINE OR "R$"S"O$"KIP LI
NE?".F....H$:.(H$.."R").(H$.."S").2020..
....H$."R".."NEW LINE";B$:.200......SS..
0. 2: 3:.......100.F.4.."LINE WITH BAD C
HECKSUM "S.255...9.."(MAY BE PROMPT OR C
OMMAND LINE)"...>..B$.$.H..R$"R"O$"ENTER
LINE OR "R$"S"O$"KIP LINE?".F.R..H$:.(H
$.."R").(H$.."S").2020.[.\..H$."R"..B$:.
200.N.F..SS..0. 2: 3:..W.P..100...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL