PROG LISTER   -E

00000000: 01 08 11 08 5A 00 8F 20  4C 49 53 54 45 52 20 36  |....Z.. LISTER 6|
00000010: 34 00 40 08 64 00 83 31  39 2C 31 34 37 2C 31 37  |4.@.d..19,147,17|
00000020: 2C 31 34 35 2C 32 39 2C  31 35 37 2C 31 38 2C 31  |,145,29,157,18,1|
00000030: 34 36 2C 32 30 2C 31 34  38 2C 31 34 31 2C 33 32  |46,20,148,141,32|
00000040: 00 5D 08 6E 00 8F 20 38  30 2D 43 4F 4C 55 4D 4E  |.].n.. 80-COLUMN|
00000050: 20 43 55 52 53 4F 52 20  53 54 55 46 46 00 85 08  | CURSOR STUFF...|
00000060: 78 00 83 31 32 39 2C 31  34 39 2C 31 35 30 2C 31  |x..129,149,150,1|
00000070: 35 31 2C 31 35 32 2C 31  34 2C 31 34 32 2C 31 35  |51,152,14,142,15|
00000080: 33 2C 31 35 34 00 8E 08  82 00 83 31 35 35 00 9E  |3,154......155..|
00000090: 08 8C 00 8F 20 56 49 43  20 53 54 55 46 46 00 BE  |.... VIC STUFF..|
000000A0: 08 96 00 83 31 34 34 2C  35 2C 32 38 2C 31 35 39  |....144,5,28,159|
000000B0: 2C 31 35 36 2C 33 30 2C  33 31 2C 31 35 38 00 E7  |,156,30,31,158..|
000000C0: 08 A0 00 83 38 2C 39 2C  31 33 33 2C 31 33 37 2C  |....8,9,133,137,|
000000D0: 31 33 34 2C 31 33 38 2C  31 33 35 2C 31 33 39 2C  |134,138,135,139,|
000000E0: 31 33 36 2C 31 34 30 00  2A 09 AA 00 83 48 4F 4D  |136,140.*....HOM|
000000F0: 45 2C 43 4C 45 41 52 2C  44 4F 57 4E 2C 55 50 2C  |E,CLEAR,DOWN,UP,|
00000100: 52 49 47 48 54 2C 4C 45  46 54 2C 52 56 53 2C 52  |RIGHT,LEFT,RVS,R|
00000110: 56 4F 46 46 2C 44 45 4C  2C 49 4E 53 54 2C 52 45  |VOFF,DEL,INST,RE|
00000120: 54 55 52 4E 2C 53 50 41  43 45 00 6A 09 B4 00 83  |TURN,SPACE.j....|
00000130: 20 4F 52 41 4E 47 45 2C  42 52 4F 57 4E 2C 4C 2E  | ORANGE,BROWN,L.|
00000140: 52 45 44 2C 47 52 41 59  31 2C 47 52 41 59 32 2C  |RED,GRAY1,GRAY2,|
00000150: 54 45 58 54 2C 47 52 41  50 48 49 43 2C 4C 2E 47  |TEXT,GRAPHIC,L.G|
00000160: 52 45 45 4E 2C 4C 2E 42  55 45 00 75 09 BE 00 83  |REEN,L.BUE.u....|
00000170: 47 52 41 59 33 00 A9 09  C8 00 83 42 4C 41 43 4B  |GRAY3......BLACK|
00000180: 2C 57 48 49 54 45 2C 52  45 44 2C 43 59 41 4E 2C  |,WHITE,RED,CYAN,|
00000190: 4D 41 47 45 4E 54 41 2C  47 52 45 45 4E 2C 42 4C  |MAGENTA,GREEN,BL|
000001A0: 55 45 2C 59 45 4C 4C 4F  57 00 D2 09 D2 00 83 4C  |UE,YELLOW......L|
000001B0: 4F 43 4B 2C 55 4E 4C 4F  43 4B 2C 46 31 2C 46 32  |OCK,UNLOCK,F1,F2|
000001C0: 2C 46 33 2C 46 34 2C 46  35 2C 46 36 2C 46 37 2C  |,F3,F4,F5,F6,F7,|
000001D0: 46 38 00 EB 09 DC 00 86  41 28 34 30 29 2C 41 24  |F8......A(40),A$|
000001E0: 28 34 30 29 2C 4B 24 28  39 30 29 00 00 0A E6 00  |(40),K$(90).....|
000001F0: 81 4A B2 30 A4 33 39 3A  87 41 28 4A 29 3A 82 4A  |.J.0.39:.A(J):.J|
00000200: 00 16 0A F0 00 81 4A B2  30 A4 33 39 3A 87 41 24  |......J.0.39:.A$|
00000210: 28 4A 29 3A 82 4A 00 61  0A FA 00 83 45 4E 44 2C  |(J):.J.a....END,|
00000220: 46 4F 52 2C 4E 45 58 54  2C 44 41 54 41 2C 49 4E  |FOR,NEXT,DATA,IN|
00000230: 50 55 54 23 2C 49 4E 50  55 54 2C 44 49 4D 2C 52  |PUT#,INPUT,DIM,R|
00000240: 45 41 44 2C 4C 45 54 2C  47 4F 54 4F 2C 52 55 4E  |EAD,LET,GOTO,RUN|
00000250: 2C 49 46 2C 52 45 53 54  4F 52 45 2C 47 4F 53 55  |,IF,RESTORE,GOSU|
00000260: 42 00 AA 0A 04 01 83 52  45 54 55 52 4E 2C 52 45  |B......RETURN,RE|
00000270: 4D 2C 53 54 4F 50 2C 4F  4E 2C 57 41 49 54 2C 4C  |M,STOP,ON,WAIT,L|
00000280: 4F 41 44 2C 53 41 56 45  2C 56 45 52 49 46 59 2C  |OAD,SAVE,VERIFY,|
00000290: 44 45 46 2C 50 4F 4B 45  2C 50 52 49 4E 54 23 2C  |DEF,POKE,PRINT#,|
000002A0: 50 52 49 4E 54 2C 43 4F  4E 54 00 F1 0A 0E 01 83  |PRINT,CONT......|
000002B0: 4C 49 53 54 2C 43 4C 52  2C 43 4D 44 2C 53 59 53  |LIST,CLR,CMD,SYS|
000002C0: 2C 4F 50 45 4E 2C 43 4C  4F 53 45 2C 47 45 54 2C  |,OPEN,CLOSE,GET,|
000002D0: 4E 45 57 2C 54 41 42 28  2C 54 4F 2C 46 4E 2C 53  |NEW,TAB(,TO,FN,S|
000002E0: 50 43 28 2C 54 48 45 4E  2C 4E 4F 54 2C 53 54 45  |PC(,THEN,NOT,STE|
000002F0: 50 00 39 0B 18 01 83 2B  2C 2D 2C 2A 2C 2F 2C FF  |P.9....+,-,*,/,.|
00000300: 2C 41 4E 44 2C 4F 52 2C  3E 2C 3D 2C 3C 2C 53 47  |,AND,OR,>,=,<,SG|
00000310: 4E 2C 49 4E 54 2C 41 42  53 2C 55 53 52 2C 46 52  |N,INT,ABS,USR,FR|
00000320: 45 2C 50 4F 53 2C 53 51  52 2C 52 4E 44 2C 4C 4F  |E,POS,SQR,RND,LO|
00000330: 47 2C 45 58 50 2C 43 4F  53 00 81 0B 22 01 83 53  |G,EXP,COS..."..S|
00000340: 49 4E 2C 54 41 4E 2C 41  54 4E 2C 50 45 45 4B 2C  |IN,TAN,ATN,PEEK,|
00000350: 4C 45 4E 2C 53 54 52 24  2C 56 41 4C 2C 41 53 43  |LEN,STR$,VAL,ASC|
00000360: 2C 43 48 52 24 2C 4C 45  46 54 24 2C 52 49 47 48  |,CHR$,LEFT$,RIGH|
00000370: 54 24 2C 4D 49 44 24 2C  47 4F 2C 43 4F 4E 43 41  |T$,MID$,GO,CONCA|
00000380: 54 00 C8 0B 2C 01 83 44  4F 50 45 4E 2C 44 43 4C  |T...,..DOPEN,DCL|
00000390: 4F 53 45 2C 52 45 43 4F  52 44 2C 48 45 41 44 45  |OSE,RECORD,HEADE|
000003A0: 52 2C 43 4F 4C 4C 45 43  54 2C 42 41 43 4B 55 50  |R,COLLECT,BACKUP|
000003B0: 2C 43 4F 50 59 2C 41 50  50 45 4E 44 2C 44 53 41  |,COPY,APPEND,DSA|
000003C0: 56 45 2C 44 4C 4F 41 44  00 EE 0B 36 01 83 43 41  |VE,DLOAD...6..CA|
000003D0: 54 41 4C 4F 47 2C 52 45  4E 41 4D 45 2C 53 43 52  |TALOG,RENAME,SCR|
000003E0: 41 54 43 48 2C 44 49 52  45 43 54 4F 52 59 00 04  |ATCH,DIRECTORY..|
000003F0: 0C 40 01 81 4A B2 30 A4  39 30 3A 87 4B 24 28 4A  |.@..J.0.90:.K$(J|
00000400: 29 3A 82 4A 00 26 0C 90  01 A0 31 3A 85 22 4E 41  |):.J.&....1:."NA|
00000410: 4D 45 20 4F 46 20 50 52  4F 47 52 41 4D 20 46 49  |ME OF PROGRAM FI|
00000420: 4C 45 22 3B 47 24 00 3B  0C 9A 01 9F 31 2C 38 2C  |LE";G$.;....1,8,|
00000430: 33 2C 47 24 AA 22 2C 50  2C 52 22 00 49 0C A4 01  |3,G$.",P,R".I...|
00000440: A1 23 31 2C 41 24 2C 42  24 00 62 0C AE 01 8B 41  |.#1,A$,B$.b....A|
00000450: 24 B3 B1 C7 28 31 29 AF  41 24 B3 B1 22 22 89 34  |$...(1).A$.."".4|
00000460: 30 30 00 7C 0C B8 01 8B  41 24 B2 22 22 A7 41 24  |00.|....A$."".A$|
00000470: B2 C7 28 31 29 3A A1 23  31 2C 58 24 00 9E 0C C2  |..(1):.#1,X$....|
00000480: 01 85 22 4C 49 4E 45 20  4E 55 4D 42 45 52 20 52  |.."LINE NUMBER R|
00000490: 41 4E 47 45 20 20 2D 9D  9D 9D 22 3B 5A 24 00 B3  |ANGE  -...";Z$..|
000004A0: 0C CC 01 4C 30 B2 30 3A  4C 31 B2 30 3A 4C 32 B2  |...L0.0:L1.0:L2.|
000004B0: 31 45 39 00 CF 0C D6 01  81 4A B2 31 A4 C3 28 5A  |1E9......J.1..(Z|
000004C0: 24 29 3A 59 24 B2 CA 28  5A 24 2C 4A 2C 31 29 00  |$):Y$..(Z$,J,1).|
000004D0: EC 0C E0 01 59 B2 C6 28  59 24 29 3A 8B 59 B1 B2  |....Y..(Y$):.Y..|
000004E0: 34 38 AF 59 B3 B2 35 37  89 35 31 30 00 FA 0C EA  |48.Y..57.510....|
000004F0: 01 8B 59 B2 33 32 89 35  31 30 00 0E 0D F4 01 4C  |..Y.32.510.....L|
00000500: 30 B2 4A 3A 8B 59 B3 B1  34 35 89 36 30 30 00 15  |0.J:.Y..45.600..|
00000510: 0D FE 01 82 4A 00 41 0D  08 02 8B 4C 30 B3 C3 28  |....J.A....L0..(|
00000520: 5A 24 29 A7 4C 32 B2 C5  28 CA 28 5A 24 2C 4C 30  |Z$).L2..(.(Z$,L0|
00000530: AA 31 29 29 3A 8B 4C 32  B2 30 A7 4C 32 B2 31 45  |.1)):.L2.0.L2.1E|
00000540: 39 00 54 0D 12 02 8B 4C  30 B1 31 A7 4C 31 B2 C5  |9.T....L0.1.L1..|
00000550: 28 5A 24 29 00 64 0D 1C  02 8B 4C 30 B2 30 A7 4C  |(Z$).d....L0.0.L|
00000560: 31 B2 4C 32 00 94 0D 58  02 50 33 24 B2 22 5B 22  |1.L2...X.P3$."["|
00000570: 3A 50 34 24 B2 22 5D 22  3A 85 22 4C 49 53 54 20  |:P4$."]":."LIST |
00000580: 54 4F 20 50 52 49 4E 54  45 52 20 20 4E 9D 9D 9D  |TO PRINTER  N...|
00000590: 22 3B 5A 24 00 C7 0D 62  02 50 B2 33 3A 8B C6 28  |";Z$...b.P.3:..(|
000005A0: 5A 24 29 B2 38 39 A7 50  B2 34 3A 4C 24 B2 22 11  |Z$).89.P.4:L$.".|
000005B0: 22 3A 50 33 24 B2 C7 28  32 31 39 29 3A 50 34 24  |":P3$..(219):P4$|
000005C0: B2 C7 28 32 32 31 29 00  F8 0D 6C 02 50 31 24 B2  |..(221)...l.P1$.|
000005D0: 22 5B 22 3A 50 32 24 B2  22 5D 22 3A 85 22 47 52  |"[":P2$."]":."GR|
000005E0: 41 50 48 49 43 53 20 4F  52 20 54 45 58 54 20 20  |APHICS OR TEXT  |
000005F0: 47 9D 9D 9D 22 3B 5A 24  00 2D 0E 76 02 99 C7 28  |G...";Z$.-.v...(|
00000600: 31 34 32 29 3B 3A 8B C6  28 5A 24 29 B2 38 34 A7  |142);:..(Z$).84.|
00000610: 99 C7 28 31 34 29 3B 3A  4D 24 B2 4C 24 3A 50 31  |..(14);:M$.L$:P1|
00000620: 24 B2 50 33 24 3A 50 32  24 B2 50 34 24 00 54 0E  |$.P3$:P2$.P4$.T.|
00000630: 80 02 85 22 54 52 41 4E  53 4C 41 54 45 20 43 55  |..."TRANSLATE CU|
00000640: 52 53 4F 52 20 4D 4F 56  45 53 20 20 4E 9D 9D 9D  |RSOR MOVES  N...|
00000650: 22 3B 5A 24 00 67 0E 8A  02 8B C6 28 5A 24 29 B2  |";Z$.g.....(Z$).|
00000660: 38 39 A7 54 37 B2 31 00  77 0E 94 02 9F 34 2C 50  |89.T7.1.w....4,P|
00000670: 3A 46 24 B2 50 31 24 00  8A 0E 9E 02 4A B2 38 30  |:F$.P1$.....J.80|
00000680: 3A 8B 50 B3 B1 33 89 36  39 30 00 9E 0E A8 02 99  |:.P..3.690......|
00000690: 22 93 22 3A 4A B2 C2 28  32 31 33 29 AA 31 00 BA  |".":J..(213).1..|
000006A0: 0E B2 02 4C 39 B2 4A 3A  98 34 2C 22 50 52 4F 47  |...L9.J:.4,"PROG|
000006B0: 52 41 4D 20 20 20 22 3B  47 24 00 C9 0E BC 02 8F  |RAM   ";G$......|
000006C0: 20 4E 45 57 20 4C 49 4E  45 00 F8 0E C6 02 8D 32  | NEW LINE......2|
000006D0: 30 31 30 3A 51 B2 30 3A  54 31 B2 31 3A 43 31 B2  |010:Q.0:T1.1:C1.|
000006E0: AB 31 3A A1 23 31 2C 41  24 2C 42 24 3A 8B 53 54  |.1:.#1,A$,B$:.ST|
000006F0: B3 B1 30 89 33 30 30 30  00 08 0F D0 02 8B 42 24  |..0.3000......B$|
00000700: B2 22 22 89 33 30 30 30  00 16 0F DA 02 A1 23 31  |."".3000......#1|
00000710: 2C 41 24 2C 42 24 00 36  0F E4 02 4C B2 C6 28 41  |,A$,B$.6...L..(A|
00000720: 24 AA C7 28 30 29 29 AA  C6 28 42 24 AA C7 28 30  |$..(0))..(B$..(0|
00000730: 29 29 AC 32 35 36 00 45  0F EE 02 8B 4C B3 4C 31  |)).256.E....L.L1|
00000740: 89 31 30 38 30 00 54 0F  F8 02 8B 4C B1 4C 32 89  |.1080.T....L.L2.|
00000750: 33 30 30 30 00 72 0F 02  03 46 32 B2 31 3A 98 34  |3000.r...F2.1:.4|
00000760: 2C 4D 24 3B 50 24 3A 50  24 B2 C4 28 4C 29 AA 22  |,M$;P$:P$..(L)."|
00000770: 20 22 00 88 0F 20 03 8F  20 53 54 41 52 54 20 54  | "... .. START T|
00000780: 45 58 54 20 48 45 52 45  00 9E 0F 2A 03 A1 23 31  |EXT HERE...*..#1|
00000790: 2C 41 24 3A 8B 41 24 B2  22 22 89 37 31 30 00 BF  |,A$:.A$."".710..|
000007A0: 0F 34 03 54 B2 30 3A 41  B2 C6 28 41 24 29 3A 8B  |.4.T.0:A..(A$):.|
000007B0: 41 B2 33 32 AF 46 24 B2  22 2C 22 89 38 34 30 00  |A.32.F$.",".840.|
000007C0: DC 0F 3E 03 8B 51 B2 30  B0 28 41 AF 31 32 37 29  |..>..Q.0.(A.127)|
000007D0: B1 33 31 B0 54 37 B2 30  89 39 30 30 00 FE 0F 48  |.31.T7.0.900...H|
000007E0: 03 81 4A B2 30 A4 34 30  3A 8B 41 B2 41 28 4A 29  |..J.0.40:.A.A(J)|
000007F0: A7 42 24 B2 41 24 28 4A  29 3A 89 38 36 30 00 0B  |.B$.A$(J):.860..|
00000800: 10 52 03 82 4A 3A 89 31  30 30 30 00 22 10 5C 03  |.R..J:.1000.".\.|
00000810: 8B 42 24 B2 42 31 24 A7  42 B2 42 AA 31 3A 89 38  |.B$.B1$.B.B.1:.8|
00000820: 31 30 00 45 10 66 03 8B  42 B1 30 A7 41 24 B2 CA  |10.E.f..B.0.A$..|
00000830: 28 C4 28 42 AA 31 29 2C  32 29 AA 46 24 AA 42 24  |(.(B.1),2).F$.B$|
00000840: 3A 89 38 39 30 00 52 10  70 03 41 24 B2 46 24 AA  |:.890.R.p.A$.F$.|
00000850: 42 24 00 73 10 7A 03 42  B2 30 3A 42 31 24 B2 42  |B$.s.z.B.0:B1$.B|
00000860: 24 3A 46 24 B2 22 2C 22  3A 46 31 B2 31 3A 89 31  |$:F$.",":F1.1:.1|
00000870: 30 31 30 00 8E 10 84 03  41 B2 41 AB 31 32 38 3A  |010.....A.A.128:|
00000880: 8B 41 B3 30 B0 51 B3 B1  30 89 31 30 30 30 00 A6  |.A.0.Q..0.1000..|
00000890: 10 8E 03 8B 41 B2 31 32  37 A7 41 24 B2 22 5E 22  |....A.127.A$."^"|
000008A0: 3A 89 31 30 30 30 00 B7  10 98 03 54 B2 31 3A 41  |:.1000.....T.1:A|
000008B0: 24 B2 4B 24 28 41 29 00  C5 10 A2 03 8B 41 B2 31  |$.K$(A)......A.1|
000008C0: 35 A7 51 B2 32 00 CF 10  E8 03 8D 32 30 31 30 00  |5.Q.2......2010.|
000008D0: E3 10 F2 03 8B 41 24 B2  C7 28 33 34 29 A7 51 B2  |.....A$..(34).Q.|
000008E0: 31 AB 51 00 FF 10 FC 03  8F 20 43 3D 2D 31 20 46  |1.Q...... C=-1 F|
000008F0: 4F 52 20 41 4C 50 48 41  4E 55 4D 45 52 49 43 00  |OR ALPHANUMERIC.|
00000900: 2A 11 06 04 43 B2 C6 28  C8 28 41 24 2C 31 29 29  |*...C..(.(A$,1))|
00000910: 3A 43 B2 28 43 B3 34 38  B0 43 B1 35 37 29 AF 28  |:C.(C.48.C.57).(|
00000920: 43 B3 36 35 B0 43 B1 39  30 29 00 56 11 10 04 8B  |C.65.C.90).V....|
00000930: 54 B3 B1 54 31 B0 54 B2  31 A7 54 31 B2 54 3A 8B  |T..T1.T.1.T1.T:.|
00000940: A8 43 AF A8 43 31 A7 50  24 B2 50 24 AA 22 20 22  |.C..C1.P$.P$." "|
00000950: 3A 8D 32 35 30 30 00 89  11 1A 04 43 B2 C6 28 C9  |:.2500.....C..(.|
00000960: 28 41 24 2C 31 29 29 3A  43 31 B2 28 28 43 B3 34  |(A$,1)):C1.((C.4|
00000970: 38 B0 43 B1 35 37 29 AF  28 43 B3 36 35 B0 43 B1  |8.C.57).(C.65.C.|
00000980: 39 30 29 29 B0 41 B2 33  37 00 9C 11 24 04 50 24  |90)).A.37...$.P$|
00000990: B2 50 24 AA 41 24 3A 8D  32 35 30 30 00 A5 11 2E  |.P$.A$:.2500....|
000009A0: 04 89 38 31 30 00 BD 11  38 04 8F 20 53 4B 49 50  |..810...8.. SKIP|
000009B0: 20 54 4F 20 4E 45 58 54  20 4C 49 4E 45 00 D3 11  | TO NEXT LINE...|
000009C0: 42 04 A1 23 31 2C 41 24  3A 8B 41 24 B2 22 22 89  |B..#1,A$:.A$."".|
000009D0: 37 31 30 00 DD 11 4C 04  89 31 30 39 30 00 FF 11  |710...L..1090...|
000009E0: D0 07 8F 20 43 4C 4F 53  45 20 4F 46 46 20 43 55  |... CLOSE OFF CU|
000009F0: 52 53 4F 52 20 45 58 50  52 45 53 53 49 4F 4E 00  |RSOR EXPRESSION.|
00000A00: 0E 12 DA 07 8B 46 31 B2  30 89 32 30 34 30 00 2F  |.....F1.0.2040./|
00000A10: 12 E4 07 8B 42 B1 30 A7  50 24 B2 50 24 AA CA 28  |....B.0.P$.P$..(|
00000A20: C4 28 42 AA 31 29 2C 32  29 3A 8D 32 35 30 30 00  |.(B.1),2):.2500.|
00000A30: 5A 12 EE 07 42 B2 30 3A  46 31 B2 30 3A 42 31 24  |Z...B.0:F1.0:B1$|
00000A40: B2 22 22 3A 50 24 B2 50  24 AA 50 32 24 3A 8D 32  |."":P$.P$.P2$:.2|
00000A50: 35 30 30 3A 46 24 B2 50  31 24 00 60 12 F8 07 8E  |500:F$.P1$.`....|
00000A60: 00 73 12 C4 09 8B C3 28  50 24 29 B3 4C 39 89 32  |.s.....(P$).L9.2|
00000A70: 36 30 30 00 86 12 CE 09  81 4A B2 4C 39 A4 4C 39  |600......J.L9.L9|
00000A80: AC 2E 36 A9 AB 31 00 9E  12 D8 09 8B CA 28 50 24  |..6..1.......(P$|
00000A90: 2C 4A 2C 31 29 B2 22 3A  22 89 32 35 38 30 00 B8  |,J,1).":".2580..|
00000AA0: 12 E2 09 82 4A 3A 81 4A  B2 4C 39 AB 31 A4 4C 39  |....J:.J.L9.1.L9|
00000AB0: AC 2E 36 AB 31 A9 AB 31  00 C9 12 EC 09 50 B2 C6  |..6.1..1.....P..|
00000AC0: 28 CA 28 50 24 2C 4A 29  29 00 D8 12 F6 09 8B 50  |(.(P$,J))......P|
00000AD0: B2 39 31 89 32 35 38 30  00 F8 12 00 0A 8B 50 B2  |.91.2580......P.|
00000AE0: 35 39 B0 50 B2 34 34 B0  50 B2 39 33 A7 4A B2 4A  |59.P.44.P.93.J.J|
00000AF0: AA 31 3A 89 32 35 38 30  00 06 13 0A 0A 82 4A 3A  |.1:.2580......J:|
00000B00: 4A B2 4C 39 AB 31 00 1A  13 14 0A 98 34 2C 4D 24  |J.L9.1......4,M$|
00000B10: 3B C8 28 50 24 2C 4A AB  31 29 00 30 13 1E 0A 50  |;.(P$,J.1).0...P|
00000B20: 24 B2 22 20 20 20 20 22  AA CA 28 50 24 2C 4A 29  |$."    "..(P$,J)|
00000B30: 00 36 13 28 0A 8E 00 51  13 B8 0B 8B C3 28 50 24  |.6.(...Q.....(P$|
00000B40: 29 B1 30 A7 46 32 B2 31  3A 98 34 2C 4D 24 3B 50  |).0.F2.1:.4,M$;P|
00000B50: 24 00 73 13 C2 0B 8B 46  32 B2 30 A7 99 22 2A 2A  |$.s....F2.0.."**|
00000B60: 20 4E 4F 20 4C 49 4E 45  53 20 46 4F 55 4E 44 20  | NO LINES FOUND |
00000B70: 2A 2A 22 00 83 13 CC 0B  A0 31 3A 8D 32 30 30 30  |**"......1:.2000|
00000B80: 3A A0 34 00 00 00                                 |:.4...          |

....Z.. LISTER 64.@.D..19,147,17,145,29,
157,18,146,20,148,141,32.].N.. 80-COLUMN
 CURSOR STUFF...X..129,149,150,151,152,1
4,142,153,154......155...... VIC STUFF..
....144,5,28,159,156,30,31,158... ..8,9,
133,137,134,138,135,139,136,140.*....HOM
E,CLEAR,DOWN,UP,RIGHT,LEFT,RVS,RVOFF,DEL
,INST,RETURN,SPACE.J.... ORANGE,BROWN,L.
RED,GRAY1,GRAY2,TEXT,GRAPHIC,L.GREEN,L.B
UE.U....GRAY3...H..BLACK,WHITE,RED,CYAN,
MAGENTA,GREEN,BLUE,YELLOW.R.R..LOCK,UNLO
CK,F1,F2,F3,F4,F5,F6,F7,F8......A(40),A$
(40),K$(90)......J.0.39:.A(J):.J......J.
0.39:.A$(J):.J.A....END,FOR,NEXT,DATA,IN
PUT#,INPUT,DIM,READ,LET,GOTO,RUN,IF,REST
ORE,GOSUB......RETURN,REM,STOP,ON,WAIT,L
OAD,SAVE,VERIFY,DEF,POKE,PRINT#,PRINT,CO
NT......LIST,CLR,CMD,SYS,OPEN,CLOSE,GET,
NEW,TAB(,TO,FN,SPC(,THEN,NOT,STEP.9....+
,-,*,/,.,AND,OR,>,=,<,SGN,INT,ABS,USR,FR
E,POS,SQR,RND,LOG,EXP,COS..."..SIN,TAN,A
TN,PEEK,LEN,STR$,VAL,ASC,CHR$,LEFT$,RIGH
T$,MID$,GO,CONCAT.H.,..DOPEN,DCLOSE,RECO
RD,HEADER,COLLECT,BACKUP,COPY,APPEND,DSA
VE,DLOAD...6..CATALOG,RENAME,SCRATCH,DIR
ECTORY...@..J.0.90:.K$(J):.J.&... 1:."NA
ME OF PROGRAM FILE";G$.;....1,8,3,G$.",P
,R".I....#1,A$,B$.B....A$..G(1).A$.."".4
00.|....A$."".A$.G(1):.#1,X$...B.."LINE 
NUMBER RANGE  -...";Z$...L.L0.0:L1.0:L2.
1E9.O.V..J.1.C(Z$):Y$.J(Z$,J,1).....Y.F(
Y$):.Y..48.Y..57.510......Y.32.510.....L
0.J:.Y..45.600......J.A....L0.C(Z$).L2.E
(J(Z$,L0.1)):.L2.0.L2.1E9.T....L0.1.L1.E
(Z$).D....L0.0.L1.L2...X.P3$."[":P4$."]"
:."LIST TO PRINTER  N...";Z$.G.B.P.3:.F(
Z$).89.P.4:L$.".":P3$.G(219):P4$.G(221).
..L.P1$."[":P2$."]":."GRAPHICS OR TEXT  
G...";Z$.-.V..G(142);:.F(Z$).84..G(14);:
M$.L$:P1$.P3$:P2$.P4$.T...."TRANSLATE CU
RSOR MOVES  N...";Z$.G....F(Z$).89.T7.1.
W....4,P:F$.P1$.....J.80:.P..3.690......
".":J.B(213).1.....L9.J:.4,"PROGRAM   ";
G$.I.... NEW LINE...F..2010:Q.0:T1.1:C1.
.1:.#1,A$,B$:.ST..0.3000...P..B$."".3000
...Z..#1,A$,B$.6...L.F(A$.G(0)).F(B$.G(0
)).256.E....L.L1.1080.T....L.L2.3000.R..
.F2.1:.4,M$;P$:P$.D(L)." "... .. START T
EXT HERE...*..#1,A$:.A$."".710...4.T.0:A
.F(A$):.A.32.F$.",".840...>..Q.0.(A.127)
.31.T7.0.900...H..J.0.40:.A.A(J).B$.A$(J
):.860...R..J:.1000.".\..B$.B1$.B.B.1:.8
10.E.F..B.0.A$.J(D(B.1),2).F$.B$:.890.R.
P.A$.F$.B$.S.Z.B.0:B1$.B$:F$.",":F1.1:.1
010.....A.A.128:.A.0.Q..0.1000......A.12
7.A$."^":.1000.....T.1:A$.K$(A).E....A.1
5.Q.2.O....2010......A$.G(34).Q.1.Q.....
. C=-1 FOR ALPHANUMERIC.*...C.F(H(A$,1))
:C.(C.48.C.57).(C.65.C.90).V....T..T1.T.
1.T1.T:..C..C1.P$.P$." ":.2500.....C.F(I
(A$,1)):C1.((C.48.C.57).(C.65.C.90)).A.3
7...$.P$.P$.A$:.2500......810...8.. SKIP
 TO NEXT LINE.S.B..#1,A$:.A$."".710...L.
.1090...P.. CLOSE OFF CURSOR EXPRESSION.
..Z..F1.0.2040./....B.0.P$.P$.J(D(B.1),2
):.2500.Z...B.0:F1.0:B1$."":P$.P$.P2$:.2
500:F$.P1$.`.....S.D..C(P$).L9.2600...N.
.J.L9.L9..6..1...X..J(P$,J,1).":".2580..
....J:.J.L9.1.L9..6.1..1.I...P.F(J(P$,J)
).X....P.91.2580......P.59.P.44.P.93.J.J
.1:.2580......J:J.L9.1......4,M$;H(P$,J.
1).0...P$."    ".J(P$,J).6.(...Q....C(P$
).0.F2.1:.4,M$;P$.S.B..F2.0.."** NO LINE
S FOUND **"...L. 1:.2000: 4...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL