Salut toute la communauté.
Je suis en train de travailler sur un programme de contage de points dans le jeux de société, de cartes...
Par exemple, si l'on prend le programme pour le célébre jeu de carte magic, le programme compte les points de vie de chaques joueurs, soit:
| Citer |
Joueur 1
20
Joueur 2
20 |
J'ai donc voulu rendre le programme avec l'utilisation du code touche, afin de multiplier, diviser, augmenter, baisser les points des joueurs à l'aide des touches /*-+ de la calculette.
Je voudrais de plus, la selection des points de vie du joueur dont lequelle on veut soustraire les points,...
J'ai donc fait un premier programme simple pour le jeu de cartes YUGIOH! :
| Code | :Lbl 1
:8000-›A
:8000-›B
:Effdessin
:PleinEcr
:0-›Xmin
:94-›Xmax
:0-›Ymax
:62-›Ymin
:EffEcr
:CoordNAff
:QuadNAff
:AxesNAff
:Horizontale 0
:Horizontale 62
:Verticale 0
:Vertcale 94
:For(X,1,07)
:Texte(10,X,”KENT1”)
:For(X,1,10)
:Texte(X,53,”PRESENTE :”)
:End
:Horizontal 0
:Texte(33,X,,”LP CALCULATOR”)
:Texte(52,27,”VERSION 4.2”)
:Pause
:EffDessin
:Lbl C
:Menu("LP CALCULATOR","L1 -",D,"L2 -",E,"LIFE POINTS",F,”L1 +”,G,”L2 +”,H,"DICE",I,”EXIT”,J)
:Lbl D
:Input "PV L1-",V
:A-V-›A
:Goto F
:Lbl E
:Input "PV L2-",U
:B-U-›B
:Goto F
:Lbl F
:Disp "PLAYER 1 LP",A
:Disp "PLAYER 2 LP",B
:If A≤0:Goto K
:If B≤0:Goto L
:Pause
:If A et B≥0:Goto C
:Lbl G
:Input "PV L1+",T
:A+T-›A
:Goto F
:Lbl H
:Input "PV L2+",S
:B+S-›B
:Goto F
:Lbl I
:ent(NbrAléat*6+1)-›Z
:Disp Z
:Pause
:Goto C
:Lbl J
:Menu(“EXIT?”,”YES”,M,”NO”,N)
:Lbl K
:Effecr
:Texte(1,07,”PLAYER 2 WIN”)
:Pause
:prgmLPCALCUL
:Lbl L
:Effecr
:Texte(1,07,"PLAYER 1 WIN")
:Pause
:prgmLPCALCUL
:Lbl M
:Return
:Lbl N
:Goto C |
cependant je voudrais insérer le code touche.
si quelqu'un bien aimable pourrais gentiment m'aider, je en lui serait reconnaissant.
Merci à vous.
|
