> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 37 08 00 00 42 31 B2 35 36 35 37 37 3A 42 |..7...B1.56577:B|
00000010: 32 B2 35 36 35 37 39 3A 97 42 31 2C 33 38 3A 97 |2.56579:.B1,38:.|
00000020: 42 32 2C 33 32 3A 97 35 33 32 38 30 2C 30 3A 97 |B2,32:.53280,0:.|
00000030: 35 33 32 38 31 2C 30 00 46 08 01 00 86 20 54 24 |53281,0.F.... T$|
00000040: 28 31 30 30 30 29 00 6A 08 0A 00 99 22 93 11 9E |(1000).j...."...|
00000050: 22 3B A3 31 30 29 22 B0 C3 C3 C3 C3 C3 C3 C3 C3 |";.10)".........|
00000060: C3 C3 C3 C3 C3 C3 C3 C3 AE 22 00 89 08 0F 00 99 |........."......|
00000070: A3 31 30 29 22 9E C2 20 31 36 36 30 20 57 41 52 |.10)".. 1660 WAR|
00000080: 44 49 41 4C 45 52 20 C2 22 00 A7 08 14 00 99 A3 |DIALER .".......|
00000090: 31 30 29 22 9E AD C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |10)"............|
000000A0: C3 C3 C3 C3 C3 C3 BD 00 CB 08 23 00 99 3A 99 A3 |..........#..:..|
000000B0: 38 29 22 57 52 49 54 54 45 4E 20 42 59 3A 20 54 |8)"WRITTEN BY: T|
000000C0: 49 4D 20 53 43 48 41 46 45 52 22 00 FB 08 28 00 |IM SCHAFER"...(.|
000000D0: 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |." -------------|
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 20 22 00 05 09 64 00 |--------- "...d.|
00000100: 89 32 30 30 30 00 0F 09 6E 00 8D 31 30 30 30 00 |.2000...n..1000.|
00000110: 15 09 78 00 80 00 41 09 E8 03 4E 4D 24 B2 4E 55 |..x...A...NM$.NU|
00000120: 24 3A 4E 55 24 B2 22 31 22 AA 41 58 24 AA 4E 4D |$:NU$."1".AX$.NM|
00000130: 24 3A 8B 41 58 24 B2 22 22 A7 4E 55 24 B2 4E 4D |$:.AX$."".NU$.NM|
00000140: 24 00 59 09 ED 03 97 42 31 2C 33 38 3A 81 20 4F |$.Y....B1,38:. O|
00000150: B2 31 A4 31 37 30 30 3A 82 00 77 09 F2 03 97 42 |.1.1700:..w....B|
00000160: 31 2C 30 30 3A 54 B2 31 3A 8F 20 50 49 43 4B 55 |1,00:T.1:. PICKU|
00000170: 50 20 50 48 4F 4E 45 00 8C 09 F4 03 81 20 4F 20 |P PHONE...... O |
00000180: B2 20 31 20 A4 20 37 30 30 3A 82 4F 00 A1 09 FC |. 1 . 700:.O....|
00000190: 03 54 B2 54 AB 31 3A 8B 54 B3 B1 30 A7 31 30 32 |.T.T.1:.T..0.102|
000001A0: 30 00 AF 09 06 04 4C 44 B2 C3 28 4E 55 24 29 00 |0.....LD..(NU$).|
000001B0: C9 09 10 04 81 58 B2 31 A4 4C 44 3A 4E 24 B2 CA |.....X.1.LD:N$..|
000001C0: 28 4E 55 24 2C 58 2C 31 29 00 D2 09 1A 04 99 4E |(NU$,X,1)......N|
000001D0: 24 3B 00 DE 09 24 04 4E B2 C5 28 4E 24 29 00 ED |$;...$.N..(N$)..|
000001E0: 09 2E 04 8B 4E B2 30 A7 20 4E B2 31 30 00 F7 09 |....N.0. N.10...|
000001F0: 33 04 8D 31 30 39 30 00 08 0A 38 04 82 58 3A 4E |3..1090...8..X:N|
00000200: 55 24 B2 4E 4D 24 3A 8E 00 15 0A 42 04 81 56 43 |U$.NM$:....B..VC|
00000210: B2 31 A4 20 4E 00 20 0A 4C 04 97 42 31 2C 33 38 |.1. N. .L..B1,38|
00000220: 00 28 0A 56 04 54 B2 34 00 3D 0A 60 04 54 B2 54 |.(.V.T.4.=.`.T.T|
00000230: AB 31 3A 8B 54 B3 B1 30 A7 31 31 32 30 00 48 0A |.1:.T..0.1120.H.|
00000240: 6A 04 97 42 31 2C 30 30 00 50 0A 74 04 54 B2 34 |j..B1,00.P.t.T.4|
00000250: 00 5A 0A 79 04 54 B2 54 AB 31 00 69 0A 7E 04 8B |.Z.y.T.T.1.i.~..|
00000260: 54 B3 B1 30 A7 31 31 34 35 00 76 0A 83 04 82 56 |T..0.1145.v....V|
00000270: 43 3A 54 B2 32 36 00 8E 0A 84 04 54 B2 54 AB 31 |C:T.26.....T.T.1|
00000280: 3A 8B 20 54 B3 B1 30 20 A7 20 31 31 35 36 00 94 |:. T..0 . 1156..|
00000290: 0A 88 04 8E 00 CA 0A D0 07 85 22 11 1D 12 53 54 |.........."...ST|
000002A0: 41 52 54 49 4E 47 20 4E 55 4D 42 45 52 92 22 3B |ARTING NUMBER.";|
000002B0: 4E 55 3A 4E 55 24 B2 C9 28 C4 28 4E 55 29 2C C3 |NU:NU$..(.(NU),.|
000002C0: 28 C4 28 4E 55 29 29 AB 31 29 00 E6 0A D1 07 85 |(.(NU)).1)......|
000002D0: 22 11 1D 12 45 4E 44 49 4E 47 20 4E 55 4D 42 45 |"...ENDING NUMBE|
000002E0: 52 92 22 3B 45 4E 00 F0 0A D5 07 8D 31 30 30 30 |R.";EN......1000|
000002F0: 00 01 0B DA 07 48 B2 30 3A 81 49 B2 31 A4 35 30 |.....H.0:.I.1.50|
00000300: 30 00 16 0B DC 07 A1 41 24 3A 8B 41 24 B3 B1 22 |0......A$:.A$.."|
00000310: 22 A7 32 30 32 35 00 3A 0B DF 07 41 B2 C2 28 42 |".2025.:...A..(B|
00000320: 31 29 3A 8B 41 B2 32 30 37 A7 48 B2 48 AA 31 3A |1):.A.207.H.H.1:|
00000330: 8B 48 B2 33 30 A7 32 30 32 30 00 4A 0B E0 07 8B |.H.30.2020.J....|
00000340: 41 B3 B1 32 30 37 A7 48 B2 30 00 57 0B E1 07 82 |A..207.H.0.W....|
00000350: 49 3A 89 32 30 32 35 00 8E 0B E4 07 99 22 1D 1D |I:.2025......"..|
00000360: 1D 1D 43 41 52 52 49 45 52 20 41 54 2D 2D 2D 22 |..CARRIER AT---"|
00000370: 3B 4E 55 24 3A 54 54 B2 54 54 AA 31 3A 54 24 28 |;NU$:TT.TT.1:T$(|
00000380: 54 54 29 B2 4E 55 24 3A 97 42 31 2C 33 38 00 C1 |TT).NU$:.B1,38..|
00000390: 0B E9 07 99 3A 4E 55 B2 4E 55 AA 31 3A 4E 55 24 |....:NU.NU.1:NU$|
000003A0: B2 C9 28 C4 28 4E 55 29 2C C3 28 C4 28 4E 55 29 |..(.(NU),.(.(NU)|
000003B0: 29 AB 31 29 3A 8B 4E 55 B3 45 4E A7 89 32 30 30 |).1):.NU.EN..200|
000003C0: 35 00 D7 0B EE 07 99 22 11 1D 45 4E 44 20 4F 46 |5......"..END OF|
000003D0: 20 4A 4F 42 2E 2E 22 00 E4 0B F0 07 97 35 36 35 | JOB.."......565|
000003E0: 37 39 2C 30 00 0B 0C F3 07 99 22 11 1D 50 52 45 |79,0......"..PRE|
000003F0: 53 53 20 53 50 41 43 45 20 54 4F 20 50 52 49 4E |SS SPACE TO PRIN|
00000400: 54 20 4E 55 4D 42 45 52 53 22 3B 00 21 0C F8 07 |T NUMBERS";.!...|
00000410: A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 32 30 34 |.A$:.A$.." ".204|
00000420: 30 00 47 0C FD 07 99 22 93 22 3B 3A 81 49 B2 31 |0.G....".";:.I.1|
00000430: A4 54 54 A9 32 3A 99 54 24 28 49 29 2C 54 24 28 |.TT.2:.T$(I),T$(|
00000440: 49 AA 31 29 3A 82 49 00 5C 0C 02 08 99 22 11 1D |I.1):.I.\...."..|
00000450: 50 52 45 53 53 20 53 50 41 43 45 22 00 72 0C 07 |PRESS SPACE".r..|
00000460: 08 A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 32 30 |..A$:.A$.." ".20|
00000470: 35 35 00 91 0C 0C 08 99 22 11 1D 44 4F 4E 45 2E |55......"..DONE.|
00000480: 22 3A 97 42 31 2C 33 38 3A 97 42 32 2C 30 30 3A |":.B1,38:.B2,00:|
00000490: 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000004A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000004B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000004C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000004D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000004E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000004F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
..7...B1.56577:B2.56579:.B1,38:.B2,32:.5
3280,0:.53281,0.F.... T$(1000).J...."...
";.10)".CCCCCCCCCCCCCCCC.".......10)".B
1660 WARDIALER B".......10)"..CCCCCCCCCC
CCCCCC..K.#..:..8)"WRITTEN BY: TIM SCHAF
ER"...(.." -----------------------------
--------- "...D..2000...N..1000...X...A.
..NM$.NU$:NU$."1".AX$.NM$:.AX$."".NU$.NM
$.Y....B1,38:. O.1.1700:..W....B1,00:T.1
:. PICKUP PHONE...... O . 1 . 700:.O....
.T.T.1:.T..0.1020.....LD.C(NU$).I....X.1
.LD:N$.J(NU$,X,1).R....N$;...$.N.E(N$)..
....N.0. N.10...3..1090...8..X:NU$.NM$:.
...B..VC.1. N. .L..B1,38.(.V.T.4.=.`.T.T
.1:.T..0.1120.H.J..B1,00.P.T.T.4.Z.Y.T.T
.1.I.~..T..0.1145.V....VC:T.26.....T.T.1
:. T..0 . 1156.......J.P.."...STARTING N
UMBER.";NU:NU$.I(D(NU),C(D(NU)).1)...Q..
"...ENDING NUMBER.";EN...U..1000...Z.H.0
:.I.1.500......A$:.A$.."".2025.:...A.B(B
1):.A.207.H.H.1:.H.30.2020.J....A..207.H
.0.W....I:.2025......"....CARRIER AT---"
;NU$:TT.TT.1:T$(TT).NU$:.B1,38.A....:NU.
NU.1:NU$.I(D(NU),C(D(NU)).1):.NU.EN..200
5.W...."..END OF JOB.."......56579,0....
.."..PRESS SPACE TO PRINT NUMBERS";.!...
.A$:.A$.." ".2040.G....".";:.I.1.TT.2:.T
$(I),T$(I.1):.I.\...."..PRESS SPACE".R..
..A$:.A$.." ".2055......"..DONE.":.B1,38
:.B2,00:................................
........................................
........................................
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL