4 P] R[KKE
FILE INFORMATION
FILENAME(S): 4 P] R[KKE
FILE TYPE(S): PRG
FILE SIZE: 3.9K
FIRST SEEN: 2025-11-30 19:38:26
APPEARS ON: 1 disk(s)
FILE HASH
7065564c2c4c4f3c9834cbfd2b37744d69ed34bbc5bf7b37d6e82da4913c7422
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LA MIX 1 | 4 P] R[KKE | PRG | Curtcool, Brian | 33 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 01 00 8F 20 46 52 55 53 54 52 41 54 |....... FRUSTRAT|
00000010: 49 4F 4E 20 51 55 42 49 43 00 49 08 02 00 8F 20 |ION QUBIC.I.... |
00000020: 43 4F 50 59 52 49 47 48 54 20 31 39 37 38 20 42 |COPYRIGHT 1978 B|
00000030: 59 20 4D 2E 53 50 45 4E 43 45 52 2C 53 41 4E 54 |Y M.SPENCER,SANT|
00000040: 41 20 43 52 55 5A 2C 43 41 00 98 08 03 00 8F 20 |A CRUZ,CA...... |
00000050: 50 45 52 4D 49 53 53 49 4F 4E 20 54 4F 20 43 4F |PERMISSION TO CO|
00000060: 50 59 20 46 4F 52 20 50 45 52 53 4F 4E 41 4C 20 |PY FOR PERSONAL |
00000070: 20 20 55 53 45 20 4F 4E 4C 59 20 49 53 20 47 49 | USE ONLY IS GI|
00000080: 56 45 4E 20 54 4F 20 4D 45 4D 42 45 52 53 20 4F |VEN TO MEMBERS O|
00000090: 46 20 50 2E 55 2E 47 2E 00 B7 08 04 00 8F 20 50 |F P.U.G....... P|
000000A0: 2E 55 2E 47 2E 20 2D 20 50 45 54 20 55 53 45 52 |.U.G. - PET USER|
000000B0: 53 20 47 52 4F 55 50 00 BD 08 05 00 8F 00 E2 08 |S GROUP.........|
000000C0: 64 00 99 22 93 22 3A 99 A3 32 35 30 29 22 12 46 |d..".":..250)".F|
000000D0: 52 55 53 54 41 54 49 4F 4E 20 20 51 55 42 49 43 |RUSTATION QUBIC|
000000E0: 92 22 00 1A 09 2C 01 9C 3A 86 41 28 36 34 29 2C |."...,..:.A(64),|
000000F0: 42 28 37 36 29 2C 43 28 31 35 32 29 2C 44 28 31 |B(76),C(152),D(1|
00000100: 36 2C 32 29 2C 45 28 31 35 32 29 3A 5A 50 B2 30 |6,2),E(152):ZP.0|
00000110: 3A 5A 5A B2 BB 28 AB 54 49 29 00 3C 09 4A 01 56 |:ZZ..(.TI).<.J.V|
00000120: 24 B2 22 11 11 11 11 11 11 11 11 11 11 11 11 11 |$.".............|
00000130: 11 11 11 11 11 11 11 11 11 11 11 22 00 81 09 5E |..........."...^|
00000140: 01 45 52 24 B2 22 20 20 20 20 20 20 20 20 20 20 |.ER$." |
00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000160: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 50 31 | ":P1|
00000170: 24 B2 22 50 45 54 20 4D 4F 56 45 53 20 54 4F 20 |$."PET MOVES TO |
00000180: 22 00 97 09 72 01 81 58 B2 31 A4 36 34 3A 43 28 |"...r..X.1.64:C(|
00000190: 58 29 B2 58 3A 82 58 00 AE 09 77 01 81 58 B2 36 |X).X:.X...w..X.6|
000001A0: 35 A4 31 35 32 3A 87 43 28 58 29 3A 82 58 00 C4 |5.152:.C(X):.X..|
000001B0: 09 7C 01 81 58 B2 31 A4 31 35 32 3A 87 45 28 58 |.|..X.1.152:.E(X|
000001C0: 29 3A 82 58 00 CE 09 90 01 8D 32 30 31 35 00 DA |):.X......2015..|
000001D0: 09 58 02 8F 2A 49 4E 50 55 54 00 F4 09 62 02 99 |.X..*INPUT...b..|
000001E0: 22 13 22 AA C8 28 56 24 2C 32 31 29 AA 45 52 24 |"."..(V$,21).ER$|
000001F0: AA 22 91 22 00 0F 0A 6C 02 85 22 59 4F 55 52 20 |."."...l.."YOUR |
00000200: 4D 4F 56 45 20 20 20 A4 9D 9D 9D 22 3B 49 24 00 |MOVE ....";I$.|
00000210: 29 0A 6D 02 8B 20 49 24 B2 22 A4 22 20 A7 99 22 |).m.. I$."." .."|
00000220: 91 91 22 3A 89 20 36 32 30 00 37 0A 6F 02 46 31 |..":. 620.7.o.F1|
00000230: B2 30 3A 99 45 52 24 00 51 0A 71 02 49 31 24 B2 |.0:.ER$.Q.q.I1$.|
00000240: C8 28 49 24 2C 31 29 3A 49 31 B2 C5 28 49 31 24 |.(I$,1):I1..(I1$|
00000250: 29 00 6D 0A 76 02 49 32 24 B2 CA 28 49 24 2C 32 |).m.v.I2$..(I$,2|
00000260: 2C 31 29 3A 49 32 B2 C5 28 49 32 24 29 00 87 0A |,1):I2..(I2$)...|
00000270: 7B 02 49 33 24 B2 C9 28 49 24 2C 31 29 3A 49 33 |{.I3$..(I$,1):I3|
00000280: B2 C5 28 49 33 24 29 00 B8 0A 80 02 8B C3 28 49 |..(I3$).......(I|
00000290: 24 29 B3 B1 33 B0 49 31 B3 31 B0 49 31 B1 34 B0 |$)..3.I1.1.I1.4.|
000002A0: 49 32 B3 31 B0 49 32 B1 34 B0 49 33 B3 31 B0 49 |I2.1.I2.4.I3.1.I|
000002B0: 33 B1 34 A7 46 31 B2 31 00 D2 0A 83 02 99 22 13 |3.4.F1.1......".|
000002C0: 22 AA C8 28 56 24 2C 32 32 29 AA 45 52 24 AA 22 |"..(V$,22).ER$."|
000002D0: 91 22 00 FE 0A 85 02 8B 46 31 B2 31 A7 20 99 A3 |."......F1.1. ..|
000002E0: 31 30 29 22 49 4E 50 55 54 20 45 52 52 4F 52 20 |10)"INPUT ERROR |
000002F0: 2D 20 52 45 54 59 50 45 22 3A 89 36 30 30 00 15 |- RETYPE":.600..|
00000300: 0B 8A 02 4D B2 31 36 AC 49 31 AA 34 AC 49 32 AA |...M.16.I1.4.I2.|
00000310: 49 33 AB 32 30 00 45 0B 8F 02 8B 41 28 4D 29 B1 |I3.20.E....A(M).|
00000320: 2E 39 A7 99 A3 31 30 29 22 43 55 42 45 20 4F 43 |.9...10)"CUBE OC|
00000330: 43 55 50 49 45 44 20 2D 20 52 45 54 59 50 45 22 |CUPIED - RETYPE"|
00000340: 3A 89 36 30 30 00 4F 0B 9E 02 89 31 34 30 30 00 |:.600.O....1400.|
00000350: 5A 0B BC 02 8F 2A 57 49 4E 3F 00 9A 0B C6 02 81 |Z....*WIN?......|
00000360: 58 B2 30 A4 33 37 3A 4B B2 34 AC 58 3A 42 28 58 |X.0.37:K.4.X:B(X|
00000370: 29 B2 41 28 43 28 4B AA 31 29 29 AA 41 28 43 28 |).A(C(K.1)).A(C(|
00000380: 4B AA 32 29 29 AA 20 41 28 43 28 4B AA 33 29 29 |K.2)). A(C(K.3))|
00000390: AA 41 28 43 28 4B AA 34 29 29 00 D1 0B CB 02 42 |.A(C(K.4)).....B|
000003A0: 28 33 38 AA 58 29 B2 41 28 45 28 4B AA 31 29 29 |(38.X).A(E(K.1))|
000003B0: AA 41 28 45 28 4B AA 32 29 29 AA 41 28 45 28 4B |.A(E(K.2)).A(E(K|
000003C0: AA 33 29 29 AA 41 28 45 28 4B AA 34 29 29 3A 82 |.3)).A(E(K.4)):.|
000003D0: 58 00 F7 0B D0 02 4A B2 30 3A 81 58 B2 30 A4 37 |X.....J.0:.X.0.7|
000003E0: 35 3A 8B 42 28 58 29 B2 34 A7 4E B2 58 3A 47 B2 |5:.B(X).4.N.X:G.|
000003F0: 31 3A 89 31 38 30 30 00 27 0C DA 02 8B 42 28 58 |1:.1800.'....B(X|
00000400: 29 B2 31 35 B0 42 28 58 29 B2 33 A7 20 4A B2 4A |).15.B(X).3. J.J|
00000410: AA 31 3A 44 28 4A 2C 31 29 B2 58 3A 44 28 4A 2C |.1:D(J,1).X:D(J,|
00000420: 32 29 B2 42 28 58 29 00 2E 0C E4 02 82 58 00 3C |2).B(X)......X.<|
00000430: 0C F8 02 8B 4A B2 30 89 31 30 30 30 00 66 0C 34 |....J.0.1000.f.4|
00000440: 03 81 58 B2 31 A4 4A 3A 8B 44 28 58 2C 32 29 B2 |..X.1.J:.D(X,2).|
00000450: 31 35 A7 20 47 B2 32 3A 4E B2 44 28 58 2C 31 29 |15. G.2:N.D(X,1)|
00000460: 3A 89 33 30 30 30 00 6D 0C 3E 03 82 58 00 80 0C |:.3000.m.>..X...|
00000470: 48 03 4E B2 44 28 31 2C 31 29 3A 89 33 30 30 30 |H.N.D(1,1):.3000|
00000480: 00 8C 0C E8 03 8F 2A 4D 4F 56 45 3F 00 BA 0C FC |......*MOVE?....|
00000490: 03 46 B2 30 3A 81 58 B2 30 A4 37 35 3A 8B 42 28 |.F.0:.X.0.75:.B(|
000004A0: 58 29 B2 32 B0 42 28 58 29 B2 31 30 A7 46 B2 31 |X).2.B(X).10.F.1|
000004B0: 3A 4E B2 58 3A 89 33 31 30 30 00 CB 0C 06 04 82 |:N.X:.3100......|
000004C0: 58 3A 8B 46 B1 30 89 31 32 30 30 00 F4 0C 24 04 |X:.F.0.1200...$.|
000004D0: 81 58 B2 30 A4 37 35 3A 8B 42 28 58 29 B2 31 B0 |.X.0.75:.B(X).1.|
000004E0: 42 28 58 29 B2 35 A7 46 B2 32 3A 4E B2 58 3A 89 |B(X).5.F.2:N.X:.|
000004F0: 33 31 30 30 00 05 0D 2E 04 82 58 3A 8B 46 B1 30 |3100......X:.F.0|
00000500: 89 31 32 30 30 00 14 0D 42 04 47 B2 33 3A 89 20 |.1200...B.G.3:. |
00000510: 31 38 30 30 00 1B 0D B0 04 8F 2A 00 3E 0D BA 04 |1800......*.>...|
00000520: 48 B2 30 3A 48 31 B2 30 3A 81 58 B2 31 A4 36 34 |H.0:H1.0:.X.1.64|
00000530: 3A 8B 41 28 58 29 B1 2E 39 89 31 32 38 30 00 78 |:.A(X)..9.1280.x|
00000540: 0D CE 04 8B 58 B2 31 B0 58 B2 34 B0 58 B2 31 33 |....X.1.X.4.X.13|
00000550: B0 58 B2 31 36 B0 58 B2 34 39 B0 58 B2 35 32 B0 |.X.16.X.49.X.52.|
00000560: 58 B2 36 31 B0 58 B2 36 34 A7 20 41 28 58 29 B2 |X.61.X.64. A(X).|
00000570: 41 28 58 29 AA 2E 30 35 00 A8 0D E2 04 8B 41 28 |A(X)..05......A(|
00000580: 58 29 B1 44 28 31 2C 32 29 A7 48 B2 31 3A 44 28 |X).D(1,2).H.1:D(|
00000590: 31 2C 31 29 B2 58 3A 44 28 31 2C 32 29 B2 41 28 |1,1).X:D(1,2).A(|
000005A0: 58 29 3A 89 31 32 38 30 00 D4 0D EC 04 8B 41 28 |X):.1280......A(|
000005B0: 58 29 B2 44 28 31 2C 32 29 A7 48 B2 48 AA 31 3A |X).D(1,2).H.H.1:|
000005C0: 44 28 48 2C 31 29 B2 58 3A 44 28 48 2C 32 29 B2 |D(H,1).X:D(H,2).|
000005D0: 41 28 58 29 00 E3 0D F6 04 8B 48 B1 31 35 A7 48 |A(X)......H.15.H|
000005E0: B2 31 35 00 0E 0E 00 05 82 58 3A 4D B2 44 28 31 |.15......X:M.D(1|
000005F0: 2C 31 29 3A 8B 48 B1 31 A7 52 25 B2 48 AC BB 28 |,1):.H.1.R%.H..(|
00000600: 31 29 AA 31 3A 4D B2 44 28 52 25 2C 31 29 00 19 |1).1:M.D(R%,1)..|
00000610: 0E 78 05 8F 2A 4D 4F 56 45 00 43 0E 82 05 50 B2 |.x..*MOVE.C...P.|
00000620: 31 3A 50 24 B2 22 20 20 12 58 92 20 22 3A 8B 5A |1:P$." .X. ":.Z|
00000630: 50 B2 31 A7 50 B2 35 3A 50 24 B2 22 20 20 12 4F |P.1.P.5:P$." .O|
00000640: 92 20 22 00 5C 0E 96 05 5A 50 B2 31 AB 5A 50 3A |. ".\...ZP.1.ZP:|
00000650: 41 28 4D 29 B2 50 3A 8D 33 32 30 30 00 75 0E A0 |A(M).P:.3200.u..|
00000660: 05 4D 31 24 B2 22 13 22 3A 4D 32 24 B2 C8 28 56 |.M1$.".":M2$..(V|
00000670: 24 2C 4D 32 29 00 93 0E AA 05 8B 4D 31 B1 31 A7 |$,M2)......M1.1.|
00000680: 20 4D 31 24 B2 C8 28 56 24 2C 35 AC 28 4D 31 AB | M1$..(V$,5.(M1.|
00000690: 31 29 29 00 B5 0E F0 05 99 22 13 22 AA 4D 31 24 |1))......".".M1$|
000006A0: AA 4D 32 24 A3 36 AC 28 4D 33 AB 31 29 AA 4D 32 |.M2$.6.(M3.1).M2|
000006B0: AA 31 29 50 24 00 E3 0E 04 06 8B 20 50 B2 35 A7 |.1)P$...... P.5.|
000006C0: 20 99 22 13 22 AA C8 28 56 24 2C 32 32 29 AA 45 | ."."..(V$,22).E|
000006D0: 52 24 AA 22 91 22 3A 99 A3 31 39 29 50 31 24 AA |R$.".":..19)P1$.|
000006E0: 4D 50 24 00 F1 0E 0E 06 8B 47 B1 30 89 31 38 30 |MP$......G.0.180|
000006F0: 30 00 FF 0E 18 06 8B 5A 50 B2 31 89 37 30 30 00 |0......ZP.1.700.|
00000700: 1B 0F 22 06 81 58 B2 31 A4 36 34 3A 41 28 58 29 |.."..X.1.64:A(X)|
00000710: B2 B5 28 41 28 58 29 29 3A 82 58 00 3C 0F 2C 06 |..(A(X)):.X.<.,.|
00000720: 81 58 B2 31 A4 31 36 3A 44 28 58 2C 31 29 B2 30 |.X.1.16:D(X,1).0|
00000730: 3A 44 28 58 2C 32 29 B2 30 3A 82 58 00 45 0F 36 |:D(X,2).0:.X.E.6|
00000740: 06 89 36 30 30 00 54 0F 08 07 8F 2A 45 4E 44 20 |..600.T....*END |
00000750: 47 41 4D 45 00 6A 0F 12 07 91 47 89 31 38 32 30 |GAME.j....G.1820|
00000760: 2C 31 38 33 30 2C 31 38 34 30 00 A0 0F 1C 07 8D |,1830,1840......|
00000770: 33 33 30 30 3A 99 22 13 22 AA C8 28 56 24 2C 32 |3300:."."..(V$,2|
00000780: 31 29 AA 22 59 4F 55 20 57 49 4E 20 20 22 AA 57 |1)."YOU WIN ".W|
00000790: 31 24 AA 57 32 24 AA 57 33 24 AA 57 34 24 3A 80 |1$.W2$.W3$.W4$:.|
000007A0: 00 D8 0F 26 07 8D 33 33 30 30 3A 99 22 13 22 AA |...&..3300:.".".|
000007B0: C8 28 56 24 2C 32 31 29 AA 22 50 45 54 2A 20 57 |.(V$,21)."PET* W|
000007C0: 49 4E 53 20 20 22 AA 57 31 24 AA 57 32 24 AA 57 |INS ".W1$.W2$.W|
000007D0: 33 24 AA 57 34 24 3A 80 00 04 10 30 07 99 22 13 |3$.W4$:....0..".|
000007E0: 22 AA C8 28 56 24 2C 32 31 29 AA 22 4E 45 49 54 |"..(V$,21)."NEIT|
000007F0: 48 45 52 20 4F 46 20 55 53 20 43 41 4E 20 57 49 |HER OF US CAN WI|
00000800: 4E 22 3A 80 00 0D 10 DF 07 99 22 93 22 00 2E 10 |N":......."."...|
00000810: E4 07 99 22 20 CD 20 31 31 31 20 CD 20 31 31 32 |..." . 111 . 112|
00000820: 20 CD 20 31 31 33 20 CD 20 31 31 34 20 CD 00 50 | . 113 . 114 ..P|
00000830: 10 E5 07 99 22 20 20 CD 20 31 32 31 20 CD 20 31 |...." . 121 . 1|
00000840: 32 32 20 CD 20 31 32 33 20 CD 20 31 32 34 20 CD |22 . 123 . 124 .|
00000850: 00 74 10 E6 07 99 22 20 20 20 CD 20 31 33 31 20 |.t...." . 131 |
00000860: CD 20 31 33 32 20 CD 20 31 33 33 20 CD 20 31 33 |. 132 . 133 . 13|
00000870: 34 20 CD 22 00 99 10 E7 07 99 22 20 20 20 20 CD |4 ."......" .|
00000880: 20 31 34 31 20 CD 20 31 34 32 20 CD 20 31 34 33 | 141 . 142 . 143|
00000890: 20 CD 20 31 34 34 20 CD 22 00 BE 10 E8 07 99 22 | . 144 ."......"|
000008A0: 20 20 20 20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D | ===========|
000008B0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 DF |============="..|
000008C0: 10 E9 07 99 22 20 CD 20 32 31 31 20 CD 20 32 31 |...." . 211 . 21|
000008D0: 32 20 CD 20 32 31 33 20 CD 20 32 31 34 20 CD 00 |2 . 213 . 214 ..|
000008E0: 01 11 EA 07 99 22 20 20 CD 20 32 32 31 20 CD 20 |....." . 221 . |
000008F0: 32 32 32 20 CD 20 32 32 33 20 CD 20 32 32 34 20 |222 . 223 . 224 |
00000900: CD 00 24 11 EB 07 99 22 20 20 20 CD 20 32 33 31 |..$...." . 231|
00000910: 20 CD 20 32 33 32 20 CD 20 32 33 33 20 CD 20 32 | . 232 . 233 . 2|
00000920: 33 34 20 CD 00 49 11 EC 07 99 22 20 20 20 20 CD |34 ..I...." .|
00000930: 20 32 34 31 20 CD 20 32 34 32 20 CD 20 32 34 33 | 241 . 242 . 243|
00000940: 20 CD 20 32 34 34 20 CD 22 00 6E 11 ED 07 99 22 | . 244 .".n...."|
00000950: 20 20 20 20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D | ===========|
00000960: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 8F |============="..|
00000970: 11 EE 07 99 22 20 CD 20 33 31 31 20 CD 20 33 31 |...." . 311 . 31|
00000980: 32 20 CD 20 33 31 33 20 CD 20 33 31 34 20 CD 00 |2 . 313 . 314 ..|
00000990: B1 11 EF 07 99 22 20 20 CD 20 33 32 31 20 CD 20 |....." . 321 . |
000009A0: 33 32 32 20 CD 20 33 32 33 20 CD 20 33 32 34 20 |322 . 323 . 324 |
000009B0: CD 00 D5 11 F0 07 99 22 20 20 20 CD 20 33 33 31 |......." . 331|
000009C0: 20 CD 20 33 33 32 20 CD 20 33 33 33 20 CD 20 33 | . 332 . 333 . 3|
000009D0: 33 34 20 CD 22 00 FA 11 F1 07 99 22 20 20 20 20 |34 ."......" |
000009E0: CD 20 33 34 31 20 CD 20 33 34 32 20 CD 20 33 34 |. 341 . 342 . 34|
000009F0: 33 20 CD 20 33 34 34 20 CD 22 00 1F 12 F2 07 99 |3 . 344 ."......|
00000A00: 22 20 20 20 20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |" ==========|
00000A10: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 |==============".|
00000A20: 40 12 F3 07 99 22 20 CD 20 34 31 31 20 CD 20 34 |@...." . 411 . 4|
00000A30: 31 32 20 CD 20 34 31 33 20 CD 20 34 31 34 20 CD |12 . 413 . 414 .|
00000A40: 00 62 12 F4 07 99 22 20 20 CD 20 34 32 31 20 CD |.b...." . 421 .|
00000A50: 20 34 32 32 20 CD 20 34 32 33 20 CD 20 34 32 34 | 422 . 423 . 424|
00000A60: 20 CD 00 85 12 F5 07 99 22 20 20 20 CD 20 34 33 | ......." . 43|
00000A70: 31 20 CD 20 34 33 32 20 CD 20 34 33 33 20 CD 20 |1 . 432 . 433 . |
00000A80: 34 33 34 20 CD 00 AA 12 F6 07 99 22 20 20 20 20 |434 ......." |
00000A90: CD 20 34 34 31 20 CD 20 34 34 32 20 CD 20 34 34 |. 441 . 442 . 44|
00000AA0: 33 20 CD 20 34 34 34 20 CD 22 00 CF 12 F7 07 99 |3 . 444 ."......|
00000AB0: 22 20 20 20 20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |" ==========|
00000AC0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 |==============".|
00000AD0: D5 12 F8 07 8E 00 EE 12 B8 0B 8F 2A 57 48 49 43 |...........*WHIC|
00000AE0: 48 20 43 55 42 45 20 49 4E 20 50 41 54 48 00 0F |H CUBE IN PATH..|
00000AF0: 13 C2 0B 81 59 B2 31 A4 34 3A 8D 33 34 30 30 3A |....Y.1.4:.3400:|
00000B00: 8B 41 28 4E 31 29 B3 31 20 A7 20 4D B2 4E 31 00 |.A(N1).1 . M.N1.|
00000B10: 1C 13 CC 0B 82 59 3A 89 31 34 30 30 00 2D 13 1C |.....Y:.1400.-..|
00000B20: 0C 8F 2A 20 56 41 4C 2E 20 41 28 58 29 00 57 13 |..* VAL. A(X).W.|
00000B30: 30 0C 81 59 B2 31 A4 34 3A 8D 33 34 30 30 3A 8B |0..Y.1.4:.3400:.|
00000B40: 41 28 4E 31 29 B3 31 A7 20 41 28 4E 31 29 B2 41 |A(N1).1. A(N1).A|
00000B50: 28 4E 31 29 AA 2E 31 00 6C 13 44 0C 82 59 3A 91 |(N1)..1.l.D..Y:.|
00000B60: 46 20 89 31 30 33 30 2C 31 30 37 30 00 76 13 80 |F .1030,1070.v..|
00000B70: 0C 8F 2A 4D 50 24 00 BC 13 8A 0C 4D 31 25 B2 28 |..*MP$.....M1%.(|
00000B80: 4D AA 31 35 29 AD 31 36 3A 4D 31 B2 4D 31 25 3A |M.15).16:M1.M1%:|
00000B90: 4D 32 25 B2 28 4D AA 31 39 AB 4D 31 AC 31 36 29 |M2%.(M.19.M1.16)|
00000BA0: AD 34 3A 4D 32 B2 4D 32 25 3A 4D 33 B2 4D AA 32 |.4:M2.M2%:M3.M.2|
00000BB0: 30 AB 4D 31 AC 31 36 AB 4D 32 AC 34 00 D8 13 A8 |0.M1.16.M2.4....|
00000BC0: 0C 4D 50 24 B2 C4 28 4D 31 29 AA C4 28 4D 32 29 |.MP$..(M1)..(M2)|
00000BD0: AA C4 28 4D 33 29 3A 8E 00 E3 13 E4 0C 8F 2A 50 |..(M3):.......*P|
00000BE0: 41 54 48 00 FF 13 EE 0C 81 59 B2 31 A4 34 3A 8D |ATH......Y.1.4:.|
00000BF0: 33 34 30 30 3A 4D B2 4E 31 3A 8D 33 32 30 30 00 |3400:M.N1:.3200.|
00000C00: 15 14 02 0D 57 24 28 59 29 B2 4D 50 24 AA 22 2C |....W$(Y).MP$.",|
00000C10: 22 3A 82 20 59 00 43 14 0C 0D 57 31 24 B2 57 24 |":. Y.C...W1$.W$|
00000C20: 28 31 29 3A 57 32 24 B2 57 24 28 32 29 3A 57 33 |(1):W2$.W$(2):W3|
00000C30: 24 B2 57 24 28 33 29 3A 57 34 24 B2 57 24 28 34 |$.W$(3):W4$.W$(4|
00000C40: 29 3A 8E 00 55 14 48 0D 8F 2A 43 28 29 20 4F 52 |):..U.H..*C() OR|
00000C50: 20 45 28 29 3F 00 71 14 52 0D 8B 4E B1 33 37 A7 | E()?.q.R..N.37.|
00000C60: 20 4E 31 B2 45 28 34 AC 28 4E AB 33 38 29 AA 59 | N1.E(4.(N.38).Y|
00000C70: 29 00 88 14 5C 0D 8B 4E B3 33 38 A7 20 4E 31 B2 |)...\..N.38. N1.|
00000C80: 43 28 34 AC 4E AA 59 29 00 8E 14 66 0D 8E 00 C1 |C(4.N.Y)...f....|
00000C90: 14 D4 0D 83 20 31 2C 31 37 2C 33 33 2C 34 39 2C |.... 1,17,33,49,|
00000CA0: 35 2C 32 31 2C 33 37 2C 35 33 2C 39 2C 32 35 2C |5,21,37,53,9,25,|
00000CB0: 34 31 2C 35 37 2C 31 33 2C 32 39 2C 34 35 2C 36 |41,57,13,29,45,6|
00000CC0: 31 00 F5 14 DE 0D 83 20 32 2C 31 38 2C 33 34 2C |1...... 2,18,34,|
00000CD0: 35 30 2C 36 2C 32 32 2C 33 38 2C 35 34 2C 31 30 |50,6,22,38,54,10|
00000CE0: 2C 32 36 2C 34 32 2C 35 38 2C 31 34 2C 33 30 2C |,26,42,58,14,30,|
00000CF0: 34 36 2C 36 32 00 29 15 E8 0D 83 20 33 2C 31 39 |46,62.).... 3,19|
00000D00: 2C 33 35 2C 35 31 2C 37 2C 32 33 2C 33 39 2C 35 |,35,51,7,23,39,5|
00000D10: 35 2C 31 31 2C 32 37 2C 34 33 2C 35 39 2C 31 35 |5,11,27,43,59,15|
00000D20: 2C 33 31 2C 34 37 2C 36 33 00 5D 15 F2 0D 83 20 |,31,47,63.].... |
00000D30: 34 2C 32 30 2C 33 36 2C 35 32 2C 38 2C 32 34 2C |4,20,36,52,8,24,|
00000D40: 34 30 2C 35 36 2C 31 32 2C 32 38 2C 34 34 2C 36 |40,56,12,28,44,6|
00000D50: 30 2C 31 36 2C 33 32 2C 34 38 2C 36 34 00 90 15 |0,16,32,48,64...|
00000D60: FC 0D 83 20 31 2C 35 2C 39 2C 31 33 2C 31 37 2C |... 1,5,9,13,17,|
00000D70: 32 31 2C 32 35 2C 32 39 2C 33 33 2C 33 37 2C 34 |21,25,29,33,37,4|
00000D80: 31 2C 34 35 2C 34 39 2C 35 33 2C 35 37 2C 36 31 |1,45,49,53,57,61|
00000D90: 00 C4 15 06 0E 83 20 32 2C 36 2C 31 30 2C 31 34 |...... 2,6,10,14|
00000DA0: 2C 31 38 2C 32 32 2C 32 36 2C 33 30 2C 33 34 2C |,18,22,26,30,34,|
00000DB0: 33 38 2C 34 32 2C 34 36 2C 35 30 2C 35 34 2C 35 |38,42,46,50,54,5|
00000DC0: 38 2C 36 32 00 F8 15 10 0E 83 20 33 2C 37 2C 31 |8,62...... 3,7,1|
00000DD0: 31 2C 31 35 2C 31 39 2C 32 33 2C 32 37 2C 33 31 |1,15,19,23,27,31|
00000DE0: 2C 33 35 2C 33 39 2C 34 33 2C 34 37 2C 35 31 2C |,35,39,43,47,51,|
00000DF0: 35 35 2C 35 39 2C 36 33 00 2C 16 1A 0E 83 20 34 |55,59,63.,.... 4|
00000E00: 2C 38 2C 31 32 2C 31 36 2C 32 30 2C 32 34 2C 32 |,8,12,16,20,24,2|
00000E10: 38 2C 33 32 2C 33 36 2C 34 30 2C 34 34 2C 34 38 |8,32,36,40,44,48|
00000E20: 2C 35 32 2C 35 36 2C 36 30 2C 36 34 00 60 16 24 |,52,56,60,64.`.$|
00000E30: 0E 83 20 31 2C 36 2C 31 31 2C 31 36 2C 31 37 2C |.. 1,6,11,16,17,|
00000E40: 32 32 2C 32 37 2C 33 32 2C 33 33 2C 33 38 2C 34 |22,27,32,33,38,4|
00000E50: 33 2C 34 38 2C 34 39 2C 35 34 2C 35 39 2C 36 34 |3,48,49,54,59,64|
00000E60: 00 94 16 2E 0E 83 20 31 33 2C 31 30 2C 37 2C 34 |...... 13,10,7,4|
00000E70: 2C 32 39 2C 32 36 2C 32 33 2C 32 30 2C 34 35 2C |,29,26,23,20,45,|
00000E80: 34 32 2C 33 39 2C 33 36 2C 36 31 2C 35 38 2C 35 |42,39,36,61,58,5|
00000E90: 35 2C 35 32 00 C6 16 38 0E 83 20 31 2C 32 31 2C |5,52...8.. 1,21,|
00000EA0: 34 31 2C 36 31 2C 32 2C 32 32 2C 34 32 2C 36 32 |41,61,2,22,42,62|
00000EB0: 2C 33 2C 32 33 2C 34 33 2C 36 33 2C 34 2C 32 34 |,3,23,43,63,4,24|
00000EC0: 2C 34 34 2C 36 34 00 FC 16 42 0E 83 20 34 39 2C |,44,64...B.. 49,|
00000ED0: 33 37 2C 32 35 2C 31 33 2C 35 30 2C 33 38 2C 32 |37,25,13,50,38,2|
00000EE0: 36 2C 31 34 2C 35 31 2C 33 39 2C 32 37 2C 31 35 |6,14,51,39,27,15|
00000EF0: 2C 35 32 2C 34 30 2C 32 38 2C 31 36 00 2F 17 4C |,52,40,28,16./.L|
00000F00: 0E 83 20 31 2C 31 38 2C 33 35 2C 35 32 2C 35 2C |.. 1,18,35,52,5,|
00000F10: 32 32 2C 33 39 2C 35 36 2C 39 2C 32 36 2C 34 33 |22,39,56,9,26,43|
00000F20: 2C 36 30 2C 31 33 2C 33 30 2C 34 37 2C 36 34 00 |,60,13,30,47,64.|
00000F30: 63 17 56 0E 83 20 34 39 2C 33 34 2C 31 39 2C 34 |c.V.. 49,34,19,4|
00000F40: 2C 35 33 2C 33 38 2C 32 33 2C 38 2C 35 37 2C 34 |,53,38,23,8,57,4|
00000F50: 32 2C 32 37 2C 31 32 2C 36 31 2C 34 36 2C 33 31 |2,27,12,61,46,31|
00000F60: 2C 31 36 00 97 17 60 0E 83 20 31 2C 32 32 2C 34 |,16...`.. 1,22,4|
00000F70: 33 2C 36 34 2C 31 36 2C 32 37 2C 33 38 2C 34 39 |3,64,16,27,38,49|
00000F80: 2C 34 2C 32 33 2C 34 32 2C 36 31 2C 31 33 2C 32 |,4,23,42,61,13,2|
00000F90: 36 2C 33 39 2C 35 32 00 00 00 24 |6,39,52...$ |
....... FRUSTRATION QUBIC.I.... COPYRIGH
T 1978 BY M.SPENCER,SANTA CRUZ,CA......
PERMISSION TO COPY FOR PERSONAL USE ON
LY IS GIVEN TO MEMBERS OF P.U.G....... P
.U.G. - PET USERS GROUP.........D..".":.
.250)".FRUSTATION QUBIC."...,..:.A(64),
B(76),C(152),D(16,2),E(152):ZP.0:ZZ..(.T
I).<.J.V$."........................"...^
.ER$."
":P1$."PET MOVES TO "...R..X.1.64:C(
X).X:.X...W..X.65.152:.C(X):.X.D.|..X.1.
152:.E(X):.X.N....2015.Z.X..*INPUT...B..
".".H(V$,21).ER$."."...L.."YOUR MOVE .
...";I$.).M.. I$."." .."..":. 620.7.O.F1
.0:.ER$.Q.Q.I1$.H(I$,1):I1.E(I1$).M.V.I2
$.J(I$,2,1):I2.E(I2$)...{.I3$.I(I$,1):I3
.E(I3$)......C(I$)..3.I1.1.I1.4.I2.1.I2.
4.I3.1.I3.4.F1.1.R....".".H(V$,22).ER$."
."......F1.1. ..10)"INPUT ERROR - RETYPE
":.600.....M.16.I1.4.I2.I3.20.E....A(M).
.9...10)"CUBE OCCUPIED - RETYPE":.600.O.
...1400.Z....*WIN?...F..X.0.37:K.4.X:B(X
).A(C(K.1)).A(C(K.2)). A(C(K.3)).A(C(K.4
)).Q.K.B(38.X).A(E(K.1)).A(E(K.2)).A(E(K
.3)).A(E(K.4)):.X...P.J.0:.X.0.75:.B(X).
4.N.X:G.1:.1800.'.Z..B(X).15.B(X).3. J.J
.1:D(J,1).X:D(J,2).B(X)......X.<....J.0.
1000.F.4..X.1.J:.D(X,2).15. G.2:N.D(X,1)
:.3000.M.>..X...H.N.D(1,1):.3000......*M
OVE?.....F.0:.X.0.75:.B(X).2.B(X).10.F.1
:N.X:.3100.K....X:.F.0.1200...$..X.0.75:
.B(X).1.B(X).5.F.2:N.X:.3100......X:.F.0
.1200...B.G.3:. 1800......*.>...H.0:H1.0
:.X.1.64:.A(X)..9.1280.X.N..X.1.X.4.X.13
.X.16.X.49.X.52.X.61.X.64. A(X).A(X)..05
......A(X).D(1,2).H.1:D(1,1).X:D(1,2).A(
X):.1280.T....A(X).D(1,2).H.H.1:D(H,1).X
:D(H,2).A(X)......H.15.H.15......X:M.D(1
,1):.H.1.R%.H..(1).1:M.D(R%,1)...X..*MOV
E.C...P.1:P$." .X. ":.ZP.1.P.5:P$." .O
. ".\...ZP.1.ZP:A(M).P:.3200.U. .M1$."."
:M2$.H(V$,M2)......M1.1. M1$.H(V$,5.(M1.
1))......".".M1$.M2$.6.(M3.1).M2.1)P$...
... P.5. .".".H(V$,22).ER$.".":..19)P1$.
MP$......G.0.1800......ZP.1.700..."..X.1
.64:A(X)..(A(X)):.X.<.,..X.1.16:D(X,1).0
:D(X,2).0:.X.E.6..600.T....*END GAME.J..
..G.1820,1830,1840. ....3300:.".".H(V$,2
1)."YOU WIN ".W1$.W2$.W3$.W4$:..X.&..33
00:.".".H(V$,21)."PET* WINS ".W1$.W2$.W
3$.W4$:....0..".".H(V$,21)."NEITHER OF U
S CAN WIN":......."."......" M 111 M 112
M 113 M 114 M.P...." M 121 M 122 M 123
M 124 M.T...." M 131 M 132 M 133 M 13
4 M"......" M 141 M 142 M 143 M 144 M
"......" ========================"..
...." M 211 M 212 M 213 M 214 M......"
M 221 M 222 M 223 M 224 M.$...." M 231
M 232 M 233 M 234 M.I...." M 241 M 2
42 M 243 M 244 M".N...." ===========
============="......" M 311 M 312 M 313
M 314 M......" M 321 M 322 M 323 M 324
M.U...." M 331 M 332 M 333 M 334 M"...
..." M 341 M 342 M 343 M 344 M"......
" ========================".@...." M
411 M 412 M 413 M 414 M.B...." M 421 M
422 M 423 M 424 M......" M 431 M 432
M 433 M 434 M......" M 441 M 442 M 44
3 M 444 M".O...." ==================
======".U..........*WHICH CUBE IN PATH..
.B..Y.1.4:.3400:.A(N1).1 . M.N1...L..Y:.
1400.-....* VAL. A(X).W.0..Y.1.4:.3400:.
A(N1).1. A(N1).A(N1)..1.L.D..Y:.F .1030,
1070.V....*MP$.....M1%.(M.15).16:M1.M1%:
M2%.(M.19.M1.16).4:M2.M2%:M3.M.20.M1.16.
M2.4.X...MP$.D(M1).D(M2).D(M3):.......*P
ATH......Y.1.4:.3400:M.N1:.3200.....W$(Y
).MP$.",":. Y.C...W1$.W$(1):W2$.W$(2):W3
$.W$(3):W4$.W$(4):..U.H..*C() OR E()?.Q.
R..N.37. N1.E(4.(N.38).Y)...\..N.38. N1.
C(4.N.Y)...F...A.T.. 1,17,33,49,5,21,37,
53,9,25,41,57,13,29,45,61...... 2,18,34,
50,6,22,38,54,10,26,42,58,14,30,46,62.).
... 3,19,35,51,7,23,39,55,11,27,43,59,15
,31,47,63.].... 4,20,36,52,8,24,40,56,12
,28,44,60,16,32,48,64...... 1,5,9,13,17,
21,25,29,33,37,41,45,49,53,57,61.D.... 2
,6,10,14,18,22,26,30,34,38,42,46,50,54,5
8,62...... 3,7,11,15,19,23,27,31,35,39,4
3,47,51,55,59,63.,.... 4,8,12,16,20,24,2
8,32,36,40,44,48,52,56,60,64.`.$.. 1,6,1
1,16,17,22,27,32,33,38,43,48,49,54,59,64
...... 13,10,7,4,29,26,23,20,45,42,39,36
,61,58,55,52.F.8.. 1,21,41,61,2,22,42,62
,3,23,43,63,4,24,44,64...B.. 49,37,25,13
,50,38,26,14,51,39,27,15,52,40,28,16./.L
.. 1,18,35,52,5,22,39,56,9,26,43,60,13,3
0,47,64.C.V.. 49,34,19,4,53,38,23,8,57,4
2,27,12,61,46,31,16...`.. 1,22,43,64,16,
27,38,49,4,23,42,61,13,26,39,52...$
> CLICK IMAGE PREVIEW FOR FULL MODAL