Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.
Jeu de pêche
scalt le 19/11/2005 à 21:47
Donc voilà c'est un petit jeu de pêche assez simple pour les amateur de peche.
Le but est d'atteindre un objectif qui est de pêcher 500 thons, 10 rais , 6 requins et le "NAVARIK": c'est tout simple et il y a meme un mode pour tricher donc si vous êtes sympa lol...
je vous le filerai.
Le programme s'appelle "Fish"
mais en attendant voici le code :
ù cest la fleche quand on clique sur "sto"
>= c'est plus grand ou egale
<= c'est plus petit ou egale
Code
clrhome
clrdraw
for(X,1,8,1)
output(X,1,"°")
output(X,16,"°")
end
for(X,1,16,1)
output(1,X,"°")
output(8,X,"°")
end
output(4,5,"By Scale")
output(6,7,"Fish")
pause
lbl 1
clrhome
clrdraw
output(5,4,"-------")
output(5,11,"/")
output(4,12,"/")
output(3,13,"/")
output(3,4,"(-)(-)(-)(-)(-)(-)(-)(-)(-)")<======c'est le moin ca coté du "."
output(3,3,"!"=
output(4,3,"!")
output(5,3,"!")
output(4,5,"° ° °")
output(2,6,"T T")
output(5,1,"^^")
output(5,13,"^^^^")
output(6,5,"(")
output(7,9,")")
output(8,2,")")
output(8,12,"(")
output(6,14,")")
pause
Menue("fish","pecher",2,"stock",3,"objectif",4,"quitter",6)
lbl 2
clrdraw
clrhome
output(tu peches !")
randint(1,100)ù ( 
) C
if C=1
then:D+1ù ( ) D
end
if C=2
then:G+1ù ( ) G
end
if C=3
then:F+1ù ( ) F
end
if C>4
then:E+1ù ( ) E
end
pause:goto 8
lbl 8
clrdraw
clrhome
if C=2
then:output(2,5,"navarik")
end
if C=1
then,:output(2,2,"+ 1 requin")
end
if C=3
then:output(2,2,"+ 1 rai")
end
if C>4
then:output(2,2,"+ 1 thon")
end
pause:goto 1
lbl 3
clrdraw
clrhome
output(ton stock :")
output(3,4,"requin")
output(3,1,D
if D>1
then:output(3,10,"s")
end
output(4,4,"rai")
output'4,1,F
if F>1
then:output(4,7,"s")
end
output(5,5,"thon")
output(5,1,E
if E>1
then:output(5,9,"s")
end
if G=0
then:output(6,1,"navarik non pecher")
end
if G>=1
then:output6,1,"tu as navarik")
end
if G>=1 and D>=6 and E>=500 and F>=10
then:goto 5
end
pause:goto 1
lbl 5
clrhome
clrdraw
for(X,1,16,1)
output(1,X,"°")
output(8,X,"°")
end
output(2,1,"bravo tu as reussi ton objetcif !")
pause
Menue("fish","quitter",6,"remettre a 0",7)
lbl 6
clrhome
clrdraw
output(4,2,"a bientot"
pause
stop
lbl 7
clrhome
clrdraw
output(1,1,"remise a 0 en cours")
0ù ( ) D
0ù ( ) F
0ù ( ) E
0ù ( ) G
pause
output(8,1,"jeu a 0")
pause:goto 1
lbl 4
clrhome
clrdraw
output(1,1,"ton objectif estsimple : pecher 6 requinsblanc, 10 rais, 500 thons et capturer navarik bonne chance")<===== respecter l'orthographe que j'ai mit, c'est normal qu'il y est des mots attachés.
pause:goto 1
Donc voila c'estait le code du jeu "
fish" créé par Scale.
Gds41 le 19/11/2005 à 21:57
Tout les codes que tu fais sont super long toi
scalt le 19/11/2005 à 22:23
oué je sais mais quand je les ecrit chez moi je prend pas plus de 1heure et pourtant c assez long donc je c pas lol.
webmaster le 19/11/2005 à 22:47
Bonsoir,
Scalt, as-tu fais ce programme toi-même ?
@+ Le Webmaster
scalt le 19/11/2005 à 22:54
Totalement créé de ma main
pourquoi ???
webmaster le 19/11/2005 à 22:57
Non, parce que si tu ne les avais pas fait de ta main, tu ne pourrais pas les mettre sur le forum, cela est interdit !
Ce qui me fais me poser des questions, c'est ton exceptionnelle productivité en ce moment !
@+ Le Webmaster
scalt le 19/11/2005 à 22:58
pourquoi tu dis sa ??
non c'est mes programmes que je met
et pourquoi tu dit exeptionnel productivité ??
webmaster le 20/11/2005 à 00:29
Non, excuse moi, je voulais juste avoir une petite précision !
@+ Le Webmaster
scalt le 20/11/2005 à 10:27
ok
scalt le 20/11/2005 à 19:43
Alors est ce que quelqu'un a deja entré le code et testé le jeu ?
chris2003 le 25/11/2005 à 12:00
ton programme est super, mais quad je vais dans stock, il me marque:
2,0432721s4
1,09ais
29,49082s58
alors????scalt le 25/11/2005 à 14:32
Merci sa me fait plaisir !!
alors il suffit d'allumer ta calculatrice et tu marque
0 c'est zero
ù c'est la touche sto
Code
0ù ( ) B
ensuite
Code
0ù ( ) ECode
0ù ( ) FCode
0ù ( ) G
voilà et normalement sa devrait marcher .
chris2003 le 28/11/2005 à 12:44
merci, mais je ne sais pas comment mais sa c'est arrangé tout seul.
encors bravo, té un super programmateur.scalt le 28/11/2005 à 17:29
Merci si tu veu dotre prog jpe ten faire
Niko le 30/11/2005 à 16:39
Une nouvelle fois : PROGRAMMEUR = Quelqu'un qui fait un programme et non PROGRAMMATEUR !!webmaster le 30/11/2005 à 17:03
Du calme, tu ne vas pas le trucider pour une faute de français !scalt le 30/11/2005 à 18:07
c clair tout le mond ne peu pas etre inteligent...
Niko le 01/12/2005 à 18:53
Je le trucide pas !!
Je l'informe !emo-ssion le 07/06/2007 à 15:01
Je suis une débutante et je voudrais faire ton jeu mais je ne sais pas ce qu'est "sto" ou je le trouve ?PMdej le 07/06/2007 à 15:07
sto est juste au dessus de la touche on !!!
Cette touche est indiquée par une fleche allant de la gauche a la droite
comme celle la " -> " ok
bonne continuation dans le monde de la programmation !! si t'as un problème
n'hésite pas a le ou les poster sur le forum tu recevra une réponse a coup surs !!!
a+
emo-ssion le 07/06/2007 à 15:10
Euhh ... J'ai la Ti-82 Stats.fr
et en dessous de On ... Il n'y a rien !PMdej le 07/06/2007 à 15:11
Nan j'ai dit au dessus désolé si j'ai fait une faute de frappe !!!
emo-ssion le 07/06/2007 à 15:13
Oh lala !! Merci :En plus c'est marqué ... Dsl pour le dérangement !!
PMdej le 07/06/2007 à 21:34
Nan c'est pas grave au contraire !!!!
tout le monde passe pas la .... c'est bien normal c'est en faisant des erreurs qu'on apprends !!!
et puis ce site et a moitié un site d'entre aide !!!!
Jcotnys le 06/08/2007 à 11:54
un pti coucou pour les
programmeur (ben dsl jété tré occupé en ce moment
) je teste scalt et jte dis koi (il ya 1 mois ce topic mé bon c pa grave
)
Sangohan38 le 09/08/2007 à 03:50
Merci de me laisser faire mon boulot de modo alors que je me trouve au Etats-Unis.
Grace a vous, je vais editer un message.
Sangohan38Stupid le 09/08/2007 à 11:52
t'es aux USA et tout ce que tu trouves à faire c'est moderer ce forum?^^Sangohan38 le 09/08/2007 à 15:32
Tu imagine meme pas ce que ca m a manquer de ne pas fire le grand mechant modo.
Sangohan38Stupid le 10/08/2007 à 12:09
j'ai pas eu internet pendant un mois et j'avais vraiment pas envie de le retrouver...enfin si parce que y'a rien à fairecoc5 le 13/08/2007 à 12:25
Juste un truc scalt, tu sais que tu peux écourter tes "If Then End" en "If" simple lorsque tu n'a qu'une conséquence ?
Exemple:
Code
if C=2
then:G+1ù ( ) G
end
Devient
Et aussi pour les parenthèses/guillemets
Code
output(5,3,"!")
output(4,5,"° ° °")
Devient
Code
output(5,3,"!
output(4,5,"° ° °
Sangohan38 le 17/08/2007 à 16:23
Scalt est partis de ce forum à peut près au moment ou je suis arrivé.
Donc actuellement, tu parle d'une modification de programme.
Sangohan38coc5 le 17/08/2007 à 17:04
Oups !
'Avais pas regardé la date moi^^
Je me disais aussi... une exceptionnelle productivité...Sephiroth11 le 24/09/2007 à 14:11
J'ai testé le jeu sur une Ti-82 stats et sa a l'air de faire du n'importe quoi ...
Aprés by scale et Fish , il devrait y avoir une image ???
et bien la il y a un rammassit de vagues (j'imagine) mais c'est tout !
En suite le stock et remplis de 289,7985406 Rais mais sans rien d'autres !
Et entre le thon et le navarik j'ai rien péché d'autre !
J'ai vérifié, le code est parfaitement reproduit !!!unknow le 24/09/2007 à 20:49
ba desolé je peux pas t'aider car il est partit depuis deja un bon momentratuss le 24/09/2007 à 20:53
Salut,
essaye ca pour voir...
+
Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.
