PRG-LISTER

00000000: 01 08 17 08 05 00 97 35  33 32 38 30 2C 30 3A 97  |.......53280,0:.|
00000010: 35 33 32 38 31 2C 30 00  47 08 0A 00 99 22 05 93  |53281,0.G...."..|
00000020: 11 11 11 11 1D 20 20 20  20 20 20 20 20 20 1D 55  |.....         .U|
00000030: 4E 49 56 45 52 53 41 4C  20 4C 49 53 54 45 52 22  |NIVERSAL LISTER"|
00000040: 3A 99 22 11 11 11 22 00  75 08 0F 00 99 22 20 20  |:."...".u...."  |
00000050: 20 20 20 20 20 20 20 20  20 20 20 43 4F 4D 4D 4F  |           COMMO|
00000060: 44 4F 52 45 20 36 34 22  3A 81 54 B2 31 A4 32 30  |DORE 64":.T.1.20|
00000070: 30 30 3A 82 54 00 8A 08  10 00 8F 20 43 4F 4D 50  |00:.T...... COMP|
00000080: 55 54 45 20 44 45 43 20  38 32 00 B9 08 64 00 83  |UTE DEC 82...d..|
00000090: 31 39 2C 31 34 37 2C 31  37 2C 31 34 35 2C 32 39  |19,147,17,145,29|
000000A0: 2C 31 35 37 2C 31 38 2C  31 34 36 2C 32 30 2C 31  |,157,18,146,20,1|
000000B0: 34 38 2C 31 34 31 2C 33  32 00 D5 08 6E 00 8F 38  |48,141,32...n..8|
000000C0: 30 2D 43 4F 4C 55 4D 4E  20 43 55 52 53 4F 52 20  |0-COLUMN CURSOR |
000000D0: 53 54 55 46 46 00 F8 08  78 00 83 37 2C 32 31 2C  |STUFF...x..7,21,|
000000E0: 31 34 39 2C 32 32 2C 31  35 30 2C 31 34 2C 31 34  |149,22,150,14,14|
000000F0: 32 2C 32 35 2C 31 35 33  00 04 09 82 00 83 31 35  |2,25,153......15|
00000100: 2C 31 34 33 00 14 09 8C  00 8F 20 56 49 43 20 53  |,143...... VIC S|
00000110: 54 55 46 46 00 34 09 96  00 83 31 34 34 2C 35 2C  |TUFF.4....144,5,|
00000120: 32 38 2C 31 35 39 2C 31  35 36 2C 33 30 2C 33 31  |28,159,156,30,31|
00000130: 2C 31 35 38 00 5D 09 A0  00 83 38 2C 39 2C 31 33  |,158.]....8,9,13|
00000140: 33 2C 31 33 37 2C 31 33  34 2C 31 33 38 2C 31 33  |3,137,134,138,13|
00000150: 35 2C 31 33 39 2C 31 33  36 2C 31 34 30 00 A0 09  |5,139,136,140...|
00000160: AA 00 83 48 4F 4D 45 2C  43 4C 45 41 52 2C 44 4F  |...HOME,CLEAR,DO|
00000170: 57 4E 2C 55 50 2C 52 49  47 48 54 2C 4C 45 46 54  |WN,UP,RIGHT,LEFT|
00000180: 2C 52 56 53 2C 52 56 4F  46 46 2C 44 45 4C 2C 49  |,RVS,RVOFF,DEL,I|
00000190: 4E 53 54 2C 52 45 54 55  52 4E 2C 53 50 41 43 45  |NST,RETURN,SPACE|
000001A0: 00 EB 09 B4 00 83 42 45  4C 4C 2C 44 2E 4C 49 4E  |......BELL,D.LIN|
000001B0: 45 2C 49 2E 4C 49 4E 45  2C 45 52 2E 42 45 47 49  |E,I.LINE,ER.BEGI|
000001C0: 4E 2C 45 52 2E 45 4E 44  2C 54 45 58 54 2C 47 52  |N,ER.END,TEXT,GR|
000001D0: 41 50 48 49 43 2C 53 43  52 4F 4C 4C 2E 55 50 2C  |APHIC,SCROLL.UP,|
000001E0: 53 43 52 4F 4C 4C 2E 44  4F 57 4E 00 FB 09 BE 00  |SCROLL.DOWN.....|
000001F0: 83 54 4F 50 2C 42 4F 54  54 4F 4D 00 2F 0A C8 00  |.TOP,BOTTOM./...|
00000200: 83 42 4C 41 43 4B 2C 57  48 49 54 45 2C 52 45 44  |.BLACK,WHITE,RED|
00000210: 2C 43 59 41 4E 2C 4D 41  47 45 4E 54 41 2C 47 52  |,CYAN,MAGENTA,GR|
00000220: 45 45 4E 2C 42 4C 55 45  2C 59 45 4C 4C 4F 57 00  |EEN,BLUE,YELLOW.|
00000230: 58 0A D2 00 83 4C 4F 43  4B 2C 55 4E 4C 4F 43 4B  |X....LOCK,UNLOCK|
00000240: 2C 46 31 2C 46 32 2C 46  33 2C 46 34 2C 46 35 2C  |,F1,F2,F3,F4,F5,|
00000250: 46 36 2C 46 37 2C 46 38  00 71 0A DC 00 86 41 28  |F6,F7,F8.q....A(|
00000260: 34 30 29 2C 41 24 28 34  30 29 2C 4B 24 28 39 30  |40),A$(40),K$(90|
00000270: 29 00 86 0A E6 00 81 4A  B2 30 A4 34 30 3A 87 41  |)......J.0.40:.A|
00000280: 28 4A 29 3A 82 4A 00 9C  0A F0 00 81 4A B2 30 A4  |(J):.J......J.0.|
00000290: 34 30 3A 87 41 24 28 4A  29 3A 82 4A 00 E7 0A FA  |40:.A$(J):.J....|
000002A0: 00 83 45 4E 44 2C 46 4F  52 2C 4E 45 58 54 2C 44  |..END,FOR,NEXT,D|
000002B0: 41 54 41 2C 49 4E 50 55  54 23 2C 49 4E 50 55 54  |ATA,INPUT#,INPUT|
000002C0: 2C 44 49 4D 2C 52 45 41  44 2C 4C 45 54 2C 47 4F  |,DIM,READ,LET,GO|
000002D0: 54 4F 2C 52 55 4E 2C 49  46 2C 52 45 53 54 4F 52  |TO,RUN,IF,RESTOR|
000002E0: 45 2C 47 4F 53 55 42 00  30 0B 04 01 83 52 45 54  |E,GOSUB.0....RET|
000002F0: 55 52 4E 2C 52 45 4D 2C  53 54 4F 50 2C 4F 4E 2C  |URN,REM,STOP,ON,|
00000300: 57 41 49 54 2C 4C 4F 41  44 2C 53 41 56 45 2C 56  |WAIT,LOAD,SAVE,V|
00000310: 45 52 49 46 59 2C 44 45  46 2C 50 4F 4B 45 2C 50  |ERIFY,DEF,POKE,P|
00000320: 52 49 4E 54 23 2C 50 52  49 4E 54 2C 43 4F 4E 54  |RINT#,PRINT,CONT|
00000330: 00 77 0B 0E 01 83 4C 49  53 54 2C 43 4C 52 2C 43  |.w....LIST,CLR,C|
00000340: 4D 44 2C 53 59 53 2C 4F  50 45 4E 2C 43 4C 4F 53  |MD,SYS,OPEN,CLOS|
00000350: 45 2C 47 45 54 2C 4E 45  57 2C 54 41 42 28 2C 54  |E,GET,NEW,TAB(,T|
00000360: 4F 2C 46 4E 2C 53 50 43  28 2C 54 48 45 4E 2C 4E  |O,FN,SPC(,THEN,N|
00000370: 4F 54 2C 53 54 45 50 00  BF 0B 18 01 83 2B 2C 2D  |OT,STEP......+,-|
00000380: 2C 2A 2C 2F 2C 5E 2C 41  4E 44 2C 4F 52 2C 3E 2C  |,*,/,^,AND,OR,>,|
00000390: 3D 2C 3C 2C 53 47 4E 2C  49 4E 54 2C 41 42 53 2C  |=,<,SGN,INT,ABS,|
000003A0: 55 53 52 2C 46 52 45 2C  50 4F 53 2C 53 51 52 2C  |USR,FRE,POS,SQR,|
000003B0: 52 4E 44 2C 4C 4F 47 2C  45 58 50 2C 43 4F 53 00  |RND,LOG,EXP,COS.|
000003C0: 07 0C 22 01 83 53 49 4E  2C 54 41 4E 2C 41 54 4E  |.."..SIN,TAN,ATN|
000003D0: 2C 50 45 45 4B 2C 4C 45  4E 2C 53 54 52 24 2C 56  |,PEEK,LEN,STR$,V|
000003E0: 41 4C 2C 41 53 43 2C 43  48 52 24 2C 4C 45 46 54  |AL,ASC,CHR$,LEFT|
000003F0: 24 2C 52 49 47 48 54 24  2C 4D 49 44 24 2C 47 4F  |$,RIGHT$,MID$,GO|
00000400: 2C 43 4F 4E 43 41 54 00  50 0C 2C 01 83 44 4F 50  |,CONCAT.P.,..DOP|
00000410: 45 4E 2C 44 43 4C 4F 53  45 2C 52 45 43 4F 52 44  |EN,DCLOSE,RECORD|
00000420: 2C 48 45 41 44 45 52 2C  43 4F 4C 4C 45 43 54 2C  |,HEADER,COLLECT,|
00000430: 42 41 43 4B 55 50 2C 43  4F 50 59 2C 41 50 50 45  |BACKUP,COPY,APPE|
00000440: 4E 44 2C 44 53 41 56 45  2C 43 41 54 41 4C 4F 47  |ND,DSAVE,CATALOG|
00000450: 00 6E 0C 36 01 83 52 45  4E 41 4D 45 2C 53 43 52  |.n.6..RENAME,SCR|
00000460: 41 54 43 48 2C 44 49 52  45 43 54 4F 52 59 00 84  |ATCH,DIRECTORY..|
00000470: 0C 40 01 81 4A B2 30 A4  38 39 3A 87 4B 24 28 4A  |.@..J.0.89:.K$(J|
00000480: 29 3A 82 4A 00 A6 0C 90  01 A0 31 3A 85 22 4E 41  |):.J......1:."NA|
00000490: 4D 45 20 4F 46 20 50 52  4F 47 52 41 4D 20 46 49  |ME OF PROGRAM FI|
000004A0: 4C 45 22 3B 47 24 00 BB  0C 9A 01 9F 31 2C 38 2C  |LE";G$......1,8,|
000004B0: 33 2C 47 24 AA 22 2C 50  2C 52 22 00 C9 0C A4 01  |3,G$.",P,R".....|
000004C0: A1 23 31 2C 41 24 2C 42  24 00 E2 0C AE 01 8B 41  |.#1,A$,B$......A|
000004D0: 24 B3 B1 C7 28 31 29 AF  41 24 B3 B1 22 22 89 34  |$...(1).A$.."".4|
000004E0: 30 30 00 FC 0C B8 01 8B  41 24 B2 22 22 A7 41 24  |00......A$."".A$|
000004F0: B2 C7 28 31 29 3A A1 23  31 2C 58 24 00 1E 0D C2  |..(1):.#1,X$....|
00000500: 01 85 22 4C 49 4E 45 20  4E 55 4D 42 45 52 20 52  |.."LINE NUMBER R|
00000510: 41 4E 47 45 20 20 2D 9D  9D 9D 22 3B 5A 24 00 33  |ANGE  -...";Z$.3|
00000520: 0D CC 01 4C 30 B2 30 3A  4C 31 B2 30 3A 4C 32 B2  |...L0.0:L1.0:L2.|
00000530: 31 45 39 00 4F 0D D6 01  81 4A B2 31 A4 C3 28 5A  |1E9.O....J.1..(Z|
00000540: 24 29 3A 59 24 B2 CA 28  5A 24 2C 4A 2C 31 29 00  |$):Y$..(Z$,J,1).|
00000550: 6C 0D E0 01 59 B2 C6 28  59 24 29 3A 8B 59 B1 B2  |l...Y..(Y$):.Y..|
00000560: 34 38 AF 59 B3 B2 35 37  89 35 31 30 00 7A 0D EA  |48.Y..57.510.z..|
00000570: 01 8B 59 B2 33 32 89 35  31 30 00 8E 0D F4 01 4C  |..Y.32.510.....L|
00000580: 30 B2 4A 3A 8B 59 B3 B1  34 35 89 36 30 30 00 95  |0.J:.Y..45.600..|
00000590: 0D FE 01 82 4A 00 C1 0D  08 02 8B 4C 30 B3 C3 28  |....J......L0..(|
000005A0: 5A 24 29 A7 4C 32 B2 C5  28 CA 28 5A 24 2C 4C 30  |Z$).L2..(.(Z$,L0|
000005B0: AA 31 29 29 3A 8B 4C 32  B2 30 A7 4C 32 B2 31 45  |.1)):.L2.0.L2.1E|
000005C0: 39 00 D4 0D 12 02 8B 4C  30 B1 31 A7 4C 31 B2 C5  |9......L0.1.L1..|
000005D0: 28 5A 24 29 00 E4 0D 1C  02 8B 4C 30 B2 30 A7 4C  |(Z$)......L0.0.L|
000005E0: 31 B2 4C 32 00 14 0E 58  02 50 33 24 B2 22 5B 22  |1.L2...X.P3$."["|
000005F0: 3A 50 34 24 B2 22 5D 22  3A 85 22 4C 49 53 54 20  |:P4$."]":."LIST |
00000600: 54 4F 20 50 52 49 4E 54  45 52 20 20 4E 9D 9D 9D  |TO PRINTER  N...|
00000610: 22 3B 5A 24 00 47 0E 62  02 50 B2 33 3A 8B C6 28  |";Z$.G.b.P.3:..(|
00000620: 5A 24 29 B2 38 39 A7 50  B2 34 3A 4C 24 B2 22 11  |Z$).89.P.4:L$.".|
00000630: 22 3A 50 33 24 B2 C7 28  32 31 39 29 3A 50 34 24  |":P3$..(219):P4$|
00000640: B2 C7 28 32 32 31 29 00  78 0E 6C 02 50 31 24 B2  |..(221).x.l.P1$.|
00000650: 22 5B 22 3A 50 32 24 B2  22 5D 22 3A 85 22 47 52  |"[":P2$."]":."GR|
00000660: 41 50 48 49 43 53 20 4F  52 20 54 45 58 54 20 20  |APHICS OR TEXT  |
00000670: 47 9D 9D 9D 22 3B 5A 24  00 AB 0E 76 02 99 C7 28  |G...";Z$...v...(|
00000680: 31 34 32 29 3A 8B C6 28  5A 24 29 B2 38 34 A7 99  |142):..(Z$).84..|
00000690: C7 28 31 34 29 3A 4D 24  B2 4C 24 3A 50 31 24 B2  |.(14):M$.L$:P1$.|
000006A0: 50 33 24 3A 50 32 24 B2  50 34 24 00 D1 0E 80 02  |P3$:P2$.P4$.....|
000006B0: 85 22 54 52 41 4E 53 4C  41 54 45 20 43 55 52 53  |."TRANSLATE CURS|
000006C0: 4F 52 20 4D 4F 56 45 53  20 20 9D 9D 9D 22 3B 5A  |OR MOVES  ...";Z|
000006D0: 24 00 E4 0E 8A 02 8B C6  28 5A 24 29 B2 38 39 A7  |$.......(Z$).89.|
000006E0: 54 37 B2 31 00 F4 0E 94  02 9F 34 2C 50 3A 46 24  |T7.1......4,P:F$|
000006F0: B2 50 31 24 00 07 0F 9E  02 4A B2 38 30 3A 8B 50  |.P1$.....J.80:.P|
00000700: B3 B1 33 89 36 39 30 00  39 0F A8 02 99 22 93 22  |..3.690.9...."."|
00000710: 3A 99 22 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 22  |:."++++++++++++"|
00000720: 3A 81 4A B2 31 A4 38 31  3A 8B C2 28 31 30 32 34  |:.J.1.81:..(1024|
00000730: AA 4A 29 B2 33 32 A7 82  4A 00 56 0F B2 02 4C 39  |.J).32..J.V...L9|
00000740: B2 34 30 3A 98 34 2C 22  50 52 4F 47 52 41 4D 3A  |.40:.4,"PROGRAM:|
00000750: 20 20 22 3B 47 24 00 64  0F BC 02 8F 4E 45 57 20  |  ";G$.d....NEW |
00000760: 4C 49 4E 45 00 93 0F C6  02 8D 32 30 31 30 3A 51  |LINE......2010:Q|
00000770: B2 30 3A 54 31 B2 31 3A  43 31 B2 AB 31 3A A1 23  |.0:T1.1:C1..1:.#|
00000780: 31 2C 41 24 2C 42 24 3A  8B 53 54 B3 B1 30 89 33  |1,A$,B$:.ST..0.3|
00000790: 30 30 30 00 A3 0F D0 02  8B 42 24 B2 22 22 89 33  |000......B$."".3|
000007A0: 30 30 30 00 B1 0F DA 02  A1 23 31 2C 41 24 2C 42  |000......#1,A$,B|
000007B0: 24 00 D1 0F E4 02 4C B2  C6 28 41 24 AA C7 28 30  |$.....L..(A$..(0|
000007C0: 29 29 AA C6 28 42 24 AA  C7 28 30 29 29 AC 32 35  |))..(B$..(0)).25|
000007D0: 36 00 E0 0F EE 02 8B 4C  B3 4C 31 89 31 30 38 30  |6......L.L1.1080|
000007E0: 00 EF 0F F8 02 8B 4C B1  4C 32 89 33 30 30 30 00  |......L.L2.3000.|
000007F0: 0D 10 02 03 46 32 B2 31  3A 98 34 2C 4D 24 3B 50  |....F2.1:.4,M$;P|
00000800: 24 3A 50 24 B2 C4 28 4C  29 AA 22 20 22 00 23 10  |$:P$..(L)." ".#.|
00000810: 20 03 8F 20 53 54 41 52  54 20 54 45 58 54 20 48  | .. START TEXT H|
00000820: 45 52 45 00 39 10 2A 03  A1 23 31 2C 41 24 3A 8B  |ERE.9.*..#1,A$:.|
00000830: 41 24 B2 22 22 89 37 31  30 00 5A 10 34 03 54 B2  |A$."".710.Z.4.T.|
00000840: 30 3A 41 B2 C6 28 41 24  29 3A 8B 41 B2 33 32 AF  |0:A..(A$):.A.32.|
00000850: 46 24 B2 22 2C 22 89 38  34 30 00 77 10 3E 03 8B  |F$.",".840.w.>..|
00000860: 51 B2 30 B0 28 41 AF 31  32 37 29 B1 33 31 B0 54  |Q.0.(A.127).31.T|
00000870: 37 B2 30 89 39 30 30 00  99 10 48 03 81 4A B2 30  |7.0.900...H..J.0|
00000880: A4 34 30 3A 8B 41 B2 41  28 4A 29 A7 42 24 B2 41  |.40:.A.A(J).B$.A|
00000890: 24 28 4A 29 3A 89 38 36  30 00 A6 10 52 03 82 4A  |$(J):.860...R..J|
000008A0: 3A 89 31 30 30 30 00 BD  10 5C 03 8B 42 24 B2 42  |:.1000...\..B$.B|
000008B0: 31 24 A7 42 B2 42 AA 31  3A 89 38 31 30 00 E0 10  |1$.B.B.1:.810...|
000008C0: 66 03 8B 42 B1 30 A7 41  24 B2 CA 28 C4 28 42 AA  |f..B.0.A$..(.(B.|
000008D0: 31 29 2C 32 29 AA 46 24  AA 42 24 3A 89 38 39 30  |1),2).F$.B$:.890|
000008E0: 00 ED 10 70 03 41 24 B2  46 24 AA 42 24 00 0E 11  |...p.A$.F$.B$...|
000008F0: 7A 03 42 B2 30 3A 42 31  24 B2 42 24 3A 46 24 B2  |z.B.0:B1$.B$:F$.|
00000900: 22 2C 22 3A 46 31 B2 31  3A 89 31 30 31 30 00 29  |",":F1.1:.1010.)|
00000910: 11 84 03 41 B2 41 AB 31  32 38 3A 8B 41 B3 30 B0  |...A.A.128:.A.0.|
00000920: 51 B3 B1 30 89 31 30 30  30 00 40 11 8E 03 8B 41  |Q..0.1000.@....A|
00000930: B2 31 32 37 A7 41 24 B2  22 22 3A 89 31 30 30 30  |.127.A$."":.1000|
00000940: 00 51 11 98 03 54 B2 31  3A 41 24 B2 4B 24 28 41  |.Q...T.1:A$.K$(A|
00000950: 29 00 5F 11 A2 03 8B 41  B2 31 35 A7 51 B2 32 00  |)._....A.15.Q.2.|
00000960: 69 11 E8 03 8D 32 30 31  30 00 7D 11 F2 03 8B 41  |i....2010.}....A|
00000970: 24 B2 C7 28 33 34 29 A7  51 B2 31 AB 51 00 99 11  |$..(34).Q.1.Q...|
00000980: FC 03 8F 20 43 3D 2D 31  20 46 4F 52 20 41 4C 50  |... C=-1 FOR ALP|
00000990: 48 41 4E 55 4D 45 52 49  43 00 C4 11 06 04 43 B2  |HANUMERIC.....C.|
000009A0: C6 28 C8 28 41 24 2C 31  29 29 3A 43 B2 28 43 B3  |.(.(A$,1)):C.(C.|
000009B0: 34 38 B0 43 B1 35 37 29  AF 28 43 B3 36 35 B0 43  |48.C.57).(C.65.C|
000009C0: B1 39 30 29 00 F0 11 10  04 8B 54 B3 B1 54 31 B0  |.90)......T..T1.|
000009D0: 54 B2 31 A7 54 31 B2 54  3A 8B A8 43 AF A8 43 31  |T.1.T1.T:..C..C1|
000009E0: A7 50 24 B2 50 24 AA 22  20 22 3A 8D 32 35 30 30  |.P$.P$." ":.2500|
000009F0: 00 23 12 1A 04 43 B2 C6  28 C9 28 41 24 2C 31 29  |.#...C..(.(A$,1)|
00000A00: 29 3A 43 31 B2 28 28 43  B3 34 38 B0 43 B1 35 37  |):C1.((C.48.C.57|
00000A10: 29 AF 28 43 B3 36 35 B0  43 B1 39 30 29 29 B0 41  |).(C.65.C.90)).A|
00000A20: B2 33 37 00 36 12 24 04  50 24 B2 50 24 AA 41 24  |.37.6.$.P$.P$.A$|
00000A30: 3A 8D 32 35 30 30 00 3F  12 2E 04 89 38 31 30 00  |:.2500.?....810.|
00000A40: 57 12 38 04 8F 20 53 4B  49 50 20 54 4F 20 4E 45  |W.8.. SKIP TO NE|
00000A50: 58 54 20 4C 49 4E 45 00  6D 12 42 04 A1 23 31 2C  |XT LINE.m.B..#1,|
00000A60: 41 24 3A 8B 41 24 B2 22  22 89 37 31 30 00 77 12  |A$:.A$."".710.w.|
00000A70: 4C 04 89 31 30 39 30 00  99 12 D0 07 8F 20 43 4C  |L..1090...... CL|
00000A80: 4F 53 45 20 4F 46 46 20  43 55 52 53 4F 52 20 45  |OSE OFF CURSOR E|
00000A90: 58 50 52 45 53 53 49 4F  4E 00 A8 12 DA 07 8B 46  |XPRESSION......F|
00000AA0: 31 B2 30 89 32 30 34 30  00 C9 12 E4 07 8B 42 B1  |1.0.2040......B.|
00000AB0: 30 A7 50 24 B2 50 24 AA  CA 28 C4 28 42 AA 31 29  |0.P$.P$..(.(B.1)|
00000AC0: 2C 32 29 3A 8D 32 35 30  30 00 F4 12 EE 07 42 B2  |,2):.2500.....B.|
00000AD0: 30 3A 46 31 B2 30 3A 42  31 24 B2 22 22 3A 50 24  |0:F1.0:B1$."":P$|
00000AE0: B2 50 24 AA 50 32 24 3A  8D 32 35 30 30 3A 46 24  |.P$.P2$:.2500:F$|
00000AF0: B2 50 31 24 00 FA 12 F8  07 8E 00 0D 13 C4 09 8B  |.P1$............|
00000B00: C3 28 50 24 29 B3 4C 39  89 32 36 30 30 00 20 13  |.(P$).L9.2600. .|
00000B10: CE 09 81 4A B2 4C 39 A4  4C 39 AC 2E 36 A9 AB 31  |...J.L9.L9..6..1|
00000B20: 00 38 13 D8 09 8B CA 28  50 24 2C 4A 2C 31 29 B2  |.8.....(P$,J,1).|
00000B30: 22 3A 22 89 32 35 38 30  00 52 13 E2 09 82 4A 3A  |":".2580.R....J:|
00000B40: 81 4A B2 4C 39 AB 31 A4  4C 39 AC 2E 36 AB 31 A9  |.J.L9.1.L9..6.1.|
00000B50: AB 31 00 63 13 EC 09 50  B2 C6 28 CA 28 50 24 2C  |.1.c...P..(.(P$,|
00000B60: 4A 29 29 00 72 13 F6 09  8B 50 B2 39 31 89 32 35  |J)).r....P.91.25|
00000B70: 38 30 00 92 13 00 0A 8B  50 B2 35 39 B0 50 B2 34  |80......P.59.P.4|
00000B80: 34 B0 50 B2 39 33 A7 4A  B2 4A AA 31 3A 89 32 35  |4.P.93.J.J.1:.25|
00000B90: 38 30 00 A0 13 0A 0A 82  4A 3A 4A B2 4C 39 AB 31  |80......J:J.L9.1|
00000BA0: 00 B4 13 14 0A 98 34 2C  4D 24 3B C8 28 50 24 2C  |......4,M$;.(P$,|
00000BB0: 4A AB 31 29 00 CA 13 1E  0A 50 24 B2 22 20 20 20  |J.1).....P$."   |
00000BC0: 20 22 AA CA 28 50 24 2C  4A 29 00 D0 13 28 0A 8E  | "..(P$,J)...(..|
00000BD0: 00 EB 13 B8 0B 8B C3 28  50 24 29 B1 30 A7 46 32  |.......(P$).0.F2|
00000BE0: B2 31 3A 98 34 2C 4D 24  3B 50 24 00 0D 14 C2 0B  |.1:.4,M$;P$.....|
00000BF0: 8B 46 32 B2 30 A7 99 22  2A 2A 20 4E 4F 20 4C 49  |.F2.0.."** NO LI|
00000C00: 4E 45 53 20 46 4F 55 4E  44 20 2A 2A 22 00 1D 14  |NES FOUND **"...|
00000C10: CC 0B A0 31 3A 8D 32 30  30 30 3A A0 34 00 00 00  |...1:.2000:.4...|
00000C20: 28 41 FF 31 B1                                    |(A.1.           |

.......53280,0:.53281,0.G....".......   
      .UNIVERSAL LISTER":."...".U...."  
           COMMODORE 64":.T.1.2000:.T...
... COMPUTE DEC 82...D..19,147,17,145,29
,157,18,146,20,148,141,32.U.N..80-COLUMN
 CURSOR STUFF...X..7,21,149,22,150,14,14
2,25,153......15,143...... VIC STUFF.4..
..144,5,28,159,156,30,31,158.]. ..8,9,13
3,137,134,138,135,139,136,140. ....HOME,
CLEAR,DOWN,UP,RIGHT,LEFT,RVS,RVOFF,DEL,I
NST,RETURN,SPACE......BELL,D.LINE,I.LINE
,ER.BEGIN,ER.END,TEXT,GRAPHIC,SCROLL.UP,
SCROLL.DOWN......TOP,BOTTOM./.H..BLACK,W
HITE,RED,CYAN,MAGENTA,GREEN,BLUE,YELLOW.
X.R..LOCK,UNLOCK,F1,F2,F3,F4,F5,F6,F7,F8
.Q....A(40),A$(40),K$(90)......J.0.40:.A
(J):.J......J.0.40:.A$(J):.J......END,FO
R,NEXT,DATA,INPUT#,INPUT,DIM,READ,LET,GO
TO,RUN,IF,RESTORE,GOSUB.0....RETURN,REM,
STOP,ON,WAIT,LOAD,SAVE,VERIFY,DEF,POKE,P
RINT#,PRINT,CONT.W....LIST,CLR,CMD,SYS,O
PEN,CLOSE,GET,NEW,TAB(,TO,FN,SPC(,THEN,N
OT,STEP......+,-,*,/,^,AND,OR,>,=,<,SGN,
INT,ABS,USR,FRE,POS,SQR,RND,LOG,EXP,COS.
.."..SIN,TAN,ATN,PEEK,LEN,STR$,VAL,ASC,C
HR$,LEFT$,RIGHT$,MID$,GO,CONCAT.P.,..DOP
EN,DCLOSE,RECORD,HEADER,COLLECT,BACKUP,C
OPY,APPEND,DSAVE,CATALOG.N.6..RENAME,SCR
ATCH,DIRECTORY...@..J.0.89:.K$(J):.J....
. 1:."NAME OF PROGRAM FILE";G$......1,8,
3,G$.",P,R".I....#1,A$,B$......A$..G(1).
A$.."".400......A$."".A$.G(1):.#1,X$...B
.."LINE NUMBER RANGE  -...";Z$.3.L.L0.0:
L1.0:L2.1E9.O.V..J.1.C(Z$):Y$.J(Z$,J,1).
L...Y.F(Y$):.Y..48.Y..57.510.Z....Y.32.5
10.....L0.J:.Y..45.600......J.A....L0.C(
Z$).L2.E(J(Z$,L0.1)):.L2.0.L2.1E9.T....L
0.1.L1.E(Z$)......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).X.L.P1$."[":P2$."]":."GRAPHICS O
R TEXT  G...";Z$...V..G(142):.F(Z$).84..
G(14):M$.L$:P1$.P3$:P2$.P4$.Q...."TRANSL
ATE CURSOR MOVES  ...";Z$......F(Z$).89.
T7.1......4,P:F$.P1$.....J.80:.P..3.690.
9....".":."++++++++++++":.J.1.81:.B(1024
.J).32..J.V...L9.40:.4,"PROGRAM:  ";G$.D
....NEW LINE...F..2010:Q.0:T1.1:C1..1:.#
1,A$,B$:.ST..0.3000...P..B$."".3000...Z.
.#1,A$,B$.Q...L.F(A$.G(0)).F(B$.G(0)).25
6......L.L1.1080......L.L2.3000.....F2.1
:.4,M$;P$:P$.D(L)." ".#. .. START TEXT H
ERE.9.*..#1,A$:.A$."".710.Z.4.T.0:A.F(A$
):.A.32.F$.",".840.W.>..Q.0.(A.127).31.T
7.0.900...H..J.0.40:.A.A(J).B$.A$(J):.86
0...R..J:.1000...\..B$.B1$.B.B.1:.810...
F..B.0.A$.J(D(B.1),2).F$.B$:.890...P.A$.
F$.B$...Z.B.0:B1$.B$:F$.",":F1.1:.1010.)
...A.A.128:.A.0.Q..0.1000.@....A.127.A$.
"":.1000.Q...T.1:A$.K$(A)._....A.15.Q.2.
I....2010.}....A$.G(34).Q.1.Q...... C=-1
 FOR ALPHANUMERIC.D...C.F(H(A$,1)):C.(C.
48.C.57).(C.65.C.90)......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.37.6.$.
P$.P$.A$:.2500.?....810.W.8.. SKIP TO NE
XT LINE.M.B..#1,A$:.A$."".710.W.L..1090.
..P.. CLOSE OFF CURSOR EXPRESSION...Z..F
1.0.2040.I....B.0.P$.P$.J(D(B.1),2):.250
0.....B.0:F1.0:B1$."":P$.P$.P2$:.2500:F$
.P1$.........D..C(P$).L9.2600. .N..J.L9.
L9..6..1.8.X..J(P$,J,1).":".2580.R....J:
.J.L9.1.L9..6.1..1.C...P.F(J(P$,J)).R...
.P.91.2580......P.59.P.44.P.93.J.J.1:.25
80. ....J:J.L9.1......4,M$;H(P$,J.1).J..
.P$."    ".J(P$,J).P.(........C(P$).0.F2
.1:.4,M$;P$...B..F2.0.."** NO LINES FOUN
D **"...L. 1:.2000: 4...(A.1.

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL