00000000: 01 04 34 04 00 00 9C 3A 97 35 39 34 36 38 2C 31 |..4....:.59468,1|
00000010: 32 3A 8B C2 28 31 29 B2 32 35 35 A7 94 22 46 49 |2:..(1).255.."FI|
00000020: 46 54 45 45 4E 22 3A 24 58 2C 31 2C 22 47 4F 4D |FTEEN":$X,1,"GOM|
00000030: 4F 4B 55 22 00 63 04 01 00 8F 20 46 49 46 54 45 |OKU".c.... FIFTE|
00000040: 45 4E 20 43 4F 50 59 52 49 47 48 54 20 28 43 29 |EN COPYRIGHT (C)|
00000050: 20 31 39 37 39 20 44 41 56 49 44 20 50 4C 41 54 | 1979 DAVID PLAT|
00000060: 54 4F 4E 00 69 04 04 00 3A 00 8A 04 05 00 8F 20 |TON.i...:...... |
00000070: 43 55 52 53 4F 52 20 23 31 35 2C 20 4E 4F 56 45 |CURSOR #15, NOVE|
00000080: 4D 42 45 52 2C 20 31 39 37 39 00 AB 04 06 00 8F |MBER, 1979......|
00000090: 20 42 4F 58 20 35 35 30 2C 20 47 4F 4C 45 54 41 | BOX 550, GOLETA|
000000A0: 2C 20 43 41 2E 20 39 33 30 31 37 00 DC 04 07 00 |, CA. 93017.....|
000000B0: 8F 20 4C 49 4E 45 53 20 36 31 30 30 30 2D 36 35 |. LINES 61000-65|
000000C0: 30 30 30 20 28 43 29 20 31 39 37 39 20 43 55 52 |000 (C) 1979 CUR|
000000D0: 53 4F 52 20 4D 41 47 41 5A 49 4E 45 00 E2 04 08 |SOR MAGAZINE....|
000000E0: 00 3A 00 01 05 0A 00 8F 20 41 53 20 4F 46 20 31 |.:...... AS OF 1|
000000F0: 37 2D 44 45 43 2D 37 39 20 31 31 3A 30 30 20 50 |7-DEC-79 11:00 P|
00000100: 4D 00 23 05 5A 00 50 47 24 B2 22 46 49 46 54 45 |M.#.Z.PG$."FIFTE|
00000110: 45 4E 22 3A 4E 4D 24 B2 22 31 35 22 3A 8D 36 32 |EN":NM$."15":.62|
00000120: 30 30 30 00 39 05 64 00 86 41 28 31 36 29 2C 42 |000.9.d..A(16),B|
00000130: 28 31 36 29 3A 54 42 B2 38 00 5F 05 78 00 99 22 |(16):TB.8._.x.."|
00000140: 93 11 11 22 A3 54 42 29 22 B0 C0 C0 C0 C0 B2 C0 |...".TB)".......|
00000150: C0 C0 C0 B2 C0 C0 C0 C0 B2 C0 C0 C0 C0 AE 22 00 |..............".|
00000160: 92 05 82 00 81 49 B2 31 A4 34 3A 81 4A B2 31 A4 |.....I.1.4:.J.1.|
00000170: 33 3A 99 A3 54 42 29 3B 22 DD 20 20 20 20 DD 20 |3:..TB);". . |
00000180: 20 20 20 DD 20 20 20 20 DD 20 20 20 20 DD 22 3A | . . .":|
00000190: 82 4A 00 B9 05 8C 00 8B 49 B3 34 A7 99 A3 54 42 |.J......I.4...TB|
000001A0: 29 3B 22 AB C0 C0 C0 C0 DB C0 C0 C0 C0 DB C0 C0 |);".............|
000001B0: C0 C0 DB C0 C0 C0 C0 B3 22 00 DE 05 96 00 82 49 |........"......I|
000001C0: 3A 99 A3 54 42 29 3B 22 AD C0 C0 C0 C0 B1 C0 C0 |:..TB);"........|
000001D0: C0 C0 B1 C0 C0 C0 C0 B1 C0 C0 C0 C0 BD 22 00 F4 |............."..|
000001E0: 05 A0 00 81 49 B2 31 A4 31 36 3A 41 28 49 29 B2 |....I.1.16:A(I).|
000001F0: 49 3A 82 49 00 29 06 AA 00 81 49 B2 31 35 A4 32 |I:.I.)....I.15.2|
00000200: A9 AB 31 3A 4A B2 BB 28 31 29 AC 49 AA 31 3A 54 |..1:J..(1).I.1:T|
00000210: B2 41 28 4A 29 3A 41 28 4A 29 B2 41 28 49 29 3A |.A(J):A(J).A(I):|
00000220: 41 28 49 29 B2 54 3A 82 49 00 4D 06 B4 00 81 49 |A(I).T:.I.M....I|
00000230: B2 31 A4 31 36 3A 42 28 49 29 B2 41 28 49 29 3A |.1.16:B(I).A(I):|
00000240: 8B 42 28 49 29 B2 31 36 A7 42 53 B2 49 00 54 06 |.B(I).16.BS.I.T.|
00000250: BE 00 82 49 00 64 06 C8 00 43 B2 30 3A 81 49 B2 |...I.d...C.0:.I.|
00000260: 31 A4 31 36 00 94 06 D2 00 8B 41 28 49 29 B3 B1 |1.16......A(I)..|
00000270: 49 A7 54 B2 41 28 49 29 3A 41 28 49 29 B2 41 28 |I.T.A(I):A(I).A(|
00000280: 54 29 3A 41 28 54 29 B2 54 3A 43 B2 43 AA 31 3A |T):A(T).T:C.C.1:|
00000290: 89 32 31 30 00 9B 06 DC 00 82 49 00 AC 06 E6 00 |.210......I.....|
000002A0: 8B 28 43 AF 31 29 B2 30 A7 32 37 30 00 CC 06 F0 |.(C.1).0.270....|
000002B0: 00 49 B2 B5 28 BB 28 31 29 AC 31 36 29 AA 31 3A |.I..(.(1).16).1:|
000002C0: 8B 42 28 49 29 B2 31 36 A7 32 34 30 00 F0 06 FA |.B(I).16.240....|
000002D0: 00 4A B2 B5 28 BB 28 31 29 AC 31 36 29 AA 31 3A |.J..(.(1).16).1:|
000002E0: 8B 42 28 4A 29 B2 31 36 B0 49 B2 4A A7 32 34 30 |.B(J).16.I.J.240|
000002F0: 00 0C 07 04 01 54 B2 42 28 49 29 3A 42 28 49 29 |.....T.B(I):B(I)|
00000300: B2 42 28 4A 29 3A 42 28 4A 29 B2 54 00 1D 07 0E |.B(J):B(J).T....|
00000310: 01 99 22 13 22 3A 99 22 11 11 11 22 3B 00 3F 07 |..".":."...";.?.|
00000320: 18 01 81 49 B2 31 A4 31 36 A9 34 3A 81 4A B2 30 |...I.1.16.4:.J.0|
00000330: A4 33 3A 99 A3 54 42 AA 4A AC 35 AA 32 29 3B 00 |.3:..TB.J.5.2);.|
00000340: 5F 07 22 01 8B 42 28 49 AA 4A 29 B3 31 36 A7 99 |_."..B(I.J).16..|
00000350: C9 28 C4 28 42 28 49 AA 4A 29 29 2C 32 29 3B 00 |.(.(B(I.J)),2);.|
00000360: 8D 07 2C 01 82 4A 3A 4E B2 30 3A 99 22 11 11 11 |..,..J:N.0:."...|
00000370: 22 3A 82 49 3A 97 51 4C 2C 32 32 3A 99 22 91 22 |":.I:.QL,22:."."|
00000380: A3 31 33 29 4E 3B 22 4D 4F 56 45 53 22 00 A0 07 |.13)N;"MOVES"...|
00000390: 36 01 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 33 31 30 |6..Z$:.Z$."".310|
000003A0: 00 B7 07 40 01 8B 5A 24 B3 22 32 22 B0 5A 24 B1 |...@..Z$."2".Z$.|
000003B0: 22 38 22 A7 33 31 30 00 C8 07 4A 01 8B C5 28 5A |"8".310...J...(Z|
000003C0: 24 29 AF 31 A7 33 31 30 00 E5 07 54 01 91 C5 28 |$).1.310...T...(|
000003D0: 5A 24 29 AD 32 89 34 31 30 2C 33 39 30 2C 33 37 |Z$).2.410,390,37|
000003E0: 30 2C 33 35 30 00 FA 07 5E 01 54 B2 42 53 AA 34 |0,350...^.T.BS.4|
000003F0: 3A 8B 54 B1 31 36 A7 33 31 30 00 03 08 68 01 89 |:.T.16.310...h..|
00000400: 34 32 30 00 1B 08 72 01 54 B2 42 53 AB 31 3A 8B |420...r.T.BS.1:.|
00000410: 28 33 AF 54 29 B2 30 A7 33 31 30 00 24 08 7C 01 |(3.T).0.310.$.|.|
00000420: 89 34 32 30 00 3D 08 86 01 54 B2 42 53 AA 31 3A |.420.=...T.BS.1:|
00000430: 8B 28 33 AF 42 53 29 B2 30 A7 33 31 30 00 46 08 |.(3.BS).0.310.F.|
00000440: 90 01 89 34 32 30 00 5A 08 9A 01 54 B2 42 53 AB |...420.Z...T.BS.|
00000450: 34 3A 8B 54 B3 31 A7 33 31 30 00 71 08 A4 01 42 |4:.T.1.310.q...B|
00000460: 28 42 53 29 B2 42 28 54 29 3A 42 28 54 29 B2 31 |(BS).B(T):B(T).1|
00000470: 36 00 8C 08 AE 01 49 B2 B5 28 28 42 53 AB 31 29 |6.....I..((BS.1)|
00000480: AD 34 29 3A 4A B2 42 53 AB 49 AC 34 00 B6 08 B8 |.4):J.BS.I.4....|
00000490: 01 97 51 4C 2C 49 AC 34 AA 35 3A 99 22 91 22 A3 |..QL,I.4.5:.".".|
000004A0: 54 42 AA 4A AC 35 AB 33 29 C9 28 C4 28 42 28 42 |TB.J.5.3).(.(B(B|
000004B0: 53 29 29 2C 32 29 00 CF 08 C2 01 49 B2 B5 28 28 |S)),2).....I..((|
000004C0: 54 AB 31 29 AD 34 29 3A 4A B2 54 AB 49 AC 34 00 |T.1).4):J.T.I.4.|
000004D0: F0 08 CC 01 97 51 4C 2C 49 AC 34 AA 35 3A 99 22 |.....QL,I.4.5:."|
000004E0: 91 22 A3 54 42 AA 4A AC 35 AB 33 29 22 20 20 22 |.".TB.J.5.3)" "|
000004F0: 00 27 09 D6 01 42 53 B2 54 3A 4E B2 4E AA 31 3A |.'...BS.T:N.N.1:|
00000500: 97 51 4C 2C 32 32 3A 99 22 91 22 A3 31 33 29 C4 |.QL,22:.".".13).|
00000510: 28 4E 29 3B 22 20 4D 4F 56 45 22 3B 3A 8B 4E B1 |(N);" MOVE";:.N.|
00000520: 31 A7 99 22 53 22 3B 00 3B 09 DB 01 99 22 20 22 |1.."S";.;...." "|
00000530: 3A 8B 42 53 B3 31 36 A7 33 31 30 00 54 09 E0 01 |:.BS.16.310.T...|
00000540: 81 49 B2 31 A4 31 36 3A 8B 42 28 49 29 B3 B1 49 |.I.1.16:.B(I)..I|
00000550: A7 33 31 30 00 78 09 EA 01 82 49 3A 97 51 4C 2C |.310.x....I:.QL,|
00000560: 32 31 3A 99 22 91 22 A3 31 34 29 22 53 4F 4C 56 |21:.".".14)"SOLV|
00000570: 45 44 20 49 4E 11 11 22 00 B6 09 58 02 99 22 44 |ED IN.."...X.."D|
00000580: 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 50 4C |O YOU WANT TO PL|
00000590: 41 59 20 41 47 41 49 4E 3F 20 22 3B 3A 8D 36 30 |AY AGAIN? ";:.60|
000005A0: 30 30 30 3A 8B C8 28 49 4E 24 2C 31 29 B3 B1 22 |000:..(IN$,1).."|
000005B0: 4E 22 A7 31 32 30 00 BC 09 BC 02 80 00 DD 09 60 |N".120.........`|
000005C0: EA 49 4E 24 B2 22 20 22 3A 5A 54 B2 54 49 3A 5A |.IN$." ":ZT.TI:Z|
000005D0: 43 B2 32 3A 5A 44 24 B2 C7 28 32 30 29 00 F3 09 |C.2:ZD$..(20)...|
000005E0: 6A EA A1 5A 24 3A 8B 5A 24 B3 B1 22 22 A7 36 30 |j..Z$:.Z$.."".60|
000005F0: 30 37 30 00 23 0A 74 EA 8B 5A 54 B3 B2 54 49 A7 |070.#.t..ZT..TI.|
00000600: 99 CA 28 22 20 A6 22 2C 5A 43 2C 31 29 3B 22 9D |..(" .",ZC,1);".|
00000610: 22 3B 3A 5A 43 B2 33 AB 5A 43 3A 5A 54 B2 54 49 |";:ZC.3.ZC:ZT.TI|
00000620: AA 31 35 00 2E 0A 7E EA 89 36 30 30 31 30 00 5E |.15...~..60010.^|
00000630: 0A A6 EA 5A B2 C6 28 5A 24 29 3A 5A 4C B2 C3 28 |...Z..(Z$):ZL..(|
00000640: 49 4E 24 29 3A 8B 28 5A AF 31 32 37 29 B3 33 32 |IN$):.(Z.127).32|
00000650: A7 99 22 20 9D 22 3B 3A 89 36 30 31 31 30 00 8E |.." .";:.60110..|
00000660: 0A B0 EA 8B 46 4C AF 28 5A AF 31 32 37 29 B1 36 |....FL.(Z.127).6|
00000670: 34 AF 28 5A AF 31 32 37 29 B3 39 31 A7 5A 24 B2 |4.(Z.127).91.Z$.|
00000680: C7 28 28 5A AA 31 32 38 29 AF 32 35 35 29 00 A0 |.((Z.128).255)..|
00000690: 0A BA EA 8B 5A 4C B1 32 35 34 A7 36 30 30 31 30 |....ZL.254.60010|
000006A0: 00 BB 0A C4 EA 49 4E 24 B2 49 4E 24 AA 5A 24 3A |.....IN$.IN$.Z$:|
000006B0: 99 5A 24 3B 5A 44 24 3B 5A 24 3B 00 DA 0A CE EA |.Z$;ZD$;Z$;.....|
000006C0: 8B 5A B2 31 33 A7 49 4E 24 B2 CA 28 49 4E 24 2C |.Z.13.IN$..(IN$,|
000006D0: 32 29 3A 99 43 52 24 3B 3A 8E 00 06 0B D8 EA 8B |2):.CR$;:.......|
000006E0: 5A B2 32 30 AF 5A 4C B1 31 A7 49 4E 24 B2 C8 28 |Z.20.ZL.1.IN$..(|
000006F0: 49 4E 24 2C 5A 4C AB 31 29 3A 99 22 9D 22 3B 3A |IN$,ZL.1):.".";:|
00000700: 89 36 30 30 31 30 00 39 0B E2 EA 8B 5A B2 31 34 |.60010.9....Z.14|
00000710: 31 A7 5A 24 B2 C7 28 AB 32 30 AC 28 5A 4C B1 31 |1.Z$..(.20.(ZL.1|
00000720: 29 29 3A 81 5A B2 32 A4 5A 4C 3A 99 5A 24 3B 3A |)):.Z.2.ZL:.Z$;:|
00000730: 82 5A 3A 89 36 30 30 30 30 00 44 0B EC EA 89 36 |.Z:.60000.D....6|
00000740: 30 30 31 30 00 5B 0B 8C EB 99 22 93 22 3A 9C 3A |0010.[....".":.:|
00000750: 8D 36 30 34 30 30 3A 89 31 30 30 00 70 0B F0 EB |.60400:.100.p...|
00000760: 51 4C B2 32 34 35 3A 43 52 24 B2 C7 28 31 33 29 |QL.245:CR$..(13)|
00000770: 00 82 0B FA EB 8B C2 28 35 30 30 30 30 29 B2 30 |.......(50000).0|
00000780: A7 8E 00 8D 0B 04 EC 51 4C B2 32 31 36 00 93 0B |.......QL.216...|
00000790: 0E EC 8E 00 AD 0B 54 EC 81 49 B2 31 A4 31 30 3A |......T..I.1.10:|
000007A0: 99 22 C0 C0 C0 C0 22 3B 3A 82 49 3A 8E 00 D4 0B |."....";:.I:....|
000007B0: 30 F2 99 22 93 11 11 22 3B A3 39 29 3B 22 43 55 |0.."...";.9);"CU|
000007C0: 52 53 4F 52 20 23 22 3B 4E 4D 24 3B 22 20 20 22 |RSOR #";NM$;" "|
000007D0: 3B 50 47 24 00 02 0C 3A F2 99 22 11 20 43 4F 50 |;PG$...:..". COP|
000007E0: 59 52 49 47 48 54 20 28 43 29 20 31 39 37 39 20 |YRIGHT (C) 1979 |
000007F0: 20 42 59 20 44 41 56 49 44 20 50 4C 41 54 54 4F | BY DAVID PLATTO|
00000800: 4E 11 00 0D 0C 44 F2 8D 36 30 35 30 30 00 27 0C |N....D..60500.'.|
00000810: 4E F2 99 22 11 54 48 45 20 46 49 46 54 45 45 4E |N..".THE FIFTEEN|
00000820: 20 50 55 5A 5A 4C 45 00 49 0C 58 F2 99 22 11 11 | PUZZLE.I.X.."..|
00000830: 11 50 52 45 53 53 20 12 52 45 54 55 52 4E 92 20 |.PRESS .RETURN. |
00000840: 54 4F 20 42 45 47 49 4E 22 00 5E 0C 62 F2 A1 54 |TO BEGIN".^.b..T|
00000850: 24 3A 8B 54 24 B2 22 22 A7 36 32 30 35 30 00 69 |$:.T$."".62050.i|
00000860: 0C 6C F2 89 36 30 33 30 30 00 00 00 |.l..60300... |
..4....:.59468,12:.B(1).255.."FIFTEEN":$
X,1,"GOMOKU".C.... FIFTEEN COPYRIGHT (C)
1979 DAVID PLATTON.I...:...... CURSOR #
15, NOVEMBER, 1979...... BOX 550, GOLETA
, CA. 93017...... LINES 61000-65000 (C)
1979 CURSOR MAGAZINE.....:...... AS OF 1
7-DEC-79 11:00 PM.#.Z.PG$."FIFTEEN":NM$.
"15":.62000.9.D..A(16),B(16):TB.8._.X.."
...".TB)"....................."......I.1
.4:.J.1.3:..TB);". . . . .":
.J......I.4...TB);".....................
"......I:..TB);"....................."..
. ..I.1.16:A(I).I:.I.)....I.15.2..1:J..(
1).I.1:T.A(J):A(J).A(I):A(I).T:.I.M....I
.1.16:B(I).A(I):.B(I).16.BS.I.T....I.D.H
.C.0:.I.1.16...R..A(I)..I.T.A(I):A(I).A(
T):A(T).T:C.C.1:.210......I......(C.1).0
.270.L...I..(.(1).16).1:.B(I).16.240....
.J..(.(1).16).1:.B(J).16.I.J.240.....T.B
(I):B(I).B(J):B(J).T......".":."...";.?.
...I.1.16.4:.J.0.3:..TB.J.5.2);._."..B(I
.J).16..I(D(B(I.J)),2);...,..J:N.0:."...
":.I:.QL,22:.".".13)N;"MOVES". .6..Z$:.Z
$."".310...@..Z$."2".Z$."8".310.H.J..E(Z
$).1.310...T..E(Z$).2.410,390,370,350...
^.T.BS.4:.T.16.310...H..420...R.T.BS.1:.
(3.T).0.310.$.|..420.=...T.BS.1:.(3.BS).
0.310.F....420.Z...T.BS.4:.T.1.310.Q...B
(BS).B(T):B(T).16.....I..((BS.1).4):J.BS
.I.4......QL,I.4.5:.".".TB.J.5.3)I(D(B(B
S)),2).O.B.I..((T.1).4):J.T.I.4...L..QL,
I.4.5:.".".TB.J.5.3)" ".'.V.BS.T:N.N.1:
.QL,22:.".".13)D(N);" MOVE";:.N.1.."S";.
;...." ":.BS.16.310.T....I.1.16:.B(I)..I
.310.X....I:.QL,21:.".".14)"SOLVED IN.."
...X.."DO YOU WANT TO PLAY AGAIN? ";:.60
000:.H(IN$,1).."N".120.........`.IN$." "
:ZT.TI:ZC.2:ZD$.G(20)...J..Z$:.Z$.."".60
070.#.T..ZT..TI..J(" .",ZC,1);".";:ZC.3.
ZC:ZT.TI.15...~..60010.^...Z.F(Z$):ZL.C(
IN$):.(Z.127).32.." .";:.60110......FL.(
Z.127).64.(Z.127).91.Z$.G((Z.128).255).
....ZL.254.60010...D.IN$.IN$.Z$:.Z$;ZD$;
Z$;.Z.N..Z.13.IN$.J(IN$,2):.CR$;:....X..
Z.20.ZL.1.IN$.H(IN$,ZL.1):.".";:.60010.9
....Z.141.Z$.G(.20.(ZL.1)):.Z.2.ZL:.Z$;:
.Z:.60000.D....60010.[....".":.:.60400:.
100.P...QL.245:CR$.G(13)......B(50000).0
.......QL.216.........T..I.1.10:."....";
:.I:..T.0.."...";.9);"CURSOR #";NM$;" "
;PG$...:..". COPYRIGHT (C) 1979 BY DAVI
D PLATTON....D..60500.'.N..".THE FIFTEEN
PUZZLE.I.X.."...PRESS .RETURN. TO BEGIN
".^.B..T$:.T$."".62050.I.L..60300...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL