SWITCHBOX
FILE INFORMATION
FILENAME(S): SWITCHBOX
FILE TYPE(S): PRG
FILE SIZE: 4.1K
FIRST SEEN: 2025-11-30 21:28:18
APPEARS ON: 1 disk(s)
FILE HASH
99e5c6a68e6aa33ccfd6a2339edc0ee67eba88fd395719998fee580537388865
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| D 64016 | SWITCHBOX | PRG | DuncanTwain | 13 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 09 24 09 32 00 8F 20 43 4F 4D 50 55 54 45 21 |..$.2.. COMPUTE!| 00000010: 20 4D 41 47 41 5A 49 4E 45 20 4D 41 52 43 48 20 | MAGAZINE MARCH | 00000020: 31 39 38 36 00 5C 09 64 00 81 41 B2 35 34 32 37 |1986.\.d..A.5427| 00000030: 32 A4 35 34 32 39 35 3A 97 41 2C 30 3A 82 3A 97 |2.54295:.A,0:.:.| 00000040: 35 34 32 39 36 2C 31 35 3A 97 35 34 32 37 37 2C |54296,15:.54277,| 00000050: 32 34 3A 97 35 34 32 38 34 2C 32 36 00 79 09 6E |24:.54284,26.y.n| 00000060: 00 56 B2 35 34 32 37 36 3A 4C 42 B2 35 34 32 37 |.V.54276:LB.5427| 00000070: 32 3A 48 42 B2 4C 42 AA 31 00 B0 09 78 00 86 53 |2:HB.LB.1...x..S| 00000080: 57 28 34 2C 37 2C 31 29 2C 53 50 24 28 31 29 2C |W(4,7,1),SP$(1),| 00000090: 4C 42 28 33 32 2C 34 29 2C 41 52 24 28 31 29 2C |LB(32,4),AR$(1),| 000000A0: 50 54 28 34 2C 31 36 29 2C 53 43 28 31 2C 38 29 |PT(4,16),SC(1,8)| 000000B0: 00 FC 09 82 00 53 50 24 28 30 29 B2 22 92 DF 12 |.....SP$(0)."...| 000000C0: DF 92 A4 22 3A 53 50 24 28 31 29 B2 22 A4 12 A9 |...":SP$(1)."...| 000000D0: 92 A9 22 3A 41 52 24 28 30 29 B2 22 3C C9 20 11 |..":AR$(0)."<. .| 000000E0: 9D 9D CA B3 22 3A 41 52 24 28 31 29 B2 22 AB CB |....":AR$(1)."..| 000000F0: 91 9D 9D 20 D5 3E 22 3A 51 52 B2 31 00 29 0A 8C |... .>":QR.1.)..| 00000100: 00 97 35 33 32 38 31 2C 31 35 3A 97 35 33 32 38 |..53281,15:.5328| 00000110: 30 2C 31 35 3A 97 36 34 36 2C 36 3A 54 58 B2 BB |0,15:.646,6:TX..| 00000120: 28 AB 54 49 AD 31 33 37 29 00 4D 0A 96 00 81 4A |(.TI.137).M....J| 00000130: B2 31 A4 34 3A 87 50 54 28 4A 2C 30 29 3A 8F 20 |.1.4:.PT(J,0):. | 00000140: 4E 41 4D 45 20 41 4E 44 20 47 4F 41 4C 00 81 0A |NAME AND GOAL...| 00000150: A0 00 81 4B B2 31 A4 38 3A 87 4C 3A 50 54 28 4A |...K.1.8:.L:PT(J| 00000160: 2C 4B AA 38 29 B2 4C 3A 50 54 28 4A 2C 39 AB 4B |,K.8).L:PT(J,9.K| 00000170: 29 B2 4C 3A 82 4B 2C 4A 3A 8F 20 50 4F 49 4E 54 |).L:.K,J:. POINT| 00000180: 53 00 9C 0A AA 00 83 20 31 30 3A 8F 20 52 4F 55 |S...... 10:. ROU| 00000190: 4E 44 20 31 20 28 45 51 55 41 4C 29 00 B2 0A B4 |ND 1 (EQUAL)....| 000001A0: 00 83 20 32 2C 32 2C 32 2C 32 2C 32 2C 32 2C 32 |.. 2,2,2,2,2,2,2| 000001B0: 2C 32 00 D1 0A BE 00 83 20 34 30 3A 8F 20 52 4F |,2...... 40:. RO| 000001C0: 55 4E 44 20 32 20 28 46 49 42 4F 4E 41 43 43 49 |UND 2 (FIBONACCI| 000001D0: 29 00 EA 0A C8 00 83 20 31 2C 32 2C 33 2C 35 2C |)...... 1,2,3,5,| 000001E0: 38 2C 31 33 2C 32 31 2C 33 34 00 0A 0B D2 00 83 |8,13,21,34......| 000001F0: 20 32 30 3A 8F 20 52 4F 55 4E 44 20 33 20 28 41 | 20:. ROUND 3 (A| 00000200: 52 49 54 48 4D 45 54 49 43 29 00 20 0B DC 00 83 |RITHMETIC). ....| 00000210: 20 32 2C 33 2C 34 2C 35 2C 36 2C 37 2C 38 2C 39 | 2,3,4,5,6,7,8,9| 00000220: 00 3D 0B E6 00 83 20 38 30 3A 8F 20 52 4F 55 4E |.=.... 80:. ROUN| 00000230: 44 20 34 20 28 53 51 55 41 52 45 53 29 00 58 0B |D 4 (SQUARES).X.| 00000240: F0 00 83 20 31 2C 34 2C 39 2C 31 36 2C 32 35 2C |... 1,4,9,16,25,| 00000250: 33 36 2C 34 39 2C 36 34 00 71 0B FA 00 99 22 93 |36,49,64.q....".| 00000260: 22 3A 85 22 50 4C 41 59 45 52 20 31 22 3B 50 31 |":."PLAYER 1";P1| 00000270: 24 00 AF 0B 04 01 85 22 50 4C 41 59 45 52 20 32 |$......"PLAYER 2| 00000280: 22 3B 50 32 24 3A 50 31 24 B2 C8 28 50 31 24 2C |";P2$:P1$..(P1$,| 00000290: 35 29 3A 50 32 24 B2 C8 28 50 32 24 2C 35 29 3A |5):P2$..(P2$,5):| 000002A0: 99 50 31 24 3B 22 20 56 53 20 22 3B 50 32 24 00 |.P1$;" VS ";P2$.| 000002B0: E8 0B 0E 01 99 22 49 53 20 54 48 49 53 20 43 4F |....."IS THIS CO| 000002C0: 52 52 45 43 54 3F 22 3A 97 31 39 38 2C 30 3A 92 |RRECT?":.198,0:.| 000002D0: 31 39 38 2C 31 3A A1 41 24 3A 8B C6 28 41 24 29 |198,1:.A$:..(A$)| 000002E0: B3 B1 38 39 A7 32 35 30 00 FE 0B 18 01 8D 34 35 |..89.250......45| 000002F0: 30 3A 8D 36 31 30 3A 8F 20 53 45 54 55 50 00 29 |0:.610:. SETUP.)| 00000300: 0C 22 01 81 52 52 B2 31 A4 34 3A 54 58 B2 31 30 |."..RR.1.4:TX.10| 00000310: 37 32 AA 34 30 AC 52 52 3A 97 54 58 2C 39 30 3A |72.40.RR:.TX,90:| 00000320: 97 54 58 AA 32 32 2C 39 30 00 49 0C 2C 01 8D 35 |.TX.22,90.I.,..5| 00000330: 36 30 3A 8F 20 50 55 54 20 53 43 4F 52 45 53 20 |60:. PUT SCORES | 00000340: 41 54 20 42 4F 54 54 4F 4D 00 79 0C 36 01 51 52 |AT BOTTOM.y.6.QR| 00000350: B2 31 AB 51 52 3A 97 36 34 36 2C 36 3A 54 59 B2 |.1.QR:.646,6:TY.| 00000360: 51 52 AC 32 30 3A 54 58 B2 32 38 AB 54 59 3A 43 |QR.20:TX.28.TY:C| 00000370: 58 B2 54 58 3A 43 59 B2 30 00 A1 0C 40 01 4D 24 |X.TX:CY.0...@.M$| 00000380: B2 C9 28 C4 28 50 54 28 52 52 2C 30 29 29 2C 33 |..(.(PT(RR,0)),3| 00000390: 29 AA 22 11 9D 9D 9D 20 20 20 22 3A 8D 31 31 38 |).".... ":.118| 000003A0: 30 00 CA 0C 4A 01 54 58 B2 38 AA 54 59 3A 43 58 |0...J.TX.8.TY:CX| 000003B0: B2 54 58 3A 43 59 B2 51 52 3A 4D 24 B2 41 52 24 |.TX:CY.QR:M$.AR$| 000003C0: 28 51 52 29 3A 8D 31 31 38 30 00 FD 0C 54 01 8D |(QR):.1180...T..| 000003D0: 37 37 30 3A 8B 53 43 28 31 AB 51 52 2C 52 52 29 |770:.SC(1.QR,RR)| 000003E0: B2 B1 50 54 28 52 52 2C 30 29 A7 33 36 30 3A 8F |..PT(RR,0).360:.| 000003F0: 20 45 4E 44 20 4F 46 20 52 4F 55 4E 44 00 06 0D | END OF ROUND...| 00000400: 5E 01 89 33 31 30 00 27 0D 68 01 81 4A B2 30 A4 |^..310.'.h..J.0.| 00000410: 31 3A 81 4B B2 35 A4 38 3A 53 43 28 4A 2C 4B 29 |1:.K.5.8:SC(J,K)| 00000420: B2 30 3A 82 4B 2C 4A 00 62 0D 72 01 81 4A B2 30 |.0:.K,J.b.r..J.0| 00000430: A4 31 3A 81 4B B2 31 A4 34 3A 47 4C B2 50 54 28 |.1:.K.1.4:GL.PT(| 00000440: 4B 2C 30 29 3A 41 43 B2 53 43 28 4A 2C 4B 29 3A |K,0):AC.SC(J,K):| 00000450: 53 43 28 4A 2C 35 29 B2 53 43 28 4A 2C 35 29 AA |SC(J,5).SC(J,5).| 00000460: 41 43 00 AB 0D 7C 01 53 43 28 4A 2C 36 29 B2 53 |AC...|.SC(J,6).S| 00000470: 43 28 4A 2C 36 29 AB 28 41 43 B2 B1 47 4C 29 AC |C(J,6).(AC..GL).| 00000480: 47 4C 3A 53 43 28 4A 2C 37 29 B2 53 43 28 4A 2C |GL:SC(J,7).SC(J,| 00000490: 37 29 AA 28 53 43 28 4A 2C 4B 29 AB 53 43 28 31 |7).(SC(J,K).SC(1| 000004A0: AB 4A 2C 4B 29 29 3A 82 4B 2C 4A 00 DA 0D 86 01 |.J,K)):.K,J.....| 000004B0: 81 4A B2 30 A4 31 3A 81 4B B2 36 A4 37 3A 53 43 |.J.0.1:.K.6.7:SC| 000004C0: 28 4A 2C 4B 29 B2 53 43 28 4A 2C 4B 29 AA 53 43 |(J,K).SC(J,K).SC| 000004D0: 28 4A 2C 35 29 3A 82 4B 2C 4A 00 09 0E 90 01 81 |(J,5):.K,J......| 000004E0: 4A B2 30 A4 31 3A 81 4B B2 35 A4 37 3A 53 43 28 |J.0.1:.K.5.7:SC(| 000004F0: 4A 2C 38 29 B2 53 43 28 4A 2C 38 29 AA 53 43 28 |J,8).SC(J,8).SC(| 00000500: 4A 2C 4B 29 3A 82 4B 2C 4A 00 45 0E 9A 01 97 36 |J,K):.K,J.E....6| 00000510: 34 36 2C 31 31 3A 81 4A B2 30 A4 31 3A 81 4B B2 |46,11:.J.0.1:.K.| 00000520: 35 A4 38 3A 59 24 B2 C4 28 53 43 28 4A 2C 4B 29 |5.8:Y$..(SC(J,K)| 00000530: 29 3A 4C B2 C3 28 59 24 29 3A 54 58 B2 36 AA 4A |):L..(Y$):TX.6.J| 00000540: AC 33 31 AB 4C 00 75 0E A4 01 54 59 B2 33 AA 4B |.31.L.u...TY.3.K| 00000550: 3A 43 58 B2 54 58 AA 28 54 58 B3 32 30 29 3A 43 |:CX.TX.(TX.20):C| 00000560: 59 B2 54 59 3A 4D 24 B2 59 24 3A 8D 31 31 38 30 |Y.TY:M$.Y$:.1180| 00000570: 3A 82 4B 2C 4A 00 97 0E AE 01 82 52 52 3A 8F 20 |:.K,J......RR:. | 00000580: 45 4E 44 20 4F 46 20 4D 41 49 4E 20 4C 4F 4F 50 |END OF MAIN LOOP| 00000590: 20 36 30 2D 34 39 39 00 D5 0E B3 01 99 A6 33 29 | 60-499.......3)| 000005A0: 22 11 11 11 11 11 11 11 11 11 11 11 11 90 12 45 |"..............E| 000005B0: 49 4E 44 45 20 56 41 4E 20 48 45 54 20 53 50 45 |INDE VAN HET SPE| 000005C0: 4C 2E 20 4E 4F 47 20 45 45 4E 20 4B 45 45 52 20 |L. NOG EEN KEER | 000005D0: 28 4A 2F 4E 29 00 E9 0E B8 01 A1 20 41 24 3A 8B |(J/N)...... A$:.| 000005E0: 41 24 B2 22 22 A7 34 34 30 00 FC 0E B9 01 8B 20 |A$."".440...... | 000005F0: 41 24 B2 22 4A 22 20 A7 20 9C 3A 8A 00 35 0F BA |A$."J" . .:..5..| 00000600: 01 8B 20 41 24 B3 B1 22 4A 22 20 A7 20 99 22 93 |.. A$.."J" . .".| 00000610: 11 11 1D 1D 42 45 44 41 4E 4B 54 2C 20 48 45 54 |....BEDANKT, HET| 00000620: 20 57 41 53 20 45 45 4E 20 4C 45 55 4B 20 53 50 | WAS EEN LEUK SP| 00000630: 45 4C 22 3A 80 00 6A 0F C2 01 99 22 93 22 3B 3A |EL":..j....".";:| 00000640: 99 A6 31 31 29 3B 22 B0 12 B9 92 22 3B 3A 81 4A |..11);"....";:.J| 00000650: B2 31 A4 37 3A 99 22 92 B2 12 B9 22 3B 3A 82 3A |.1.7:."....";:.:| 00000660: 99 22 92 AE 22 3A 4C 4C B2 37 00 8F 0F CC 01 81 |."..":LL.7......| 00000670: 4A B2 30 A4 34 3A 54 58 B2 39 AB 32 AC 4A 3A 54 |J.0.4:TX.9.2.J:T| 00000680: 59 B2 31 AA 4A AC 34 3A 52 24 B2 22 DD 20 22 00 |Y.1.J.4:R$.". ".| 00000690: B6 0F D6 01 81 4B B2 31 A4 32 3A 43 58 B2 54 58 |.....K.1.2:CX.TX| 000006A0: 3A 43 59 B2 54 59 AA 4B AB 31 3A 4D 24 B2 22 22 |:CY.TY.K.1:M$.""| 000006B0: 3A 8D 31 31 38 30 00 D2 0F E0 01 99 22 20 20 12 |:.1180......" .| 000006C0: 20 92 20 22 3B 3A 8D 35 35 30 3A 99 22 12 20 22 | . ";:.550:.". "| 000006D0: 3A 82 00 F2 0F EA 01 43 58 B2 54 58 3A 43 59 B2 |:......CX.TX:CY.| 000006E0: 54 59 AA 4B AB 31 3A 4D 24 B2 22 22 3A 8D 31 31 |TY.K.1:M$."":.11| 000006F0: 38 30 00 27 10 F4 01 99 22 20 12 A9 20 92 20 22 |80.'...." .. . "| 00000700: 3B 3A 8D 35 35 30 3A 99 22 12 20 DF 22 3A 43 58 |;:.550:.". .":CX| 00000710: B2 54 58 3A 43 59 B2 54 59 AA 4B 3A 4D 24 B2 22 |.TX:CY.TY.K:M$."| 00000720: 22 3A 8D 31 31 38 30 00 4E 10 FE 01 4C 4C B2 4C |":.1180.N...LL.L| 00000730: 4C AA 32 3A 99 22 12 A9 92 A9 22 3B 3A 8D 35 35 |L.2:."....";:.55| 00000740: 30 3A 99 22 9D DF 12 DF 92 22 3B 3A 82 4A 00 66 |0:.".....";:.J.f| 00000750: 10 08 02 99 3A 99 22 1D B2 20 22 3B 3A 8D 35 35 |....:.".. ";:.55| 00000760: 30 3A 99 22 B2 22 00 8E 10 12 02 52 24 B2 22 12 |0:.".".....R$.".| 00000770: B8 92 B1 22 3A 4C 4C B2 4C 4C AA 31 3A 99 22 20 |...":LL.LL.1:." | 00000780: AD 22 3B 3A 8D 35 35 30 3A 99 22 9D BD 22 00 94 |.";:.550:.".."..| 00000790: 10 1C 02 8E 00 A9 10 26 02 81 4C B2 31 A4 4C 4C |.......&..L.1.LL| 000007A0: 3A 99 52 24 3B 3A 82 3A 8E 00 D1 10 30 02 97 36 |:.R$;:.:....0..6| 000007B0: 34 36 2C 31 31 3A 81 4A B2 31 A4 31 36 3A 4B B2 |46,11:.J.1.16:K.| 000007C0: 50 54 28 52 52 2C 4A 29 3A 4A 4A B2 32 AA 4A AC |PT(RR,J):JJ.2.J.| 000007D0: 32 00 F8 10 3A 02 8B 4B B1 39 A7 4C B2 B5 28 4B |2...:..K.9.L..(K| 000007E0: AD 31 30 29 3A 4C 24 B2 CA 28 C4 28 4C 29 2C 32 |.10):L$..(.(L),2| 000007F0: 2C 31 29 3A 89 35 39 30 00 05 11 44 02 4C 24 B2 |,1):.590...D.L$.| 00000800: C7 28 33 32 29 00 40 11 4E 02 43 58 B2 4A 4A 3A |.(32).@.N.CX.JJ:| 00000810: 43 59 B2 32 33 3A 4D 24 B2 4C 24 3A 8D 31 31 38 |CY.23:M$.L$:.118| 00000820: 30 3A 43 58 B2 4A 4A 3A 43 59 B2 32 34 3A 4D 24 |0:CX.JJ:CY.24:M$| 00000830: B2 C9 28 C4 28 4B 29 2C 31 29 3A 8D 31 31 38 30 |..(.(K),1):.1180| 00000840: 00 49 11 58 02 82 4A 3A 8E 00 74 11 62 02 81 4A |.I.X..J:..t.b..J| 00000850: B2 30 A4 34 3A 53 59 B2 34 AA 4A AC 34 3A 81 4B |.0.4:SY.4.J.4:.K| 00000860: B2 30 A4 4A AA 33 3A 53 58 B2 31 32 AB 4A AC 32 |.0.J.3:SX.12.J.2| 00000870: AA 4B AC 34 00 95 11 6C 02 43 58 B2 53 58 AA 31 |.K.4...l.CX.SX.1| 00000880: 3A 43 59 B2 53 59 AB 31 3A 4D 24 B2 22 20 22 3A |:CY.SY.1:M$." ":| 00000890: 8D 31 31 38 30 00 C3 11 76 02 4D 24 B2 22 20 22 |.1180...v.M$." "| 000008A0: 3A 43 58 B2 53 58 AA 31 3A 43 59 B2 53 59 AB 31 |:CX.SX.1:CY.SY.1| 000008B0: 3A 8D 31 31 38 30 3A 57 50 B2 B5 28 BB 28 31 29 |:.1180:WP..(.(1)| 000008C0: AC 32 29 00 E5 11 80 02 53 57 28 4A 2C 4B 2C 30 |.2).....SW(J,K,0| 000008D0: 29 B2 57 50 3A 53 57 28 4A 2C 4B 2C 31 29 B2 30 |).WP:SW(J,K,1).0| 000008E0: 3A 8D 37 36 30 00 EE 11 8A 02 82 4B 2C 4A 00 0A |:.760......K,J..| 000008F0: 12 94 02 81 4A B2 31 A4 38 3A 97 31 30 37 34 AA |....J.1.8:.1074.| 00000900: 4A AC 32 2C 34 38 AA 4A 3A 82 00 34 12 9E 02 81 |J.2,48.J:..4....| 00000910: 4A B2 30 A4 31 3A 42 58 B2 4A AC 33 31 3A 43 58 |J.0.1:BX.J.31:CX| 00000920: B2 42 58 3A 43 59 B2 30 3A 4D 24 B2 22 22 3A 8D |.BX:CY.0:M$."":.| 00000930: 31 31 38 30 00 5D 12 A8 02 99 22 92 90 AC 12 9C |1180.]....".....| 00000940: 20 20 20 20 20 20 20 11 9D 9D 9D 9D 9D 9D 9D 9D | .........| 00000950: 12 90 A1 9C AC A2 A2 A2 A2 A2 BB 22 3B 00 92 12 |...........";...| 00000960: B2 02 81 4B B2 31 A4 35 3A 43 58 B2 42 58 3A 43 |...K.1.5:CX.BX:C| 00000970: 59 B2 4B 3A 4D 24 B2 22 22 3A 8D 31 31 38 30 3A |Y.K:M$."":.1180:| 00000980: 99 22 12 90 A1 92 9C A1 20 20 20 20 20 12 A1 22 |."...... .."| 00000990: 3A 82 00 AD 12 BC 02 43 58 B2 42 58 3A 43 59 B2 |:......CX.BX:CY.| 000009A0: 4B 3A 4D 24 B2 22 22 3A 8D 31 31 38 30 00 D7 12 |K:M$."":.1180...| 000009B0: C6 02 99 22 12 90 A1 9C BC 92 A2 A2 A2 A2 A2 12 |..."............| 000009C0: BE 11 9D 9D 9D 9D 9D 9D 9D 9D 92 90 BC 12 A2 A2 |................| 000009D0: A2 A2 A2 A2 92 BE 22 00 E4 12 D0 02 82 3A 97 36 |......"......:.6| 000009E0: 34 36 2C 34 00 12 13 DA 02 43 58 B2 33 AA 28 C3 |46,4.....CX.3.(.| 000009F0: 28 50 31 24 29 B2 35 29 3A 43 59 B2 30 3A 4D 24 |(P1$).5):CY.0:M$| 00000A00: B2 22 12 22 AA 50 31 24 AA 22 92 22 3A 8D 31 31 |.".".P1$.".":.11| 00000A10: 38 30 00 41 13 E4 02 43 58 B2 33 34 AA 28 C3 28 |80.A...CX.34.(.(| 00000A20: 50 32 24 29 B2 35 29 3A 43 59 B2 30 3A 4D 24 B2 |P2$).5):CY.0:M$.| 00000A30: 22 12 22 AA 50 32 24 AA 22 92 22 3A 8D 31 31 38 |".".P2$.".":.118| 00000A40: 30 00 47 13 EE 02 8E 00 71 13 F8 02 97 36 34 36 |0.G.....q....646| 00000A50: 2C 31 3A 43 58 B2 53 58 3A 43 59 B2 53 59 3A 4D |,1:CX.SX:CY.SY:M| 00000A60: 24 B2 53 50 24 28 57 50 29 3A 8D 31 31 38 30 3A |$.SP$(WP):.1180:| 00000A70: 8E 00 8E 13 02 03 81 4A B2 30 A4 33 32 3A 4C 42 |.......J.0.32:LB| 00000A80: 28 4A 2C 30 29 B2 30 3A 82 3A 4E 42 B2 31 00 A4 |(J,0).0:.:NB.1..| 00000A90: 13 0C 03 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 |....198,0:.198,1| 00000AA0: 3A A1 41 24 00 B2 13 16 03 8B 41 24 B2 22 2D 22 |:.A$......A$."-"| 00000AB0: A7 8E 00 D0 13 20 03 8B 41 24 B2 22 2B 22 A7 41 |..... ..A$."+".A| 00000AC0: 24 B2 C4 28 B5 28 BB 28 31 29 AC 38 AA 31 29 29 |$..(.(.(1).8.1))| 00000AD0: 00 ED 13 2A 03 41 B2 C5 28 41 24 29 3A 8B 28 41 |...*.A..(A$):.(A| 00000AE0: B3 31 29 B0 28 41 B1 38 29 A7 37 38 30 00 1D 14 |.1).(A.8).780...| 00000AF0: 34 03 4C 42 28 30 2C 30 29 B2 31 3A 81 4A B2 31 |4.LB(0,0).1:.J.1| 00000B00: A4 33 3A 4C 42 28 30 2C 4A 29 B2 30 3A 82 3A 4C |.3:LB(0,J).0:.:L| 00000B10: 42 28 30 2C 34 29 B2 31 30 AA 41 AC 32 00 26 14 |B(0,4).10.A.2.&.| 00000B20: 3E 03 45 58 B2 31 00 45 14 48 03 81 4A B2 30 A4 |>.EX.1.E.H..J.0.| 00000B30: 33 32 3A 8B 4C 42 28 4A 2C 30 29 A7 45 58 B2 30 |32:.LB(J,0).EX.0| 00000B40: 3A 8D 38 37 30 00 51 14 52 03 82 3A 8B 45 58 A7 |:.870.Q.R..:.EX.| 00000B50: 8E 00 5A 14 5C 03 89 38 33 30 00 95 14 66 03 44 |..Z.\..830...f.D| 00000B60: 59 B2 4C 42 28 4A 2C 30 29 3A 44 58 B2 4C 42 28 |Y.LB(J,0):DX.LB(| 00000B70: 4A 2C 31 29 3A 4C 59 B2 4C 42 28 4A 2C 32 29 3A |J,1):LY.LB(J,2):| 00000B80: 4E 59 B2 4C 42 28 4A 2C 33 29 3A 4E 58 B2 4C 42 |NY.LB(J,3):NX.LB| 00000B90: 28 4A 2C 34 29 00 C1 14 70 03 53 4D B2 31 30 36 |(J,4)...p.SM.106| 00000BA0: 34 AA 4E 58 AA 4C 59 AC 31 36 30 AA 4E 59 AC 34 |4.NX.LY.160.NY.4| 00000BB0: 30 3A 8B 28 4C 59 AA 4E 59 29 A7 97 53 4D 2C 33 |0:.(LY.NY)..SM,3| 00000BC0: 32 00 EC 14 7A 03 4C 42 28 4A 2C 33 29 B2 28 4E |2...z.LB(J,3).(N| 00000BD0: 59 AA 31 29 AF 33 3A 91 4E 59 AA 31 89 39 30 30 |Y.1).3:.NY.1.900| 00000BE0: 2C 39 32 30 2C 39 36 30 2C 39 37 30 00 18 15 84 |,920,960,970....| 00000BF0: 03 8B 4C 59 B1 34 A7 4C 42 28 4A 2C 30 29 B2 30 |..LY.4.LB(J,0).0| 00000C00: 3A 89 31 30 33 30 3A 8F 20 53 43 4F 52 49 4E 47 |:.1030:. SCORING| 00000C10: 20 52 4F 55 54 49 4E 45 00 42 15 8E 03 97 53 4D | ROUTINE.B....SM| 00000C20: AA 34 30 2C 38 31 3A 91 B5 28 BB 28 31 29 AC 33 |.40,81:..(.(1).3| 00000C30: AA 31 29 89 31 30 38 30 2C 31 30 39 30 2C 31 31 |.1).1080,1090,11| 00000C40: 30 30 00 78 15 98 03 56 58 B2 30 3A 8D 31 30 32 |00.x...VX.0:.102| 00000C50: 30 3A 8B 20 53 57 28 57 59 2C 57 58 2C 31 29 B2 |0:. SW(WY,WX,1).| 00000C60: 30 B0 28 53 57 28 57 59 2C 57 58 2C 30 29 B2 53 |0.(SW(WY,WX,0).S| 00000C70: 44 29 B2 30 A7 39 34 30 00 BF 15 A2 03 56 58 B2 |D).0.940.....VX.| 00000C80: 31 AB 32 AC 53 44 3A 4C 42 28 4A 2C 31 29 B2 56 |1.2.SD:LB(J,1).V| 00000C90: 58 3A 4C 42 28 4A 2C 33 29 B2 4E 59 AA 31 3A 4C |X:LB(J,3).NY.1:L| 00000CA0: 42 28 4A 2C 34 29 B2 4E 58 AA 56 58 3A 97 53 4D |B(J,4).NX.VX:.SM| 00000CB0: AA 34 30 AA 56 58 2C 38 31 3A 89 31 31 32 30 00 |.40.VX,81:.1120.| 00000CC0: FD 15 AC 03 8B 20 53 57 28 57 59 2C 57 58 2C 30 |..... SW(WY,WX,0| 00000CD0: 29 B2 53 44 A7 4C 42 28 4A 2C 30 29 B2 30 3A 53 |).SD.LB(J,0).0:S| 00000CE0: 57 28 57 59 2C 57 58 2C 31 29 B2 31 3A 97 20 53 |W(WY,WX,1).1:. S| 00000CF0: 4D AA 34 30 2C 38 31 3A 89 31 31 31 30 00 34 16 |M.40,81:.1110.4.| 00000D00: B6 03 4C 42 28 4A 2C 33 29 B2 4E 59 AA 31 3A 97 |..LB(J,3).NY.1:.| 00000D10: 53 4D AA 34 30 2C 38 31 3A 91 B5 28 BB 28 31 29 |SM.40,81:..(.(1)| 00000D20: AC 33 AA 31 29 89 31 30 38 30 2C 31 30 39 30 2C |.3.1).1080,1090,| 00000D30: 31 31 30 30 00 63 16 C0 03 4C 42 28 4A 2C 31 29 |1100.c...LB(J,1)| 00000D40: B2 30 3A 4C 42 28 4A 2C 34 29 B2 4E 58 AA 44 58 |.0:LB(J,4).NX.DX| 00000D50: 3A 97 53 4D AA 34 30 AA 44 58 2C 38 31 3A 89 31 |:.SM.40.DX,81:.1| 00000D60: 31 33 30 00 9E 16 CA 03 4C 42 28 4A 2C 32 29 B2 |130.....LB(J,2).| 00000D70: 4C 59 AA 31 3A 97 53 4D AA 34 30 2C 38 31 3A 8D |LY.1:.SM.40,81:.| 00000D80: 31 30 32 30 3A 53 57 28 57 59 2C 57 58 2C 30 29 |1020:SW(WY,WX,0)| 00000D90: B2 31 AB 53 57 28 57 59 2C 57 58 2C 30 29 00 B7 |.1.SW(WY,WX,0)..| 00000DA0: 16 D4 03 8B 20 53 57 28 57 59 2C 57 58 2C 31 29 |.... SW(WY,WX,1)| 00000DB0: B2 30 A7 31 30 31 30 00 03 17 DE 03 4C 42 28 4E |.0.1010.....LB(N| 00000DC0: 42 2C 30 29 B2 31 3A 4C 42 28 4E 42 2C 31 29 B2 |B,0).1:LB(NB,1).| 00000DD0: 30 3A 4C 42 28 4E 42 2C 32 29 B2 4C 59 3A 4C 42 |0:LB(NB,2).LY:LB| 00000DE0: 28 4E 42 2C 33 29 B2 30 3A 4C 42 28 4E 42 2C 34 |(NB,3).0:LB(NB,4| 00000DF0: 29 B2 4E 58 AA 32 AB 53 44 AC 34 3A 4E 42 B2 4E |).NX.2.SD.4:NB.N| 00000E00: 42 AA 31 00 2C 17 E8 03 53 57 28 57 59 2C 57 58 |B.1.,...SW(WY,WX| 00000E10: 2C 31 29 B2 30 3A 97 53 4D AB 34 30 AA 32 AB 53 |,1).0:.SM.40.2.S| 00000E20: 44 AC 34 2C 33 32 3A 8D 31 31 34 30 00 64 17 F2 |D.4,32:.1140.d..| 00000E30: 03 53 58 B2 31 32 AB 57 59 AC 32 AA 57 58 AC 34 |.SX.12.WY.2.WX.4| 00000E40: 3A 53 59 B2 34 AA 57 59 AC 34 3A 57 50 B2 53 57 |:SY.4.WY.4:WP.SW| 00000E50: 28 57 59 2C 57 58 2C 30 29 3A 8D 37 36 30 3A 89 |(WY,WX,0):.760:.| 00000E60: 31 31 32 30 00 92 17 FC 03 57 59 B2 4C 59 3A 4A |1120.....WY.LY:J| 00000E70: 58 B2 28 4E 58 AD 32 29 AA 4C 59 AB 36 3A 57 58 |X.(NX.2).LY.6:WX| 00000E80: B2 B5 28 4A 58 AD 32 29 3A 53 44 B2 4A 58 AF 31 |..(JX.2):SD.JX.1| 00000E90: 3A 8E 00 A7 17 06 04 53 46 B2 50 54 28 52 52 2C |:......SF.PT(RR,| 00000EA0: 4E 58 AD 32 AB 31 29 00 C3 17 10 04 53 47 B2 53 |NX.2.1).....SG.S| 00000EB0: 43 28 51 52 2C 52 52 29 AA 53 46 3A 97 36 34 36 |C(QR,RR).SF:.646| 00000EC0: 2C 31 31 00 EA 17 1A 04 54 58 B2 35 AA 33 31 AC |,11.....TX.5.31.| 00000ED0: 51 52 AA 28 53 47 B1 39 29 AA 28 53 47 B1 39 39 |QR.(SG.9).(SG.99| 00000EE0: 29 AA 28 53 47 B1 39 39 39 29 00 04 18 24 04 54 |).(SG.999)...$.T| 00000EF0: 59 B2 31 AA 52 52 3A 41 24 B2 CA 28 C4 28 53 47 |Y.1.RR:A$..(.(SG| 00000F00: 29 2C 32 29 00 33 18 2E 04 43 58 B2 54 58 3A 43 |),2).3...CX.TX:C| 00000F10: 59 B2 54 59 3A 4D 24 B2 41 24 3A 8D 31 31 38 30 |Y.TY:M$.A$:.1180| 00000F20: 3A 53 43 28 51 52 2C 52 52 29 B2 53 47 3A 89 31 |:SC(QR,RR).SG:.1| 00000F30: 31 35 30 00 52 18 38 04 97 4C 42 2C 34 38 3A 97 |150.R.8..LB,48:.| 00000F40: 48 42 2C 34 3A 97 56 2C 33 32 3A 97 56 2C 33 33 |HB,4:.V,32:.V,33| 00000F50: 3A 8E 00 71 18 42 04 97 4C 42 2C 39 37 3A 97 48 |:..q.B..LB,97:.H| 00000F60: 42 2C 38 3A 97 56 2C 33 32 3A 97 56 2C 33 33 3A |B,8:.V,32:.V,33:| 00000F70: 8E 00 91 18 4C 04 97 4C 42 2C 31 35 32 3A 97 48 |....L..LB,152:.H| 00000F80: 42 2C 35 3A 97 56 2C 33 32 3A 97 56 2C 33 33 3A |B,5:.V,32:.V,33:| 00000F90: 8E 00 B7 18 56 04 97 56 2C 33 32 3A 97 56 2C 33 |....V..V,32:.V,3| 00000FA0: 33 3A 81 41 B2 35 30 A4 31 30 A9 AB 31 3A 97 48 |3:.A.50.10..1:.H| 00000FB0: 42 2C 41 3A 82 3A 8E 00 BD 18 60 04 8E 00 E0 18 |B,A:.:....`.....| 00000FC0: 6A 04 97 4C 42 2C 31 35 32 3A 97 48 42 2C 31 30 |j..LB,152:.HB,10| 00000FD0: 3A 97 56 2C 31 32 38 3A 97 56 2C 31 32 39 3A 8E |:.V,128:.V,129:.| 00000FE0: 00 08 19 74 04 97 4C 42 AA 37 2C 30 3A 97 48 42 |...t..LB.7,0:.HB| 00000FF0: AA 37 2C 32 3A 97 56 AA 37 2C 31 32 38 3A 97 56 |.7,2:.V.7,128:.V| 00001000: AA 37 2C 31 32 39 3A 8E 00 42 19 7E 04 97 4C 42 |.7,129:..B.~..LB| 00001010: 2C 31 39 35 3A 97 48 42 2C 31 36 3A 97 4C 42 AA |,195:.HB,16:.LB.| 00001020: 37 2C 31 33 35 3A 97 48 42 AA 37 2C 33 33 3A 97 |7,135:.HB.7,33:.| 00001030: 56 2C 33 32 3A 97 56 2C 33 33 3A 97 56 AA 37 2C |V,32:.V,33:.V.7,| 00001040: 33 32 00 50 19 88 04 97 56 AA 37 2C 33 33 3A 8E |32.P....V.7,33:.| 00001050: 00 63 19 92 04 8F 20 43 48 41 52 20 43 4F 4D 4D |.c.... CHAR COMM| 00001060: 41 4E 44 00 8C 19 9C 04 97 37 38 33 2C 30 3A 97 |AND......783,0:.| 00001070: 37 38 31 2C 43 59 3A 97 37 38 32 2C 43 58 3A 9E |781,CY:.782,CX:.| 00001080: 36 35 35 32 30 3A 99 4D 24 3B 3A 8E 00 00 00 35 |65520:.M$;:....5|
..$.2.. COMPUTE! MAGAZINE MARCH 1986.\.D
..A.54272.54295:.A,0:.:.54296,15:.54277,
24:.54284,26.Y.N.V.54276:LB.54272:HB.LB.
1...X..SW(4,7,1),SP$(1),LB(32,4),AR$(1),
PT(4,16),SC(1,8).....SP$(0)."......":SP$
(1).".....":AR$(0)."<I ...J.":AR$(1).".K
... U>":QR.1.)....53281,15:.53280,15:.64
6,6:TX..(.TI.137).M....J.1.4:.PT(J,0):.
NAME AND GOAL... ..K.1.8:.L:PT(J,K.8).L:
PT(J,9.K).L:.K,J:. POINTS...... 10:. ROU
ND 1 (EQUAL)...... 2,2,2,2,2,2,2,2.Q....
40:. ROUND 2 (FIBONACCI)...H.. 1,2,3,5,
8,13,21,34...R.. 20:. ROUND 3 (ARITHMETI
C). .... 2,3,4,5,6,7,8,9.=.... 80:. ROUN
D 4 (SQUARES).X.... 1,4,9,16,25,36,49,64
.Q....".":."PLAYER 1";P1$......"PLAYER 2
";P2$:P1$.H(P1$,5):P2$.H(P2$,5):.P1$;" V
S ";P2$......"IS THIS CORRECT?":.198,0:.
198,1:.A$:.F(A$)..89.250......450:.610:.
SETUP.)."..RR.1.4:TX.1072.40.RR:.TX,90:
.TX.22,90.I.,..560:. PUT SCORES AT BOTTO
M.Y.6.QR.1.QR:.646,6:TY.QR.20:TX.28.TY:C
X.TX:CY.0...@.M$.I(D(PT(RR,0)),3)."....
":.1180.J.J.TX.8.TY:CX.TX:CY.QR:M$.AR$
(QR):.1180...T..770:.SC(1.QR,RR)..PT(RR,
0).360:. END OF ROUND...^..310.'.H..J.0.
1:.K.5.8:SC(J,K).0:.K,J.B.R..J.0.1:.K.1.
4:GL.PT(K,0):AC.SC(J,K):SC(J,5).SC(J,5).
AC...|.SC(J,6).SC(J,6).(AC..GL).GL:SC(J,
7).SC(J,7).(SC(J,K).SC(1.J,K)):.K,J.Z...
.J.0.1:.K.6.7:SC(J,K).SC(J,K).SC(J,5):.K
,J......J.0.1:.K.5.7:SC(J,8).SC(J,8).SC(
J,K):.K,J.E....646,11:.J.0.1:.K.5.8:Y$.D
(SC(J,K)):L.C(Y$):TX.6.J.31.L.U...TY.3.K
:CX.TX.(TX.20):CY.TY:M$.Y$:.1180:.K,J...
...RR:. END OF MAIN LOOP 60-499.U.....3)
"..............EINDE VAN HET SPEL. NOG E
EN KEER (J/N)...... A$:.A$."".440......
A$."J" . .:..5.... A$.."J" . .".....BEDA
NKT, HET WAS EEN LEUK SPEL":..J.B..".";:
..11);"....";:.J.1.7:."....";:.:."..":LL
.7...L..J.0.4:TX.9.2.J:TY.1.J.4:R$.". ".
..V..K.1.2:CX.TX:CY.TY.K.1:M$."":.1180.R
...." . . ";:.550:.". ":......CX.TX:CY.
TY.K.1:M$."":.1180.'...." .. . ";:.550:.
". .":CX.TX:CY.TY.K:M$."":.1180.N...LL.L
L.2:."....";:.550:.".....";:.J.F....:.".
. ";:.550:.".".....R$."....":LL.LL.1:."
.";:.550:."..".........&..L.1.LL:.R$;:.:
..Q.0..646,11:.J.1.16:K.PT(RR,J):JJ.2.J.
2...:..K.9.L..(K.10):L$.J(D(L),2,1):.590
...D.L$.G(32).@.N.CX.JJ:CY.23:M$.L$:.118
0:CX.JJ:CY.24:M$.I(D(K),1):.1180.I.X..J:
..T.B..J.0.4:SY.4.J.4:.K.0.J.3:SX.12.J.2
.K.4...L.CX.SX.1:CY.SY.1:M$." ":.1180.C.
V.M$." ":CX.SX.1:CY.SY.1:.1180:WP..(.(1)
.2).....SW(J,K,0).WP:SW(J,K,1).0:.760...
...K,J......J.1.8:.1074.J.2,48.J:..4....
J.0.1:BX.J.31:CX.BX:CY.0:M$."":.1180.]..
.."..... ....................";...
...K.1.5:CX.BX:CY.K:M$."":.1180:."......
..":......CX.BX:CY.K:M$."":.1180.W.
F.."..................................".
..P..:.646,4...Z.CX.3.(C(P1$).5):CY.0:M$
.".".P1$.".":.1180.A...CX.34.(C(P2$).5):
CY.0:M$.".".P2$.".":.1180.G.....Q....646
,1:CX.SX:CY.SY:M$.SP$(WP):.1180:.......J
.0.32:LB(J,0).0:.:NB.1......198,0:.198,1
:.A$......A$."-"...P. ..A$."+".A$.D(.(.(
1).8.1))...*.A.E(A$):.(A.1).(A.8).780...
4.LB(0,0).1:.J.1.3:LB(0,J).0:.:LB(0,4).1
0.A.2.&.>.EX.1.E.H..J.0.32:.LB(J,0).EX.0
:.870.Q.R..:.EX...Z.\..830...F.DY.LB(J,0
):DX.LB(J,1):LY.LB(J,2):NY.LB(J,3):NX.LB
(J,4).A.P.SM.1064.NX.LY.160.NY.40:.(LY.N
Y)..SM,32...Z.LB(J,3).(NY.1).3:.NY.1.900
,920,960,970......LY.4.LB(J,0).0:.1030:.
SCORING ROUTINE.B....SM.40,81:..(.(1).3
.1).1080,1090,1100.X...VX.0:.1020:. SW(W
Y,WX,1).0.(SW(WY,WX,0).SD).0.940.....VX.
1.2.SD:LB(J,1).VX:LB(J,3).NY.1:LB(J,4).N
X.VX:.SM.40.VX,81:.1120...... SW(WY,WX,0
).SD.LB(J,0).0:SW(WY,WX,1).1:. SM.40,81:
.1110.4...LB(J,3).NY.1:.SM.40,81:..(.(1)
.3.1).1080,1090,1100.C...LB(J,1).0:LB(J,
4).NX.DX:.SM.40.DX,81:.1130...J.LB(J,2).
LY.1:.SM.40,81:.1020:SW(WY,WX,0).1.SW(WY
,WX,0)...T.. SW(WY,WX,1).0.1010.....LB(N
B,0).1:LB(NB,1).0:LB(NB,2).LY:LB(NB,3).0
:LB(NB,4).NX.2.SD.4:NB.NB.1.,...SW(WY,WX
,1).0:.SM.40.2.SD.4,32:.1140.D...SX.12.W
Y.2.WX.4:SY.4.WY.4:WP.SW(WY,WX,0):.760:.
1120.....WY.LY:JX.(NX.2).LY.6:WX..(JX.2)
:SD.JX.1:......SF.PT(RR,NX.2.1).C...SG.S
C(QR,RR).SF:.646,11.....TX.5.31.QR.(SG.9
).(SG.99).(SG.999)...$.TY.1.RR:A$.J(D(SG
),2).3...CX.TX:CY.TY:M$.A$:.1180:SC(QR,R
R).SG:.1150.R.8..LB,48:.HB,4:.V,32:.V,33
:..Q.B..LB,97:.HB,8:.V,32:.V,33:....L..L
B,152:.HB,5:.V,32:.V,33:....V..V,32:.V,3
3:.A.50.10..1:.HB,A:.:....`.....J..LB,15
2:.HB,10:.V,128:.V,129:....T..LB.7,0:.HB
.7,2:.V.7,128:.V.7,129:..B.~..LB,195:.HB
,16:.LB.7,135:.HB.7,33:.V,32:.V,33:.V.7,
32.P....V.7,33:..C.... CHAR COMMAND.....
.783,0:.781,CY:.782,CX:.65520:.M$;:....5
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL