00000000: 01 28 2B 28 00 00 9E 28 31 30 30 31 29 3A 8F 22 |.(+(...(1001):."|
00000010: 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 |................|
00000020: 30 20 53 59 53 28 34 31 36 32 29 00 00 00 01 00 |0 SYS(4162).....|
00000030: 97 34 36 2C C2 28 31 37 35 29 3A 97 34 35 2C C2 |.46,.(175):.45,.|
00000040: 28 31 37 34 29 3A 9C 00 CB 28 02 00 86 50 52 28 |(174):...(...PR(|
00000050: 32 34 29 3A 81 49 B2 31 A4 32 34 3A 87 50 52 28 |24):.I.1.24:.PR(|
00000060: 49 29 3A 82 49 3A 41 41 B2 C2 28 32 30 33 30 29 |I):.I:AA..(2030)|
00000070: 3A 47 44 B2 C2 28 35 31 33 31 29 AA C2 28 35 31 |:GD..(5131)..(51|
00000080: 33 32 29 AC 32 35 36 3A 49 54 B2 BB 28 54 49 29 |32).256:IT..(TI)|
00000090: 3A 99 22 13 22 3A 45 49 24 B2 22 20 20 20 20 20 |:.".":EI$." |
000000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 81 | ":.|
000000B0: 49 B2 31 A4 31 38 3A 99 A3 31 29 3B 45 49 24 3A |I.1.18:..1);EI$:|
000000C0: 82 49 3A 99 22 13 22 3A 89 31 31 00 EB 28 03 00 |.I:.".":.11..(..|
000000D0: 58 B2 31 3A 42 B2 31 32 36 37 3A 43 B2 35 35 35 |X.1:B.1267:C.555|
000000E0: 33 39 3A 44 B2 31 32 3A 45 B2 37 00 2A 29 04 00 |39:D.12:E.7.*)..|
000000F0: 4A B2 C2 28 35 36 33 32 30 29 3A 8B 28 4A AF 31 |J..(56320):.(J.1|
00000100: 29 B2 30 AF 58 B1 31 A7 58 B2 58 AB 31 3A 97 42 |).0.X.1.X.X.1:.B|
00000110: 2C 33 32 3A 42 B2 42 AB 34 30 3A 8D 39 3A 43 B2 |,32:B.B.40:.9:C.|
00000120: 43 AB 34 30 3A 8D 38 3A 89 34 00 5E 29 05 00 8B |C.40:.8:.4.^)...|
00000130: 28 4A AF 32 29 B2 30 AF 58 B3 33 A7 58 B2 58 AA |(J.2).0.X.3.X.X.|
00000140: 31 3A 97 42 2C 33 32 3A 42 B2 42 AA 34 30 3A 8D |1:.B,32:B.B.40:.|
00000150: 39 3A 43 B2 43 AA 34 30 3A 8D 38 3A 89 34 00 6F |9:C.C.40:.8:.4.o|
00000160: 29 06 00 8B 28 4A AF 31 36 29 B2 30 A7 31 32 00 |)...(J.16).0.12.|
00000170: 76 29 07 00 89 34 00 94 29 08 00 81 49 B2 43 A4 |v)...4..)...I.C.|
00000180: 43 AA 31 35 3A 97 49 2C 45 3A 82 49 3A 97 42 2C |C.15:.I,E:.I:.B,|
00000190: 36 32 3A 8E 00 AA 29 09 00 81 49 B2 43 A4 43 AA |62:...)...I.C.C.|
000001A0: 31 35 3A 97 49 2C 44 3A 82 49 00 B4 29 0A 00 8E |15:.I,D:.I..)...|
000001B0: 3A 89 31 30 00 41 2A 0B 00 99 A3 32 29 22 11 12 |:.10.A*....2)"..|
000001C0: 98 BE BF BF BF BF BF BF BF BF BF BF BF BF BF BF |................|
000001D0: BD 22 3A 99 A3 32 29 22 12 BC 92 81 20 20 20 D3 |.":..2)".... .|
000001E0: C8 C9 D0 20 D9 C1 D2 C4 20 20 98 12 B8 92 22 3A |... .... ....":|
000001F0: 99 A3 32 29 22 12 BB BA BA BA BA BA BA BA BA BA |..2)"...........|
00000200: BA BA BA BA BA B9 92 22 3A 99 A3 32 29 22 11 1D |.......":..2)"..|
00000210: 9E 3E C5 58 49 54 20 D9 41 52 44 98 22 3A 99 A3 |.>.XIT .ARD.":..|
00000220: 34 29 22 C2 55 59 20 D3 48 49 50 22 3A 99 A3 34 |4)".UY .HIP":..4|
00000230: 29 22 D2 45 50 41 49 52 20 D3 48 49 50 22 3A 89 |)".EPAIR .HIP":.|
00000240: 33 00 66 2A 0C 00 8B 58 B2 31 A7 45 49 24 B2 22 |3.f*...X.1.EI$."|
00000250: 20 22 3A 8D 33 33 3A 8D 33 34 3A 93 22 54 4F 53 | ":.33:.34:."TOS|
00000260: 2E 47 41 22 2C 38 00 72 2A 0D 00 8B 58 B2 32 A7 |.GA",8.r*...X.2.|
00000270: 31 35 00 7E 2A 0E 00 8B 58 B2 33 A7 32 37 00 73 |15.~*...X.3.27.s|
00000280: 2B 0F 00 45 49 24 B2 22 98 22 3A 8D 33 33 3A 45 |+..EI$.".":.33:E|
00000290: 49 24 B2 22 C2 55 59 20 41 20 53 48 49 50 22 3A |I$.".UY A SHIP":|
000002A0: 8D 33 33 3A 45 49 24 B2 22 22 3A 8D 33 33 3A 45 |.33:EI$."":.33:E|
000002B0: 49 24 B2 22 5F C9 20 43 41 4E 20 4F 46 46 45 52 |I$."_. CAN OFFER|
000002C0: 20 59 4F 55 22 3A 8D 33 33 3A 45 49 24 B2 22 4F | YOU":.33:EI$."O|
000002D0: 4E 45 20 4F 46 20 4D 59 20 53 48 49 50 53 22 3A |NE OF MY SHIPS":|
000002E0: 8D 33 33 3A 50 58 B2 28 50 52 28 41 41 29 29 3A |.33:PX.(PR(AA)):|
000002F0: 50 59 B2 28 50 52 28 41 41 29 AD 34 29 AC 49 54 |PY.(PR(AA).4).IT|
00000300: 3A 50 58 B2 B5 28 50 58 AA 50 59 29 3A 45 49 24 |:PX..(PX.PY):EI$|
00000310: B2 22 46 4F 52 20 22 AA CA 28 C4 28 50 58 29 2C |."FOR "..(.(PX),|
00000320: 32 2C 33 29 AA 22 20 47 50 2E 5F 22 3A 8D 33 33 |2,3)." GP._":.33|
00000330: 3A 45 49 24 B2 22 22 3A 8D 33 33 3A 45 49 24 B2 |:EI$."":.33:EI$.|
00000340: 22 5F C4 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F |"_.O YOU WANT TO|
00000350: 22 3A 8D 33 33 3A 45 49 24 B2 22 42 55 59 20 49 |":.33:EI$."BUY I|
00000360: 54 3F 5F 20 20 9B D9 45 53 22 3A 8D 33 33 3A 5A |T?_ ..ES":.33:Z|
00000370: 5A B2 31 00 B7 2B 10 00 4A B2 C2 28 35 36 33 32 |Z.1..+..J..(5632|
00000380: 30 29 3A 8B 28 4A AF 31 29 B2 30 A7 99 22 13 22 |0):.(J.1).0.."."|
00000390: A3 33 32 29 22 11 11 11 11 11 11 11 11 11 11 11 |.32)"...........|
000003A0: 11 11 11 11 11 11 11 11 11 11 D9 45 53 22 3A 5A |...........ES":Z|
000003B0: 5A B2 31 3A 89 31 36 00 F0 2B 11 00 8B 28 4A AF |Z.1:.16..+...(J.|
000003C0: 32 29 B2 30 A7 99 22 13 22 A3 33 32 29 22 11 11 |2).0..".".32)"..|
000003D0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000003E0: 11 11 11 CE 4F 20 22 3A 5A 5A B2 32 3A 89 31 36 |....O ":ZZ.2:.16|
000003F0: 00 01 2C 12 00 8B 28 4A AF 31 36 29 B2 30 A7 32 |..,...(J.16).0.2|
00000400: 30 00 09 2C 13 00 89 31 36 00 16 2C 14 00 8B 5A |0..,...16..,...Z|
00000410: 5A B2 31 A7 32 32 00 36 2C 15 00 45 49 24 B2 22 |Z.1.22.6,..EI$."|
00000420: 20 22 3A 8D 33 33 3A 81 49 B2 31 A4 31 30 30 30 | ":.33:.I.1.1000|
00000430: 3A 82 49 3A 89 34 00 44 2C 16 00 8B 47 44 B1 50 |:.I:.4.D,...GD.P|
00000440: 58 A7 32 34 00 90 2C 17 00 45 49 24 B2 22 20 22 |X.24..,..EI$." "|
00000450: 3A 8D 33 33 3A 45 49 24 B2 22 81 5F D9 4F 55 20 |:.33:EI$."._.OU |
00000460: 44 4F 20 4E 4F 54 20 48 41 56 45 22 3A 8D 33 33 |DO NOT HAVE":.33|
00000470: 3A 45 49 24 B2 22 54 48 41 54 20 4D 55 43 48 20 |:EI$."THAT MUCH |
00000480: 47 4F 4C 44 21 5F 98 22 3A 8D 33 33 3A 89 32 36 |GOLD!_.":.33:.26|
00000490: 00 C5 2C 18 00 8B 4B 4F B2 31 A7 4B 4F B2 30 3A |..,...KO.1.KO.0:|
000004A0: 45 49 24 B2 22 22 3A 8D 33 33 3A 45 49 24 B2 22 |EI$."":.33:EI$."|
000004B0: D2 45 50 41 49 52 49 4E 47 2E 2E 2E 22 3A 8D 33 |.EPAIRING...":.3|
000004C0: 33 3A 89 33 32 00 E9 2C 19 00 45 49 24 B2 22 81 |3:.32..,..EI$.".|
000004D0: 5F D3 CF CC C4 21 5F 22 3A 8D 33 33 3A 47 44 B2 |_....!_":.33:GD.|
000004E0: 47 44 AB 50 58 3A 8D 33 35 00 FD 2C 1A 00 81 49 |GD.PX:.35..,...I|
000004F0: B2 31 A4 31 30 30 30 3A 82 49 3A 89 34 00 C1 2D |.1.1000:.I:.4..-|
00000500: 1B 00 45 49 24 B2 22 98 22 3A 8D 33 33 3A 45 49 |..EI$.".":.33:EI|
00000510: 24 B2 22 D2 45 50 41 49 52 20 53 48 49 50 22 3A |$.".EPAIR SHIP":|
00000520: 8D 33 33 3A 45 49 24 B2 22 22 3A 8D 33 33 3A 45 |.33:EI$."":.33:E|
00000530: 49 24 B2 22 5F D7 45 20 52 45 50 41 49 52 20 59 |I$."_.E REPAIR Y|
00000540: 4F 55 52 22 3A 8D 33 33 3A 45 49 24 B2 22 53 48 |OUR":.33:EI$."SH|
00000550: 49 50 20 46 4F 52 22 3A 50 58 B2 B5 28 28 50 52 |IP FOR":PX..((PR|
00000560: 28 41 41 29 AD 31 31 29 29 3A 45 49 24 B2 45 49 |(AA).11)):EI$.EI|
00000570: 24 AA C4 28 50 58 29 AA 22 20 47 50 5F 22 3A 8D |$..(PX)." GP_":.|
00000580: 33 33 3A 45 49 24 B2 22 22 3A 8D 33 33 3A 45 49 |33:EI$."":.33:EI|
00000590: 24 B2 22 5F C4 4F 20 57 45 20 48 41 56 45 22 3A |$."_.O WE HAVE":|
000005A0: 8D 33 33 3A 45 49 24 B2 22 41 20 44 45 41 4C 3F |.33:EI$."A DEAL?|
000005B0: 5F 20 20 9B D9 45 53 22 3A 8D 33 33 3A 5A 5A B2 |_ ..ES":.33:ZZ.|
000005C0: 31 00 05 2E 1C 00 4A B2 C2 28 35 36 33 32 30 29 |1.....J..(56320)|
000005D0: 3A 8B 28 4A AF 31 29 B2 30 A7 99 22 13 22 A3 33 |:.(J.1).0..".".3|
000005E0: 32 29 22 11 11 11 11 11 11 11 11 11 11 11 11 11 |2)".............|
000005F0: 11 11 11 11 11 11 11 11 D9 45 53 22 3A 5A 5A B2 |.........ES":ZZ.|
00000600: 31 3A 89 32 38 00 3E 2E 1D 00 8B 28 4A AF 32 29 |1:.28.>....(J.2)|
00000610: B2 30 A7 99 22 13 22 A3 33 32 29 22 11 11 11 11 |.0..".".32)"....|
00000620: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000630: 11 CE 4F 20 22 3A 5A 5A B2 32 3A 89 32 38 00 5B |..O ":ZZ.2:.28.[|
00000640: 2E 1E 00 8B 28 4A AF 31 36 29 B2 30 A7 50 58 B2 |....(J.16).0.PX.|
00000650: 34 38 3A 4B 4F B2 31 3A 89 32 30 00 63 2E 1F 00 |48:KO.1:.20.c...|
00000660: 89 32 38 00 9E 2E 20 00 81 49 B2 31 A4 31 30 30 |.28... ..I.1.100|
00000670: 30 3A 82 49 3A 97 35 32 39 36 2C 39 39 3A 45 49 |0:.I:.5296,99:EI|
00000680: 24 B2 22 C4 4F 4E 45 21 22 3A 8D 33 33 3A 47 44 |$.".ONE!":.33:GD|
00000690: B2 47 44 AB 50 58 3A 8D 33 37 3A 89 32 36 00 69 |.GD.PX:.37:.26.i|
000006A0: 2F 21 00 97 32 30 32 37 2C 39 39 3A 97 32 31 31 |/!..2027,99:.211|
000006B0: 2C 32 32 3A 97 32 31 34 2C 32 32 3A 9E 35 38 37 |,22:.214,22:.587|
000006C0: 33 32 3A 99 45 49 24 3A 9E 32 35 30 30 30 3A 8E |32:.EI$:.25000:.|
000006D0: 3A 99 22 13 22 3A 45 49 24 B2 22 20 20 20 20 20 |:.".":EI$." |
000006E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 81 | ":.|
000006F0: 49 B2 31 A4 31 38 3A 99 A3 31 29 3B 45 49 24 3A |I.1.18:..1);EI$:|
00000700: 82 49 3A 99 22 13 22 3A 83 36 34 30 2C 36 34 30 |.I:.".":.640,640|
00000710: 2C 36 35 30 2C 36 35 30 2C 36 32 30 2C 36 32 30 |,650,650,620,620|
00000720: 2C 36 30 30 2C 36 30 30 2C 37 38 30 2C 37 38 30 |,600,600,780,780|
00000730: 2C 37 36 30 2C 37 36 30 2C 37 33 30 2C 37 33 30 |,760,760,730,730|
00000740: 2C 37 34 30 2C 37 34 30 3A 83 38 36 30 2C 38 36 |,740,740:.860,86|
00000750: 30 2C 38 38 30 2C 38 38 30 2C 38 32 30 2C 38 32 |0,880,880,820,82|
00000760: 30 2C 38 30 30 2C 38 30 30 00 B0 2F 22 00 97 35 |0,800,800../"..5|
00000770: 31 33 32 2C B5 28 47 44 AD 32 35 36 29 3A 97 35 |132,.(GD.256):.5|
00000780: 31 33 31 2C 47 44 AB 28 B5 28 47 44 AD 32 35 36 |131,GD.(.(GD.256|
00000790: 29 AC 32 35 36 29 3A 45 49 24 B2 22 98 C5 58 49 |).256):EI$."..XI|
000007A0: 54 20 59 41 52 44 2E 2E 2E 22 3A 8D 33 33 3A 8E |T YARD...":.33:.|
000007B0: 00 C3 2F 23 00 8B C2 28 35 32 37 30 29 B1 39 39 |../#...(5270).99|
000007C0: A7 33 37 00 D7 2F 24 00 97 35 32 37 30 2C C2 28 |.37../$..5270,.(|
000007D0: 35 32 37 30 29 AA 31 00 10 30 25 00 48 48 24 B2 |5270).1..0%.HH$.|
000007E0: 22 30 30 30 30 30 22 AA CA 28 C4 28 47 44 29 2C |"00000"..(.(GD),|
000007F0: 32 2C 35 29 3A 99 22 13 98 22 A3 32 35 29 22 11 |2,5):."..".25)".|
00000800: 11 11 11 11 11 22 C9 28 48 48 24 2C 35 29 3A 8E |.....".(HH$,5):.|
00000810: 00 00 00 |... |
.(+(...(1001):."................0 SYS(41
62)......46,B(175):.45,B(174):..K(...PR(
24):.I.1.24:.PR(I):.I:AA.B(2030):GD.B(51
31).B(5132).256:IT..(TI):.".":EI$."
":.I.1.18:..1);EI$:.I:.".":
.11..(..X.1:B.1267:C.55539:D.12:E.7.*)..
J.B(56320):.(J.1).0.X.1.X.X.1:.B,32:B.B.
40:.9:C.C.40:.8:.4.^)...(J.2).0.X.3.X.X.
1:.B,32:B.B.40:.9:C.C.40:.8:.4.O)...(J.1
6).0.12.V)...4..)...I.C.C.15:.I,E:.I:.B,
62:...)...I.C.C.15:.I,D:.I..)...:.10.A*.
...2)"...................":..2)".... S
HIP YARD ....":..2)".................."
:..2)"...>EXIT YARD.":..4)"BUY SHIP":..4
)"REPAIR SHIP":.3.F*...X.1.EI$." ":.33:.
34:."TOS.GA",8.R*...X.2.15.~*...X.3.27.S
+..EI$.".":.33:EI$."BUY A SHIP":.33:EI$.
"":.33:EI$."_I CAN OFFER YOU":.33:EI$."O
NE OF MY SHIPS":.33:PX.(PR(AA)):PY.(PR(A
A).4).IT:PX..(PX.PY):EI$."FOR ".J(D(PX),
2,3)." GP._":.33:EI$."":.33:EI$."_DO YOU
WANT TO":.33:EI$."BUY IT?_ .YES":.33:Z
Z.1..+..J.B(56320):.(J.1).0..".".32)"...
..................YES":ZZ.1:.16..+...(J.
2).0..".".32)".....................NO ":
ZZ.2:.16..,...(J.16).0.20..,...16..,...Z
Z.1.22.6,..EI$." ":.33:.I.1.1000:.I:.4.D
,...GD.PX.24..,..EI$." ":.33:EI$."._YOU
DO NOT HAVE":.33:EI$."THAT MUCH GOLD!_."
:.33:.26.E,...KO.1.KO.0:EI$."":.33:EI$."
REPAIRING...":.33:.32..,..EI$."._SOLD!_"
:.33:GD.GD.PX:.35..,...I.1.1000:.I:.4.A-
..EI$.".":.33:EI$."REPAIR SHIP":.33:EI$.
"":.33:EI$."_WE REPAIR YOUR":.33:EI$."SH
IP FOR":PX..((PR(AA).11)):EI$.EI$.D(PX).
" GP_":.33:EI$."":.33:EI$."_DO WE HAVE":
.33:EI$."A DEAL?_ .YES":.33:ZZ.1.....J.
B(56320):.(J.1).0..".".32)".............
........YES":ZZ.1:.28.>....(J.2).0..".".
32)".....................NO ":ZZ.2:.28.[
....(J.16).0.PX.48:KO.1:.20.C....28... .
.I.1.1000:.I:.5296,99:EI$."DONE!":.33:GD
.GD.PX:.37:.26.I/!..2027,99:.211,22:.214
,22:.58732:.EI$:.25000:.:.".":EI$."
":.I.1.18:..1);EI$:.I:.".":
.640,640,650,650,620,620,600,600,780,780
,760,760,730,730,740,740:.860,860,880,88
0,820,820,800,800../"..5132,.(GD.256):.5
131,GD.(.(GD.256).256):EI$.".EXIT YARD..
.":.33:..C/#..B(5270).99.37.W/$..5270,B(
5270).1..0%.HH$."00000".J(D(GD),2,5):.".
.".25)"......"I(HH$,5):....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL