Poster un nouveau sujet Poster une réponse Page: 1,      >>
Le Snake Le Vrai!
Auteur Message
Samos



Autorisation : Membre
Nb de messages : 300
Inscrit le : Lun 14 Mai 2012, 18:51
Posté le : Mar 03 Juil 2012, 16:40   Citer 

Au final, j'ai quand même fait un snake a moitié perso!
(prochaine étape IA pour un snake qui n'a pas besoin d'être commandé godgrace.gif )


Code

0->G
:26->Z
:0->M
:11->P
:-10->Q
:0->Xmin
:23.5->Xmax
:0->Ymax
:-62/3->Ymin
:1->Dim(L1:1->dim(L2:1->dim(l3
:0->K:0->L
:Clrdraw

:Menu("SNAKE BY SAM","CLASSIC MODE",1,"SURVIVALMODE",4,"QUITTER",3

:Lbl 1
:M+1->M
:If M=15
:M+G->G
:If G=15 and M=15
:Then
:ClrDraw
:1->M
:11->P:-10->Q
:1->dim(L1:1->dim(L2:1->dim(L3
:prgmMAPSN1
:End
:If G=30 and M=15
:Then
:ClrDraw
:1->M
:26->Z
:1->dim(L1:1->dim(L2:1->dim(L3
:11->P:-10->Q
:prgmMAPSN2
:End
:If G=45 and M=15
:Then
:ClrDraw
:1->M
:1->dim(L1:1->dim(L2:1->dim(L3
:11->P:-10->Q:26->Z
:prgmMAPSN3
:End
:If M=15 et G=60
:Then
:ClrDraw
:1->M
:1->dim(L1:1->dim(L2:1->dim(L3
:11->P:-10->Q:26->Z
:prgmMAPSN4
:End
:If G=75:Goto 4


:Pt-Off(B,C,3
:DelVar BDelVar C
:Repeat not(pxl-Test(-3C,4B
:randInt(2,22->B
:randInt(-1,-19->C
:End
:Pt-On(B,C,3


:Repeat B=P and C=Q
:Text(57,0,M+G
:P+K->P
:Q+L->Q
:If P>=23:P-23->P
:If P<=0:P+23->P
:If Q>=0:Q-20->Q
:If Q<=-20:Q+20->Q
:Pt-Off(L1(1),L2(1),2
:M+1->dim(L3
:P->L1(M+1
:Q->L2(M+1
:SortA(L3,L1
:SortA(L3,L2
:If pxl-Test(-3Q,4P
:Then
:If not(P=B and C=Q
:Then
:ClrDraw
:Text(20,40,"PERDU
:Text(30,40,"SCORE:
:Text(40,40,M+G
:Stop
:End
:End
:Pt-On(L1(M),L2(M),2


:getKey->A
:If not(A) or (A#26 and A#25 and A#24 and A#34):Z->A
:K->E:L->F
:(A=26)-(A=24->K
:(A=25)-(A=34->L
:A->Z
:If E=-K:E->K
:If F=-L:F->L
:End
:Goto 1
:Lbl 4
:prgm SURVIVAL
:Lbl 3
:Stop




Maintenant les maps

MAPSN1

Code

Line(0,0,23,0
Line(0,0,0,-20
Line(0,-20,23.5,-20
Line(23,-20,23,0



MAPSN2

Code

Line(5,-7,18,-7
Line(5,-14,18,-14
Line(1,-1,1,-5
Line(1,-1,6,-1
Line(1,-20,1,-16
Line(1,-20,6,-20
Line(18,-1,23,-1
Line(23,-1,23,-5
Line(18,-20,23,-20
Line(23,-20,23,-16



MAPSN3

Code

Line(8,0,8,-8
Line(16,-62/3,16,-12
Line(0,-14,8,-14
Line(23.5,-7,16,-7



MAPSN4

Code

Line(0,0,23,0
Line(0,-20,23,-20
Line(0,0,0,-8
Line(0,-20,0,-12
Line(23,0,23,-8
Line(23,-20,23,-12
Line(6,-3,6,-9
Line(6,-11,6,-17
Line(18,-3,18,-9
Line(18,-11,18,-17
Line(8,-13,16,-13
Line(8,-7,16,-7
Line(8,-5,16,-5
Line(8,-15,16,-15



SURVIVAL

Code

:11->P:-10->Q:5->V:26->Z
:EffDessin
:Lbl 3
:G+1->G
:Pt-Off(B,C,3
:entaleat(-1,-19->E
:entaleat(1,22->F
:entaleat(1,22->H
:ligne(F,E,H,E
:Repeat non(pxl-test(-3C,4B
:entaleat(-1,-20->C
:entaleat(1,22->B
:End
:Pt-on(B,C,3

:Repeat B=P et Q=C
:Texte(57,0,G
:Texte(57,91,V
:Pt-Off(P,Q,2
:P+K->P
:Q+L->Q
:If P<=0:P+23->P
:If P>=23:P-23->P
:If Q>=0:Q-20->Q
:If Q<=-20:Q+20->Q
:If pxl-test(-3Q,4P
:Then
:If B#P et Q#C
:V-1->V
:End
:Pt-on(P,Q,2
:codetouche->A
:K->E:L->F
:If non(A) ou (A#24 et A#25 et A#26 et A#34):Z->A
:(A=26)-(A=24->K
:(A=25)-(A=34->L
:A->Z
:If K=-E:E->K
:If L=-F:F->L
:If V<=0:Goto 5
:End
:Goto 3
:Lbl 5
:EffEcr
:Output(3,2,"PERDU!
:Output(5,2,"SCORE:
:Output(5,9,G






Bon il reste quelques maps à faire mais je pense que c'est pas mal!
Merci à tous ceux qui m'ont aidé à le réaliser.

 Adresse email Haut de page Bas de page 
 
The K



Autorisation : Membre
Nb de messages : 878
Inscrit le : Sam 15 Oct 2011, 11:07
Posté le : Mar 03 Juil 2012, 18:39   Citer 

Un petit lien de download ? winkle.gif

----------------------
La la la ...

Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL
Un problème de programmation ? Allez consulter ce tutoriel crée pour cela : TUTORIEL PROGRAMMATION
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 ...
 Adresse email Haut de page Bas de page 
 
Samos



Autorisation : Membre
Nb de messages : 300
Inscrit le : Lun 14 Mai 2012, 18:51
Posté le : Mar 03 Juil 2012, 18:40   Citer 

Je ne suis pas arrivé à connecter ma TI à mon ordi si tu t'en rappelle godgrace.gif

 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
The K



Autorisation : Membre
Nb de messages : 878
Inscrit le : Sam 15 Oct 2011, 11:07
Posté le : Mar 03 Juil 2012, 18:45   Citer 

Pas faux. Mais il y a moyen de faire sans winkle.gif

(même si je reconnais c'est plus galère)

----------------------
La la la ...

Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL
Un problème de programmation ? Allez consulter ce tutoriel crée pour cela : TUTORIEL PROGRAMMATION
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 ...
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
F-BVXT



Autorisation : Membre
Nb de messages : 178
Inscrit le : Dim 27 Mai 2012, 20:38
Posté le : Mar 03 Juil 2012, 19:01   Citer 


Citer
prochaine étape IA pour un snake qui n'a pas besoin d'être commandé


Euh le but c'est quand même de jouer, non ? eyeonly.gif
Par contre, je trouve que ça serait une super idée pour faire une démo dans ton snake, il me semble que ça n'a encore jamais été fait (en tout cas je n'en ai jamais vu).

----------------------
Il y a 10 types de personnes dans le monde : celles qui comprennent le binaire et celles qui ne le comprennent pas.
 Adresse email Haut de page Bas de page 
 
EGUL



Autorisation : Membre
Nb de messages : 46
Inscrit le : Lun 02 Juil 2012, 11:40
Posté le : Mar 03 Juil 2012, 20:06   Citer 

+1 Pour l'idée de la démo juste pour le défi godgrace.gif

----------------------
En attente des résultats du bac!
Programmeur TI-82 fou
Prêt à aider ceux qui en ont besoin
 Adresse email Haut de page Bas de page 
 
Samos



Autorisation : Membre
Nb de messages : 300
Inscrit le : Lun 14 Mai 2012, 18:51
Posté le : Mar 03 Juil 2012, 20:42   Citer 

Pour la demo il faudrait que j'arrive à connecter ma calto or je ne peux pas cry.gif
ou du moins je m'y prend d'une mauvaise manière!
Autre solution recopier le code sur vti mais comme je suis un flemmard et que euh... rien a dire vous avez gagné maxiangry.gif

 Adresse email Haut de page Bas de page 
 
F-BVXT



Autorisation : Membre
Nb de messages : 178
Inscrit le : Dim 27 Mai 2012, 20:38
Posté le : Mar 03 Juil 2012, 21:42   Citer 


Citer
Pour la demo il faudrait que j'arrive à connecter ma calto or je ne peux pas


Je parlais d'une démo dans le jeux en fait. Tu sais, avec un Menu au début du programme ressemblant à quelque chose comme ça :

Code
Menu("SNAKE","JOUER",J,"DEMO",D,"QUITTER",Q


Et la démo, au lieu d'être rigoureusement la même à chaque fois, serait en fait un IA. glasses.gif
Sinon, je peux le recopier si tu veux ?

----------------------
Il y a 10 types de personnes dans le monde : celles qui comprennent le binaire et celles qui ne le comprennent pas.
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
blg_flg



Autorisation : Membre
Nb de messages : 661
Inscrit le : Mer 23 Mai 2012, 17:28
Posté le : Mar 03 Juil 2012, 21:55   Citer 

Bizarrement, je crois qu'il veut bien, mais ta démo serait juste là pour montrer un snake qui se "débrouille tout seul"? eyeonly.gif

 Adresse email Haut de page Bas de page 
 
F-BVXT



Autorisation : Membre
Nb de messages : 178
Inscrit le : Dim 27 Mai 2012, 20:38
Posté le : Mar 03 Juil 2012, 21:58   Citer 

Bah ça permettrait de montrer les différentes Maps du jeux et surtout ça serait unique en son genre. C'est comme dans les jeux vidéos, quand tu reste trop longtemps inactif sur l'écran "Appuyez sur START" une démo s'active, sauf que c'est toujours la même et qu'en plus elle sert à rien parce que la plupart du temps quand tu es inactif c'est que tu n'es pas devant ta télé godgrace.gif

----------------------
Il y a 10 types de personnes dans le monde : celles qui comprennent le binaire et celles qui ne le comprennent pas.
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
blg_flg



Autorisation : Membre
Nb de messages : 661
Inscrit le : Mer 23 Mai 2012, 17:28
Posté le : Mar 03 Juil 2012, 22:01   Citer 

En fait ce serait plus inutile qu'un screenshot, si j'ai bien compris. laugh.gif

 Adresse email Haut de page Bas de page 
 
F-BVXT



Autorisation : Membre
Nb de messages : 178
Inscrit le : Dim 27 Mai 2012, 20:38
Posté le : Mar 03 Juil 2012, 22:10   Citer 

Bah non, parce qu'un screenshot c'est toujours le même, alors que là, avec une IA deux démos ne seront jamais identiques. En plus, un screenshot tu le visualise sur un PC or là c'est directement à l'intérieur de la calculette donc ça à beaucoup plus la classe. glasses.gif

Sinon, dans le programme, il y a écrit "Test" à la ligne 50, ce serait pas "Text" plutôt ?

----------------------
Il y a 10 types de personnes dans le monde : celles qui comprennent le binaire et celles qui ne le comprennent pas.
 Adresse email Haut de page Bas de page 
 
blg_flg



Autorisation : Membre
Nb de messages : 661
Inscrit le : Mer 23 Mai 2012, 17:28
Posté le : Mar 03 Juil 2012, 22:17   Citer 

Justement! Tu as ta calto, donc c'est plus inutile. Tu peux jouer, mais tu regardes le screenshot... Logique. godgrace.gif



Citer : F-BVXT
Sinon, dans le programme, il y a écrit "Test" à la ligne 50, ce serait pas "Text" plutôt ?


Regarde ton clavier. winkle.gif


ps: oui je sais, je suis méchant. cupsmiley.gif

 Adresse email Haut de page Bas de page 
 
F-BVXT



Autorisation : Membre
Nb de messages : 178
Inscrit le : Dim 27 Mai 2012, 20:38
Posté le : Mar 03 Juil 2012, 22:26   Citer 


Citer
Regarde ton clavier.


Je connais le clavier, c'est bien pour ça que j'ai proposé Text mais je demande parce que personnellement, je ne fais quasiment jamais de fautes de frappe dues à la proximité des touches (piano oblige godgrace.gif ). Donc je demande parce que ça aurait pu être une multitude d'autres fonctions utilisant le terme "test".
De toute façon je vais essayer et on verra bien.


Citer
Justement! Tu as ta calto, donc c'est plus inutile. Tu peux jouer, mais tu regardes le screenshot...


Serait tu en train de remettre en question l’existence même des démos ? Dans ce cas je vais m'y prendre différemment pour te convaincre. Pourquoi programmer un Snake sur sa calculette alors que tu en as des nettement plus beaux sur internet et même sur Youtube ? C'est parce que c'est un défis personnel que d'être capable de programmer ses jeux soi-même, n'est-ce pas ? Donc, au fond ça ne sert à rien. Et bah, c'est pareil pour la démo, sauf qu'en plus celles-ci n'existe nul part ailleurs. Donc en plus de la fierté de programmer soi-même son jeux, tu a la fierté d'avoir fait quelque chose d'unique. Alors, convaincu cette fois ?

EDIT : C'est bon, j'ai mis le programme en ligne ici. Par contre Samsam, t'es sur de vouloir qu'il soit immortel ton snake ? Parce que ça risque de devenir long au bout d'un moment tu trouve pas ? bigmouth.gif

----------------------
Il y a 10 types de personnes dans le monde : celles qui comprennent le binaire et celles qui ne le comprennent pas.
 Adresse email Haut de page Bas de page 
 
The K



Autorisation : Membre
Nb de messages : 878
Inscrit le : Sam 15 Oct 2011, 11:07
Posté le : Mar 03 Juil 2012, 23:50   Citer 

C'est vrai que c'est un petit problème de "end game" (comme dirait un gamer winkle.gif )

----------------------
La la la ...

Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL
Un problème de programmation ? Allez consulter ce tutoriel crée pour cela : TUTORIEL PROGRAMMATION
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 ...
 Adresse email Haut de page Bas de page 
 
blg_flg



Autorisation : Membre
Nb de messages : 661
Inscrit le : Mer 23 Mai 2012, 17:28
Posté le : Mer 04 Juil 2012, 10:19   Citer 


Citer : F-BVXT
Serait tu en train de remettre en question l’existence même des démos ? Dans ce cas je vais m'y prendre différemment pour te convaincre. Pourquoi programmer un Snake sur sa calculette alors que tu en as des nettement plus beaux sur internet et même sur Youtube ? C'est parce que c'est un défis personnel que d'être capable de programmer ses jeux soi-même, n'est-ce pas ? Donc, au fond ça ne sert à rien. Alors, convaincu cette fois ?



Non. Je rappelle juste qu'une démo est utilisée à des fins promotionnelles. Une démo est utile pour donner envie, en montrant les possibilités du jeu, pour qu'il soit acheté, mais, ici, on a le jeu, donc pourquoi avoir une démo? Après si tu veux te faire de la pub en diffusant la démo chez toi, ou si tu aimes faire des trucs inutiles, c'est vrai que ça peu être pas mal. crazy.gif


Mais je vais arrêter, car tu ne sera jamais convaincu, et moi non plus.

 Adresse email Haut de page Bas de page 
 
Samos



Autorisation : Membre
Nb de messages : 300
Inscrit le : Lun 14 Mai 2012, 18:51
Posté le : Mer 04 Juil 2012, 10:22   Citer 

Salut et merci beaucoup pour le snake en ligne F-BVXT!!!
C'est une première pour un de mes programmes bigmouth.gif
En ce qui concerne le test c'était bien text petite faute de frappe (accompagnée d'un vagabondage d'esprit godgrace.gif en gros j'étais sur la lune)
Pour rendre le snake un peu moins dur à crever c'est vrai qu'avant il pouvait faire marche arrière et il y avait des pommes qui respawn sur lui. On peu changer
Pt-Off(P,Q,2 par pxl-off(-3Q,4P
Pt-on(P,Q,2 par pxl-on(-3Q,4P
Le snake ne pourra plus reculer ou se bouffer lui même sinon les obstacles le tuaient (fallait vraiment mal jouer ^^') Par contre il sera moche
Et... vous y avez joué? bigmouth.gif
D'ailleurs je tien à préciser que j'ai beaucoup été aidé par F-BVXT et Linkakro donc ce snake n'est pas que de moi

 Adresse email Haut de page Bas de page 
 
F-BVXT



Autorisation : Membre
Nb de messages : 178
Inscrit le : Dim 27 Mai 2012, 20:38
Posté le : Mer 04 Juil 2012, 12:45   Citer 

C'est bon, je l'ai enfin testé sur toutes les MAPS. Donc en fait je trouve le principe plutôt innovant de faire en sorte que le Snake puissent réapparaître du côté opposé auquel il est sortit, ça fait un mélange entre Snake et Pacman et c'est sympa glasses.gif . En plus, je trouve le Snake plutôt rapide et il ne ralentit pas trop puisque quand il devient trop long, on change de MAP.
Par contre, le niveau 1, sur la "MAP 0" n'a pas grand intérêt puisqu'il est impossible de mourir. Et sinon les autres bémol sont que le serpent ne puisse pas se manger la queue (mourir s'il se la mange) et que si on appuie sur une autre touche que les flèches directionnelles, ça met le jeux en "pause" et le serpent ne prend plus qu'une case jusqu'à ce qu'on redémarre. Enfin, ça serait bien que la MAP3 se termine comme la MAP1 et la MAP2 pour éviter les ralentissements. Après la MAP3, on a qu'à par exemple retourner à la MAP1.

Conclusion : Avis positif ! bigmouth.gif

EDIT : Voilà un screen du jeux


----------------------
Il y a 10 types de personnes dans le monde : celles qui comprennent le binaire et celles qui ne le comprennent pas.
 Adresse email Haut de page Bas de page 
 
The K



Autorisation : Membre
Nb de messages : 878
Inscrit le : Sam 15 Oct 2011, 11:07
Posté le : Mer 04 Juil 2012, 13:24   Citer 

Un pxl-test qui marche quand on se mange le mur ne pourrait-il pas fonctionner également quand on se mange la queue ?

----------------------
La la la ...

Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL
Un problème de programmation ? Allez consulter ce tutoriel crée pour cela : TUTORIEL PROGRAMMATION
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 ...
 Adresse email Haut de page Bas de page 
 
F-BVXT



Autorisation : Membre
Nb de messages : 178
Inscrit le : Dim 27 Mai 2012, 20:38
Posté le : Mer 04 Juil 2012, 13:28   Citer 

Je pense que si mais le pxl-test ne devra pas tester le centre du carré sinon ça ne servirai à rien clown.gif
Par contre il faudrait ajouter une condition qui dit que "si K=/=des flèches directionnelles alors ne rien faire" comme ça on ne pourra plus faire marche arrière ou faire pause.

----------------------
Il y a 10 types de personnes dans le monde : celles qui comprennent le binaire et celles qui ne le comprennent pas.
 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse Page: 1,      >>





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2024 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink