Jeux 1D

→ **MyCalcs** profile · by **EL PHARA** » 06 Feb 2016, 17:21

J'aimerais juste savoir qu'elle commande entrer pour pouvoir déplacer un point partout sur l'écran merci

→ **MyCalcs** profile · by **Ti64CLi++** » 06 Feb 2016, 17:21

Il faut t'aider de getkey() pour du basic z80

→ **MyCalcs** profile · by **EL PHARA** » 06 Feb 2016, 17:25

neuronix wrote:Il faut t'aider de getkey() pour du basic z80

Oui bien sur mais j'aimerais savoir si qqn pouvais me donner un exemple de code

→ **MyCalcs** profile · by **Ti64CLi++** » 06 Feb 2016, 17:30

Voilà un exemple (pas des plus optimisé):

Code: Select all: ClrDraw DelVar XDelVarYDelVarK While not(K PxlOn(X,Y getKey()->K If K:PxlOff(X,Y X+(K=26 and X<94)-(K=24 and X>0)->X Y+(K=34 and Y<62)-(K=25 and Y>0)->Y End

→ **MyCalcs** profile · by **EL PHARA** » 06 Feb 2016, 17:48

Merci mais j'ai trouvé mais merci bcp

→ **MyCalcs** profile · by **Ti64CLi++** » 06 Feb 2016, 17:50

De rien et bonne chance pour la suite

→ **MyCalcs** profile · by **EL PHARA** » 07 Feb 2016, 09:14

Merci

→ **MyCalcs** profile · by **EL PHARA** » 07 Feb 2016, 09:36

neuronix wrote:Voilà un exemple (pas des plus optimisé):
Code: Select all
ClrDraw DelVar XDelVarYDelVarK While not(K PxlOn(X,Y getKey()->K If K:PxlOff(X,Y X+(K=26 and X<94)-(K=24 and X>0)->X Y+(K=34 and Y<62)-(K=25 and Y>0)->Y End

Mais celui la ne marche qu'une fois c'est à dire que le pixel ne peux que bouger d'un pixel

→ **MyCalcs** profile · by **Epharius** » 07 Feb 2016, 10:29

Au lieu de "while not(k" met "while 1"

→ **MyCalcs** profile · by **EL PHARA** » 07 Feb 2016, 10:32

Ok merci mais j'avais une autre question

-- Inutile de faire deux posts pour ça --

Est ce que l'on peut rajouter des des pixels qui sortiraient du point sous la pression d'un bouton ? (style pistolet?)