prob murs

→ **MyCalcs** profile · by **Syfo** » 01 Nov 2006, 08:54

univscien wrote:Nouveau code:

:ClrDraw
:RecallPic 1
:4-A
:2-B
:Repeat K=105
:getKey-K
:Pxl-Off(B,A)
xl-Off(B,A+1)
xl-Off(B+1,A)
xl-Off(B+1,A+1)
:If K=26and not(pxl-Test(B,A+2)) and not(pxl-Test(B+1,A+2))
:A+1-A
:If K=24 and not(pxl-Test(B,A-1)) and not(pxl-Test(B+1,A-1))
:A-1-A
:If K=25 and not(pxl-Test(B-1,A)) and not(pxl-Test(B-1,A+1))
:B-1-B
:If K=34 and not(pxl-Test(B+2,A)) and not(pxl-Test(B+2,A+1))
:B+1-B
:Pxl-On(B,A)
xl-On(B,A+1)
xl-On(B+1,A)
xl-On(B+1,A+1)
:End

J'avais un probléme de direction et de pxl.
J'utilise maintenant PxlOn()
et non PtOn()
Donc tout va bien, rien ne traversse les murs et tout va dans le bon sens.

Le seul problème (encore UN... ?)
C'est que mon groupe de 4pxl clignote trés vite et je ne le voit qu'à moitié.
Quelqu'un a une idée pour que je vois les pxl en + foncé?? please?
Merci.

si ça clignote c'est parce que meme quand on n'appuie pas sur une touche il font comme s'il se deplaçait (et s'efface) puis se remettte au meme endroit.
donc au moment du getkey, mets ceci:
Repeat G
getkey-G
End
cela ne sortira de la boucle que si une touche est pressee et cela ne clignotera donc plus