| Call of duty sur TI-82 stats (fr) |
| Auteur |
Message |
undercrix
Autorisation : Membre
Nb de messages : 6
Inscrit le : Mer 31 Oct 2012, 10:31
|
Posté le : Mer 31 Oct 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 
|
 |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
ti stats fr
Autorisation : Membre
Nb de messages : 9
Inscrit le : Mar 30 Oct 2012, 20:13
|
Posté le : Jeu 01 Nov 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
Autorisation : Membre
Nb de messages : 6
Inscrit le : Mer 31 Oct 2012, 10:31
|
Posté le : Jeu 01 Nov 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 ;p
|
 |
|
| |
The K
Autorisation : Membre
Nb de messages : 850
Inscrit le : Sam 15 Oct 2011, 11:07
|
Posté le : Jeu 01 Nov 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 ^^
---------------------- La la la ...
Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL
Vous avez un problème avec l'ordinateur avec votre calculatrice ? SOLUTION EN VIDEO
Mes programmes sur le site : Produit scalaire KMorpion Puissance 4 Mastermind
Mes nouveaux programmes de calcul formel : FCarré FPrime
Projet base de données : ici mais abandonné. Trop de travail ... |
 |
|
| |
undercrix
Autorisation : Membre
Nb de messages : 6
Inscrit le : Mer 31 Oct 2012, 10:31
|
Posté le : Jeu 01 Nov 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 =P
|
 |
|
| |
ti stats fr
Autorisation : Membre
Nb de messages : 9
Inscrit le : Mar 30 Oct 2012, 20:13
|
Posté le : Jeu 01 Nov 2012, 19:50
|
|
|
Bon bah j attends la nouvelle version alors 
|
 |
|
| |
undercrix
Autorisation : Membre
Nb de messages : 6
Inscrit le : Mer 31 Oct 2012, 10:31
|
Posté le : Jeu 01 Nov 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
Autorisation : Membre
Nb de messages : 9
Inscrit le : Mar 30 Oct 2012, 20:13
|
Posté le : Dim 04 Nov 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
Autorisation : Membre
Nb de messages : 101
Inscrit le : Jeu 02 Jui 2011, 15:17
|
Posté le : Lun 05 Nov 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
---------------------- L'homme est né pour programmer.
Émulateur de TI en ligne!
Mes jeux: Bouge!;WallJump;Mouche;Enter;UPMario;Mémoriz;Copter;Pong2P;Pokémon;MineCraft
Mes Prog: XCodeX;IMC;Matrix;Noël
https://web.archive.org/web/20190527230815/https://sl-tiprog.e-monsite.com :site en cours de création. |
 |
|
| |
S.L
Autorisation : Membre
Nb de messages : 101
Inscrit le : Jeu 02 Jui 2011, 15:17
|
Posté le : Lun 05 Nov 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.com/files/yk1Ybf1352136116.html
Ainsi qu'un screen shot de WabbitEmu:

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
---------------------- L'homme est né pour programmer.
Émulateur de TI en ligne!
Mes jeux: Bouge!;WallJump;Mouche;Enter;UPMario;Mémoriz;Copter;Pong2P;Pokémon;MineCraft
Mes Prog: XCodeX;IMC;Matrix;Noël
https://web.archive.org/web/20190527230815/https://sl-tiprog.e-monsite.com :site en cours de création. |
 |
|
| |
ti stats fr
Autorisation : Membre
Nb de messages : 9
Inscrit le : Mar 30 Oct 2012, 20:13
|
Posté le : Lun 05 Nov 2012, 19:07
|
|
|
Je ne comprends pas, je n ai pas fait d erreur de recopiage a cet endroit ! ca me met juste err:argument
|
 |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Lun 05 Nov 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.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
 |
|
| |
ti stats fr
Autorisation : Membre
Nb de messages : 9
Inscrit le : Mar 30 Oct 2012, 20:13
|
Posté le : Mer 07 Nov 2012, 18:04
|
|
|
bon maintenant ca marche, mais autre probleme, je ne peux pas tirer !
|
 |
|
| |
undercrix
Autorisation : Membre
Nb de messages : 6
Inscrit le : Mer 31 Oct 2012, 10:31
|
Posté le : Ven 25 Jan 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
| Citer : S.L | 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
Invité
|
Posté le : Jeu 31 Jan 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
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Jeu 31 Jan 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.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
 |
|
| |
Mikedu92
Invité
|
Posté le : Ven 01 Fév 2013, 15:48
|
|
|
Ah oui j'ai carrément sauté 10 liges de code donc c'était pas près de marcher merci 
|
| |
|
| |
Callofdutylover
Invité
|
Posté le : Mer 25 Sep 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
Invité
|
Posté le : Mar 08 Oct 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
Autorisation : Membre
Nb de messages : 848
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Mar 08 Oct 2013, 21:59
|
|
|
Bonjour,
Vérifie que tu as bien mis tous les "Then" après les "If" lorsqu'il y a des "Goto ø"
---------------------- Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne  |
 |
|
| |