0 Members and 1 Guest are viewing this topic.
:If getKey(2):.Si il y a un déplacement, alors on inverse A:1-A=>A:Pt-On(X,Y,A*8+Pic1:.Quand A vaut 0, c'est le pied gauche en avant, et quand il vaut 1, c'est le pied droit en avant (par exemple):Else:Pt-On(X,Y,Pic2:.Les deux pieds collés:End
Et maintenant, pour la gestion des pas du personnage: il faut que E fasse Getkey-1(1er Pas) Puis E fasse Getkey+3 s'il est inférieur à 4(2ème pas).
:.ESSAI:[3828EEABAB81817E]→Pic1:20→X→Y:ClrDraw:ClrHome:Repeat getkey(15):X-((X=/=4) and getkey(2))+(getkey(3) and (X=/=84))→X:Y-((Y=/=1) and getkey(4))+(getkey(1) and (Y=/=47))→X:sub(CHG:DispGraph:sub(CHG:End:Lbl CHG:Pt-Change(X,Y,Pic1:Text(X-4,Y+9,"FUCK!"
COMPILING...1st Pass: 100%2nd Pass: 100%Writing App... 628 Byt 76%ERR: UNKNOWN ERRCode 4535555
:.ESSAI:3→A:ClrHome:Output(0,0,A>Dec:Pause 1000
------------------| 3 | | | | | | | | | ------------------
.TBPOTW...sub(TBF)...Return...Lbl TBF...=>If ...=>...=>Return=>End=>...=>Return...