ZXTape! 0Created with Ramsoft MakeTZXтFalse Goldи tЛyк  ч0 я""п d%ёd$=" 1983 Written by David J Stew" nыn=1╠30 s,їм19,n;▄1;┌7;" ";▄0 t Є5 x3їм19,1;┌0;┘7;d$(1╠n) Вєn М6їм19,31;┌0;" ":┘7 Ц8їм21,0;" " а їм19,0;┌0;" " кя"" D 1983 Written by David J Stewюn╙уFalse Gold@АЕs                                                                                                   АП АГ  └G   ■└         АП   №  └G   АП■?          АП  р" └G   р   АЗ         АП   БГ └G    №`          АП  №Ё └G   АП■?                                                                                                          АП C  └G   °         АП   № └G   АП■?          АП  р" └G   р   ╟         АП   C └G    ■            АП  № Ё└G   АП■?                                                                                                          АП C  └G   Ё        АП   ° └G   АП■?          АП  р& └G   ЁБ  G         АП   C └G     А          АП  ° °└G   АЗ■?                                                                                                          АП A  └G   р?        АП   ° └G   АЗ■?          АП  └E └G   №`  G         АП   A └G     р?          АП  °  °└G   АГ■?                                                                          Ё Ё  °    °? р        АЯ■!  └G   р?°?        АР  °? └G   АC■          АЯ  └_ └G   ■? G         АП  ■! └G   ЁЁ?          АП  °  °?└H?АА?                                                                         р/ р'  Ё    р └        А┐■!  └G   └O№?        Аа/  Ё? └G   АA■           А┐  └a └G    А  G         АП  ■ └! └G   р/°?          АП  Ё №?└P_АА?@                                                                       └O └G  р'    ┐° А         А ■   └G   АП■?        А└O  Ё? └G   А ■  '         А   А└АЗ └G    р O         АП  ■?р  └G   └O№?          АП  Ё №?└`ЯА@?А                                                                           П  З   ╟    └    ё        А    №  └G   АП■?           А П  Ё └G   └?  @G         А    ААЗ └G    ЁБ _         АП  №Ё └G    П№?          АП  Ё №└  А?°  №       АП  р' ■└А                                                                                                              ■└√ ■ ?  №             АG№?р~?  °#             АП   №~?  ° р#             АП └№~?  ° р#      АП  р' ■└└                                                                                                               ° ?№А ■?     Ё             АП■╧°~?  ° #             АП   №~?  ° р#             АП А┐№~?  ° р#      АП  р/ ■└└                                                                                                               Ё?Ё@■?  °              АП■Я°~?  ° └#             АП   №~?  ° р#             АП ?№~?  ° р#      АП  └O  └р                                                                                                                рр ~?  °             АП■№~?  ° └#             АП   №~?  ° р#             АП■?№~?  ° р#      АЯ  └_  └?Ё                                                                                                                └└~?  °             АП■?№~?  ° р#             АП   №~?  ° р#             АП №?№~?  ° р#      А┐  └  ?└°?                                                                                 └  └                       └А~?  °Г             АП■№~?  ° р#             АП   №~?  ° р#             АП№?№~?  ° р#      А   А   А └ ■                                                                                     └                 АЁА~?  °C             АП■ №~?  ° р#             АП   №~?  ° р#             АП№?№~?  ° р#                                                                                                                 ■ А┐  ■?             Аc№~?  °C             АП   №~?  ° р#             АП   №~?  ° р#             АП№?№~?  ° р#             АП ?№~?  ° р#             А°??р■° └/Ё                № ■° р?                                                                                                           АП ?№~?  ° р#             А?■  °° / у                                                                                                                                           АЗ ?№~?  ° р#             └?■°?р#                                                                                                                                           АЗ ?№~?  ° р#             └?А■°р#                                                                                                                                           АБ ?№~?  ° р#             рА■°р#                                                                                                                                           АА?~?  ° р#             Ё └?■° р#                                                                                                                                           А@?А~@° '№           °  р■ ° р'                                                                                                                                           А`?└■А° @'°            ■ Ё ■ ° р/                                                                                                                                  88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888█рFalse Gold3#3#I5#  э9000(# ?ч7:┌7:┘0:√ Aъ*********MENU************ F0ыn=0╠31:їм0,n;┌1;" ":єn H1ыn=1╠20:їмn,31;┌1;" ":єn J:ыn=31╠0═-1:їм21,n;┌1;" ":єn L9ыn=20╠1═-1:їмn,0;┌1;" ":єn PUїм1,10 ;┌1;┘6;" FALSE GOLD ";м2,10 ;" " Zbїм8,2;"For INSTRUCTIONS.....Press 1";м14,2;"To PLAY..............Press 2" d·ж=""╦ь100d i%·пж=491╦э9998':ь8600Ш! l э9998' n э8000@ x ёg=1 В э6000p Ц ь1000ш Їъ**SELECT / TEST COIN** ■·ж╔"" ╦ь510■ ·ж=""╦ь520 (ёi$=ж:·пi$>74J╦ёi$=┬(пi$-32 ) &·пi$<65A┼пi$>74J╦ь500Ї &ыh=1╠▒t$ (·i$=t$(h)╦ь5600 *єh , ь500Ї 0$ёt$=t$(╠(h-1))+t$(h+1╠) : э7110╞ Bыq=0╠1 D0їмq,(пi$-64@)*2+4;┌1;" " Fєq I╫.2~L╠╠╠,пi$-64@ N"їмm+3,n+1;┌6;i$ Xёv=a(пi$-64@):ёx=x+v b■ ш ъ**GAME** ЄИїм18,0;┌6;┘2;"Enter number of coins you wish to weigh in each pan .....then press ENTER " №юl$ '·пl$<491┼пl$>535╦ь1020№  ёnc=░l$ їм18,0;b$ уm yїмm+3,0;g;:ыn=2╠2*nc═2:їмm+3,n;" ";┌6;" ";┌7:єn:їмm+3,13 ;"v" $ э7000X )·nc=1╦ёc$=c$(╠4) ,3їм18,0;┌6;┘3;b$(╠64@) ._їм18,0;┌6;┘2;█1;">";█0;" CHOOSE ";NC;" ";c$;" FOR THE " 81ї┌6;┘2;" LEFT-HAND PAN (A - J)" B,ыn=2╠2*nc═2:э500Ї:єn Gёlp=x:ёx=0 L_їм18,0;┌6;┘2;█1;">";█0;" CHOOSE ";NC;" ";c$;" FOR THE " V2ї┌6;┘2;" RIGHT-HAND PAN (A - J)" `Rыn=2╠2*nc═2:їмm+3,n+13 ;" ";┌6;" ";┌7:єn j<ыn=15╠2*nc+13 ═2:э500Ї:єn:ёrp=x n·ж╔""╦ь1134n oыn=1╠100d:єn t·lprp╦ь1170Т И┤╫.1}L╠╠╠,5:э7000X:╫.1}L╠╠╠,7:╫.1}L╠╠╠,9 :э7210*:╫.1}L╠╠╠,7:э7000X:╫.1}L╠╠╠,5:э7110╞:╫.1}L╠╠╠,7:э7000X:ь1180Ь Н└╫.1}L╠╠╠,5:э7000X:╫.1}L╠╠╠,7:э7210*:╫.1}L╠╠╠,9 :э7000X:╫.1}L╠╠╠,7:э7110╞:╫.1}L╠╠╠,5:э7000X:╫.1}L╠╠╠,7:э7210*:ь1180Ь ТД╫.1}L╠╠╠,5:э7000X:╫.1}L╠╠╠,7:э7210*:╫.1}L╠╠╠,9 :э7000X:╫.1}L╠╠╠,7:э7110╞:ь1180Ь Ь э8000@ ж$ёg=g+1:·g>5╦ь5060─ ░·g>2╦э5000И  ь1000ш Иъ******GUESS COIN******* Т(їм18,0;┌6;┘2;b$ ЬOїм19,1;█1;┌7;┘0;"Do you wish to GUESS the coin?" ж·ж╔""╦ь5030ж ░·ж=""╦ь5040░ ║.ёz$=ж:·пz$╔89Y╞пz$╔121y╦ь1300 ─Дїм18,0;┌6;┘2;b$:їм18,0;┌6;┘2;█1;">";█0;"Choose a COIN (A-J).........."; ╬&юc$:·пc$>74J╦ёc$=┬(пc$-32 ) ╪'·пc$<65A┼пc$>74J╦ь5060─ т(┌6:┘2:▄1:їc$:▄0 ьїм18,0;" " ЎJїм20,0;█1;">";█0;"Is it HEAVY or LIGHT(H/L)?..."; &юw$:·пw$>76L╦ёw$=┬(пw$-32 )  '·пw$╔72H╞пw$╔76L╦ь5110Ў (┌6:┘2:▄1:їw$:▄0 Pъ*****CHECK FOR WIN***** Z?·(пw$+r2=73I┼пw$+r2=75K)╞r1=пc$-64@╦ь8400╨ ┤ъ****INCORRECT GUESS**** ╛oЄ100d:їм18,0;b$:їм17,6;█1;┌2;┘7;"YOU ARE NOT CORRECT":Є502 ╚ёa$=h$:·пw$=76L╦ёa$=l$ ╥Iїм19,0;┌6;┘2;" Your guess was: ";c$;" ";a$ ▄$Є502:ёa$=h$:·r2<1╦ёa$=l$ цZїм21,0;┌6;┘2;" Correct answer was: ";┬(r1+64@);" ";a$;" " ЁRЄ100d:їм0,0;b$:їм17,6;┌7;" " ·Mїм1,3;█1;┌7;">";█0;"PRESS ANY KEY TO CONTINUE"  Є0  э9998'  ь85004! pъ***SELECT FALSE COIN*** z щa(10 ) Д%ыn=1╠10 :ёa(n)=0:єn О∙:ёr1=║(е*10 )+1 Ш!ёr2=1-2*(е<.5   ) в ёa(r1)=r2 м■ Xъ**PRINT SCALES** bїмm+2,29;"РСТ" lїмm+3,29;"УФХ" v■ ╞їмm+2,29;"ЦЧШ" ╨їмm+3,29;"ЩЪЫ" ┌■ *їмm+2,29;"ЬЭЮ" 4їмm+3,29;"Яаб" JПыn=2╠20═2:┌1:┘6:їм0,3+n;" в ":їм1,3+n;" ";┬(n/2+64@);" ":єn:┘0:┌7 Tёt$="ABCDEFGHIJ" r ёc$="COINS" | ёx=0 Ж ёv=0 Рёh$="HEAVY":ёl$="LIGHT" г■ ╨ъ****WINNING DISPLAY**** ┌%Є100d:щd(10 ):щc(10 ) ф5∙:ыn=1╠10 :ёd(n)=║(е*24)+1:єn ю4∙:ыn=1╠10 :ёc(n)=║(е*6)+1:єn °C√:ыn=1╠10 :їм2*n,d(n);┌c(n);┘9 ;"CORRECT":єn ! Є300, !4>┌7:√:їм10 ,1;"WOULD YOU LIKE TO PLAY AGAIN?" !>·ж╔""╦ь8510>! !H·ж=""╦ь8520H! !R3·пж=89Y┼пж=121y╦√:х95200%:ь110n !\Cч0:┌0:√:їм18,22;┘7;"coward":Є0 !fт !Шъ*****INSTRUCTIONS****** !вч1:┌1:┘7:√ !мEїн10 ;"INSTRUCTIONS":їм0,10 ;▐1;"____________" !╢ їм2,2;d$(╠27) !└ї:їн9 ;"TEN GOLD COINS" !╩5ї:їd$(28╠149Х);'';d$(150Ц╠223▀) !╘їм15,14;"РСТ" !▐їм16,14;"УФХ" !шї:їd$(224р╠287) !э Є400Р !Є э9900м& !№Fїм21,0;" ":Ї23692М\,-1:їd$(288 ╠479▀) "<ї:ї:їd$(480р╠660Ф);'';d$(661Х╠784):ї:ї " Є400Р " э9900м& "Чї:ї:їd$(785╠861]);''''''''';b$(╠10 );d$(862^╠871g);'''''''''':Є200╚:їм20,0;█1;d$(872h╠935з) "$·ж╔""╦ь8740$" ")·ж=""╦ь8745)" ".·ж="i"┼ж="I"╦ь8600Ш! "8√ "т ь108l #'т #(ъ** DEFINED CHARACTERS** #2ыC=97a╠115s #<ыN=0╠7 #FуD #P Ї└┬C+n,D #ZєN #dєC #ngёb$=" " #Мцёd$="In this game you are given-Unfortunately, one coin is FALSEand you do not know which coin it is, neither do you know if itis too heavy or too light.To help you find the false coin,you have a balance, which looks like this-The coins are given the letters A to J in order to identify themYou must first choose how many coins you wish to place in each pan of the balance and then you must select the coins you wish to weigh, using the letters A-J,(You may use either A or a,etc.)" #Ц┐ёd$=d$+"After you have placed the chosencoins in the balance, it will tilt to indicate which pan is heavier. If it remains level itmeans that the coins for that weighing are genuine." #аЖёd$=d$+"You will have the chance to try to guess the identity and weightof the false coin after each weighing (except the first)." #кгёd$=d$+"You are allowed a maximum of 5 weighings only and then you MUSTmake a guess.Good Luck!Press ""I"" to repeat these Instr-uctions or any other key to play" %[ф0,0,15,20,34",65A,128А,128А,24,60<,255 ,24,24,24,153Щ,153Щ,0,0,240Ё,40(,68D,130В,1,1,127,62>,28,0,0,0,0,0,24,24,24,24,60<,60<,126~,255 ,254■,124|,568,0,0,0,0,0,0,0,0,1,14,20,34",65A,24,60<,126~,152Ш,25,25,24,24,112p,168и,68D,130В,1,1,254■,124|,128А,128А,127,62>,28,0,0,0,152Ш,152Ш,24,24,60<,60<,126~,255 ,568,0,0,0,0,0,0,0 %&■ф14,21,34",65A,128А,128А,127,62>,24,188╝,126~,25,152Ш,152Ш,24,24,0,0,0,128А,112p,40(,68D,130В,28,0,0,0,0,0,0,0,25,25,24,24,60<,60<,126~,255 ,1,1,254■,124|,568,0,0,0,24,126~,126~,255 ,255 ,126~,126~,24 %0+ф1,4,7,10 ,13 %А■ &мfїм21,3;█1;" Press any key to continue ":Є0:їм21,0;b$(╠32 ):■ '!Ї23693Н\,568:ч7:√ '■ ╒