$ CANETTE IO3:+d *** LA BOUTEILLE ***1h:Nx COPYRIGHT J-E GERARDT:m *** INITIALISATIONs:6500 ' configuration des objets5500 ' Presentation du jeu6000 ' Execution theme musical5760 ' Option clavier ou poignee5000 ' Dessin du jeu;1000 ' Deroulement du jeuS8000 ' Score finalY_:| *** DEROULEMENT DU JEU:VT0:VB0:VV0:VI3:XV48011X((1)37)1:Y((1)27)(X,Y)32(X1,Y)321040$X,Y,P$)OP21420.W$:W$" "10703W$98W(W$):W8W111070HBW91150^LW$:W$""1080uVX2X2:X2391170`S(X2,Y):S321140jX1,Y,P$:X,Y,32:XX1:1100tS123ɇX2,Y,32:2030:11302530~W81210W$:W$""1080"X1X1:IO1əX101110șX111110<S(X1,Y):S321200^X1,Y,P$:X1,Y,32:XX1:1160S123ɇX1,Y,32:2030:11902530W111310W$:W$""1080Y1Y1:Y111330S(X,Y1):S1(X1,Y1):S321270S1321300 X,Y1,P$:X,Y," ":YY1:1220: S123ɇX,Y1,32:2030:1250W S1123ɇX1,Y1,32:2030a 2530 S1123ɇX1,Y1,32:2030:12602530 W101090 (W$:W$""1080 2Y1Y1:Y1271230 <S(X,Y1):S1(X1,Y1):S321370 FS1321400 PX,Y1,P$:X,Y," ":YY1:1320@ ZS123ɇX,Y1,32:2030:1350] dS1123ɇX1,Y1,32:2030g n2530 xS1123ɇX1,Y1,32:2030:13602530  Jeu avec la poignee (A)1591420 (A)1891490 ((A)191(A)189)1490 X2X2:X2391510! S(X2,Y):S321480C X1,Y,P$:X,Y,32:XX1:1440h S123ɇX2,Y,32:2030:14702530| (A)1901550 ((A)191(A)190)1550 X1X1:X101450 S(X1,Y):S321540 X1,Y,P$:X1,Y,32:XX1:1500 S123ɇX1,Y,32:2030:15302530& (A)1751640E ((A)191(A)175)1640\ "Y1Y1:Y111660 ,S(X,Y1):S1(X1,Y1):S321610 6S1321630 @X,Y1,P$:X,Y," ":YY1:1560 JS123ɇX,Y1,32:2030:1590 TS1123ɇX1,Y1,32:2030:25302530& ^S1123ɇX1,Y1,32:2030:16002530: h(A)1831430Y r((A)191(A)183)1430p |Y1Y1:Y1271570 S(X,Y1):S1(X1,Y1):S321700 S1321720 X,Y1,P$:X,Y," ":YY1:1650 S123ɇX,Y1,32:2030:1680S1123ɇX1,Y1,32:2030:25302530:S1123ɇX1,Y1,32:2030:16902530@:S Verre toucheY:w:VTVT1:VBVB1:VVVV1X3((1)38)1:Y3((1)27)(X3,Y3)32ɇX3,Y3,1232040 VB3VB02100X3((1)38)1:Y3((1)26) (X3,Y3)32(X3,Y31)3220702*X3,Y3,124:X3,Y31,127b4VV20VV0:VIVI1:XV,91:XV1,93:XVXV3>VT$(VT):L(VT$)1:VT$(VT$,L)HI1L:48036I,((VT$,I,1)):IR : Bouteille touchee :  I110:X,Y,P1$:5:X,Y,P$:5:I X,Y," ":VIVI15 XVXV3:XV,32:XV1,32D VI01040J P:h *** DESSIN DU JEUn:w:7 Coloration des lignesI480414908140I,((1)7)I Affichage des 3 vies48001,1(20);(17) I48002480083!I,91:I1,93(IH( Affichage de la bouteilleh2X((1)38)1:Y((1)26)<(X,Y)32(X,Y1)325170FX,Y,124:X,Y1,127P Affichage des 10 verresZI110dX((1)38)1:Y((1)27)n(X,Y)325220xX,Y,123I!|:? *** Presentation du jeuE:WX((#276))a6:4l(12)" ";(4);(27)"A"(27)"J *** LA BOUTEILLE ***"::(4)08)"Un pauvre pochard avin@ essaie" "d'attraper les verres qui l'entourent"M08)"Aide-le # se diriger avec les 4 fl$ches ou la poign@e."q08)"Mais ayant d@j# trop bu,""@vite-lui de prendre une bouteille,""sinon, il meurt foudroy@ !!!"08)"Comme ce pochard fait partie""d'une bande de 3 copains, vite un";"autre arrive # la rescousse, qu'un"^"m%me sort pitoyable attend."&08)"Tu perds la partie quand tous"0"les pochards sont foudroy@s.":08)"Il y a toujours 10 verres sur le jeu, ";D"une bouteille en plus tous les 3 verres attrap@s."@N08)"Attir@ par cette beuverie, un"kX"comp$re vient se joindre # la bande"b"tous les 20 verres aval@s."l:"(Appuie une touche pour continuer)";v Choix de l'option ----------:3:1(:15)"Quelle option choisis-tu pour te d@placer ?"L:"1 - les fl$ches du clavier"y"2 - la poign@e de jeu (celle de doite):"Tape le num@ro correspondant !" A$A$"1"OP1:5870A$"2"OP2:58705830:"Tu actives le mouvement du pochard avec "; ROP1ɺ"la barre d'espace."Ⱥ"le bouton de tir.":"(Appuie une touche pour commencer le jeu)"  A$:p:z *** EXECUTION DU THEME MUSICAL:I1323,0,0,3000O,N,W,O1,N11,O,N,0:2,O1,N1,0W1A$:A$""ɩ0,0,0,0:EW::200:6020Kd:nn *** CONFIGURATION DES OBJETStx: Saut du theme musical ------I1160:A: Le verre -------------------I4706447071:A:I,A:  La bouteille ---------------)I4707247079:A:I,A:L Le pochard -----------------iI4680846815:A:I,A:I4682446831:A:I,A:P$"[""]":P1$(219)(221) e accent aigu --------------I4659246599:A:I,A:  a accent grave -------------'I4636046367:A:I,A:J e accent grave -------------gI4636846375:A:I,A:" e accent circonflexe -------,I4637646383:A:I,A:6 Activation poignee de jeu@I10261073:M:I,M:J553,1026:A1024TX:b *** DONNEES DIVERSES$l:Gv Theme musical --------------{3,12,16,3,8,3,12,16,3,8,3,10,16,3,7,3,8,16,3,54,3,16,3,7,4,3,16,3,3,3,12,32,3,8,4,3,16,3,63,8,16,3,6,4,1,16,3,5,3,12,16,3,1,3,10,32,3,33,8,32,2,8,3,12,16,3,8,3,12,16,3,8,3,10,16,3,7F3,8,16,3,5,4,3,16,3,7,4,3,16,3,3,3,12,16,3,8v3,12,8,3,8,4,1,8,3,8,4,3,16,3,6,3,8,16,3,64,1,8,3,5,4,3,8,3,7,3,12,8,3,8,4,1,8,3,13,10,24,3,3,2,8,4,3,3,3,10,4,3,3,3,8,32,2,8 Le verre -------------------62,62,62,62,28,8,8,626 La bouteille ---------------S12,12,12,30,51,33,33,33v Le pochard -----------------51,23,29,31,62,55,48,31 51,58,46,62,31,59,3,62 e accent aigu -------------- 4,8,28,34,62,32,30,0* a accent grave -------------)416,8,28,2,30,34,30,0L> e accent grave -------------gH16,8,28,34,62,32,30,0R e accent circonflexe -------\8,20,28,34,62,32,30,0f Activation poignee de jeup72,173,1,3,72,173,3,3,72,169 z192,141,3,3,169,128,141,15,3*173,15,3,141,0,4,169,64,141L15,3,173,1,3,141,1,4,104,141k3,3,104,141,15,3,104,76,3t236z@:J *** SCORE FINALT:^I13::10:I:hI4803348039:I,32:Ir5:0:(12) |" ";(4);(27);"JSCORE FINAL : ";$ (27);"N";VT;(27);"J VERRES"b ::(4);" ";(27);"HVEUX-TU FAIRE UNE AUTRE PARTIE ? "v "(O/N) ";(20) 6030 A$"O"ɺ(17):240 A$"N"8100