GridOff AxesOff LabelOff BG-None CoordOff ViewWindow 0,126,1,0,62,1 ClrText [[0][0][0][0][0][0][0][0][0][0][0][0][0][0][0][0][0][0][0][0]]ÞMat A Locate 1,1,"TAPEZ VOTRE MOT '=F1" Locate 1,2,"PUIS APPUYEZ SUR EXE" 0ÞA~Z 1ÞB Fill(1,Mat A) Lbl 0 Getkey=ÍãGoto 0 GetkeyÞÍ Í=0ãGoto 0 Í=27 Or Í=28 Or Í=29 Or Í=37 Or Í=38 Or Í=39 Or Í=47 Or Í=48 Or Í=49 Or Í=51 Or Í=57 Or Í=58 Or Í=59 Or Í=67 Or Í=68 Or Í=69 Or Í=77 Or Í=78ãGoto 0 Í=31ãGoto W If Í=44 Then B=1ãGoto 0 B™1ÞB Locate B,4," " 1ÞMat A[B,1] Goto 0 IfEnd B>20ãGoto 0 ÍÞMat A[B,1] Locate B,4,"*" Isz B Goto 0 Lbl W Cls For 1ÞA To 20 Mat A[A,1] Ansá0 And Ansá1 And Ansá61 And Ansá41ãText 5,6A,"_" If Ans=41 Then Text 5,6A,"‡" B™1ÞB IfEnd Ans=61ãB™1ÞB If Ans=79 Then Text 5,6A,"'" B™1ÞB IfEnd Next Text 57,1,"NB DE COUP RESTANT 10" Text 1,1,"" 11ÞJ Lbl 1 GetkeyÞÍ Í=0ãGoto 1 0ÞG Lbl L For 1ÞH To 20 Í=0 And LáÐãGoto A If Mat A[H,1]=Í Or L=Ð Then ÐÞG L=ÐãMat A[H,1]ÞÍ 6HÞI Í=76ãText 5,I,"A" Í=66ãText 5,I,"B" Í=56ãText 5,I,"C" Í=46ãText 5,I,"D" Í=36ãText 5,I,"E" Í=26ãText 5,I,"F" Í=75ãText 5,I,"G" Í=65ãText 5,I,"H" Í=55ãText 5,I,"I" Í=45ãText 5,I,"J" Í=35ãText 5,I,"K" Í=25ãText 5,I,"L" Í=74ãText 5,I™1,"M" Í=64ãText 5,I,"N" Í=54ãText 5,I,"O" Í=73ãText 5,I,"P" Í=63ãText 5,I,"Q" Í=53ãText 5,I,"R" Í=43ãText 5,I,"S" Í=33ãText 5,I,"T" Í=72ãText 5,I,"U" Í=62ãText 5,I,"V" Í=52ãText 5,I™1,"W" Í=42ãText 5,I,"X" Í=32ãText 5,I,"Y" Í=71ãText 5,I,"Z" Text 1,1,"" 1ÞMat A[H,1] 0ÞM L=Ð And H=20ãGoto Z LáÐãB™1ÞB B=1ãGoto V Else If GáÐ And H=20 Then Dsz J If J=1 Then ÐÞL Text 20,1,"PENDU" Text 30,1,"SOLUTION" ÐÞN IfEnd J=10ãGreen F-Line 70,10,110,10 J=9ãGreen F-Line 85,10,85,50 J=8ãGreen F-Line 85,50,100,50 J=7ãGreen F-Line 100,50,100,45 J=6ãGreen Circle 100,40,5 J=5ãGreen F-Line 100,35,100,25 J=4ãGreen F-Line 100,25,90,15 J=3ãGreen F-Line 100,25,110,15 J=2ãGreen F-Line 100,30,110,30 J=1ãGreen F-Line 100,30,90,30 Text 57,80," " Orange Text 57,84,J™1 Text 1,1,"" N=ÐãGoto L IfEnd IfEnd Lbl A Next Goto 1 Lbl V ÐÞM Lbl Z For 1ÞZ To 88 Text 20,1," " L=ÐãText 20,1,"PENDU" M=ÐãText 20,1,"GAGNE" Next Stop< = inférieur => = Double fleche du repertoire JUMP :-( = c'est pas un smile !! c'est juste : - ( sans espace / = signe diviser -> = simple fleche * = signe multiplier