10 MODE7:VDU23;8202;0;0;0;
   20 PRINT''''''
   30 PRINT"„        �REPTON  PASSWORDS"
   40 PRINT"„        �REPTON  PASSWORDS"
   50 PRINT""
   60 PRINT"�           �Compiled by"
   70 PRINT"�           �Compiled by"
   80 PRINT""
   90 PRINT"ƒ        �James M. Cavanagh"
  100 PRINT"ƒ�        James M. Cavanagh"
  110 PRINT""
  120 PRINT"�               1992"
  130 PRINT"�               TJJZ"
  140 A=INKEY(500):PROCM
  150 MODE7:END
  160 DEFPROCM:CLS:R%=420:L%=11:PROCR
  170 A=GET-48:IFA<1ORA>6THENGOTO170
  180 IFA=1THENPROCR1
  190 IFA=2THENPROCR3
  200 IFA=3THENPROCRA
  210 IFA=4THENPROCRL
  220 IFA=5THENPROCRT
  230 IFA=6THENENDPROC
  240 ENDPROC
  250 DEFPROCR1:CLS:R%=430:L%=12:PROCR:PROCS:PROCM
  260 ENDPROC
  270 DEFPROCR3:CLS:R%=480:L%=12:PROCR:PROCS
  280 CLS:R%=500:PROCR:PROCS:PROCM
  290 ENDPROC
  300 DEFPROCRA:CLS:R%=520:L%=12:PROCR:PROCS
  310 CLS:R%=540:PROCR:PROCS
  320 CLS:R%=560:PROCR:PROCS:PROCM
  330 ENDPROC
  340 DEFPROCRL:CLS:R%=580:L%=12:PROCR:PROCS
  350 CLS:R%=600:PROCR:PROCS
  360 CLS:R%=620:PROCR:PROCS:PROCM
  370 ENDPROC
  380 DEFPROCRT:CLS:R%=640:L%=12:PROCR:PROCS
  390 CLS:R%=660:PROCR:PROCS
  400 CLS:R%=680:PROCR:PROCS:PROCM
  410 ENDPROC
  420 DATA"","         REPTON PASSWORDS",""," 1 �Repton†1."," 2 ‚Repton†3."," 3 ƒAround The World In Forty Screens."," 4 „Life Of Repton."," 5 …Repton Thru Time."," 6 †Exit Program","","     Please Select (1 - 6)"
  430 DATA"ƒREPTON 1","†========","A full list of passwords for Repton 1."
  440 DATA""
  450 DATA"A �SCREEN ONE      ‡B ‚CHAMELEON","C ƒTERRAPIN        ‡D „SIDEWINDER","E …GECKO           ‡F †PYTHON","G �SALAMANDER      ‡H ‚IGUANA"
  460 DATA"I ƒCUTTLEFISH      ‡J „OCTOPUS","K …GIANT CLAM      ‡L †THE KRAKEN"
  470 DATA"","        Press Space ForˆMenu."
  480 DATA"„REPTON 3","†========","A full list of passwords and edit","codes for the original REPTON 3",""
  490 DATA"PRELUDE","A �PRELUDE †56882   ‡B ‚CITADEL †48042","C ƒMORNING †13330   ‡D „AWKWARD †33023","E …FRITTER †24656   ‡F �LAWLESS †8515","G ‚RATION  †3447    ‡H ƒTOBACCO †2303","","        Press Space For More."
  500 DATA"TOCCATA","A �TOCCATA††48042   ‡B ‚UPSTART †6527","C ƒOCTAGON †27492   ‡D „CHAOTIC †20312","E …MAJESTY †1356    ‡F �REVENUE †16713","G ‚FORESEE †50190   ‡H ƒRESERVE †65280",""
  510 DATA"FINALE","A �FINALE  †27246   ‡B ‚ENLIVEN †24937","C ƒCONTEST †3200    ‡D „ILLEGAL †19786","E …APPEASE †3346    ‡F �STUDENT †20055","G ‚AVERAGE †16660   ‡H ƒPHOENIX †51762","        Press Space ForˆMenu."
  520 DATA"‚AROUND THE WORLD IN 40 SCREENS","†==============================","A full list of passwords and edit","codes for Repton's globetrotting","adventures.",""
  530 DATA"AMERICA","A �AMERICA †52463   ‡B ‚CURTAIN †57036","C ƒVAMPIRE †2457    ‡D „CREATED †2560","E …LUNATIC †16961   ‡F �MAXIMUM †15699","G ‚COMPOSE †56696   ‡H ƒCOLOURS †10568","        Press Space For More."
  540 DATA"ARCTIC","A �ARCTIC  †25363   ‡B ‚DIAMOND †20049","C ƒRUBBISH †44028   ‡D „MANAGER †10455","E …PACKAGE †18279   ‡F �PRIVATE †43587","G ‚CAPITAL †8380    ‡H ƒDUNGEON †21510",""
  550 DATA"ORIENT","A �ORIENT † 10019   ‡B ‚THRUST  †47727","C ƒCOLONEL †29389   ‡D „PERSONS †29842","E …CRICKET †48573   ‡F �TUNNELS †13365","G ‚INTENSE †34674   ‡H ƒGALLERY †36424","        Press Space For More."
  560 DATA"OCEANS","A �OCEANS  †34645   ‡B ‚MAGENTA †44892","C ƒELECTED †15334   ‡D „DISEASE †14536","E …THEATRE †14089   ‡F �DREAMER †16710","G ‚CURRANT †55886   ‡H ƒGENERAL †13003",""
  570 DATA"AFRICA","A �AFRICA  †53997   ‡B ‚WELCOME †54996","C ƒWORKING †36857   ‡D „FIREMAN †13942","E …KESTREL †25155   ‡F �REFRACT †26421","G ‚ADDRESS †39304   ‡H ƒRECEIVE †51901","        Press Space ForˆMenu."
  580 DATA"…LIFE OF REPTON","†==============","A full list of passwords and edit","codes for Repton's autobiographical","levels.",""
  590 DATA"BABY","A �BABY    †15890   ‡B ‚KEYHOLE †44287","C ƒFAILURE †58847   ‡D „GADGETS †24882","E …REACTOR †61197   ‡F �REUNION †19047","G ‚OBSERVE †5067    ‡H ƒDIVERGE †36440","        Press Space For More."
  600 DATA"SCHOOL","A �SCHOOL † 36216   ‡B ‚ADVANCE †14562","C ƒBAPTISE †49514   ‡D „LESSONS †39008","E …ZIPPERS †21622   ‡F �BLEAKLY †27442","G ‚CORPSES †4831    ‡H ƒZYGOTES †21882",""
  610 DATA"TEENS","A �TEENS   †61268   ‡B ‚TURBINE †32854","C ƒWEAKEN  †51857   ‡D „CHEAPLY †53452","E …OVERLAP †22068   ‡F �PADLOCK †43672","G ‚DIALLED †13517   ‡H ƒCIRCLES †4405","        Press Space For More."
  620 DATA"WORK","A �WORK    †21012   ‡B ‚INCLINE †7014","C ƒHOSTAGE †60159   ‡D „TWISTED †9677","E …TAXABLE †14439   ‡F �WARTIME †21383","G ‚ALGEBRA †57802   ‡H ƒBETTING †996",""
  630 DATA"OAP","A �OAP     †20910   ‡B ‚UNAWARE †18760","C ƒSOAKING †57020   ‡D „EVOLVES †21489","E …QUIBBLE †52892   ‡F �NATIVES †30995","G ‚JUMPING †21164   ‡H ƒSHALLOW †35064","        Press Space ForˆMenu."
  640 DATA"ƒTHRU TIME","†=========","A full list of passwords and edit","codes for Repton's time-travelling","adventures.",""
  650 DATA"PREHIST","A �PREHIST †12345    B ‚HEATERS †16494","C ƒHILLOCK †29652    D „PILFERS †28265","E …MEDIATE †25655    F �COMPACT †9761","G ‚CARTOON †43981    H ƒTUBULAR †35862","        Press Space For More."
  660 DATA"EGYPT","A �EGYPT   †8473     B ‚FAVOURS †5012","C ƒHAPPENS †48238    D „PERSONS †2247","E …CONQUER †31761    F �EVENING †19495","G ‚MASTERS †52592    H ƒPIMPLES †51035",""
  670 DATA"VICTORI","A �VICTORI †54066    B ‚MERCURY †57950","C ƒCLEAVER †62809    D „BINDERS †31463","E …CONFUSE †35584    F �JINGLES †10659","G ‚DOLPHIN †45367    H ƒMINSTER †23180","        Press Space For More."
  680 DATA"NOW","A �NOW     †54524    B ‚OCTAGON †21370","C ƒCASTLES †48417    D „CHARLES †4698","E …GREATER †58449    F �BOOKLET †23963","G ‚FUNTIME †64332    H ƒSAVOURS †29294",""
  690 DATA"FUTURE","A �FUTURE  †33776    B ‚ORACLES †1119","C ƒSTAPLER †36126    D „DANCING †46223","E …FANCIER †48475    F �BANANAS †34409","G ‚EVEREST †54136    H ƒKINGDOM †53546","        Press Space ForˆMenu."
  700 DEFPROCdb(T$):PRINTCHR$141+T$'CHR$141+T$:ENDPROC
  710 DEFPROCR:RESTORER%:FORI=1TOL%:READA$:PROCdb(A$):NEXTI:ENDPROC
  720 DEFPROCS:REPEATUNTILGET=32:ENDPROC