ZXTape!MasterminddVd:2000 "3A707B32817B26003A817B6F29E529EB2114791911797B010400EDB00000000021A67AD119117D7B010200EDB021717B11757B010400EDB0210000227F7B21757B11797B06041ABE200C3A807B3C32807B36003E0112231310EC0E0421757B060411797B1ABE200C" "3A7F7B3C327F7B36003E01121310ED0D2320E43A7F7B217D7BBEC03A807B23BEC03A817B3D32817BC2887B010100C921717B3E39BE280334181B363023BE2803341812363023BE2803341809363023BE010000C834CD827B793D010100C818CF" 1000:a$:b$:a$=a$+b$ ;n=1̱a$/2:b$=a$(2*n-12*n) nb=16*(b$(1)-480-7*(b$(1)"A"))+b$(2)-480-7*(b$(2)"A")  31617{+n,b:n:2060  31600p{,0 $&n=31601q{31604t{:n,"0":n . a$(4) 8 .l=1:31600p{=0a$="0000": l=31769| 9n=03:a$(n+1)=((31601q{+n)):n  x/atcnt=31600p{:31600p{,atcnt+1 Dn=03:(31000y+4*atcnt+n),a$(n+1):n >(31400z+2*atcnt),g:(31401z+2*atcnt),c  @~:1050:0,9 ;1;7;" MASTERMIND ":5;2,10 ;"**** Correct Good":t=3 J/1200:t,0;t-2;10 ;a$ Odl=00,0;2;"You have made a mistake in scoring. Press ENTER ";z$: Ta0,0;"How many correct digits Enter 0 to 4 ";z$:z$>"4"z$<"0"1620T ^c=z$(1) ha0,0;"How many good digits Enter 0 to 4 ";z$:z$>"4"z$<"0"1620T r)g=z$(1):c+g>41620T wt,18;c;26;g:c=40,0;2;"The answer has been found Press ENTER for another game ";z$: |%1400x:t=t+1:1610J 330999y:7:0:1:0: ,0,9 ;1;" MASTERMIND "'' 5;" Mastermind is a number guessing game for two, one has to think of a four digit number and the other has to guess it" '6;" After every guess two scoresare given. The scores are calledCorrect and Good. The Correct score is the number of digits inthe guess that have the same value and are in the same position as digits in the answer" '5;" The Good score is the numberof digits that have the right value but are in the wrong position. A digit cannot be counted in both scores and it cannot add to the Good score twice."  1000  "Press enter to continue ";a$ k:4;" Here are some examples of good and correct scores"'5'"Answer 3203 Correct Good"  1234,1,1,5006,1,0,2468 ,0,1,3203 ,4,0:2080 :n=612 2:a,b,c:n,9 ;6;a;18;b;27;c:n *"Press enter to continue ";a$ 4-:0,10 ;1;" MASTERMIND " >T''2;7;" Your opponent is the Spectrum "'" You can play in two ways " H?'2;"1: Spectrum thinks of a number and you guess it " R@'2;"2: You think of a number for theSpectrum to guess " \A"Enter your choice 1 or 2 ";z$:z$="1"3000 :21004 f z$="2"1600@:21004 p 2140\ ,:0,9 ;1;" MASTERMIND " Ka$(4):n=14:a$(n)=("0"+(*10 )):n:t=1 22,10 ;5;"**** Correct Good" M0,0;"Enter your guess, 4 digits or ""XXXX"" to give up ";z$ Mz$="XXXX"z$="xxxx"2;"Answer is";10 ;a$:"Press ENTER";z$: Dz$=4n=14:z$(n)"0"z$(n)"9"n:3070 3030 t;10 ;z$; $b$=a$:c$=z$:c=0:g=0 Cn=14:b$(n)=c$(n)c=c+1:b$(n)="B":c$(n)="C" n &Vn=14:m=14:b$(n)=c$(m)g=g+1:b$(n)="B":c$(m)="C" 0m:n :&18;c;26;g:t=t+1 D7c=42;"Answer found press ENTER ";z$: N 3030