COMPARE

00000000: 01 04 25 04 00 00 9C 3A  50 47 24 B2 22 43 4F 4D  |..%....:PG$."COM|
00000010: 50 41 52 45 22 3A 4E 4D  24 B2 22 32 32 22 3A 89  |PARE":NM$."22":.|
00000020: 36 32 30 30 30 00 37 04  01 00 22 20 47 4C 45 4E  |62000.7..." GLEN|
00000030: 20 46 49 53 48 45 52 00  3D 04 04 00 22 00 58 04  | FISHER.=...".X.|
00000040: 05 00 22 20 43 55 52 53  4F 52 20 23 32 32 2C 20  |.." CURSOR #22, |
00000050: 53 45 50 20 31 39 38 30  00 7E 04 06 00 22 20 43  |SEP 1980.~..." C|
00000060: 4F 50 59 52 49 47 48 54  28 43 29 31 39 38 30 20  |OPYRIGHT(C)1980 |
00000070: 54 48 45 20 43 4F 44 45  20 57 4F 52 4B 53 00 9F  |THE CODE WORKS..|
00000080: 04 07 00 22 20 42 4F 58  20 35 35 30 2C 20 47 4F  |..." BOX 550, GO|
00000090: 4C 45 54 41 2C 20 43 41  2E 20 39 33 30 31 37 00  |LETA, CA. 93017.|
000000A0: A5 04 08 00 22 00 BB 04  0A 00 22 20 41 53 20 4F  |...."....." AS O|
000000B0: 46 20 4F 43 54 20 31 30  20 38 30 00 D0 04 64 00  |F OCT 10 80...d.|
000000C0: 86 45 4F 46 28 33 29 3A  4E 55 24 B2 C7 28 30 29  |.EOF(3):NU$..(0)|
000000D0: 00 F7 04 6E 00 56 24 B2  C7 28 31 29 AA C7 28 34  |...n.V$..(1)..(4|
000000E0: 29 3A 42 4C 24 B2 22 20  20 20 20 20 20 20 20 20  |):BL$."         |
000000F0: 20 20 20 20 20 20 22 00  29 05 78 00 48 59 24 B2  |      ".).x.HY$.|
00000100: 22 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |"---------------|
00000110: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000120: 2D 2D 2D 2D 2D 2D 2D 2D  22 00 33 05 82 00 4F 4C  |--------".3...OL|
00000130: B2 AB 31 00 41 05 8C 00  86 54 4B 24 28 31 32 38  |..1.A....TK$(128|
00000140: 29 00 58 05 96 00 81 49  B2 30 A4 37 34 3A 87 54  |).X....I.0.74:.T|
00000150: 4B 24 28 49 29 3A 82 49  00 91 05 A0 00 99 22 44  |K$(I):.I......"D|
00000160: 4F 20 59 4F 55 20 48 41  56 45 20 41 20 50 52 49  |O YOU HAVE A PRI|
00000170: 4E 54 45 52 3F 20 22 3B  3A 8D 36 30 30 30 30 3A  |NTER? ";:.60000:|
00000180: 50 52 B2 28 C8 28 49 4E  24 2C 31 29 B2 22 59 22  |PR.(.(IN$,1)."Y"|
00000190: 29 00 9E 05 AA 00 9F 31  35 2C 38 2C 31 35 00 C3  |)......15,8,15..|
000001A0: 05 B4 00 99 22 11 43 4F  4D 50 41 52 45 20 57 48  |....".COMPARE WH|
000001B0: 41 54 20 46 49 4C 45 2E  2E 2E 22 3B 3A 8D 36 30  |AT FILE...";:.60|
000001C0: 30 30 30 00 D3 05 BE 00  8B 49 4E 24 B2 22 22 A7  |000......IN$."".|
000001D0: 36 36 30 00 F4 05 C8 00  4F 46 24 B2 49 4E 24 3A  |660.....OF$.IN$:|
000001E0: 9F 31 2C 38 2C 32 2C 22  30 3A 22 AA 4F 46 24 AA  |.1,8,2,"0:".OF$.|
000001F0: 22 2C 50 22 00 0A 06 D2  00 8D 31 30 37 30 3A 8B  |",P"......1070:.|
00000200: 45 52 A7 A0 31 3A 89 31  38 30 00 1E 06 DC 00 4E  |ER..1:.180.....N|
00000210: B2 31 3A 8D 39 32 30 3A  54 24 B2 4E 4D 24 00 52  |.1:.920:T$.NM$.R|
00000220: 06 E6 00 8B 54 24 B3 B1  56 24 A7 99 22 11 22 3B  |....T$..V$..".";|
00000230: 4F 46 24 3B 22 20 49 53  4E 27 54 20 41 20 42 41  |OF$;" ISN'T A BA|
00000240: 53 49 43 20 46 49 4C 45  2E 22 3A A0 31 3A 89 31  |SIC FILE.":.1:.1|
00000250: 38 30 00 73 06 F0 00 99  22 11 57 49 54 48 20 57  |80.s....".WITH W|
00000260: 48 41 54 20 46 49 4C 45  3F 20 22 3B 3A 8D 36 30  |HAT FILE? ";:.60|
00000270: 30 30 30 00 94 06 FA 00  4E 46 24 B2 49 4E 24 3A  |000.....NF$.IN$:|
00000280: 9F 32 2C 38 2C 33 2C 22  30 3A 22 AA 4E 46 24 AA  |.2,8,3,"0:".NF$.|
00000290: 22 2C 50 22 00 AA 06 04  01 8D 31 30 37 30 3A 8B  |",P"......1070:.|
000002A0: 45 52 A7 A0 32 3A 89 32  34 30 00 BE 06 0E 01 4E  |ER..2:.240.....N|
000002B0: B2 32 3A 8D 39 32 30 3A  55 24 B2 4E 4D 24 00 F2  |.2:.920:U$.NM$..|
000002C0: 06 18 01 8B 55 24 B3 B1  56 24 A7 99 22 11 22 3B  |....U$..V$..".";|
000002D0: 4E 46 24 3B 22 20 49 53  4E 27 54 20 41 20 42 41  |NF$;" ISN'T A BA|
000002E0: 53 49 43 20 46 49 4C 45  2E 22 3A A0 32 3A 89 32  |SIC FILE.":.2:.2|
000002F0: 34 30 00 04 07 22 01 8B  50 52 A7 9F 34 2C 34 3A  |40..."..PR..4,4:|
00000300: 89 33 31 30 00 0D 07 2C  01 9F 34 2C 33 00 28 07  |.310...,..4,3.(.|
00000310: 36 01 4E B2 31 3A 8D 38  36 30 3A 4C 31 B2 4C 4E  |6.N.1:.860:L1.LN|
00000320: 3A 53 31 24 B2 49 4E 24  00 43 07 40 01 4E B2 32  |:S1$.IN$.C.@.N.2|
00000330: 3A 8D 38 36 30 3A 4C 32  B2 4C 4E 3A 53 32 24 B2  |:.860:L2.LN:S2$.|
00000340: 49 4E 24 00 60 07 4A 01  99 4C 31 3B 22 9D 20 3A  |IN$.`.J..L1;". :|
00000350: 22 3B 4C 32 3B 22 91 22  3A 8B 50 52 A7 33 38 30  |";L2;".":.PR.380|
00000360: 00 73 07 54 01 A1 54 24  3A 8B 54 24 B2 22 22 A7  |.s.T..T$:.T$."".|
00000370: 33 38 30 00 91 07 5E 01  99 A3 C3 28 42 4C 24 29  |380...^....(BL$)|
00000380: 29 3B 22 12 50 52 45 53  53 20 41 20 4B 45 59 91  |);".PRESS A KEY.|
00000390: 22 00 A4 07 68 01 A1 54  24 3A 8B 54 24 B2 22 22  |"...h..T$:.T$.""|
000003A0: A7 33 36 30 00 B9 07 72  01 99 A3 C3 28 42 4C 24  |.360...r....(BL$|
000003B0: 29 29 3B 42 4C 24 3B 22  91 00 D5 07 7C 01 91 32  |));BL$;"....|..2|
000003C0: AA B4 28 4C 31 AB 4C 32  29 89 34 30 30 2C 34 35  |..(L1.L2).400,45|
000003D0: 30 2C 35 37 30 00 E1 07  90 01 54 54 24 B2 22 2D  |0,570.....TT$."-|
000003E0: 22 00 F7 07 9A 01 4C 4E  B2 4C 31 3A 53 24 B2 53  |".....LN.L1:S$.S|
000003F0: 31 24 3A 8D 37 34 30 00  0D 08 A4 01 4E B2 31 3A  |1$:.740.....N.1:|
00000400: 8D 38 36 30 3A 8B 45 4F  46 A7 36 32 30 00 24 08  |.860:.EOF.620.$.|
00000410: AE 01 4C 31 B2 4C 4E 3A  53 31 24 B2 49 4E 24 3A  |..L1.LN:S1$.IN$:|
00000420: 89 33 33 30 00 35 08 C2  01 8B 53 31 24 B2 53 32  |.330.5....S1$.S2|
00000430: 24 A7 35 30 30 00 41 08  CC 01 54 54 24 B2 22 2D  |$.500.A...TT$."-|
00000440: 22 00 57 08 D6 01 4C 4E  B2 4C 31 3A 53 24 B2 53  |".W...LN.L1:S$.S|
00000450: 31 24 3A 8D 37 34 30 00  63 08 E0 01 54 54 24 B2  |1$:.740.c...TT$.|
00000460: 22 2B 22 00 79 08 EA 01  4C 4E B2 4C 32 3A 53 24  |"+".y...LN.L2:S$|
00000470: B2 53 32 24 3A 8D 37 34  30 00 81 08 F4 01 44 B2  |.S2$:.740.....D.|
00000480: 30 00 99 08 FE 01 4E B2  31 3A 8D 38 36 30 3A 8B  |0.....N.1:.860:.|
00000490: 45 4F 46 A7 44 B2 44 AA  31 00 AB 08 08 02 4C 31  |EOF.D.D.1.....L1|
000004A0: B2 4C 4E 3A 53 31 24 B2  49 4E 24 00 C3 08 12 02  |.LN:S1$.IN$.....|
000004B0: 4E B2 32 3A 8D 38 36 30  3A 8B 45 4F 46 A7 44 B2  |N.2:.860:.EOF.D.|
000004C0: 44 AA 32 00 D5 08 1C 02  4C 32 B2 4C 4E 3A 53 32  |D.2.....L2.LN:S2|
000004D0: 24 B2 49 4E 24 00 EE 08  26 02 91 44 AA 31 89 33  |$.IN$...&..D.1.3|
000004E0: 33 30 2C 36 32 30 2C 36  31 30 2C 36 36 30 00 FA  |30,620,610,660..|
000004F0: 08 3A 02 54 54 24 B2 22  2B 22 00 10 09 44 02 4C  |.:.TT$."+"...D.L|
00000500: 4E B2 4C 32 3A 53 24 B2  53 32 24 3A 8D 37 34 30  |N.L2:S$.S2$:.740|
00000510: 00 26 09 4E 02 4E B2 32  3A 8D 38 36 30 3A 8B 45  |.&.N.N.2:.860:.E|
00000520: 4F 46 A7 36 31 30 00 3D  09 58 02 4C 32 B2 4C 4E  |OF.610.=.X.L2.LN|
00000530: 3A 53 32 24 B2 49 4E 24  3A 89 33 33 30 00 58 09  |:S2$.IN$:.330.X.|
00000540: 62 02 4E B2 31 3A 49 4E  24 B2 53 31 24 3A 4C 4E  |b.N.1:IN$.S1$:LN|
00000550: B2 4C 31 3A 89 36 33 30  00 73 09 6C 02 4E B2 32  |.L1:.630.s.l.N.2|
00000560: 3A 49 4E 24 B2 53 32 24  3A 4C 4E B2 4C 32 3A 89  |:IN$.S2$:LN.L2:.|
00000570: 36 33 30 00 87 09 76 02  54 54 24 B2 CA 28 22 2D  |630...v.TT$..("-|
00000580: 2B 22 2C 4E 2C 31 29 00  97 09 80 02 53 24 B2 49  |+",N,1).....S$.I|
00000590: 4E 24 3A 8D 37 34 30 00  AB 09 8A 02 8D 38 36 30  |N$:.740......860|
000005A0: 3A 8B 45 4F 46 B2 30 A7  36 34 30 00 B1 09 94 02  |:.EOF.0.640.....|
000005B0: 99 00 CF 09 9E 02 8B 4F  4C B3 30 A7 99 22 11 4E  |.......OL.0..".N|
000005C0: 4F 20 44 49 46 46 45 52  45 4E 43 45 53 2E 22 00  |O DIFFERENCES.".|
000005D0: FA 09 A8 02 8B 4F 4C B1  B2 30 A7 98 34 2C 48 59  |.....OL..0..4,HY|
000005E0: 24 3A 98 34 2C 22 2D 20  22 3B 4F 46 24 3B 22 20  |$:.4,"- ";OF$;" |
000005F0: 20 20 20 2B 20 22 3B 4E  46 24 00 01 0A B2 02 A0  |   + ";NF$......|
00000600: 34 00 08 0A BC 02 A0 32  00 0F 0A C6 02 A0 31 00  |4......2......1.|
00000610: 17 0A D0 02 A0 31 35 00  1D 0A DA 02 80 00 47 0A  |.....15.......G.|
00000620: E4 02 8B 4F 4C B3 30 A7  98 34 2C 42 4C 24 3A 98  |...OL.0..4,BL$:.|
00000630: 34 2C 22 2D 20 22 3B 4F  46 24 3B 22 20 20 20 20  |4,"- ";OF$;"    |
00000640: 2B 20 22 3B 4E 46 24 00  58 0A EE 02 8B 4F 4C B3  |+ ";NF$.X....OL.|
00000650: 30 A7 98 34 2C 48 59 24  00 70 0A F8 02 8B 4F 4C  |0..4,HY$.p....OL|
00000660: B1 30 AF 4F 4C B3 B1 4C  4E A7 98 34 2C 42 4C 24  |.0.OL..LN..4,BL$|
00000670: 00 95 0A 02 03 4F 4C B2  4C 4E 3A 51 54 B2 30 3A  |.....OL.LN:QT.0:|
00000680: 98 34 2C 54 54 24 3B 4C  4E 3B 3A 81 49 B2 31 A4  |.4,TT$;LN;:.I.1.|
00000690: C3 28 53 24 29 00 A8 0A  0C 03 54 B2 C6 28 CA 28  |.(S$).....T..(.(|
000006A0: 53 24 2C 49 2C 31 29 29  00 BA 0A 16 03 8B 54 B2  |S$,I,1))......T.|
000006B0: 33 34 A7 51 54 B2 31 AB  51 54 00 D6 0A 20 03 8B  |34.QT.1.QT... ..|
000006C0: 54 B3 31 32 38 B0 51 54  A7 98 34 2C C7 28 54 29  |T.128.QT..4,.(T)|
000006D0: 3B 3A 89 38 33 30 00 F0  0A 2A 03 8B 54 B1 31 32  |;:.830...*..T.12|
000006E0: 37 A7 98 34 2C 54 4B 24  28 54 AB 31 32 38 29 3B  |7..4,TK$(T.128);|
000006F0: 00 14 0B 34 03 8B 54 B2  31 33 31 B0 54 B2 31 34  |...4..T.131.T.14|
00000700: 33 A7 98 34 2C CA 28 53  24 2C 49 AA 31 29 3B 3A  |3..4,.(S$,I.1);:|
00000710: 89 38 34 30 00 1B 0B 3E  03 82 49 00 3A 0B 48 03  |.840...>..I.:.H.|
00000720: 8B 50 52 B2 30 A7 8B B9  28 30 29 B3 C3 28 42 4C  |.PR.0...(0)..(BL|
00000730: 24 29 A7 98 34 2C 42 4C  24 3B 00 43 0B 52 03 98  |$)..4,BL$;.C.R..|
00000740: 34 3A 8E 00 6A 0B 5C 03  8D 39 36 30 3A 54 24 B2  |4:..j.\..960:T$.|
00000750: 43 24 3A 8D 39 36 30 3A  4C 4B B2 C6 28 54 24 29  |C$:.960:LK..(T$)|
00000760: AA C6 28 43 24 29 AC 32  35 36 00 87 0B 66 03 8B  |..(C$).256...f..|
00000770: 4C 4B B2 30 A7 45 4F 46  B2 31 3A 45 4F 46 28 4E  |LK.0.EOF.1:EOF(N|
00000780: 29 B2 45 4F 46 3A 8E 00  9B 0B 70 03 8D 39 36 30  |).EOF:....p..960|
00000790: 3A 54 24 B2 43 24 3A 8D  39 36 30 00 C3 0B 7A 03  |:T$.C$:.960...z.|
000007A0: 49 4E 24 B2 54 24 AA 43  24 3A 4C 4E B2 C6 28 54  |IN$.T$.C$:LN..(T|
000007B0: 24 29 AA 32 35 36 AC C6  28 43 24 29 3A 49 4E 24  |$).256..(C$):IN$|
000007C0: B2 22 22 00 E5 0B 84 03  8D 39 36 30 3A 8B 43 24  |.""......960:.C$|
000007D0: B3 B1 4E 55 24 A7 49 4E  24 B2 49 4E 24 AA 43 24  |..NU$.IN$.IN$.C$|
000007E0: 3A 89 39 30 30 00 EB 0B  8E 03 8E 00 08 0C 98 03  |:.900...........|
000007F0: 8D 39 36 30 3A 8B 45 4F  46 A7 4E 4D B2 AB 31 3A  |.960:.EOF.NM..1:|
00000800: 4E 4D 24 B2 22 22 3A 8E  00 18 0C A2 03 4E 4D 24  |NM$."":......NM$|
00000810: B2 43 24 3A 8D 39 36 30  00 3B 0C AC 03 4E 4D B2  |.C$:.960.;...NM.|
00000820: C6 28 4E 4D 24 29 AA C6  28 43 24 29 AC 32 35 36  |.(NM$)..(C$).256|
00000830: 3A 4E 4D 24 B2 4E 4D 24  AA 43 24 00 41 0C B6 03  |:NM$.NM$.C$.A...|
00000840: 8E 00 73 0C C0 03 45 4F  46 B2 45 4F 46 28 4E 29  |..s...EOF.EOF(N)|
00000850: 3A 8B 45 4F 46 B2 30 A7  A1 23 4E 2C 43 24 3A 8B  |:.EOF.0..#N,C$:.|
00000860: 53 54 A7 45 4F 46 B2 31  3A 45 4F 46 28 4E 29 B2  |ST.EOF.1:EOF(N).|
00000870: 45 4F 46 00 89 0C CA 03  8B 45 4F 46 B0 43 24 B2  |EOF......EOF.C$.|
00000880: 22 22 A7 43 24 B2 4E 55  24 00 8F 0C D4 03 8E 00  |"".C$.NU$.......|
00000890: BC 0C DE 03 83 45 4E 44  2C 46 4F 52 2C 4E 45 58  |.....END,FOR,NEX|
000008A0: 54 2C 44 41 54 41 2C 49  4E 50 55 54 23 2C 49 4E  |T,DATA,INPUT#,IN|
000008B0: 50 55 54 2C 44 49 4D 2C  52 45 41 44 00 EA 0C E8  |PUT,DIM,READ....|
000008C0: 03 83 4C 45 54 2C 47 4F  54 4F 2C 52 55 4E 2C 49  |..LET,GOTO,RUN,I|
000008D0: 46 2C 52 45 53 54 4F 52  45 2C 47 4F 53 55 42 2C  |F,RESTORE,GOSUB,|
000008E0: 52 45 54 55 52 4E 2C 52  45 4D 00 16 0D F2 03 83  |RETURN,REM......|
000008F0: 53 54 4F 50 2C 4F 4E 2C  57 41 49 54 2C 4C 4F 41  |STOP,ON,WAIT,LOA|
00000900: 44 2C 53 41 56 45 2C 56  45 52 49 46 59 2C 44 45  |D,SAVE,VERIFY,DE|
00000910: 46 2C 50 4F 4B 45 00 43  0D FC 03 83 50 52 49 4E  |F,POKE.C....PRIN|
00000920: 54 23 2C 50 52 49 4E 54  2C 43 4F 4E 54 2C 4C 49  |T#,PRINT,CONT,LI|
00000930: 53 54 2C 43 4C 52 2C 43  4D 44 2C 53 59 53 2C 4F  |ST,CLR,CMD,SYS,O|
00000940: 50 45 4E 00 6B 0D 06 04  83 43 4C 4F 53 45 2C 47  |PEN.k....CLOSE,G|
00000950: 45 54 2C 4E 45 57 2C 54  41 42 28 2C 54 4F 2C 46  |ET,NEW,TAB(,TO,F|
00000960: 4E 2C 53 50 43 28 2C 54  48 45 4E 00 A0 0D 10 04  |N,SPC(,THEN.....|
00000970: 83 4E 4F 54 2C 53 54 45  50 2C 2B 2C 2D 2C 2A 2C  |.NOT,STEP,+,-,*,|
00000980: 2F 2C 5E 2C 41 4E 44 2C  4F 52 2C 3E 2C 3D 2C 3C  |/,^,AND,OR,>,=,<|
00000990: 2C 53 47 4E 2C 49 4E 54  2C 41 42 53 2C 55 53 52  |,SGN,INT,ABS,USR|
000009A0: 00 C5 0D 1A 04 83 46 52  45 2C 50 4F 53 2C 53 51  |......FRE,POS,SQ|
000009B0: 52 2C 52 4E 44 2C 4C 4F  47 2C 45 58 50 2C 43 4F  |R,RND,LOG,EXP,CO|
000009C0: 53 2C 53 49 4E 00 02 0E  24 04 83 54 41 4E 2C 41  |S,SIN...$..TAN,A|
000009D0: 54 4E 2C 50 45 45 4B 2C  4C 45 4E 2C 53 54 52 24  |TN,PEEK,LEN,STR$|
000009E0: 2C 56 41 4C 2C 41 53 43  2C 43 48 52 24 2C 4C 45  |,VAL,ASC,CHR$,LE|
000009F0: 46 54 24 2C 52 49 47 48  54 24 2C 4D 49 44 24 2C  |FT$,RIGHT$,MID$,|
00000A00: 47 4F 00 17 0E 2E 04 84  31 35 2C 45 52 2C 45 52  |GO......15,ER,ER|
00000A10: 24 2C 54 4B 2C 53 43 00  24 0E 38 04 8B 45 52 B3  |$,TK,SC.$.8..ER.|
00000A20: B2 31 A7 8E 00 4A 0E 42  04 8B 45 52 B2 36 32 A7  |.1...J.B..ER.62.|
00000A30: 45 52 24 B2 22 4E 4F 20  53 55 43 48 20 46 49 4C  |ER$."NO SUCH FIL|
00000A40: 45 20 4F 4E 20 44 49 53  4B 22 00 57 0E 4C 04 99  |E ON DISK".W.L..|
00000A50: 22 11 22 3B 45 52 24 00  5D 0E 56 04 8E 00 7E 0E  |".";ER$.].V...~.|
00000A60: 60 EA 49 4E 24 B2 22 20  22 3A 5A 54 B2 54 49 3A  |`.IN$." ":ZT.TI:|
00000A70: 5A 43 B2 32 3A 5A 44 24  B2 C7 28 32 30 29 00 94  |ZC.2:ZD$..(20)..|
00000A80: 0E 6A EA A1 5A 24 3A 8B  5A 24 B3 B1 22 22 A7 36  |.j..Z$:.Z$.."".6|
00000A90: 30 30 37 30 00 C4 0E 74  EA 8B 5A 54 B3 B2 54 49  |0070...t..ZT..TI|
00000AA0: A7 99 CA 28 22 20 A6 22  2C 5A 43 2C 31 29 3B 22  |...(" .",ZC,1);"|
00000AB0: 9D 22 3B 3A 5A 43 B2 33  AB 5A 43 3A 5A 54 B2 54  |.";:ZC.3.ZC:ZT.T|
00000AC0: 49 AA 31 35 00 CF 0E 7E  EA 89 36 30 30 31 30 00  |I.15...~..60010.|
00000AD0: FF 0E A6 EA 5A B2 C6 28  5A 24 29 3A 5A 4C B2 C3  |....Z..(Z$):ZL..|
00000AE0: 28 49 4E 24 29 3A 8B 28  5A AF 31 32 37 29 B3 33  |(IN$):.(Z.127).3|
00000AF0: 32 A7 99 22 20 9D 22 3B  3A 89 36 30 31 31 30 00  |2.." .";:.60110.|
00000B00: 2F 0F B0 EA 8B 46 4C AF  28 5A AF 31 32 37 29 B1  |/....FL.(Z.127).|
00000B10: 36 34 AF 28 5A AF 31 32  37 29 B3 39 31 A7 5A 24  |64.(Z.127).91.Z$|
00000B20: B2 C7 28 28 5A AA 31 32  38 29 AF 32 35 35 29 00  |..((Z.128).255).|
00000B30: 41 0F BA EA 8B 5A 4C B1  32 35 34 A7 36 30 30 31  |A....ZL.254.6001|
00000B40: 30 00 5C 0F C4 EA 49 4E  24 B2 49 4E 24 AA 5A 24  |0.\...IN$.IN$.Z$|
00000B50: 3A 99 5A 24 3B 5A 44 24  3B 5A 24 3B 00 7B 0F CE  |:.Z$;ZD$;Z$;.{..|
00000B60: EA 8B 5A B2 31 33 A7 49  4E 24 B2 CA 28 49 4E 24  |..Z.13.IN$..(IN$|
00000B70: 2C 32 29 3A 99 43 52 24  3B 3A 8E 00 A7 0F D8 EA  |,2):.CR$;:......|
00000B80: 8B 5A B2 32 30 AF 5A 4C  B1 31 A7 49 4E 24 B2 C8  |.Z.20.ZL.1.IN$..|
00000B90: 28 49 4E 24 2C 5A 4C AB  31 29 3A 99 22 9D 22 3B  |(IN$,ZL.1):.".";|
00000BA0: 3A 89 36 30 30 31 30 00  DA 0F E2 EA 8B 5A B2 31  |:.60010......Z.1|
00000BB0: 34 31 A7 5A 24 B2 C7 28  AB 32 30 AC 28 5A 4C B1  |41.Z$..(.20.(ZL.|
00000BC0: 31 29 29 3A 81 5A B2 32  A4 5A 4C 3A 99 5A 24 3B  |1)):.Z.2.ZL:.Z$;|
00000BD0: 3A 82 5A 3A 89 36 30 30  30 30 00 E5 0F EC EA 89  |:.Z:.60000......|
00000BE0: 36 30 30 31 30 00 F5 0F  28 EB 8B 50 4E B2 30 A7  |60010...(..PN.0.|
00000BF0: 36 30 32 35 30 00 00 10  2D EB 8D 36 30 35 30 30  |60250...-..60500|
00000C00: 00 1B 10 32 EB 99 22 50  52 45 53 53 20 12 52 45  |...2.."PRESS .RE|
00000C10: 54 55 52 4E 92 20 54 4F  20 22 3B 00 38 10 3C EB  |TURN. TO ";.8.<.|
00000C20: 8B 50 4E B2 4C 50 A7 99  22 42 45 47 49 4E 3A 22  |.PN.LP.."BEGIN:"|
00000C30: 3B 3A 89 36 30 32 34 30  00 4A 10 46 EB 99 22 43  |;:.60240.J.F.."C|
00000C40: 4F 4E 54 49 4E 55 45 3A  22 3B 00 5F 10 50 EB A1  |ONTINUE:";._.P..|
00000C50: 54 24 3A 8B 54 24 B2 22  22 A7 36 30 32 34 30 00  |T$:.T$."".60240.|
00000C60: 70 10 5A EB 8B 50 4E B2  4C 50 A7 36 30 33 30 30  |p.Z..PN.LP.60300|
00000C70: 00 AE 10 64 EB 50 4E B2  50 4E AA 31 3A 99 22 93  |...d.PN.PN.1:.".|
00000C80: 22 3B 50 47 24 3B 22 20  2D 20 43 55 52 53 4F 52  |";PG$;" - CURSOR|
00000C90: 20 23 22 3B 4E 4D 24 3B  22 20 20 28 43 29 20 31  | #";NM$;"  (C) 1|
00000CA0: 39 38 30 20 20 20 50 41  47 45 22 3B 50 4E 00 B9  |980   PAGE";PN..|
00000CB0: 10 69 EB 8D 36 30 35 30  30 00 BF 10 6E EB 8E 00  |.i..60500...n...|
00000CC0: D6 10 8C EB 99 22 93 22  3A 9C 3A 8D 36 30 34 30  |.....".":.:.6040|
00000CD0: 30 3A 89 31 30 30 00 13  11 F0 EB 51 4B B2 35 32  |0:.100.....QK.52|
00000CE0: 35 3A 51 4C B2 32 34 35  3A 51 4D B2 31 33 34 3A  |5:QL.245:QM.134:|
00000CF0: 51 50 B2 35 31 35 3A 51  51 B2 32 33 34 3A 51 53  |QP.515:QQ.234:QS|
00000D00: B2 35 31 36 3A 51 56 B2  31 3A 43 52 24 B2 C7 28  |.516:QV.1:CR$..(|
00000D10: 31 33 29 00 25 11 FA EB  8B C2 28 35 30 30 30 30  |13).%.....(50000|
00000D20: 29 B2 30 A7 8E 00 57 11  04 EC 51 4B B2 31 35 38  |).0...W...QK.158|
00000D30: 3A 51 4C B2 32 31 36 3A  51 4D B2 35 32 3A 51 50  |:QL.216:QM.52:QP|
00000D40: B2 31 35 31 3A 51 51 B2  32 30 35 3A 51 53 B2 31  |.151:QQ.205:QS.1|
00000D50: 35 32 3A 51 56 B2 32 00  5D 11 0E EC 8E 00 77 11  |52:QV.2.].....w.|
00000D60: 54 EC 81 49 B2 31 A4 31  30 3A 99 22 C3 C3 C3 C3  |T..I.1.10:."....|
00000D70: 22 3B 3A 82 49 3A 8E 00  85 11 30 F2 97 35 39 34  |";:.I:....0..594|
00000D80: 36 38 2C 31 32 00 B2 11  35 F2 99 22 93 11 11 22  |68,12...5.."..."|
00000D90: 3B A3 31 35 AB C3 28 50  47 24 29 29 3B 50 47 24  |;.15..(PG$));PG$|
00000DA0: 3B 22 20 20 42 59 20 47  4C 45 4E 20 46 49 53 48  |;"  BY GLEN FISH|
00000DB0: 45 52 00 E3 11 3A F2 99  22 11 20 20 20 20 20 43  |ER...:..".     C|
00000DC0: 55 52 53 4F 52 20 23 22  3B 4E 4D 24 3B 22 20 20  |URSOR #";NM$;"  |
00000DD0: 43 4F 50 59 52 49 47 48  54 20 28 43 29 20 31 39  |COPYRIGHT (C) 19|
00000DE0: 38 30 11 00 EE 11 44 F2  8D 36 30 35 30 30 00 17  |80....D..60500..|
00000DF0: 12 4E F2 99 22 11 46 49  4E 44 20 44 49 46 46 45  |.N..".FIND DIFFE|
00000E00: 52 45 4E 43 45 53 20 42  45 54 57 45 45 4E 20 50  |RENCES BETWEEN P|
00000E10: 52 4F 47 52 41 4D 53 00  2E 12 53 F2 99 22 11 28  |ROGRAMS...S..".(|
00000E20: 52 45 51 55 49 52 45 53  20 44 49 53 4B 29 00 4F  |REQUIRES DISK).O|
00000E30: 12 62 F2 99 22 11 11 11  50 52 45 53 53 20 12 52  |.b.."...PRESS .R|
00000E40: 45 54 55 52 4E 92 20 54  4F 20 42 45 47 49 4E 00  |ETURN. TO BEGIN.|
00000E50: 64 12 6C F2 A1 54 24 3A  8B 54 24 B2 22 22 A7 36  |d.l..T$:.T$."".6|
00000E60: 32 30 36 30 00 6F 12 76  F2 89 36 30 33 30 30 00  |2060.o.v..60300.|
00000E70: 00 00 4B                                          |..K             |

..%....:PG$."COMPARE":NM$."22":.62000.7.
.." GLEN FISHER.=...".X..." CURSOR #22, 
SEP 1980.~..." COPYRIGHT(C)1980 THE CODE
 WORKS....." BOX 550, GOLETA, CA. 93017.
...."....." AS OF OCT 10 80.P.D..EOF(3):
NU$.G(0)...N.V$.G(1).G(4):BL$."         
      ".).X.HY$."-----------------------
----------------".3...OL..1.A....TK$(128
).X....I.0.74:.TK$(I):.I... .."DO YOU HA
VE A PRINTER? ";:.60000:PR.(H(IN$,1)."Y"
)......15,8,15.C....".COMPARE WHAT FILE.
..";:.60000.S....IN$."".660...H.OF$.IN$:
.1,8,2,"0:".OF$.",P"...R..1070:.ER. 1:.1
80.....N.1:.920:T$.NM$.R....T$..V$..".";
OF$;" ISN'T A BASIC FILE.": 1:.180.S....
".WITH WHAT FILE? ";:.60000.....NF$.IN$:
.2,8,3,"0:".NF$.",P"......1070:.ER. 2:.2
40.....N.2:.920:U$.NM$......U$..V$..".";
NF$;" ISN'T A BASIC FILE.": 2:.240..."..
PR..4,4:.310...,..4,3.(.6.N.1:.860:L1.LN
:S1$.IN$.C.@.N.2:.860:L2.LN:S2$.IN$.`.J.
.L1;". :";L2;".":.PR.380.S.T..T$:.T$."".
380...^...C(BL$));".PRESS A KEY."...H..T
$:.T$."".360...R...C(BL$));BL$;"..U.|..2
..(L1.L2).400,450,570.....TT$."-".....LN
.L1:S$.S1$:.740.....N.1:.860:.EOF.620.$.
..L1.LN:S1$.IN$:.330.5.B..S1$.S2$.500.A.
L.TT$."-".W.V.LN.L1:S$.S1$:.740.C...TT$.
"+".Y...LN.L2:S$.S2$:.740.....D.0.....N.
1:.860:.EOF.D.D.1.....L1.LN:S1$.IN$.C...
N.2:.860:.EOF.D.D.2.U...L2.LN:S2$.IN$...
&..D.1.330,620,610,660...:.TT$."+"...D.L
N.L2:S$.S2$:.740.&.N.N.2:.860:.EOF.610.=
.X.L2.LN:S2$.IN$:.330.X.B.N.1:IN$.S1$:LN
.L1:.630.S.L.N.2:IN$.S2$:LN.L2:.630...V.
TT$.J("-+",N,1).....S$.IN$:.740......860
:.EOF.0.640.......O....OL.0..".NO DIFFER
ENCES."......OL..0..4,HY$:.4,"- ";OF$;" 
   + ";NF$..... 4..... 2...F. 1...P. 15.
..Z...G....OL.0..4,BL$:.4,"- ";OF$;"    
+ ";NF$.X....OL.0..4,HY$.P....OL.0.OL..L
N..4,BL$.....OL.LN:QT.0:.4,TT$;LN;:.I.1.
C(S$).....T.F(J(S$,I,1))......T.34.QT.1.
QT.V. ..T.128.QT..4,G(T);:.830...*..T.12
7..4,TK$(T.128);...4..T.131.T.143..4,J(S
$,I.1);:.840...>..I.:.H..PR.0...(0).C(BL
$)..4,BL$;.C.R..4:..J.\..960:T$.C$:.960:
LK.F(T$).F(C$).256...F..LK.0.EOF.1:EOF(N
).EOF:....P..960:T$.C$:.960.C.Z.IN$.T$.C
$:LN.F(T$).256.F(C$):IN$.""......960:.C$
..NU$.IN$.IN$.C$:.900............960:.EO
F.NM..1:NM$."":......NM$.C$:.960.;...NM.
F(NM$).F(C$).256:NM$.NM$.C$.A.....S...EO
F.EOF(N):.EOF.0..#N,C$:.ST.EOF.1:EOF(N).
EOF...J..EOF.C$."".C$.NU$...T........END
,FOR,NEXT,DATA,INPUT#,INPUT,DIM,READ....
..LET,GOTO,RUN,IF,RESTORE,GOSUB,RETURN,R
EM......STOP,ON,WAIT,LOAD,SAVE,VERIFY,DE
F,POKE.C....PRINT#,PRINT,CONT,LIST,CLR,C
MD,SYS,OPEN.K....CLOSE,GET,NEW,TAB(,TO,F
N,SPC(,THEN. ....NOT,STEP,+,-,*,/,^,AND,
OR,>,=,<,SGN,INT,ABS,USR.E....FRE,POS,SQ
R,RND,LOG,EXP,COS,SIN...$..TAN,ATN,PEEK,
LEN,STR$,VAL,ASC,CHR$,LEFT$,RIGHT$,MID$,
GO......15,ER,ER$,TK,SC.$.8..ER..1...J.B
..ER.62.ER$."NO SUCH FILE ON DISK".W.L..
".";ER$.].V...~.`.IN$." ":ZT.TI:ZC.2:ZD$
.G(20)...J..Z$:.Z$.."".60070.D.T..ZT..TI
..J(" .",ZC,1);".";:ZC.3.ZC:ZT.TI.15.O.~
..60010.....Z.F(Z$):ZL.C(IN$):.(Z.127).3
2.." .";:.60110./....FL.(Z.127).64.(Z.12
7).91.Z$.G((Z.128).255).A....ZL.254.6001
0.\.D.IN$.IN$.Z$:.Z$;ZD$;Z$;.{.N..Z.13.I
N$.J(IN$,2):.CR$;:....X..Z.20.ZL.1.IN$.H
(IN$,ZL.1):.".";:.60010.Z....Z.141.Z$.G(
.20.(ZL.1)):.Z.2.ZL:.Z$;:.Z:.60000......
60010...(..PN.0.60250...-..60500...2.."P
RESS .RETURN. TO ";.8.<..PN.LP.."BEGIN:"
;:.60240.J.F.."CONTINUE:";._.P..T$:.T$."
".60240.P.Z..PN.LP.60300...D.PN.PN.1:.".
";PG$;" - CURSOR #";NM$;"  (C) 1980   PA
GE";PN...I..60500...N...V....".":.:.6040
0:.100.....QK.525:QL.245:QM.134:QP.515:Q
Q.234:QS.516:QV.1:CR$.G(13).%....B(50000
).0...W...QK.158:QL.216:QM.52:QP.151:QQ.
205:QS.152:QV.2.].....W.T..I.1.10:."CCCC
";:.I:....0..59468,12...5.."...";.15.C(P
G$));PG$;"  BY GLEN FISHER...:..".     C
URSOR #";NM$;"  COPYRIGHT (C) 1980....D.
.60500...N..".FIND DIFFERENCES BETWEEN P
ROGRAMS...S..".(REQUIRES DISK).O.B.."...
PRESS .RETURN. TO BEGIN.D.L..T$:.T$."".6
2060.O.V..60300...K

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL