Forum

Catégorie : Programmes
Forum : Les programmes des internautes
Vues : 6082
Réponses : 79
Type : discussion
Etat : réponses autorisées
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.

Spacman ( jeu de tir dans "l'espace" ) - Page 1 / 2

Monstercrunch le 09/12/2009 à 22:52
Bonjours à tous, voilà quelques mois je me suis lancer dans la programmation. J'ai voulu essayer de faire mon propre jeu mais c'était trop dur pour un débutant comme moi. Heureusement il y avait Sypotu ( et d'autres aussi, ils se citeront surement ^^ ). Donc voila deux version du jeu qui, je précise, à été "codé" par Sypotu. Et moi dans l'histoire ? ba je donnais quelques idées ^^', je testais aussi... mais bon c'est sypotu qui a fait le plus gros, encore une fois merci à lui !

Sans plus tarder les deux codes au format .83p

Version complete :
http://www.mediafire.com/?ozmguhnglz2

Version light ( plus rapide ) :
http://www.mediafire.com/?wwwyrmmzdyi


Bon jeu à tous !

PS: donnez nous vos avis !
sypotu le 10/12/2009 à 06:54
c'est un super jeu !
bravo à celui qui l'a fait !

Non sérieusement, il est un peu lent et répétitif, mais bon c'est jouable winkle.gif
dysto le 10/12/2009 à 07:59
C'est le même Space Impact que celui de "l'Aide à la programmation" ?
Sinon, un joli projet rudement bien mené par sypotu une fois de plus et qui a abouti grâce à quelques petits coups de mains par-ci par-la et grâce à des testeurs.

Bravo ! clown.gif bigmouth.gif
Monstercrunch le 10/12/2009 à 15:43
sypotu a écrit :
c'est un super jeu !
bravo à celui qui l'a fait !


Vantard va ^^
sypotu le 11/12/2009 à 16:03
Un petit screenshot animés pour illustrer le tout :
Akmdad le 29/07/2010 à 00:41
tu pourrais faire avancer les tirs de 2 cases ca irait plus vite
harven le 26/08/2010 à 09:48
Salut a tous.
Ce jeu est il compatible avec les 82 ( question bête vu qu'on est sut le sit tous 82 ).
Si oui :
Serai il possible de me poster le code ? ( svp )
Car je n'est pas de cable cry.gif .

Ps : le code est il long et combien de memoire prend le programme ?

Harven.
Persalteas le 26/08/2010 à 09:53
je crois que monstercrunch ne fréquente plus le forum... désolé.
harven le 26/08/2010 à 09:55
Ok cry.gif
Persalteas le 26/08/2010 à 09:57
attends, je le télécharge, je le mets sur ma calto et je poste le code.

alors il fait 1276 octetes
harven le 26/08/2010 à 10:00
Ok, merci happy.gif
Persalteas le 26/08/2010 à 10:36
@ = thêta [alpha][3]
-> =sto [sto]


Code

Lbl DD
1->U:0->Q:0->R:0->@
3->D
EffEcr
Lbl D
Output(4,5,"NIVEAU    "
Output(4,12,U
0->S
Pause
EffEcr
Output(1,1,"ValAct:@@@  PTS:0"
If D=2:Output(1,6," "
If D=1:Output(1,5,"  "
-1->C:2->B:0->F:4->Y:1->X
0->K:1->N:1->O:1->P:0->M
0->G:0->H:0->A:16->W:4->V
Lbl A
Output(1,13,@
If N=1
Output(B,14,"-O<"
If O=1
Output(B+2,14,"-O<"
If P=1
Output(B+4,14,"-O<"
If Q=1
Output(B+1,14,"-O<"
If R=1
Output(B+3,14,"-O<"
If B=2 ou B=4
-C->C
If F=0:Then
B->G:13->H:1->F
End
If N=1
Output(G,H,"-
If O=1
Output(G+2,H,"-
If P=1
Output(G+4,H,"-
If (Q=1 ou R=1) et A=0 et H=9:Then
B->V:13->W:1->A
End
If Q=1
Output(V+1,W,"-
If R=1
Output(V+3,W,"-
codetouche->T
If T=105:Goto M
Lbl B
If T=/=0
Output(Y,X,"   "
Y-(T=25 et Y=/=2)+(T=34 et Y=/=8)->Y
Output(Y,X,">H="
If M=18:0->K
If T=26 et K=0:Then
Y->L:X+3->M:1->K
End
If K=1
Output(L,M,"-
If (H<4 et ((G=Y et N=1) ou (G+2=Y et O=1) ou (G+4=Y et P=1))) ou (W<4 et ((V+1=Y et Q=1) ou (V+3=Y et R=1))):Then
D-1->D
Output(Y,X,"***
@-5(non(N)+non(O)+non(P)+non(Q)+non(R))->@
If U<3:@+10->@
If U>2:Then
1->Q:1->R:0->A:16->W:4->V:End
If D=/=0:Goto D
Output(1,4,"   "
Output(4,4,"GAME OVER
Pause
EffEcr
Output(4,5,"*SYPOTU*             //ça c'est pas directement utile, mais par
Stop                                respect pour le programmeur on le laisse.
End
If M=14 et K et ((L=B et N) ou (L=B+1 et Q) ou (L=B+2 et O) ou (L=B+3 et R) ou (L=B+4 e P)):Then
@+5->@
If L=B:0->N
If L=B+2:0->O
If L=B+4:0->P
If L=B+1:0->Q
If L=B+3:0->R
End
For(Z,0,4
Output(G+Z,H," "
End
H-2->H
If H=-1:0->F
If A=1:Then
Output(V+1,W," "
Output(V+3,W," "
W-2->W
If W=-1:0->A:End
For(Z,0,4
Output(B+Z,14,"   "
End
B+C->B
If K=1:Then
Output(L,M," "
M+2->M:End
If M=17:0->K
If N+O+P=0 et U<3:Goto W
If N+O+P+Q+R=0:Goto W
Goto A
Lbl W
S+1->S
If S<U:Then
1->N:1->O:1->P:0->F
If U>2:Then
1->Q:1->R:0->A:16->W:4->V:End
Goto A
End
Output(1,13,@
Output(4,5,"YOU WIN !
U+1->U
If U>2:Then
1->Q:1->R:0->A:16->W:4->V:End
Pause
Goto D
Lbl M
Menu("PAUSE","REPRENDRE",B,"RECOMMENCER",DD,"QUITTER",Q
Lbl Q
EffEcr
Output(4,5,"*SYPOTU*
Output(1,1,"




et voilà.
ce code est destiné a une stats, il est possible qu'il y ait des fonctions que tu n'aies pas sur ta 82. dis moi, je verrais comment les remplacer.

ex: tu ne peux pas écrire Lbl DD, donc remplace par Lbl F.
harven le 26/08/2010 à 10:44
Non ca va je crois que ca va marché , merci happy.gif
Je le test aujourd'hui ou demain et je te dit s'il est bien .
Persalteas le 26/08/2010 à 10:58
je viens de le tester, il est bien.
Sypotu, c'est pas n'importe qui.
harven le 26/08/2010 à 11:02
c'est quoi " valact " ?
Sangohan38 le 26/08/2010 à 11:23
Je crois que c'est une fonction du genre value mais en tout cas c'est pas grave
car elle est dans un output et elle n'existe pas sur 82.

Sangohan38
Persalteas le 26/08/2010 à 11:27
écris le en toutes lettres, ça changera pas grand chose.
harven le 26/08/2010 à 11:38
Dans le code ca met :
output .... " valact ( 3 theta ) pts:0 "

Et sur le screen ca met "pv : (3theta ) pts:0 "

je peu donc changer val act ?
Persalteas le 26/08/2010 à 11:48
oui
harven le 26/08/2010 à 11:55
Il y a un probleme le jeu me met erreur syntaxe a la ligne:

Code
If T=/=0


Sur le truc au millieu des egal.
Persalteas le 26/08/2010 à 12:16
oui excuse: =/= ça veut dire "différent de" [2nde][math][2]
harven le 26/08/2010 à 12:18
dit moi , comment on remet un avatar cry.gif
Persalteas le 26/08/2010 à 12:20
ben c'est toi qui m'a dit hier!
vérifie que dans ton profil, la case " effacer l'avatar " n'est pas cochée.

tu as trouvé, pour =/= ?
harven le 26/08/2010 à 12:21
je l'ai coché pour changer mais j'arrive plus cry.gif
Persalteas le 26/08/2010 à 12:23
eh ben re copie/colle une adresse...
harven le 26/08/2010 à 13:36
diferent de , veus dis non egal ?
Persalteas le 26/08/2010 à 13:52
oui, égal barré
harven le 26/08/2010 à 14:49
Je l'ai test et j'ai rencontrer 3 problemme :

1) Les "theta" ne s'efface pas quand on se fait toucher.

2) Le vaiseau laisse une trace (quand il bouge).

3) Le jeu se stop a la fin du niveaux 1.
Persalteas le 26/08/2010 à 15:09
alors, les problèmes un et trois, tu as peut-être raison, je n'ai pas poussé le jeu jusque là, mais le 2 je ne l'avais pas quand j'y ai joué.

erreur de recopiage, peut-être?

je jette un coup d'oeil.
harven le 26/08/2010 à 15:20
J'ai regle le probleme 2 :

Code
Output(Y,X," "     /////// il fallait que je mette 3 espace .
...
Output(Y,X,">H="


Sinon le 1 et le 3 je ne voie pas cry.gif .
Persalteas le 26/08/2010 à 15:39
réponse: non également, moi ça va aussi au niveau 2

pour le 3e problème est par contre vrai.

je t'envoie une partie du code modifié pour que ça s'efface.
harven le 26/08/2010 à 15:42
envoie moi aussi le code qui gere la monter au niveau sup stp , que je regarde ce qui va pas ( jai beau regarder , trop de variable , perdue dans le code )
Persalteas le 26/08/2010 à 15:45
désolé, j'ai la flemme, il programme bizzarement, sypotu, je situe mal comment son prog se déroule.
pour ton truc qui passe pas au niveau 2:

déjà pour passer au level 2 il faut avoir dégommé les 3 vaisseaux adverses.
si c'est ce que tu as fait, vérifie tes Lbl.
harven le 26/08/2010 à 16:03
le probleme des niveau est resolut : ( il me manqué 6 ligne de code ).
reste plus que le probleme des "theta"
harven le 26/08/2010 à 16:40
Quelqu'un pourait m'aider pour le probleme 1 ( c'est a dire les "theta" qui represente les point de vie qui ne s'efface pas ( 3 au total )).

Aider moi please.

Harven.
Persalteas le 27/08/2010 à 10:08
eurèka, comme dirait un collègue. bigmouth.gif

il faut remplacer:
:Output(1,1,"ValAct:@@@ PTS:0"

par

:Output(1,2,"V:@@@ PTS:0"

et le jeu se passe normalement.
harven le 27/08/2010 à 10:54
Ouinnn cry.gif pour moi ca marche pas.
C'est toujours pareil.
Sangohan38 le 27/08/2010 à 12:46
J'ai trouvé!

Remplace:
Code

If D=2:Output(1,6," "
If D=1:Output(1,5,"  "


Par:
Code

If D=2:Output(1,4," "
If D=1:Output(1,5," "


Bien sur il faut que tu aie fait la modification de persalteas.

Sangohan38
harven le 27/08/2010 à 13:21
J'ai trouver grace a toi j'avait mis

Code
output(1,6," "
output(1,7," "     <- l'erreur est ici , ce net pas 7 mais 5.


merci.
xZ0mB!3-xKr le 26/10/2011 à 21:30
slt tout le monde j'aimerai savoir comment on tire ?? mais sinon bien fait happy.gif
sandro le 26/10/2011 à 23:30
essaye toute les touches, je n'en sais rien (il est un peu bizzard le code je trouve)
xZ0mB!3-xKr le 27/10/2011 à 00:13
c'est ce que j'ai fait :/ et maintenant en plus il ne veut plus ce deplacer en haut , je crois que je vais l'effacer ! mais si vous avez un jeux comme celui la je le veut bien
The K le 27/10/2011 à 11:06
Si je ne me trompe pas, la touche pour tirer est la flèche droite winkle.gif
Je n'ai pas essayé le code", mais sachant que le code touche est lié a la valeur T, et que T=25 c'est flèche haut et T=34 flèche bas ... donc pour se déplacer, il ne reste plus que T=105, ce qui est la touche entrée, pour faire une pause, et T=26, la flèche droite ... qui doit donc servir à tirer.
Si ça ne marche toujours pas je te conseille de vérifier toutes les lignes relatives à la variable T cupsmiley.gif
The K le 27/10/2011 à 11:09
Hum, j'avais oublié, ça vient peut être des variables L et M qui représentent ton missile winkle.gif
xZ0mB!3-xKr le 27/10/2011 à 11:44
merci pour ton aide happy.gif mais du coup je les supprimer
The K le 27/10/2011 à 11:49
(se sent un peu idiot d'arriver trop tard xD)
xZ0mB!3-xKr le 27/10/2011 à 11:56
dsl, mais esque tu as un bon jeu sur la ti-82 stat.fr a part un pong( ormis si c un pong a 2j la je veut bien ) un casbriQ un snake et un papy-jump???
xZ0mB!3-xKr le 27/10/2011 à 11:57
dsl, mais esque tu as un bon jeu sur la ti-82 stat.fr a part un pong( ormis si c un pong a 2j la je veut bien ) un casbriQ un snake et un papy-jump???
sandro le 27/10/2011 à 12:14
Je doit dire que je joue pas trop, mais si tu veux vraiment jouer beaucoup sur TA TI, à la limite réfléchit à achetter ou empreinter un cacle TI-Ordi, comme ça tu peut télécharger des jeux supperbes en assembleur tels que Supper Mario, Sokoban, ...

Sandro
The K le 27/10/2011 à 13:53
Moi je dis si tu veux un ti pour jouer dessus il te faut au moins une ti 83 :p (t'sais la jolie bleue transparente la) ... parce qu'elle a plus de mémoire et que dessus tu peux faire tourner des jeux en assembleur sans risque.
Après comme bon jeu perso j'aime bien le démineur SP de coc5, efficace et pas trop lourd, ainsi que le pong (2j) de alexis sur son site : espace TI.
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.