5  ? 7=A U8,#+B0. BM66( ʦ߀ @@@```ppp߀߀߿ߟ߿ߟ߿ߟ߀ߟ߿ȤBM>( ÀÁ  congrat.ani maketurtle"ftur000pp"felici setframemodetell"ftursetframe1show congrat.move1erturtle"fturz  congrat.movenrifkey?make"toetsreadkeystopwait100make"nr:nr+1if:nr>=256make"nr1setframe:nrforward2left(random10)-5 feli.beweeg:nr congratulationsmake "gevonden"true read.all.keysmake"toets-1000 congrat.aniif:toets<1000make"toets1002; play.gameopnieuw count.list.makeinxyif:i>:nstopsetxy:x:yif:i=:nsetframe14stampif:i=1setframe12stampifand(:i>1)(:i<:n)setframe13stampcount.list.make:i+1:n:x+21:yJ  count.movenaamwaardecount.move.ciffergprop:naam"tlijst1:waarde count.move.ciffertliwaardeifempty?:tlstoplocal"vmake"v count.phase:i:waardeasklast:tlifframe<>:vsetframe:vcount.move.cifferbutlast:tl:i+1div:waarde10  count.phaseiwaardeif:waarde=0if:i=1output10output11make"waardemod:waarde10if:waarde=0output10output:waardecount.turtle.makenaamnxylocal"tnamif:n=0stopmake"tnam(word:naam:n) maketurtle:tnam000ask:tnampenupsetxy:x:y setframemode"trueif:n=1output:tnamoutputsentence:tnamcount.turtle.make:naam:n-1:x+21:y  game.beginifnot :bord.vuilstop;local"blmake"bl12131421222328293031323334373839414243make"bl(se:bl46474849505152575859666768)ask:blsetframe2stask40setframe1stmake"n.pin32 count.move"aantal:n.pinmake "bord.vuil"false game.initlocal"rlocal"k;make "bord.links-150make "bord.onder-100-16make"r0repeat9 game.init.row:rmake"r:r+1tellall setframemode"truesetshape :turtle.filesetphase3make "bord.vuil"truemake"zetten game.init.rowrlocal"nlocal"xlocal"y;make"n:r*9+1make"y :bord.onder+:r*32make"x :bord.links;repeat9maak.vak:n:x:ymake"x:x+32make"n:n+1introtitel splitscreenprint(sentence"##############################)print:titelprint(sentence "SuperGames"for "SuperLogo)print(sentence(word"(c"))"1996"Jack"van"Wijk)print(sentence"##############################)wait2000Pmaak.vaknxy maketurtle:nask:npenupsetxy:x:y setframemode"true make.button knop.toetsvarnrxybhsetframe:varnrsetxy:x:ystamppprop "codearea :knop.toets(sentence:x:y:x+:b:y-:h)make.control.buttons maketurtle"kt000penup"knoppen setframemodetell"kt;local"xlocal"ylocal"dylocal"h;make"x :bord.links+(7+1)*32+32make"h64make"dy:h+16make"y( :bord.onder+16); make.button10011:x:y:h64make"y:y+:dy make.button10023:x:y:h64make"y:y+:dy make.button10032:x:y:h64make"y:y+:dy-32 make.button10004:x:y6432;erturtle"ktmake"y:y+32+16 teller.maak"aantal2:x+10:ymake.cursor.rkxymake"cur.rij1+div(:y- :bord.onder)32make"cur.kol1+div(:x- :bord.links)32ifor(:cur.rij<1)(:cur.rij>7)output"falseoutputand(:cur.kol>=1)(:cur.kol<=7)Cmake.pin.targetlocal"vpmake"pdask:cur.pinmake"vpframeif:vp<>2stopmake"pdlist:cur.pin;ask:cur.pin+1make"vframeif:v=2ask:cur.pin+2ifframe=1make"pdlput:cur.pin+2:pd;ask:cur.pin-1make"vframeif:v=2ask:cur.pin-2ifframe=1make"pdlput:cur.pin-2:pd;ask:cur.pin+9make"vframeif:v=2ask:cur.pin+18ifframe=1make"pdlput:cur.pin+18:pd;ask:cur.pin-9make"vframeif:v=2ask:cur.pin-18ifframe=1make"pdlput:cur.pin-18:pd;%opl.zetr1k1r2k2if:toets>-1000stopifkey?make"toetsreadkeystop;local"v1local"v2local"v3;ifmod :opl.mode2=0make"k18-:k1make"k28-:k2ifmod(div :opl.mode2)2=0make"r18-:r1make"r28-:r2make"v1:r1*9+:k1make"v3:r2*9+:k2make"v2(:v1+:v3)/2ask:v1setframe1ask:v2setframe1ask:v3setframe2make"n.pin:n.pin-1 count.move"aantal:n.pinwait400 play.gameif:toets=1003solutionif:toets<1000make"toetsreadkeyif:toets=1001stopif:toets=1002 game.beginplay.game.moveif:toets<1000make"toetsreadkey play.gameplay.game.move read.pin.posif:toets=1000play.move.back play.movestopif:toets>1000setmousecursorstopmake"oud.pos:cur.pinask:cur.pinsetframe1ask:pdsetframe5read.pin.targetsetmousecursorif:toets>1000stopask:pdsetframe1if:toets=-72neem:cur.pinsetframe2play.move.back play.movestopaskdiv(:oud.pos+:cur.pin)2setframe1ask:cur.pinsetframe2if:oud.pos<>:cur.pinmake"n.pin(:n.pin-1) count.move"aantal:n.pinif:oud.pos<>:cur.pinmake"zettenlput(list:oud.pos:cur.pin):zettenmake "bord.vuil"trueif:n.pin=1congratulationsstop play.move[! play.game.zet lees.pin.posif:toets=1000play.move.back play.movestopif:toets>1000setmousecursorstopmake"oud.pos:cur.pinask:cur.pinsetframe1ask:pdsetframe5 lees.pin.doelsetmousecursorif:toets>1000stopask:pdsetframe1if:toets=-72neem:cur.pinsetframe2play.move.back play.movestopaskdiv(:oud.pos+:cur.pin)2setframe1ask:cur.pinsetframe2if:oud.pos<>:cur.pinmake"n.pin(:n.pin-1) teller.zet"aantal:n.pinif:oud.pos<>:cur.pinmake"zettenlput(list:oud.pos:cur.pin):zettenmake "bord.vuil"trueif:n.pin=1congratulationsstop play.game.zet$ play.move read.pin.posif:toets=1000play.move.back play.movestopif:toets>1000setmousecursorstopmake"oud.pos:cur.pinask:cur.pinsetframe1ask:pdsetframe5read.pin.targetsetmousecursorif:toets>1000stopask:pdsetframe1if:toets=-72neem:cur.pinsetframe2play.move.back play.movestopaskdiv(:oud.pos+:cur.pin)2setframe1ask:cur.pinsetframe2if:oud.pos<>:cur.pinmake"n.pin(:n.pin-1) count.move"aantal:n.pinif:oud.pos<>:cur.pinmake"zettenlput(list:oud.pos:cur.pin):zettenmake "bord.vuil"trueif:n.pin=1congratulationsstop play.move'%play.move.backifempty?:zettenstoplocal"zetmake"zetlast:zettenasklast:zetsetframe1ask((last:zet)+(first:zet))/2setframe2asklast:zetsetframe2make"n.pin:n.pin+1 count.move"aantal:n.pinmake"zettenbutlast:zettenz% read.all.keysifnotkey?stopmake"toetsreadkey read.all.keys% read.hole.poslocal"d;make"toets leestoetsif:toets>=1000stopif:toets<>0 read.hole.posstop:' read.pin.posmake"toetsreadkeyif:toets>=1000stopif:toets<>0 read.pin.posstopifnotmake.cursor.rkfirstmouselastmouse read.pin.posstopsetmousecursor:scursormake"cur.pin:cur.rij*9+:cur.kolmake.pin.targetifcount:pd>1stopsetmousecursor read.pin.posN(read.pin.targetmake"toetsreadkeyif:toets>=1000stopif:toets<>0read.pin.targetstopifnotmake.cursor.rkfirstmouselastmouseread.pin.targetstopmake"cur.pin:cur.rij*9+:cur.kolifmember?:cur.pin:pdstopread.pin.target&+solutionmake"toets-1000;maak "opl.mode :opl.mode+1 game.beginopl.zet2444make "bord.vuil"trueopl.zet3234opl.zet1333opl.zet3432opl.zet1513opl.zet3133opl.zet4323opl.zet1333opl.zet3634opl.zet5535opl.zet3436opl.zet3735opl.zet2545opl.zet6343opl.zet3353opl.zet5755opl.zet5535opl.zet4745opl.zet3555opl.zet4143opl.zet4363opl.zet5153opl.zet5452opl.zet6545opl.zet4543opl.zet7353opl.zet4363opl.zet7573opl.zet7353opl.zet5254opl.zet6444if:toets<1000wait1000make"toets1002;playagain+speelif:toets=1003solutionif:toets<1000make"toetsreadkeyif:toets=1001stopif:toets=1002 game.beginplay.game.moveif:toets<1000make"toetsreadkey play.gameS-start(setpath"image(loadpath))intro "Solitairmake "turtle.file "solitairmake"scursor loadimage :turtle.file41make "opl.mode1erturtleall hidespeedbar graphicscreen setbackground8 game.initmake.control.buttonsmake"toets1002 play.gameerturtleall setbackground15 showspeedbarssm-startupstart}. teller.maaknaamnxypprop:naam"tlijstcount.turtle.make:naam:n:x:yaskgprop:naam"tlijstsetshape"digitsetframe11 showturtle maketurtle"ttt000penup setframemodeask"tttsetshape"digitcount.list.make1:n:x:yerturtle"ttt. bord.links-150. bord.onder-116. bord.vuilfalse.cur.kol12.cur.pin40.cur.rij1/gevondenwelwaar/icone%/n.pin326/opl.mode1G/oud.pos58X/pd5840i/scursorez/toets1001/ turtle.filesolitair/v2/zetten/aantaltlijstaantal2aantal1B0codearea100013810820276100313860202-41002138-20202-841001138-100202-1643  BMvv( pp pppp ppp pp BM>( ÀÁ6  BMvv( BM>( WUUUUUW+W//??