THINKING
FILE INFORMATION
FILENAME(S): THINKING
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-11-30 21:14:08
APPEARS ON: 1 disk(s)
FILE HASH
69cbe42f082c00786b044b5a8f70912cadc5dd721afc4abedd4ba010add154f8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAMES 3 B | THINKING | PRG | DuncanTwain | 34 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 41 08 01 00 99 22 93 22 3A 97 35 33 32 38 |..A....".":.5328|
00000010: 31 2C 31 3A 99 22 11 11 11 11 11 11 11 11 11 11 |1,1:."..........|
00000020: 22 A3 31 35 29 22 90 12 54 48 49 4E 4B 49 4E 47 |".15)"..THINKING|
00000030: 92 22 3A 47 B2 36 3A 42 31 B2 32 3A 42 32 B2 31 |.":G.6:B1.2:B2.1|
00000040: 37 00 70 08 02 00 8F 20 50 52 49 4E 54 22 11 22 |7.p.... PRINT"."|
00000050: 54 41 42 28 31 36 29 22 12 48 41 52 44 45 52 92 |TAB(16)".HARDER.|
00000060: 22 3A 47 3D 39 3A 42 31 3D 33 3A 42 32 3D 32 36 |":G=9:B1=3:B2=26|
00000070: 00 AD 08 03 00 42 4F B2 35 33 32 38 30 3A 53 43 |.....BO.53280:SC|
00000080: B2 35 33 32 38 31 3A 58 B2 BB 28 30 29 3A 81 50 |.53281:X..(0):.P|
00000090: B2 31 A4 32 30 30 30 3A 82 3A 8D 32 30 30 31 3A |.1.2000:.:.2001:|
000000A0: 47 24 B2 C4 28 47 29 3A 89 31 30 30 35 00 E6 08 |G$..(G):.1005...|
000000B0: 06 00 99 22 93 22 3A 97 42 4F 2C 31 34 3A 97 53 |...".":.BO,14:.S|
000000C0: 43 2C 31 33 3A 99 22 11 11 11 11 11 11 11 11 11 |C,13:.".........|
000000D0: 11 22 A3 31 34 29 22 1E 54 48 49 4E 4B 49 4E 47 |.".14)".THINKING|
000000E0: 2E 2E 2E 2E 2E 22 00 1D 09 07 00 4F B2 35 34 32 |.....".....O.542|
000000F0: 37 32 3A 81 54 B2 4F A4 4F AA 32 34 3A 97 54 2C |72:.T.O.O.24:.T,|
00000100: 30 3A 82 3A 97 4F AA 32 34 2C 31 35 3A 97 4F AA |0:.:.O.24,15:.O.|
00000110: 35 2C 31 37 3A 97 4F AA 36 2C 31 36 37 00 4D 09 |5,17:.O.6,167.M.|
00000120: 0A 00 81 4E B2 31 A4 47 3A 43 48 25 28 4E 29 B2 |...N.1.G:CH%(N).|
00000130: 30 3A 82 3A 81 4E B2 31 A4 39 3A 43 25 28 4E 29 |0:.:.N.1.9:C%(N)|
00000140: B2 30 3A 82 3A 43 4F B2 30 3A 51 B2 30 00 58 09 |.0:.:CO.0:Q.0.X.|
00000150: 0C 00 81 4E B2 31 A4 47 00 78 09 0D 00 5A B2 B5 |...N.1.G.x...Z..|
00000160: 28 BB 28 31 29 AC 47 29 AA 31 3A 8B 43 48 25 28 |(.(1).G).1:.CH%(|
00000170: 5A 29 B3 B1 30 A7 31 33 00 87 09 0E 00 43 48 25 |Z)..0.13.....CH%|
00000180: 28 5A 29 B2 4E 3A 82 00 93 09 19 00 81 42 B2 31 |(Z).N:.......B.1|
00000190: A4 42 31 00 9E 09 1E 00 81 4E B2 31 A4 39 00 BD |.B1......N.1.9..|
000001A0: 09 20 00 5A B2 B5 28 BB 28 31 29 AC 39 29 AA 31 |. .Z..(.(1).9).1|
000001B0: 3A 8B 5A 25 28 5A 29 B3 B1 30 A7 33 32 00 CB 09 |:.Z%(Z)..0.32...|
000001C0: 22 00 5A 25 28 5A 29 B2 4E 3A 82 00 FE 09 24 00 |".Z%(Z).N:....$.|
000001D0: 81 4E B2 31 A4 39 3A 58 B2 5A 25 28 4E 29 3A 58 |.N.1.9:X.Z%(N):X|
000001E0: 24 B2 C9 28 28 C4 28 58 29 29 2C 31 29 3A 50 24 |$..((.(X)),1):P$|
000001F0: 28 42 29 B2 50 24 28 42 29 AA 58 24 3A 82 00 13 |(B).P$(B).X$:...|
00000200: 0A 26 00 81 4E B2 31 A4 39 3A 5A 25 28 4E 29 B2 |.&..N.1.9:Z%(N).|
00000210: 30 3A 82 00 1A 0A 28 00 82 42 00 47 0A 32 00 50 |0:....(..B.G.2.P|
00000220: 24 B2 50 24 28 31 29 AA 50 24 28 32 29 3A 8B 47 |$.P$(1).P$(2):.G|
00000230: B2 39 A7 50 24 B2 50 24 28 31 29 AA 50 24 28 32 |.9.P$.P$(1).P$(2|
00000240: 29 AA 50 24 28 33 29 00 57 0A 64 00 99 22 93 22 |).P$(3).W.d.."."|
00000250: 3A 97 53 43 2C 31 35 00 65 0A 69 00 81 4E B2 31 |:.SC,15.e.i..N.1|
00000260: A4 42 32 A9 33 00 82 0A 6E 00 50 24 28 B5 28 4E |.B2.3...n.P$(.(N|
00000270: AD 33 29 AA 31 29 B2 CA 28 50 24 2C 4E 2C 33 29 |.3).1)..(P$,N,3)|
00000280: 3A 82 00 9F 0A 70 00 8C 3A 81 4E B2 31 A4 39 3A |:....p..:.N.1.9:|
00000290: 87 53 51 25 28 4E 29 3A 82 3A 8D 33 30 30 30 00 |.SQ%(N):.:.3000.|
000002A0: D1 0A 71 00 83 31 34 30 30 2C 31 34 30 32 2C 31 |..q..1400,1402,1|
000002B0: 34 30 34 2C 31 34 38 30 2C 31 34 38 32 2C 31 34 |404,1480,1482,14|
000002C0: 38 34 2C 31 35 36 30 2C 31 35 36 32 2C 31 35 36 |84,1560,1562,156|
000002D0: 34 00 0E 0B 72 00 81 4E B2 31 A4 39 3A 97 53 51 |4...r..N.1.9:.SQ|
000002E0: 25 28 4E 29 2C 4E AA 31 32 38 3A 97 53 51 25 28 |%(N),N.128:.SQ%(|
000002F0: 4E 29 AA 4F 2C 43 25 28 4E 29 3A 82 3A 97 4F AA |N).O,C%(N):.:.O.|
00000300: 34 2C 31 37 3A 81 54 B2 35 30 A4 31 30 30 00 40 |4,17:.T.50.100.@|
00000310: 0B 73 00 97 4F 2C 54 3A 97 4F AA 31 2C 54 3A 82 |.s..O,T:.O.1,T:.|
00000320: 3A 97 4F AA 34 2C 31 36 3A 81 4E B2 31 A4 39 3A |:.O.4,16:.N.1.9:|
00000330: 8B 43 25 28 4E 29 B2 34 A7 43 4F B2 43 4F AA 31 |.C%(N).4.CO.CO.1|
00000340: 00 77 0B 74 00 82 3A 99 22 13 11 11 11 11 11 11 |.w.t..:.".......|
00000350: 11 11 11 11 11 11 11 11 11 11 11 11 11 1D 1D 1D |................|
00000360: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 9C 50 55 52 50 4C |...........PURPL|
00000370: 45 53 3A 90 22 43 4F 00 85 0B 75 00 8B 43 4F B2 |ES:."CO...u..CO.|
00000380: 39 A7 32 30 35 00 94 0B 76 00 43 4F B2 30 3A 51 |9.205...v.CO.0:Q|
00000390: B2 51 AA 31 00 A4 0B 82 00 99 22 13 12 1C 54 55 |.Q.1......"...TU|
000003A0: 52 4E 22 51 00 E0 0B 84 00 85 22 13 11 11 11 11 |RN"Q......".....|
000003B0: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1F 59 4F 55 52 |............YOUR|
000003C0: 20 4E 55 4D 42 45 52 28 31 20 2D 20 36 29 20 20 | NUMBER(1 - 6) |
000003D0: 20 20 20 20 20 9D 9D 9D 9D 9D 9D 22 3B 53 45 24 | ......";SE$|
000003E0: 00 01 0C 87 00 53 45 B2 C5 28 53 45 24 29 3A 8B |.....SE..(SE$):.|
000003F0: 28 53 45 B1 47 29 B0 28 53 45 B3 31 29 A7 31 33 |(SE.G).(SE.1).13|
00000400: 32 00 10 0C 88 00 53 45 B2 43 48 25 28 53 45 29 |2.....SE.CH%(SE)|
00000410: 00 1B 0C 8C 00 81 4E B2 31 A4 33 00 32 0C 96 00 |......N.1.3.2...|
00000420: 57 B2 C5 28 CA 28 50 24 28 53 45 29 2C 4E 2C 31 |W..(.(P$(SE),N,1|
00000430: 29 29 00 4C 0C A0 00 8B 43 25 28 57 29 B2 30 A7 |)).L....C%(W).0.|
00000440: 43 25 28 57 29 B2 34 3A 89 31 38 30 00 61 0C AA |C%(W).4:.180.a..|
00000450: 00 8B 43 25 28 57 29 B2 34 A7 43 25 28 57 29 B2 |..C%(W).4.C%(W).|
00000460: 30 00 68 0C B4 00 82 4E 00 71 0C BC 00 89 31 31 |0.h....N.q....11|
00000470: 34 00 7B 0C C8 00 8F 20 57 49 4E 00 87 0C CD 00 |4.{.... WIN.....|
00000480: 81 4E B2 31 A4 35 30 00 B4 0C D2 00 97 4F AA 34 |.N.1.50......O.4|
00000490: 2C 31 37 3A 59 54 B2 B5 28 BB 28 31 29 AC 31 30 |,17:YT..(.(1).10|
000004A0: 30 29 AA 31 35 30 3A 97 4F AA 31 2C 59 54 3A 97 |0).150:.O.1,YT:.|
000004B0: 4F 2C 59 54 00 D2 0C D4 00 97 53 43 2C 59 54 3A |O,YT......SC,YT:|
000004C0: 97 42 4F 2C 59 54 AA 31 3A 82 3A 97 4F AA 34 2C |.BO,YT.1:.:.O.4,|
000004D0: 31 36 00 06 0D D7 00 99 22 93 22 3A 97 53 43 2C |16......".":.SC,|
000004E0: 34 3A 97 42 4F 2C 32 3A 99 22 11 11 11 11 11 11 |4:.BO,2:."......|
000004F0: 11 22 A3 31 33 29 22 90 54 48 41 54 27 53 20 49 |.".13)".THAT'S I|
00000500: 54 21 21 21 21 22 00 28 0D D9 00 99 22 11 11 11 |T!!!!".(...."...|
00000510: 22 A3 31 31 29 22 59 4F 55 20 54 4F 4F 4B 22 51 |".11)"YOU TOOK"Q|
00000520: 22 54 55 52 4E 53 2E 22 00 4A 0D DC 00 99 22 11 |"TURNS.".J....".|
00000530: 22 A3 31 30 29 22 57 41 4E 54 20 41 4E 4F 54 48 |".10)"WANT ANOTH|
00000540: 45 52 20 28 59 2F 4E 29 3F 22 00 5C 0D E1 00 A1 |ER (Y/N)?".\....|
00000550: 41 24 3A 8B 41 24 B2 22 59 22 A7 36 00 6E 0D E6 |A$:.A$."Y".6.n..|
00000560: 00 8B 41 24 B2 22 4E 22 A7 9E 32 30 34 38 00 77 |..A$."N"..2048.w|
00000570: 0D EB 00 89 32 32 35 00 8A 0D E8 03 8F 20 49 4E |....225...... IN|
00000580: 53 54 52 55 43 54 49 4F 4E 53 00 BD 0D ED 03 99 |STRUCTIONS......|
00000590: 22 93 11 20 90 59 4F 55 20 57 49 4C 4C 20 53 45 |".. .YOU WILL SE|
000005A0: 45 20 39 20 42 4C 41 43 4B 20 42 4C 4F 43 4B 53 |E 9 BLACK BLOCKS|
000005B0: 2E 20 42 59 20 45 4E 54 45 52 2D 11 22 00 ED 0D |. BY ENTER-."...|
000005C0: F2 03 99 22 20 49 4E 47 20 41 20 4E 55 4D 42 45 |..." ING A NUMBE|
000005D0: 52 20 42 45 54 57 45 45 4E 20 31 20 41 4E 44 22 |R BETWEEN 1 AND"|
000005E0: 47 24 22 2C 20 59 4F 55 20 43 41 4E 22 00 19 0E |G$", YOU CAN"...|
000005F0: F3 03 99 22 11 20 43 48 41 4E 47 45 20 53 4F 4D |...". CHANGE SOM|
00000600: 45 20 4F 46 20 54 48 45 4D 20 54 4F 20 9C 50 55 |E OF THEM TO .PU|
00000610: 52 50 4C 45 90 2E 11 11 22 00 4A 0E F4 03 99 22 |RPLE....".J...."|
00000620: 1C 20 42 55 54 2C 20 53 4F 4D 45 20 9C 50 55 52 |. BUT, SOME .PUR|
00000630: 50 4C 45 1C 20 4F 4E 45 53 20 4D 49 47 48 54 20 |PLE. ONES MIGHT |
00000640: 54 55 52 4E 20 42 41 43 4B 22 00 5F 0E F6 03 99 |TURN BACK"._....|
00000650: 22 11 20 54 4F 20 90 42 4C 41 43 4B 1C 21 22 00 |". TO .BLACK.!".|
00000660: 90 0E F7 03 99 22 11 11 1F 20 45 41 43 48 20 4E |....."... EACH N|
00000670: 55 4D 42 45 52 20 59 4F 55 20 45 4E 54 45 52 20 |UMBER YOU ENTER |
00000680: 57 49 4C 4C 20 43 48 41 4E 47 45 20 54 48 45 22 |WILL CHANGE THE"|
00000690: 00 B0 0E F9 03 99 22 11 20 43 4F 4C 4F 52 53 20 |......". COLORS |
000006A0: 49 4E 20 49 54 53 20 4F 57 4E 20 57 41 59 2E 22 |IN ITS OWN WAY."|
000006B0: 00 E3 0E 01 04 99 22 11 11 1E 20 54 52 59 20 54 |......"... TRY T|
000006C0: 4F 20 43 48 41 4E 47 45 20 41 4C 4C 20 54 48 45 |O CHANGE ALL THE|
000006D0: 20 42 4C 4F 43 4B 53 20 54 4F 20 9C 50 55 52 50 | BLOCKS TO .PURP|
000006E0: 4C 45 1E 00 11 0F 06 04 99 22 11 20 49 4E 20 41 |LE.......". IN A|
000006F0: 53 20 46 45 57 20 54 52 49 45 53 20 41 53 20 59 |S FEW TRIES AS Y|
00000700: 4F 55 20 43 41 4E 2E 22 3A 8D 32 30 30 30 3A 89 |OU CAN.":.2000:.|
00000710: 36 00 24 0F D0 07 8F 20 47 45 54 20 4B 45 59 50 |6.$.... GET KEYP|
00000720: 52 45 53 53 00 59 0F D1 07 99 22 13 11 11 11 11 |RESS.Y....".....|
00000730: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000740: 11 11 11 22 A3 31 34 29 22 12 1F 54 4F 55 43 48 |...".14)"..TOUCH|
00000750: 20 41 20 4B 45 59 92 22 3B 00 64 0F D2 07 97 31 | A KEY.";.d....1|
00000760: 39 38 2C 30 00 78 0F D5 07 A1 41 24 3A 8B 41 24 |98,0.x....A$:.A$|
00000770: B2 22 22 A7 32 30 30 35 00 7E 0F DA 07 8E 00 9B |."".2005.~......|
00000780: 0F B8 0B 99 22 11 11 11 11 11 11 11 22 A3 31 35 |....".......".15|
00000790: 29 22 05 B0 C3 B2 C3 B2 C3 AE 22 00 AE 0F C2 0B |)"........".....|
000007A0: 99 A3 31 35 29 22 C2 20 C2 20 C2 20 C2 22 00 C1 |..15)". . . ."..|
000007B0: 0F CC 0B 99 A3 31 35 29 22 AB C3 DB C3 DB C3 B3 |.....15)".......|
000007C0: 22 00 D4 0F D6 0B 99 A3 31 35 29 22 C2 20 C2 20 |".......15)". . |
000007D0: C2 20 C2 22 00 E7 0F E0 0B 99 A3 31 35 29 22 AB |. .".......15)".|
000007E0: C3 DB C3 DB C3 B3 22 00 FA 0F EA 0B 99 A3 31 35 |......".......15|
000007F0: 29 22 C2 20 C2 20 C2 20 C2 22 00 0D 10 F4 0B 99 |)". . . ."......|
00000800: A3 31 35 29 22 AD C3 B1 C3 B1 C3 BD 22 00 13 10 |.15)"......."...|
00000810: FE 0B 8E 00 00 00 43 04 00 FF |......C... |
..A....".":.53281,1:."..........".15)"..
THINKING.":G.6:B1.2:B2.17.P.... PRINT"."
TAB(16)".HARDER.":G=9:B1=3:B2=26.....BO.
53280:SC.53281:X..(0):.P.1.2000:.:.2001:
G$.D(G):.1005......".":.BO,14:.SC,13:.".
.........".14)".THINKING.....".....O.542
72:.T.O.O.24:.T,0:.:.O.24,15:.O.5,17:.O.
6,167.M....N.1.G:CH%(N).0:.:.N.1.9:C%(N)
.0:.:CO.0:Q.0.X....N.1.G.X...Z..(.(1).G)
.1:.CH%(Z)..0.13.....CH%(Z).N:.......B.1
.B1......N.1.9... .Z..(.(1).9).1:.Z%(Z).
.0.32.K.".Z%(Z).N:....$..N.1.9:X.Z%(N):X
$.I((D(X)),1):P$(B).P$(B).X$:....&..N.1.
9:Z%(N).0:....(..B.G.2.P$.P$(1).P$(2):.G
.9.P$.P$(1).P$(2).P$(3).W.D..".":.SC,15.
E.I..N.1.B2.3...N.P$(.(N.3).1).J(P$,N,3)
:....P..:.N.1.9:.SQ%(N):.:.3000.Q.Q..140
0,1402,1404,1480,1482,1484,1560,1562,156
4...R..N.1.9:.SQ%(N),N.128:.SQ%(N).O,C%(
N):.:.O.4,17:.T.50.100.@.S..O,T:.O.1,T:.
:.O.4,16:.N.1.9:.C%(N).4.CO.CO.1.W.T..:.
"..................................PURPL
ES:."CO...U..CO.9.205...V.CO.0:Q.Q.1....
.."...TURN"Q......".................YOUR
NUMBER(1 - 6) ......";SE$.....SE.
E(SE$):.(SE.G).(SE.1).132.....SE.CH%(SE)
......N.1.3.2...W.E(J(P$(SE),N,1)).L. ..
C%(W).0.C%(W).4:.180.A....C%(W).4.C%(W).
0.H....N.Q....114.{.H.. WIN...M..N.1.50.
..R..O.4,17:YT..(.(1).100).150:.O.1,YT:.
O,YT.R.T..SC,YT:.BO,YT.1:.:.O.4,16...W..
".":.SC,4:.BO,2:.".......".13)".THAT'S I
T!!!!".(.Y.."...".11)"YOU TOOK"Q"TURNS."
.J....".".10)"WANT ANOTHER (Y/N)?".\....
A$:.A$."Y".6.N....A$."N"..2048.W....225.
..... INSTRUCTIONS......".. .YOU WILL SE
E 9 BLACK BLOCKS. BY ENTER-."......" ING
A NUMBER BETWEEN 1 AND"G$", YOU CAN"...
...". CHANGE SOME OF THEM TO .PURPLE....
".J....". BUT, SOME .PURPLE. ONES MIGHT
TURN BACK"._....". TO .BLACK.!"......"..
. EACH NUMBER YOU ENTER WILL CHANGE THE"
......". COLORS IN ITS OWN WAY."......".
.. TRY TO CHANGE ALL THE BLOCKS TO .PURP
LE.......". IN AS FEW TRIES AS YOU CAN."
:.2000:.6.$.P.. GET KEYPRESS.Y.Q..".....
...................".14)"..TOUCH A KEY."
;.D.R..198,0.X.U..A$:.A$."".2005.~.Z....
....".......".15)"..C.C.C."...B...15)"B
B B B".A.L...15)".C.C.C.".T.V...15)"B B
B B".......15)".C.C.C.".......15)"B B B
B".......15)".C.C.C.".........C...
> CLICK IMAGE PREVIEW FOR FULL MODAL