_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

READER

FILE INFORMATION

FILENAME(S): READER

FILE TYPE(S): PRG

FILE SIZE: 2K

FIRST SEEN: 2025-11-30 21:07:11

APPEARS ON: 1 disk(s)

FILE HASH

bada79f1b7569daf0abdf78028c6205d07cf87b45e7c404f5a2e2cd21bc6f498

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CURSOR 2 READER PRG DuncanTwain 33 5 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 04 17 04 00 00 9C 3A  97 35 39 34 36 38 2C 31  |.......:.59468,1|
00000010: 34 3A 50 4B B2 31 34 00  43 04 01 00 8F 20 52 45  |4:PK.14.C.... RE|
00000020: 41 44 45 52 20 43 4F 50  59 52 49 47 48 54 20 28  |ADER COPYRIGHT (|
00000030: 43 29 20 31 39 37 39 20  47 4C 45 4E 20 46 49 53  |C) 1979 GLEN FIS|
00000040: 48 45 52 00 5F 04 02 00  8F 20 43 55 52 53 4F 52  |HER._.... CURSOR|
00000050: 20 23 31 30 2C 20 4D 41  59 2C 20 31 39 37 39 00  | #10, MAY, 1979.|
00000060: 80 04 03 00 8F 20 42 4F  58 20 35 35 30 2C 20 47  |..... BOX 550, G|
00000070: 4F 4C 45 54 41 2C 20 43  41 2E 20 39 33 30 31 37  |OLETA, CA. 93017|
00000080: 00 86 04 04 00 3A 00 9F  04 0A 00 8F 20 41 53 20  |.....:...... AS |
00000090: 4F 46 20 4A 55 4E 45 20  32 2C 20 31 39 37 39 00  |OF JUNE 2, 1979.|
000000A0: C1 04 5A 00 50 47 24 B2  22 52 45 41 44 45 52 22  |..Z.PG$."READER"|
000000B0: 3A 4E 4D 24 B2 22 31 30  22 3A 8D 20 36 32 30 30  |:NM$."10":. 6200|
000000C0: 30 00 CF 04 64 00 43 52  24 B2 C7 28 31 33 29 00  |0...d.CR$..(13).|
000000D0: DA 04 6E 00 4E B2 31 30  30 30 00 0E 05 C8 00 99  |..n.N.1000......|
000000E0: 22 C6 C9 D2 D3 D4 20 C1  C4 C4 D2 C5 D3 D3 3F 20  |"..... .......? |
000000F0: 22 3B 3A 8D 36 30 30 30  30 3A 4C B2 C5 28 49 4E  |";:.60000:L..(IN|
00000100: 24 29 3A 8B 49 4E 24 B2  22 22 A7 32 30 30 00 4F  |$):.IN$."".200.O|
00000110: 05 D2 00 8B 4C B3 30 B0  4C B1 36 35 35 33 35 A7  |....L.0.L.65535.|
00000120: 20 99 22 C5 CE D4 C5 D2  20 C1 20 CE D5 CD C2 C5  | ."..... . .....|
00000130: D2 20 C6 D2 CF CD 20 30  20 D4 CF 20 36 35 35 33  |. .... 0 .. 6553|
00000140: 35 2C 20 D0 CC C5 C1 D3  C5 22 3A 89 32 30 30 00  |5, ......":.200.|
00000150: 82 05 DC 00 99 22 CC C1  D3 D4 20 C1 C4 C4 D2 C5  |.....".... .....|
00000160: D3 D3 3F 20 22 3B 3A 8D  36 30 30 30 30 3A 48 B2  |..? ";:.60000:H.|
00000170: C5 28 49 4E 24 29 3A 8B  49 4E 24 B2 22 22 A7 32  |.(IN$):.IN$."".2|
00000180: 32 30 00 C3 05 E6 00 8B  48 B3 30 B0 48 B1 36 35  |20......H.0.H.65|
00000190: 35 33 35 A7 20 99 22 C5  CE D4 C5 D2 20 C1 20 CE  |535. ."..... . .|
000001A0: D5 CD C2 C5 D2 20 C6 D2  CF CD 20 30 20 D4 CF 20  |..... .... 0 .. |
000001B0: 36 35 35 33 35 2C 20 D0  CC C5 C1 D3 C5 22 3A 89  |65535, ......":.|
000001C0: 32 32 30 00 FB 05 F0 00  8B 48 B3 4C A7 54 B2 48  |220......H.L.T.H|
000001D0: 3A 48 B2 4C 3A 4C B2 54  3A 99 22 C1 D3 D3 D5 CD  |:H.L:L.T:.".....|
000001E0: C9 CE C7 22 3B 4C 3B 22  D4 CF 22 3B 48 3B 22 9D  |...";L;"..";H;".|
000001F0: 2C 20 C9 CE D3 D4 C5 C1  C4 2E 22 00 06 06 FA 00  |, ........".....|
00000200: 4E B2 31 30 30 30 00 1D  06 4A 01 99 4E 3B 22 C4  |N.1000...J..N;".|
00000210: C1 D4 C1 22 3B 4C 3B 22  9D 2C 22 3B 48 00 2B 06  |...";L;".,";H.+.|
00000220: 54 01 81 49 B2 4C A4 48  A9 31 36 00 42 06 5E 01  |T..I.L.H.16.B.^.|
00000230: 4E B2 4E AA 31 30 3A 99  4E 3B 22 C4 C1 D4 C1 20  |N.N.10:.N;".... |
00000240: 22 3B 00 56 06 68 01 4B  B2 49 AA 31 35 3A 8B 4B  |";.V.h.K.I.15:.K|
00000250: B1 48 A7 4B B2 48 00 61  06 72 01 81 4A B2 49 A4  |.H.K.H.a.r..J.I.|
00000260: 4B 00 7E 06 7C 01 54 24  B2 CA 28 C4 28 C2 28 4A  |K.~.|.T$..(.(.(J|
00000270: 29 29 2C 32 29 3A 99 54  24 3B 22 2C 22 3B 00 85  |)),2):.T$;",";..|
00000280: 06 86 01 82 4A 00 90 06  90 01 99 20 22 9D 20 22  |....J...... ". "|
00000290: 00 97 06 9A 01 82 49 00  9D 06 F4 01 80 00 A5 06  |......I.........|
000002A0: 56 EA 83 22 22 00 C6 06  60 EA 49 4E 24 B2 22 20  |V..""...`.IN$." |
000002B0: 22 3A 5A 54 B2 54 49 3A  5A 43 B2 32 3A 5A 44 24  |":ZT.TI:ZC.2:ZD$|
000002C0: B2 C7 28 32 30 29 00 DD  06 6A EA A1 5A 24 3A 8B  |..(20)...j..Z$:.|
000002D0: 20 5A 24 B3 B1 22 22 A7  36 30 30 37 30 00 0D 07  | Z$.."".60070...|
000002E0: 74 EA 8B 5A 54 B3 B2 54  49 A7 99 CA 28 22 20 A6  |t..ZT..TI...(" .|
000002F0: 22 2C 5A 43 2C 31 29 3B  22 9D 22 3B 3A 5A 43 B2  |",ZC,1);".";:ZC.|
00000300: 33 AB 5A 43 3A 5A 54 B2  54 49 AA 31 35 00 18 07  |3.ZC:ZT.TI.15...|
00000310: 7E EA 89 36 30 30 31 30  00 48 07 A6 EA 5A B2 C6  |~..60010.H...Z..|
00000320: 28 5A 24 29 3A 5A 4C B2  C3 28 49 4E 24 29 3A 8B  |(Z$):ZL..(IN$):.|
00000330: 28 5A AF 31 32 37 29 B3  33 32 A7 99 22 20 9D 22  |(Z.127).32.." ."|
00000340: 3B 3A 89 36 30 31 31 30  00 78 07 B0 EA 8B 46 4C  |;:.60110.x....FL|
00000350: AF 28 5A AF 31 32 37 29  B1 36 34 AF 28 5A AF 31  |.(Z.127).64.(Z.1|
00000360: 32 37 29 B3 39 31 A7 5A  24 B2 C7 28 28 5A AA 31  |27).91.Z$..((Z.1|
00000370: 32 38 29 AF 32 35 35 29  00 8A 07 BA EA 8B 5A 4C  |28).255)......ZL|
00000380: B1 32 35 34 A7 36 30 30  31 30 00 A5 07 C4 EA 49  |.254.60010.....I|
00000390: 4E 24 B2 49 4E 24 AA 5A  24 3A 99 5A 24 3B 5A 44  |N$.IN$.Z$:.Z$;ZD|
000003A0: 24 3B 5A 24 3B 00 C4 07  CE EA 8B 5A B2 31 33 A7  |$;Z$;......Z.13.|
000003B0: 49 4E 24 B2 CA 28 49 4E  24 2C 32 29 3A 99 43 52  |IN$..(IN$,2):.CR|
000003C0: 24 3B 3A 8E 00 F0 07 D8  EA 8B 5A B2 32 30 AF 5A  |$;:.......Z.20.Z|
000003D0: 4C B1 31 A7 49 4E 24 B2  C8 28 49 4E 24 2C 5A 4C  |L.1.IN$..(IN$,ZL|
000003E0: AB 31 29 3A 99 22 9D 22  3B 3A 89 36 30 30 31 30  |.1):.".";:.60010|
000003F0: 00 23 08 E2 EA 8B 5A B2  31 34 31 A7 5A 24 B2 C7  |.#....Z.141.Z$..|
00000400: 28 AB 32 30 AC 28 5A 4C  B1 31 29 29 3A 81 5A B2  |(.20.(ZL.1)):.Z.|
00000410: 32 A4 5A 4C 3A 99 5A 24  3B 3A 82 5A 3A 89 36 30  |2.ZL:.Z$;:.Z:.60|
00000420: 30 30 30 00 2E 08 EC EA  89 36 30 30 31 30 00 3E  |000......60010.>|
00000430: 08 28 EB 8B 50 4E B2 30  A7 36 30 32 35 30 00 5A  |.(..PN.0.60250.Z|
00000440: 08 32 EB 99 22 11 D0 52  45 53 53 20 12 D2 C5 D4  |.2.."..RESS ....|
00000450: D5 D2 CE 92 20 54 4F 20  22 3B 00 77 08 3C EB 8B  |.... TO ";.w.<..|
00000460: 50 4E B2 4C 50 A7 99 22  42 45 47 49 4E 3A 22 3B  |PN.LP.."BEGIN:";|
00000470: 3A 89 36 30 32 34 30 00  89 08 46 EB 99 22 43 4F  |:.60240...F.."CO|
00000480: 4E 54 49 4E 55 45 3A 22  3B 00 9E 08 50 EB A1 54  |NTINUE:";...P..T|
00000490: 24 3A 8B 54 24 B2 22 22  A7 36 30 32 34 30 00 C0  |$:.T$."".60240..|
000004A0: 08 5A EB 8B 50 4E B2 4C  50 A7 97 35 39 34 36 38  |.Z..PN.LP..59468|
000004B0: 2C 50 4B 3A 9C 3A 99 22  93 22 3B 3A 89 31 30 30  |,PK:.:.".";:.100|
000004C0: 00 03 09 64 EB 50 4E B2  50 4E AA 31 3A 99 22 93  |...d.PN.PN.1:.".|
000004D0: 22 3B 50 47 24 3B 22 20  2D 20 C3 55 52 53 4F 52  |";PG$;" - .URSOR|
000004E0: 20 23 22 3B 4E 4D 24 3B  22 20 20 28 43 29 20 31  | #";NM$;"  (C) 1|
000004F0: 39 37 39 20 20 20 20 D0  41 47 45 22 3B 50 4E 3B  |979    .AGE";PN;|
00000500: 22 11 22 00 09 09 6E EB  8E 00 2F 09 30 F2 99 22  |"."...n.../.0.."|
00000510: 93 11 22 3B A3 38 29 3B  22 C3 D5 D2 D3 CF D2 20  |..";.8);"...... |
00000520: 23 22 3B 4E 4D 24 3B A3  32 32 29 3B 50 47 24 00  |#";NM$;.22);PG$.|
00000530: 5F 09 35 F2 99 22 11 C3  CF D0 D9 D2 C9 C7 C8 D4  |_.5.."..........|
00000540: 20 28 C3 29 20 31 39 37  39 22 3B A3 32 32 29 3B  | (.) 1979";.22);|
00000550: 22 C2 D9 20 C7 CC C5 CE  20 C6 C9 D3 C8 C5 D2 00  |".. .... .......|
00000560: 76 09 37 F2 81 49 B2 31  A4 31 30 3A 99 22 C0 C0  |v.7..I.1.10:."..|
00000570: C0 C0 22 3B 3A 82 00 A3  09 3A F2 99 22 11 D3 C1  |..";:....:.."...|
00000580: D6 C5 20 CD C1 C3 C8 C9  CE C5 20 C3 CF C4 C5 20  |.. ....... .... |
00000590: C1 D3 20 C4 C1 D4 C1 20  D3 D4 C1 D4 C5 CD C5 CE  |.. .... ........|
000005A0: D4 D3 2E 00 C6 09 44 F2  99 22 11 11 D7 C1 CE D4  |......D.."......|
000005B0: 20 C4 C9 D2 C5 C3 D4 C9  CF CE D3 3F 20 22 3B 3A  | ..........? ";:|
000005C0: 8D 36 30 30 30 30 00 DE  09 4E F2 8B C8 28 49 4E  |.60000...N...(IN|
000005D0: 24 2C 31 29 B2 22 59 22  A7 36 32 31 30 30 00 F8  |$,1)."Y".62100..|
000005E0: 09 58 F2 99 22 93 22 3A  97 35 39 34 36 38 2C 50  |.X..".":.59468,P|
000005F0: 4B 3A 9C 3A 89 31 30 30  00 17 0A 94 F2 99 22 93  |K:.:.100......".|
00000600: 22 3A 97 35 39 34 36 38  2C 31 34 3A 4C 50 B2 33  |":.59468,14:LP.3|
00000610: 3A 8D 36 30 32 30 30 00  44 0A 9E F2 99 22 D2 C5  |:.60200.D...."..|
00000620: C1 C4 C5 D2 20 49 53 20  49 4E 54 45 4E 44 45 44  |.... IS INTENDED|
00000630: A0 41 53 A0 41 4E A0 41  44 4A 55 4E 43 54 20 54  |.AS.AN.ADJUNCT T|
00000640: 4F A0 41 4E 00 70 0A A8  F2 99 22 41 53 53 45 4D  |O.AN.p...."ASSEM|
00000650: 42 4C 45 52 2C 20 53 4F  A0 54 48 41 54 A0 41 53  |BLER, SO.THAT.AS|
00000660: 53 45 4D 42 4C 45 44 A0  43 4F 44 45 A0 43 41 4E  |SEMBLED.CODE.CAN|
00000670: 00 95 0A B2 F2 99 22 42  45 A0 53 41 56 45 44 A0  |......"BE.SAVED.|
00000680: 41 4E 44 A0 D0 CF CB C5  44 A0 42 41 43 4B A0 4C  |AND.....D.BACK.L|
00000690: 41 54 45 52 2E 00 C4 0A  BC F2 99 22 11 D2 C5 C1  |ATER......."....|
000006A0: C4 C5 D2 20 4E 45 45 44  53 A0 54 4F A0 4B 4E 4F  |... NEEDS.TO.KNO|
000006B0: 57 A0 54 48 45 A0 46 49  52 53 54 A0 41 4E 44 A0  |W.THE.FIRST.AND.|
000006C0: 4C 41 53 54 00 F0 0A C6  F2 99 22 41 44 44 52 45  |LAST......"ADDRE|
000006D0: 53 53 45 53 A0 4F 46 A0  54 48 45 A0 43 4F 44 45  |SSES.OF.THE.CODE|
000006E0: A0 54 4F A0 42 45 A0 53  41 56 45 44 2E 20 C9 54  |.TO.BE.SAVED. .T|
000006F0: 00 1C 0B D0 F2 99 22 57  49 4C 4C A0 54 48 45 4E  |......"WILL.THEN|
00000700: A0 D0 C5 C5 CB 20 41 54  A0 54 48 45 A0 43 4F 44  |..... AT.THE.COD|
00000710: 45 2C 20 41 4E 44 A0 50  52 49 4E 54 00 4A 0B DA  |E, AND.PRINT.J..|
00000720: F2 99 22 C4 C1 D4 C1 20  53 54 41 54 45 4D 45 4E  |..".... STATEMEN|
00000730: 54 53 A0 43 4F 4E 54 41  49 4E 49 4E 47 A0 49 54  |TS.CONTAINING.IT|
00000740: 2E 20 D4 48 45 A0 C4 C1  D4 C1 00 76 0B E4 F2 99  |. .HE......v....|
00000750: 22 53 54 41 54 45 4D 45  4E 54 53 A0 57 49 4C 4C  |"STATEMENTS.WILL|
00000760: A0 42 45 A0 4E 55 4D 42  45 52 45 44 A0 46 52 4F  |.BE.NUMBERED.FRO|
00000770: 4D 20 31 30 30 30 00 90  0B EE F2 99 22 4F 4E 2C  |M 1000......"ON,|
00000780: 20 47 4F 49 4E 47 A0 55  50 A0 42 59 A0 31 30 2E  | GOING.UP.BY.10.|
00000790: 00 BB 0B F8 F2 99 22 11  D4 48 45 A0 45 41 53 49  |......"..HE.EASI|
000007A0: 45 53 54 A0 57 41 59 A0  54 4F 20 55 53 45 A0 D2  |EST.WAY.TO USE..|
000007B0: C5 C1 C4 C5 D2 20 49 53  A0 54 4F 00 E9 0B 02 F3  |..... IS.TO.....|
000007C0: 99 22 4D 41 4B 45 A0 54  48 45 A0 47 45 4E 45 52  |."MAKE.THE.GENER|
000007D0: 41 54 45 44 A0 C4 C1 D4  C1 A0 50 41 52 54 A0 4F  |ATED......PART.O|
000007E0: 46 20 D2 C5 C1 C4 C5 D2  2C 00 17 0C 0C F3 99 22  |F ......,......"|
.......:.59468,14:PK.14.C.... READER COP
YRIGHT (C) 1979 GLEN FISHER._.... CURSOR
 #10, MAY, 1979...... BOX 550, GOLETA, C
A. 93017.....:...... AS OF JUNE 2, 1979.
A.Z.PG$."READER":NM$."10":. 62000.O.D.CR
$.G(13).Z.N.N.1000...H.."FIRST ADDRESS? 
";:.60000:L.E(IN$):.IN$."".200.O.R..L.0.
L.65535. ."ENTER A NUMBER FROM 0 TO 6553
5, PLEASE":.200......"LAST ADDRESS? ";:.
60000:H.E(IN$):.IN$."".220.C....H.0.H.65
535. ."ENTER A NUMBER FROM 0 TO 65535, P
LEASE":.220......H.L.T.H:H.L:L.T:."ASSUM
ING";L;"TO";H;"., INSTEAD.".....N.1000..
.J..N;"DATA";L;".,";H.+.T..I.L.H.16.B.^.
N.N.10:.N;"DATA ";.V.H.K.I.15:.K.H.K.H.A
.R..J.I.K.~.|.T$.J(D(B(J)),2):.T$;",";..
....J...... ". "......I.........V.."".F.
`.IN$." ":ZT.TI:ZC.2:ZD$.G(20)...J..Z$:.
 Z$.."".60070...T..ZT..TI..J(" .",ZC,1);
".";:ZC.3.ZC:ZT.TI.15...~..60010.H...Z.F
(Z$):ZL.C(IN$):.(Z.127).32.." .";:.60110
.X....FL.(Z.127).64.(Z.127).91.Z$.G((Z.1
28).255)......ZL.254.60010...D.IN$.IN$.Z
$:.Z$;ZD$;Z$;.D.N..Z.13.IN$.J(IN$,2):.CR
$;:....X..Z.20.ZL.1.IN$.H(IN$,ZL.1):."."
;:.60010.#....Z.141.Z$.G(.20.(ZL.1)):.Z.
2.ZL:.Z$;:.Z:.60000......60010.>.(..PN.0
.60250.Z.2..".PRESS .RETURN. TO ";.W.<..
PN.LP.."BEGIN:";:.60240...F.."CONTINUE:"
;...P..T$:.T$."".60240...Z..PN.LP..59468
,PK:.:.".";:.100...D.PN.PN.1:.".";PG$;" 
- CURSOR #";NM$;"  (C) 1979    PAGE";PN;
"."...N.../.0.."..";.8);"CURSOR #";NM$;.
22);PG$._.5..".COPYRIGHT (C) 1979";.22);
"BY GLEN FISHER.V.7..I.1.10:."....";:...
.:..".SAVE MACHINE CODE AS DATA STATEMEN
TS..F.D.."..WANT DIRECTIONS? ";:.60000..
.N..H(IN$,1)."Y".62100...X..".":.59468,P
K:.:.100......".":.59468,14:LP.3:.60200.
D...."READER IS INTENDED AS AN ADJUNCT T
O AN.P...."ASSEMBLER, SO THAT ASSEMBLED 
CODE CAN......"BE SAVED AND POKED BACK L
ATER..D....".READER NEEDS TO KNOW THE FI
RST AND LAST...F.."ADDRESSES OF THE CODE
 TO BE SAVED. IT...P.."WILL THEN PEEK AT
 THE CODE, AND PRINT.J.Z.."DATA STATEMEN
TS CONTAINING IT. THE DATA.V...."STATEME
NTS WILL BE NUMBERED FROM 1000......"ON,
 GOING UP BY 10.......".THE EASIEST WAY 
TO USE READER IS TO......"MAKE THE GENER
ATED DATA PART OF READER,......"
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL