DECODE
FILE INFORMATION
FILENAME(S): DECODE
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-11-30 21:29:06
APPEARS ON: 1 disk(s)
FILE HASH
356d40a4e1e85e09ce845d8bca3ed16f11c12735c8aeb9ff39d1f99f91979dd1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TIGA | DECODE | PRG | DuncanTwain | 32 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0F 08 64 00 8F 3A 20 44 45 43 4F 44 45 00 |....d..: DECODE.| 00000010: 25 08 6E 00 8F 3A 20 43 4F 50 59 52 49 47 48 54 |%.n..: COPYRIGHT| 00000020: 20 31 39 38 33 00 47 08 6F 00 8F 3A 20 50 48 49 | 1983.G.o..: PHI| 00000030: 4C 20 46 45 4C 44 4D 41 4E 2C 20 54 4F 4D 20 52 |L FELDMAN, TOM R| 00000040: 55 47 47 2C 20 45 4E 00 64 08 70 00 8F 3A 20 57 |UGG, EN.d.p..: W| 00000050: 45 53 54 45 52 4E 20 53 59 53 54 45 4D 53 20 47 |ESTERN SYSTEMS G| 00000060: 52 4F 55 50 00 8B 08 71 00 8F 3A 20 4E 45 44 45 |ROUP...q..: NEDE| 00000070: 52 4C 41 4E 44 53 45 20 56 45 52 54 41 4C 49 4E |RLANDSE VERTALIN| 00000080: 47 20 31 39 38 34 20 44 4F 4F 52 00 B5 08 72 00 |G 1984 DOOR...r.| 00000090: 8F 3A 20 4B 41 52 49 4E 20 4B 41 50 54 45 49 4E |.: KARIN KAPTEIN| 000000A0: 20 56 4F 4F 52 20 44 45 4C 46 49 41 20 50 52 45 | VOOR DELFIA PRE| 000000B0: 53 53 20 42 56 00 C6 08 78 00 44 B2 36 3A 50 B2 |SS BV...x.D.6:P.| 000000C0: 34 3A 4C B2 31 32 00 E6 08 82 00 86 20 47 24 28 |4:L.12...... G$(| 000000D0: 4C 29 2C 47 28 50 29 2C 43 28 50 29 2C 42 28 4C |L),G(P),C(P),B(L| 000000E0: 29 2C 57 28 4C 29 00 F3 08 8C 00 52 B2 BB 28 AB |),W(L).....R..(.| 000000F0: 54 49 29 00 FE 08 96 00 8D 20 31 32 30 30 00 0E |TI)...... 1200..| 00000100: 09 AA 00 8D 20 33 30 30 3A 8D 20 33 37 30 00 26 |.... 300:. 370.&| 00000110: 09 B4 00 99 22 50 4F 47 49 4E 47 20 4E 55 4D 4D |...."POGING NUMM| 00000120: 45 52 22 3B 47 3B 00 2F 09 BE 00 85 20 41 24 00 |ER";G;./.... A$.| 00000130: 47 09 C8 00 8B 20 C8 28 41 24 2C 31 29 B2 22 53 |G.... .(A$,1)."S| 00000140: 22 20 A7 20 35 30 30 00 5F 09 D2 00 8B 20 C8 28 |" . 500._.... .(| 00000150: 41 24 2C 31 29 B2 22 51 22 20 A7 20 36 30 30 00 |A$,1)."Q" . 600.| 00000160: 69 09 DC 00 8D 20 37 30 30 00 73 09 E6 00 8D 20 |i.... 700.s.... | 00000170: 38 30 30 00 7E 09 F0 00 8D 20 31 30 30 30 00 92 |800.~.... 1000..| 00000180: 09 FA 00 8B 20 42 28 47 29 B2 50 20 A7 20 32 30 |.... B(G).P . 20| 00000190: 30 30 00 9F 09 04 01 47 24 28 47 29 B2 41 24 00 |00.....G$(G).A$.| 000001A0: B6 09 0E 01 47 B2 47 AA 31 3A 8B 20 47 B1 4C 20 |....G.G.1:. G.L | 000001B0: A7 20 32 32 30 30 00 C0 09 18 01 89 20 31 38 30 |. 2200...... 180| 000001C0: 00 CE 09 2C 01 47 B2 31 3A 43 24 B2 22 22 00 D4 |...,.G.1:C$.""..| 000001D0: 09 36 01 8E 00 E4 09 72 01 81 20 4A 20 B2 20 31 |.6.....r.. J . 1| 000001E0: 20 A4 20 50 00 F6 09 7C 01 52 B2 B5 28 44 AC BB | . P...|.R..(D..| 000001F0: 28 31 29 29 AA 31 00 0C 0A 86 01 43 24 B2 43 24 |(1)).1.....C$.C$| 00000200: AA CA 28 C4 28 52 29 2C 32 2C 31 29 00 14 0A 90 |..(.(R),2,1)....| 00000210: 01 82 20 4A 00 3D 0A 9A 01 99 22 49 4B 20 48 45 |.. J.=...."IK HE| 00000220: 42 20 4D 49 4A 4E 20 47 45 48 45 49 4D 45 20 43 |B MIJN GEHEIME C| 00000230: 4F 44 45 20 47 45 4B 4F 5A 45 4E 2E 22 00 43 0A |ODE GEKOZEN.".C.| 00000240: A4 01 99 00 49 0A AE 01 8E 00 70 0A F4 01 8B 20 |....I.....p.... | 00000250: 47 B2 31 20 A7 20 99 22 4E 4F 47 20 47 45 45 4E |G.1 . ."NOG GEEN| 00000260: 20 50 4F 47 49 4E 47 45 4E 22 3A 89 20 31 38 30 | POGINGEN":. 180| 00000270: 00 8B 0A FE 01 99 20 C7 28 31 34 37 29 2C 22 4F |...... .(147),"O| 00000280: 56 45 52 5A 49 43 48 54 22 3A 99 00 AD 0A 08 02 |VERZICHT":......| 00000290: 99 22 41 41 4E 54 41 4C 20 50 4F 47 49 4E 47 20 |."AANTAL POGING | 000002A0: 20 5A 57 41 52 54 20 20 20 57 49 54 22 00 BF 0A | ZWART WIT"...| 000002B0: 12 02 99 3A 81 20 4A B2 31 20 A4 20 47 AB 31 00 |...:. J.1 . G.1.| 000002C0: E5 0A 1C 02 99 20 4A 3B A3 37 29 3B 47 24 28 4A |..... J;.7);G$(J| 000002D0: 29 3B A3 31 36 29 3B 42 28 4A 29 3B A3 32 34 29 |);.16);B(J);.24)| 000002E0: 3B 57 28 4A 29 00 F4 0A 26 02 8B 20 47 B3 31 30 |;W(J)...&.. G.10| 000002F0: 20 A7 20 99 00 FC 0A 30 02 82 3A 99 00 06 0B 3A | . ....0..:....:| 00000300: 02 89 20 31 38 30 00 0C 0B 58 02 99 00 35 0B 62 |.. 180...X...5.b| 00000310: 02 99 20 22 55 20 4B 55 4E 54 20 45 52 20 4E 49 |.. "U KUNT ER NI| 00000320: 45 54 20 41 43 48 54 45 52 20 4B 4F 4D 45 4E 2C |ET ACHTER KOMEN,| 00000330: 20 48 45 3F 22 00 4E 0B 6C 02 99 3A 99 22 4D 49 | HE?".N.l..:."MI| 00000340: 4A 4E 20 43 4F 44 45 20 57 41 53 20 22 3B 00 5E |JN CODE WAS ";.^| 00000350: 0B 76 02 81 20 4A 20 B2 20 31 20 A4 20 34 00 6A |.v.. J . 1 . 4.j| 00000360: 0B 80 02 99 20 22 20 2E 22 3B 00 7E 0B 8A 02 81 |.... " .";.~....| 00000370: 20 4B 20 B2 20 31 20 A4 20 39 30 30 3A 82 00 89 | K . 1 . 900:...| 00000380: 0B 94 02 99 20 43 24 3A 99 00 94 0B A8 02 89 20 |.... C$:....... | 00000390: 32 30 39 30 00 A9 0B BC 02 8B 20 C3 28 41 24 29 |2090...... .(A$)| 000003A0: B3 B1 50 20 A7 20 37 38 30 00 B7 0B C6 02 81 20 |..P . 780...... | 000003B0: 4A B2 31 20 A4 20 50 00 CA 0B D0 02 52 B2 C5 28 |J.1 . P.....R..(| 000003C0: CA 28 41 24 2C 4A 2C 31 29 29 00 E0 0B DA 02 8B |.(A$,J,1))......| 000003D0: 20 52 B3 31 20 B0 20 52 B1 44 20 A7 20 37 38 30 | R.1 . R.D . 780| 000003E0: 00 E6 0B E4 02 82 00 EC 0B EE 02 8E 00 1A 0C 0C |................| 000003F0: 03 99 22 4E 49 45 54 20 54 4F 45 47 45 53 54 41 |.."NIET TOEGESTA| 00000400: 41 4E 2E 20 50 52 4F 42 45 45 52 20 48 45 54 20 |AN. PROBEER HET | 00000410: 4E 4F 47 20 45 45 4E 53 2E 22 00 24 0C 16 03 89 |NOG EENS.".$....| 00000420: 20 31 38 30 00 30 0C 20 03 42 B2 30 3A 57 B2 30 | 180.0. .B.0:W.0| 00000430: 00 3E 0C 2A 03 81 20 4A B2 31 20 A4 20 50 00 54 |.>.*.. J.1 . P.T| 00000440: 0C 34 03 47 28 4A 29 B2 C5 28 CA 28 41 24 2C 4A |.4.G(J)..(.(A$,J| 00000450: 2C 31 29 29 00 6A 0C 3E 03 43 28 4A 29 B2 C5 28 |,1)).j.>.C(J)..(| 00000460: CA 28 43 24 2C 4A 2C 31 29 29 00 90 0C 48 03 8B |.(C$,J,1))...H..| 00000470: 20 47 28 4A 29 B2 43 28 4A 29 20 A7 20 42 B2 42 | G(J).C(J) . B.B| 00000480: AA 31 3A 47 28 4A 29 B2 30 3A 43 28 4A 29 B2 30 |.1:G(J).0:C(J).0| 00000490: 00 96 0C 52 03 82 00 B3 0C 5C 03 81 20 4A B2 31 |...R.....\.. J.1| 000004A0: 20 A4 20 50 3A 8B 20 43 28 4A 29 B2 30 20 A7 20 | . P:. C(J).0 . | 000004B0: 39 32 30 00 C5 0C 66 03 48 B2 30 3A 81 20 4B B2 |920...f.H.0:. K.| 000004C0: 31 20 A4 20 50 00 D8 0C 70 03 8B 20 43 28 4A 29 |1 . P...p.. C(J)| 000004D0: B2 30 20 A7 20 39 31 30 00 EF 0C 7A 03 8B 20 43 |.0 . 910...z.. C| 000004E0: 28 4A 29 B3 B1 47 28 4B 29 20 A7 20 39 31 30 00 |(J)..G(K) . 910.| 000004F0: 05 0D 84 03 48 B2 31 3A 47 28 4B 29 B2 30 3A 43 |....H.1:G(K).0:C| 00000500: 28 4A 29 B2 30 00 13 0D 8E 03 82 20 4B 3A 57 B2 |(J).0...... K:W.| 00000510: 57 AA 48 00 1B 0D 98 03 82 20 4A 00 21 0D A2 03 |W.H...... J.!...| 00000520: 8E 00 35 0D E8 03 42 28 47 29 B2 42 3A 57 28 47 |..5...B(G).B:W(G| 00000530: 29 B2 57 3A 99 00 5C 0D F2 03 99 22 50 4F 47 49 |).W:..\...."POGI| 00000540: 4E 47 20 4E 55 4D 4D 45 52 22 3B 47 3B 22 2D 2D |NG NUMMER";G;"--| 00000550: 20 5A 57 41 52 54 20 3D 22 3B 42 3B 00 6C 0D F7 | ZWART =";B;.l..| 00000560: 03 99 22 20 57 49 54 20 3D 22 3B 57 00 74 0D FC |.." WIT =";W.t..| 00000570: 03 99 3A 8E 00 82 0D B0 04 99 20 C7 28 31 34 37 |..:....... .(147| 00000580: 29 3B 00 A5 0D BA 04 99 20 22 20 20 20 20 20 20 |);...... " | 00000590: 20 20 20 20 2A 2A 2A 2A 20 44 45 43 4F 44 45 20 | **** DECODE | 000005A0: 2A 2A 2A 2A 22 00 AD 0D C4 04 99 3A 99 00 DB 0D |****"......:....| 000005B0: CE 04 99 22 50 52 4F 42 45 45 52 20 45 52 20 41 |..."PROBEER ER A| 000005C0: 43 48 54 45 52 20 54 45 20 4B 4F 4D 45 4E 2C 20 |CHTER TE KOMEN, | 000005D0: 57 45 4C 4B 20 47 45 54 41 4C 22 00 0B 0E D8 04 |WELK GETAL".....| 000005E0: 99 22 56 41 4E 22 3B 50 3B 22 43 49 4A 46 45 52 |."VAN";P;"CIJFER| 000005F0: 53 20 49 4B 20 49 4E 20 4D 49 4A 4E 20 47 45 44 |S IK IN MIJN GED| 00000600: 41 43 48 54 45 20 48 45 42 2C 22 00 3C 0E E2 04 |ACHTE HEB,".<...| 00000610: 99 22 42 45 53 54 41 41 4E 44 45 20 55 49 54 20 |."BESTAANDE UIT | 00000620: 44 45 20 43 49 4A 46 45 52 53 20 31 20 54 4F 54 |DE CIJFERS 1 TOT| 00000630: 20 45 4E 20 4D 45 54 22 3B 44 3A 99 00 69 0E F6 | EN MET";D:..i..| 00000640: 04 99 20 22 27 5A 57 41 52 54 27 20 47 45 45 46 |.. "'ZWART' GEEF| 00000650: 54 20 45 45 4E 20 4A 55 49 53 54 20 43 49 4A 46 |T EEN JUIST CIJF| 00000660: 45 52 20 4F 50 20 44 45 22 00 83 0E 00 05 99 22 |ER OP DE"......"| 00000670: 4A 55 49 53 54 45 20 50 4C 41 41 54 53 20 41 41 |JUISTE PLAATS AA| 00000680: 4E 2E 22 00 89 0E 0A 05 99 00 B6 0E 14 05 99 22 |N."............"| 00000690: 27 57 49 54 27 20 47 45 45 46 54 20 45 45 4E 20 |'WIT' GEEFT EEN | 000006A0: 4A 55 49 53 54 20 43 49 4A 46 45 52 20 41 41 4E |JUIST CIJFER AAN| 000006B0: 2C 20 44 41 54 22 00 DB 0E 28 05 99 22 4F 50 20 |, DAT"...(.."OP | 000006C0: 44 45 20 56 45 52 4B 45 45 52 44 45 20 50 4C 41 |DE VERKEERDE PLA| 000006D0: 41 54 53 20 53 54 41 41 54 2E 22 00 E3 0E 32 05 |ATS STAAT."...2.| 000006E0: 99 3A 99 00 E9 0E 3C 05 8E 00 EF 0E D0 07 99 00 |.:....<.........| 000006F0: 1B 0F DA 07 99 22 55 20 48 45 45 46 54 20 48 45 |....."U HEEFT HE| 00000700: 54 20 49 4E 22 3B 47 3B 22 50 4F 47 49 4E 47 45 |T IN";G;"POGINGE| 00000710: 4E 20 47 45 52 41 44 45 4E 2E 22 00 38 0F E4 07 |N GERADEN.".8...| 00000720: 8B 20 47 B3 35 20 A7 20 42 24 B2 22 55 49 54 53 |. G.5 . B$."UITS| 00000730: 54 45 4B 45 4E 44 21 22 00 58 0F EE 07 8B 20 47 |TEKEND!".X.... G| 00000740: B2 35 20 B0 20 47 B2 36 20 A7 20 42 24 B2 22 45 |.5 . G.6 . B$."E| 00000750: 52 47 20 47 4F 45 44 22 00 75 0F F8 07 8B 20 47 |RG GOED".u.... G| 00000760: B2 37 20 A7 20 42 24 B2 22 4E 49 45 54 20 53 4C |.7 . B$."NIET SL| 00000770: 45 43 48 54 22 00 94 0F 02 08 8B 20 47 B2 37 20 |ECHT"...... G.7 | 00000780: A7 20 42 24 B2 22 4E 49 45 54 20 47 45 57 45 4C |. B$."NIET GEWEL| 00000790: 44 49 47 22 00 AD 0F 0C 08 8B 20 47 B1 38 20 A7 |DIG"...... G.8 .| 000007A0: 20 42 24 B2 22 42 45 52 4F 45 52 44 22 00 C4 0F | B$."BEROERD"...| 000007B0: 16 08 99 3A 99 22 2E 2E 2E 44 41 54 20 49 53 20 |...:."...DAT IS | 000007C0: 22 3B 42 24 00 CA 0F 20 08 99 00 F2 0F 2A 08 85 |";B$... .....*..| 000007D0: 20 22 57 49 4C 54 20 55 20 48 45 54 20 4E 4F 47 | "WILT U HET NOG| 000007E0: 20 45 45 4E 53 20 50 52 4F 42 45 52 45 4E 22 3B | EENS PROBEREN";| 000007F0: 41 24 00 0A 10 34 08 8B 20 C8 28 41 24 2C 31 29 |A$...4.. .(A$,1)| 00000800: B2 22 4A 22 20 A7 20 31 35 30 00 24 10 3E 08 8B |."J" . 150.$.>..| 00000810: 20 C8 28 41 24 2C 31 29 B3 B1 22 4E 22 20 A7 20 | .(A$,1).."N" . | 00000820: 32 30 39 30 00 38 10 48 08 99 3A 99 22 4C 41 46 |2090.8.H..:."LAF| 00000830: 41 41 52 44 2E 22 3A 99 00 3E 10 52 08 80 00 44 |AARD.":..>.R...D| 00000840: 10 98 08 99 00 70 10 A2 08 99 20 22 55 20 4D 41 |.....p.... "U MA| 00000850: 47 20 4E 49 45 54 20 4D 45 45 52 20 44 41 4E 22 |G NIET MEER DAN"| 00000860: 3B 4C 3B 22 4D 41 41 4C 20 52 41 44 45 4E 2E 22 |;L;"MAAL RADEN."| 00000870: 00 76 10 AC 08 99 00 90 10 B6 08 99 20 22 4D 49 |.v.......... "MI| 00000880: 4A 4E 20 43 4F 44 45 20 57 41 53 20 22 3B 43 24 |JN CODE WAS ";C$| 00000890: 00 9B 10 C0 08 89 20 32 30 38 30 00 00 00 |...... 2080... |
....D..: DECODE.%.N..: COPYRIGHT 1983.G. O..: PHIL FELDMAN, TOM RUGG, EN.D.P..: W ESTERN SYSTEMS GROUP...Q..: NEDERLANDSE VERTALING 1984 DOOR...R..: KARIN KAPTEIN VOOR DELFIA PRESS BV.F.X.D.6:P.4:L.12.. .... G$(L),G(P),C(P),B(L),W(L).....R..(. TI)...... 1200...... 300:. 370.&...."POG ING NUMMER";G;./.... A$.G.H.. H(A$,1)."S " . 500._.R.. H(A$,1)."Q" . 600.I.... 70 0.S.... 800.~.... 1000...... B(G).P . 20 00.....G$(G).A$.....G.G.1:. G.L . 2200.. .... 180.N.,.G.1:C$."".T.6.....R.. J . 1 . P...|.R..(D..(1)).1.....C$.C$.J(D(R), 2,1)...... J.=...."IK HEB MIJN GEHEIME C ODE GEKOZEN.".C.....I.....P.... G.1 . ." NOG GEEN POGINGEN":. 180...... G(147),"O VERZICHT":......."AANTAL POGING ZWART WIT"......:. J.1 . G.1...... J;.7);G$(J );.16);B(J);.24);W(J)...&.. G.10 . ....0 ..:....:.. 180...X...5.B.. "U KUNT ER NI ET ACHTER KOMEN, HE?".N.L..:."MIJN CODE WAS ";.^.V.. J . 1 . 4.J.... " .";.~.... K . 1 . 900:....... C$:....... 2090.... .. C(A$)..P . 780...F.. J.1 . P.J.P.R.E( J(A$,J,1))...Z.. R.1 . R.D . 780........ .........."NIET TOEGESTAAN. PROBEER HET NOG EENS.".$.... 180.0. .B.0:W.0.>.*.. J .1 . P.T.4.G(J).E(J(A$,J,1)).J.>.C(J).E( J(C$,J,1))...H.. G(J).C(J) . B.B.1:G(J). 0:C(J).0...R.....\.. J.1 . P:. C(J).0 . 920.E.F.H.0:. K.1 . P.X.P.. C(J).0 . 910 ...Z.. C(J)..G(K) . 910.....H.1:G(K).0:C (J).0...... K:W.W.H...... J.!.....5...B( G).B:W(G).W:..\...."POGING NUMMER";G;"-- ZWART =";B;.L...." WIT =";W.T....:..... .. G(147);...... " **** DECODE ****"...D..:....N.."PROBEER ER ACHTER TE KOMEN, WELK GETAL"...X.."VAN";P;"CIJFER S IK IN MIJN GEDACHTE HEB,".<...."BESTAA NDE UIT DE CIJFERS 1 TOT EN MET";D:..I.. .. "'ZWART' GEEFT EEN JUIST CIJFER OP DE "......"JUISTE PLAATS AAN."............" 'WIT' GEEFT EEN JUIST CIJFER AAN, DAT".. .(.."OP DE VERKEERDE PLAATS STAAT."...2. .:....<.....P.....Z.."U HEEFT HET IN";G; "POGINGEN GERADEN.".8.... G.5 . B$."UITS TEKEND!".X.... G.5 . G.6 . B$."ERG GOED" .U.... G.7 . B$."NIET SLECHT"...... G.7 . B$."NIET GEWELDIG"...... G.8 . B$."BER OERD".D....:."...DAT IS ";B$.J. .....*.. "WILT U HET NOG EENS PROBEREN";A$...4.. H(A$,1)."J" . 150.$.>.. H(A$,1).."N" . 2090.8.H..:."LAFAARD.":..>.R...D.....P.. .. "U MAG NIET MEER DAN";L;"MAAL RADEN." .V.......... "MIJN CODE WAS ";C$...... 2 080...
> CLICK IMAGE PREVIEW FOR FULL MODAL