00000000: 01 1C 1F 1C 0A 00 4E B2 32 30 38 3A 50 B2 38 34 |......N.208:P.84|
00000010: 32 3A E7 30 2C 37 3A E7 34 2C 37 3A FE 02 30 00 |2:.0,7:.4,7:..0.|
00000020: 46 1C 0C 00 99 22 93 22 C7 28 31 34 29 C7 28 38 |F....".".(14).(8|
00000030: 29 3A 99 22 9A 52 45 4D 20 12 48 49 47 48 4C 49 |):.".REM .HIGHLI|
00000040: 47 48 54 45 52 11 00 73 1C 0E 00 85 22 11 11 50 |GHTER..s...."..P|
00000050: 52 4F 47 52 41 4D 20 4E 41 4D 45 22 3B 4E 24 3A |ROGRAM NAME";N$:|
00000060: 8B 4E 24 B2 22 22 A7 99 22 91 91 91 91 91 22 3A |.N$.""..".....":|
00000070: 89 31 34 00 B4 1C 10 00 51 24 B2 C7 28 33 34 29 |.14.....Q$..(34)|
00000080: 3A 99 22 93 11 11 11 11 11 11 11 11 11 11 11 11 |:.".............|
00000090: 11 11 11 11 11 4C 4F 41 44 49 4E 47 20 11 22 3A |.....LOADING .":|
000000A0: 99 4E 24 22 13 1F 4C 4F 41 44 22 51 24 4E 24 51 |.N$"..LOAD"Q$N$Q|
000000B0: 24 22 2C 38 00 D9 1C 12 00 99 22 11 11 11 11 36 |$",8......"....6|
000000C0: 33 39 39 34 53 3D 50 45 C5 28 53 29 2B 50 45 C5 |3994S=PE.(S)+PE.|
000000D0: 28 53 2B 31 29 2A 32 35 36 00 24 1D 14 00 99 22 |(S+1)*256.$...."|
000000E0: 36 33 39 39 35 49 46 50 45 C5 28 53 2B 34 29 3D |63995IFPE.(S+4)=|
000000F0: 31 34 33 54 C8 3F 22 51 24 22 13 9F 22 51 24 22 |143T.?"Q$".."Q$"|
00000100: 50 45 C5 28 53 2B 32 29 2B 50 45 C5 28 53 2B 33 |PE.(S+2)+PE.(S+3|
00000110: 29 2A 32 35 36 3A 54 3D 53 2B 34 3A 47 4F D3 36 |)*256:T=S+4:GO.6|
00000120: 33 39 39 37 00 55 1D 16 00 99 22 36 33 39 39 36 |3997.U...."63996|
00000130: 4F 4E 2D 28 53 3C 3E 2E 29 47 CF 36 33 39 39 34 |ON-(S<>.)G.63994|
00000140: 3A 3F 22 51 24 22 93 1F 22 51 24 22 3B 3A 47 CF |:?"Q$".."Q$";:G.|
00000150: 36 33 39 39 39 00 76 1D 18 00 99 22 36 33 39 39 |63999.v...."6399|
00000160: 37 54 3D 54 2B 31 3A 49 46 50 45 C5 28 54 29 3D |7T=T+1:IFPE.(T)=|
00000170: 2E 54 C8 52 45 D4 00 AB 1D 1A 00 99 22 36 33 39 |.T.RE......."639|
00000180: 39 38 4F 4E 2D 28 50 45 C5 28 54 29 3D 33 32 29 |98ON-(PE.(T)=32)|
00000190: 47 CF 36 33 39 39 37 3A 50 4F CB 54 2B 28 54 3E |G.63997:PO.T+(T>|
000001A0: 53 2B 35 29 2C 31 38 3A 52 45 D4 00 EF 1D 1C 00 |S+5),18:RE......|
000001B0: 99 22 36 33 39 39 39 50 4F CB 50 2C 31 39 3A 46 |."63999PO.P,19:F|
000001C0: CF 49 3D 31 54 4F 36 3A 50 4F CB 50 2B 49 2C 31 |.I=1TO6:PO.P+I,1|
000001D0: 33 3A 3F 36 33 39 39 33 2B 49 3A 4E C5 3A 50 4F |3:?63993+I:N.:PO|
000001E0: CB 50 2B 49 2C 31 35 34 3A 50 4F CB 4E 2C 38 00 |.P+I,154:PO.N,8.|
000001F0: 2B 1E 1E 00 99 22 3F 22 51 24 22 11 11 11 11 11 |+...."?"Q$".....|
00000200: 12 05 48 49 47 48 4C 49 47 48 54 49 4E 47 22 51 |..HIGHLIGHTING"Q|
00000210: 24 22 3A 4E 3D 32 30 38 3A 50 3D 38 34 32 3A 53 |$":N=208:P=842:S|
00000220: 3D 34 35 3A 47 CF 36 33 39 39 34 00 4B 1E 20 00 |=45:G.63994.K. .|
00000230: 97 50 2C 31 39 3A 81 49 B2 31 A4 38 3A 97 50 AA |.P,19:.I.1.8:.P.|
00000240: 49 2C 31 33 3A 82 3A 97 4E 2C 39 00 00 00 |I,13:.:.N,9... |
......N.208:P.842:.0,7:.4,7:..0.F...."."
G(14)G(8):.".REM .HIGHLIGHTER..S...."..P
ROGRAM NAME";N$:.N$.""..".....":.14.....
Q$.G(34):."..................LOADING .":
.N$"..LOAD"Q$N$Q$",8.Y...."....63994S=PE
E(S)+PEE(S+1)*256.$...."63995IFPEE(S+4)=
143TH?"Q$".."Q$"PEE(S+2)+PEE(S+3)*256:T=
S+4:GOS63997.U...."63996ON-(S<>.)GO63994
:?"Q$".."Q$";:GO63999.V...."63997T=T+1:I
FPEE(T)=.THRET......"63998ON-(PEE(T)=32)
GO63997:POKT+(T>S+5),18:RET......"63999P
OKP,19:FOI=1TO6:POKP+I,13:?63993+I:NE:PO
KP+I,154:POKN,8.+...."?"Q$".......HIGHLI
GHTING"Q$":N=208:P=842:S=45:GO63994.K. .
.P,19:.I.1.8:.P.I,13:.:.N,9...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL