Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.
Call of duty sur TI-82 stats (fr)
undercrix le 31/10/2012 à 22:16
Avant tout je suis quand meme assez doué pour me tromper et mettre ce sujet dans "Câble, logiciel de transmission et émulateur"
Enfin bref voila le message original =P
Salut =)
Je suis nouveau sur le forum (en fait je suis la depuis hier ^^)
Et j'ai vue toute vos créations franchement je dis bravo =D
Donc voila je mets ma petite contribution perso ;p
C'est un Call of duty (a la troisième personne) en vue de haut
Vous avez : l'entrainement, une bataille contre un tank et un 1 VS 1 (Player VS IA)
Pour les touches :
_Les flèches pour se déplacer
_Les chiffres pour tirer (sauf 5) dans les 8 directions possible (en haut, en bas, a gauche, a droite ainsi que les 4 diagonales )
_Entrer pour la pause
Ps : l'intro est un mouvement, donc n'oublier pas d'appuier sur "entrer" a l'écran de titre (je dis sa au cas ou certaine personnes soit comme un de mes amis et qui regardent l'ecran bouger en se posant des questions ^^)
Voili voilou, et c'est partit pour les lignes ^^
Création 31/10/12
Version 1.2 01/11/12
Correction bug version 1.2 26/01/13
CALLOFDU : 1708 octets
Code
:EffEcr
:1->D
:Repeat 105=X
:Output(2,6,"CALL
:Output(4,9,"OF
:Output(6,8,"DUTY
:Output(8,3,"BY UNDERCRIX
:codetouche->X
:Output(D,1," "
:Output(9-D,16," "
:entAléat(1,8->D
:Output(9-D,16,"ø
:Output(D,1,"ø
:69! (cette ligne de code original ralentit le programme,
:End ici c'est uniquement l'intro)
:Lbl ø
:100->L
:Menu("CALL OF DUTY","ENTRAINEMENT",1,"TANK",2,"1 VS 1",3
:Lbl 1
:1->M
:1->C
:4->A
:8->B
:Goto 4
:Lbl 2
:2->M
:0->K
:2->A
:8->B
:10->Q
:Goto 4
:Lbl 3
:3->M
:4->P
:1->W
:100->L
:3->V
:3->A
:2->B
:0->O
:Lbl 4
:EffVar DEffVar EEffVar FEffVar G
:1->C
:While 1=1
:codetouche->X
:If X=105:Menu("PAUSE","REPRENDRE",A,"QUITTER",ø
:Lbl A
:If X=24:B-1->B
:If X=26:B+1->B
:If X=25:A-1->A
:If X=34:A+1->A
:If A>7:7->A
:If A<2:2->A
:If B>15:15->B
:If B<2:2->B
:If M=2 et A>6:6->A
:If X=84:Then:0->D:1->E:End
:If X=94:Then:1->D:1->E:End
:If X=74:Then:-1->D:1->E:End
:If X=73:Then:-1->D:0->E:End
:If X=72:Then:-1->D:-1->E:End
:If X=82:Then:0->D:-1->E:End
:If X=92:Then:1->D:-1->E:End
:If X=93:Then:1->D:0->E:End
:If 72=X ou 73=X ou 74=X ou 82=X ou 84=X ou 92=X ou 93=X ou 94=X:Then:A->F:B->G:End
:If M=3:P+W->P
:If M=3:If P=2 ou P=7:-W->W
:If M=3 et A=P et 1=entAléat(0,1):Then:P->N:15->0:End
:If M=2 et K<2:Then:7->K:B->R:End
:If M=2:K-1->K
:If V=0:Then:Output(A,3,"IL MEURT":Pause:Goto ø:End
:If L=<0 et M=3:Then:Output(1,1,"VIE: 0 =":Pause:Goto ø:End
:If M=1:Then:If C=1 ou A=I et B=J:Then:entAléat(2,7->I:entAléat(2,15->J:0->C:End:End
:If M=1:Output(1,1,"00000000000000000 00 00 00 00 00 00 00000000000000000
:If M=2:Output(1,1,"+--------------+]^^^^^^^^^^^^^^[]^^^^^^^^^^^^^^[---------------- - - - - - - - - ----------------
:If M=3:Output(1,1," =========] ] ] ] ] ] [ ] ]===============
:If M=1:Output(I,J,"O
:If Q=0 et M=2:Then:Output(7,B-1,"BIM":Pause:Goto ø:End
:If X=93 et M=2:Q-1->Q
:If M=3:Output(P,16,"O
:If M=2:Output(7,B-1,"[O]
:If M=2:Output(K,R,"I
:If M=2 et A=K et B=R:Then:Output(A,B-1,"BIM":Pause:Goto ø:End
:If M=3:Output(1,1,"VIE:"
:If M=3:Output(1,5,L
:Output(A,B,"ø
:If M=3 et O=15:Then:Repeat O<2 ou N=3 et O<6 ou N=6 et O<14:Output(N,O," ":O-1->O:Output(N,O,"°":If N=A et O=B:L-entAléat(34,45)->L:End:End
:If 1<F et F<8 et 1<G et G<16:Then:Repeat non(8>F et F>1 et 16>G et G>1):If M=3 et F=P et G=15:V-1->V:If M=1 et F=I et G=J:1->C:If non(A=F et B=G):Output(F,G," ":F+D->F:G+E->G:Output(F,G,"°"):If M=3 et F=3 et G=5 ou M=3 et F=6 et G=13:17->F:End:End
:End
:End
Et voila =D
J'espere ne pas avoir fais d'erreur en copiant ^^
Bon jeu =D
/!\ Ne confondez pas les O (comme dans Oléééé) et les 0 (zero)
Si il y a le moindre bug (surement une erreur de copie) postez un commentaire
ti stats fr le 01/11/2012 à 12:33
Merci !! je vais le recopier sur ma calculette et je te dirais si il est bien mais il en a tout l'air
undercrix le 01/11/2012 à 13:11
Merci ti stats =P
Bon je suis en train de faire la partie trois : c'est du 1 VS 1 (Player VS IA)
Avec un peu de chance le jeu sera mis a jours ce soir ;pThe K le 01/11/2012 à 13:53
Si c'est une première création je dis bravo
Il est cependant largement optimisable ... avec les If X= [...] par exemple
Je te laisse chercher ^^
undercrix le 01/11/2012 à 13:56
Nan c'est pas ma première programmation, mais c'est mon premier article sur le site ^^
Ouais j'ai vue pour l'optimisation, mais a certain endroit j'ai oublier de la mettre, tkt quand j'aurais mis la mise a jours (ce soir ou demain) j'aurais corriger ce petit détails =Pti stats fr le 01/11/2012 à 19:50
Bon bah j attends la nouvelle version alors
undercrix le 01/11/2012 à 21:12
PLus que quelque minute d'attente
Je suis en train de taper la deuxieme version =P
MTN c'est bon ti stats fr le 04/11/2012 à 15:54
:o premier probleme, au niveau de "TANK",2,",2,"1 VS 1 ",
3
Aidez moi j ai mis 4000 heures a recopier
S.L le 05/11/2012 à 17:36
Regarde si tu n'as pas fait d'erreur ici:
Code
...
:10->Q
:Goto 4
:Lbl 3
:3->M
:4->P
...
@undercrix:
erreur de recopiage ici:
:If M=3 et A=P et 1=entAléat(0,1):Then:P->N:15->
0:End
S.L le 05/11/2012 à 18:26
J'ai recopier ton prog sur Ti Graph Link et j'ai fait un lien pour le télécharger:
http://www.envoyercefichier.co[...]1352136116.html
Ainsi qu'un screen shot de WabbitEmu:
Image manquante
Les erreurs que j'ai pu rencontrer dans ton jeu:
-le tire vers la gauche fait planter le prog (la balle se met à la place du joueur et plus rien ne bouge-dans tout les modes)
-pareil pour la droite
ti stats fr le 05/11/2012 à 19:07
Je ne comprends pas, je n ai pas fait d erreur de recopiage a cet endroit ! ca me met juste err:argumentlinkakro le 05/11/2012 à 21:08
Erreur de guilemet ou de virgule sur la ligne du menu.
Ce jeu a l'air phénoménal. Je le testerai probablement à l'occasion.ti stats fr le 07/11/2012 à 18:04
bon maintenant ca marche, mais autre probleme, je ne peux pas tirer !undercrix le 25/01/2013 à 21:21
Salut a tous, désolé sa fait un moments que je me suis pas connecté, j'ai bien entendu toute vos requêtes, et je vais recopier tout ce que le programmes sur ma calculette afin de voir les bug qui me semble a mon avis dut au recopiage (le jeu marche sur ma calculette)
En grand merci à S.L qui a rendu l'acces plus facile au jeu bien que buguer a certian endroit ^^
PS : faite gaffe aussi au "O" et au zero =P
S.L a écrit :
Regarde si tu n'as pas fait d'erreur ici:
@undercrix:
erreur de recopiage ici:
:If M=3 et A=P et 1=entAléat(0,1):Then:P->N:15->0:End
Mikedu92 le 31/01/2013 à 20:24
Mon mode TANK ne marche pas. Ma calculatrice me dit "ERR:ÉTIQUETTE". Que dois-je faire ? Aidez-moi s'il vous plaît ce jeu à l'air super
linkakro le 31/01/2013 à 21:05
Un Lbl ou un Goto est donc faux. Soit il s'agit d'une incohérence entre les deux, soit une étiquette est mal écrite. Même chose à l'intrieur du menu. (sachant que le menu alterne texte et étiquette)
Tu dois avoir mal saisi le thêta (rond barré). Il s'agit de alpha+3.Mikedu92 le 01/02/2013 à 15:48
Ah oui j'ai carrément sauté 10 liges de code donc c'était pas près de marcher merci
Callofdutylover le 25/09/2013 à 21:52
Bravo !
Il est super !!! Bon j'ai apporté quelques modifs sur les décors en remplaçant la plupart par des ^^^^^^ pour faire comme des sapins et ça rend trop bien !!!
Merci encore mais n'y aurait-il pas un moyen d'accélérer le programme ?
Encore bravo !benjoy le 08/10/2013 à 21:28
Salut à tous j'ai programmé le tout sur ma calculatrice mais le programme me remet toujours sur la page d'accueil et j'ai regardé tout le script mais je n'ai pas trouvé l'origine de l'erreur (j'ai tout de meme décelé des erreurs) merci de me répondre il à l'air trop bien
m@thieu41 le 08/10/2013 à 21:59
Bonjour,
Vérifie que tu as bien mis tous les "Then" après les "If" lorsqu'il y a des "Goto ø" Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.
