Gamme TI-82
Partager sur Facebook Fil RSS Imprimer la page
Cacher les résultats

Résultat de la recherche



Poster un nouveau sujet Poster une réponse
A prendre ou à laisser {fonky-ti}
Auteur Message
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Sam 08 Déc 2007, 18:01   Citer 

Ce jeu que je trouve competement nul mais que j'ia quand meme fait avec des graphismes assez évolués

voici un programme necessaire pour que ce jeu marche,le programme Z :

:ClrHome
:ClrDraw
:AxesOff
:62üYmax
:94üXmax
:0üYmin
:0üXmin
:FonctOff
:CoordRect
:CoordOff
:LblOff
:ExpOff
:GraphOff


Mais vous pouvez également mettre à la place à programme qui redefinit le graph pour l'adapter à un jeu

ü:sto
Á:Theta
ø:pas égàl à

pour savoir à quelle liste ça correspond vu que y'a un bug c'est soit télechargé ti graph link 83, soit vous copiez coller le code n'importe ou pour connaitre al bonne liste

L:L1
L‚:L2
Lƒ:L3

Durée de recopiage:
Habitué:1h05-1h30,Novice:2h-3h

Taille:
1600 octets+468 octets de listes




Code

:prgmZ
:Output(2,6,"BOITES
:Output(4,1,"A PRENDRE OU
:Output(5,8,"A LAISSER
:Output(6,1,"****************
:Output(3,1,"****************
:Output(7,1,"SANS ARTHUR,HIHA
:Output(8,1,"A FONKY-TI GAME
:Pause
:ClrHome
:0üL
:0üE
:0üF
:0üS
:0üB
:0üN
:seq(0,A,1,16ü
:Lü
:0üL(17
:{.01,1,5,10,50,100,500,1000,5000,7500,10^4,25000,50000,75000,10^5,250000}ü
:Line(16,62,16,7
:Line(68,62,68,7
:0üÁ
:For(A,0,78,78
:For(C,0,7
:If A>0
:Then
:If C>1
:4üB
:If C>5
:8üB
:End
:If A>0
:8üÁ
:Text(C7,0+A-B,L‚(C+1+Á
:End
:End
:0üM
:For(Á,9,54,11
:For(Z,20,61,17
:M+1üM
:Line(Z,Á,Z+10,Á
:Line(Z,Á,Z,Á+8
:Line(Z,Á+8,Z+10,Á+8
:Line(Z+10,Á,Z+10,Á+8
:4üC
:If M>9
:2üC
:Text(Á-7,Z+C,M
:End
:End
:Horizontal 6
:1üM
:Lbl(B
:L‚(MüG
:Lbl X
:intrand(1,16üÁ
:If L‚(Á)ø0
:Goto X
:GüL(Á
:M+1üM
:If Mø17
:Goto B
:19üÁ
:52üZ
:Lbl G
:getKeyüC
:If C
:Then
:Line(Á,Z,Á+11,Z,0
:Line(Á,Z,Á,Z+9,0
:End
:(Á-2)/17üU
:(62-Z-10)/11üV
:U+V3üW
:If C=24
:Á-17üÁ
:If C=26
:Á+17üÁ
:If C=25
:Z+11üZ
:If C=34
:Z-11üZ
:If Á=2
:53üÁ
:If Á=70
:19üÁ
:If Z=63
:8üZ
:If Z=ú3
:52üZ
:Line(Á,Z,Á+11,Z
:Line(Á,Z,Á,Z+9
:If Cø105 ou 0<Lƒ(W
:Goto G
:If F=1
:Then
:Text(62-Z-8,Á+3,16
:0üF
:1üE
:L(WüG
:L(16üH
:GüL(16
:HüL(W
:Text(57,77,W
:WüS
:Goto P
:End
:L+1üL
:Text(57,0,"BOITE
:If WøS
:Text(57,22,W
:If W=S
:Text(57,22,16
:4üJ
:If W÷9 and WøS
:0üJ
:Text(57,27+J,": ...
:For(A,1,75L+LÓ
:End
:For(B,Á,Á+11
:Line(B,Z,B,Z+Á
:End
:1üLƒ(W
:ú8üR
:For(A,0,70,70
:R+8üR
:For(B,0,7
:If L(W)=L‚(B+R+1
:Then
:If A=0
:Then
:For(K,16,0,ú1
:Line(K,62-B7-5,K,62-B7-1
:End
:End
:If A>0
:Then
:For(K,68,94
:Line(K,62-B7-5,K,62-B7-1
:End
:End
:Text(57,38+J,L(W
:End
:End
:End
:If L=6 or L=13 and E=0 and N=0
:Then
:For(A,1,700
:End
:Text(57,0,"ECHANGE:
:Text(57,30,"1:OUI,2:NON
:While Cø92 and Cø93
:getKeyüC
:End
:If C=92
:Then
:1üF
:Text(57,30,"AVEC LA BOITE
:Goto G
:End
:End
:Lbl P
:For(A,1,700
:End
:For(A,0,5
:Line(0,A,94,A,0
:End
:If (L=8 or L=12 or L=14) and N=0
:Then
:0üP
:0üQ
:For(O,1,16
:If 0=Lƒ(O
:Then
:P+L(OüP
:Q+1üQ
:End
:End
:round(((19/20)P/10)/Q,0üP
:Text(57,0,"OFFRE:
:If P=0
:0.001üP
:Text(57,24,P10
:Text(57,56,"OUI:1,NON:2
:While Cø92 and Cø93
:getkeyüC
:End
:For(A,0,5,
:Line(0,A,94,A,0
:End
:If C=93
:Goto G
:If C=92
:Then
:P10üL(17
:1üN
:End
:End
:If Lø15
:Goto G
:Line(Á,Z,Á+11,Z,0
:Line(Á,Z,Á,Z+9,0
:Text(57,0,"TU GAGNES
:Text(57,35,L(16+N
:If N=1
:Then
:For(Á,1,1300
:End
:Text(57,0,"AU LIEU DE     
:Text(57,36,L(16
:End
:Text(57,68,"(C)2007



 Adresse email Haut de page Bas de page 
 
vibra
Avatar

Autorisation : Membre
Nb de messages : 595
Inscrit le : Mer 04 Avr 2007, 13:29
Posté le : Sam 08 Déc 2007, 18:41   Citer 

Et il faut faire quoi ?

----------------------
Vive la programmation et vive le vibraphone !!!
 Adresse email Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3391
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Sam 08 Déc 2007, 18:58   Citer 

Je suppose qu'il faut faire comme le jeu à la télé c'est à dire choisir une boite et voir, ensuite voir combien on vien de perdre, réfléchir à l'offre du banquier et enfin, finir par choisir une boite.

Je trouve ce jeu totalement nul à la Tv.

Sangohan38

----------------------
 Adresse email Haut de page Bas de page 
 
Egoutagny
Avatar

Autorisation : Membre
Nb de messages : 57
Inscrit le : Mer 14 Nov 2007, 18:29
Posté le : Sam 08 Déc 2007, 18:59   Citer 

donc sur calto ça risque d'être encore plus nul...

----------------------
Chut je programme...
 Adresse email Haut de page Bas de page 
 
unknow
Avatar

Autorisation : Membre
Nb de messages : 232
Inscrit le : Jeu 12 Oct 2006, 19:30
Posté le : Sam 08 Déc 2007, 21:30   Citer 

non je vous jure je l'ai il est bien fait et ya mme le banquier aussi!!

----------------------
Ta le look coco

Tout nouveau design venait jeter un coup d'oeil ca en vaut la peine, ca a totalement changé
 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Dim 09 Déc 2007, 14:04   Citer 

moi aussi je le trouve pérave mais bon c'était pour le geste...aux gens à qui je l'ai montré ou envoyés ça a plus qu'aux filles (enfin celles qui ont compris le jeu^^) et aussi à unknow

 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
coc5
Avatar

Autorisation : Membre
Nb de messages : 887
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Dim 09 Déc 2007, 14:16   Citer 

Ce serait bien de mettre autre chose juste que le code non retouché (en plus on ne peut pas distinguer les listes, les caractères de Word ne passent pas). Un lien par exemple ?

----------------------
Ne cliquez pas ici !
 Adresse email Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3391
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Dim 09 Déc 2007, 16:41   Citer 

Il à expliquer à quelles touches correspondait les symboles.

Sangohan38

----------------------
 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 887
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Dim 09 Déc 2007, 16:49   Citer 

Sauf que pour moi toutes les listes ont un carré noir à la place du signe carré ou autre...

----------------------
Ne cliquez pas ici !
 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Dim 09 Déc 2007, 16:53   Citer 

suffit de copier dans word...

 Adresse email Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1572
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Mar 22 Jan 2008, 17:03   Citer 

il y a un bug :



:{.01,1,5,10,50,100,500,1000,5000,7500,10^4,25000,50000,75000,10^5,250000}üL2

...

:Lbl X
:intrand(1,16ütheta
:If L2 (theta) different de 0
:Goto X

il y a une boucle infinie

sinon j'ai tésté le prog, voila ce que j'obtient (si je saute la boucle) :




quelqu'un peut il m'expliquer le principe du jeu ? :p



c'est la qu'on se dit qu'au final personne ne teste les jeux (depuis que je fait la liste des jeux je n'arrete pas de corriger plein de bugs etc etc, or apparemment personne n'à l'air de se plaindre...)

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Mar 22 Jan 2008, 20:08   Citer 

oua il est tout buggé le jeu^^

ben c'est le jeu d'arthur avec les boites, ou tout ce que tu as à faire c'est ouvrir des boites, y'a meme le jeu sur odri à 20€ alors que le jeu c'est limite juste un entaleat(1,22)...

 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Mar 22 Jan 2008, 20:09   Citer 

:For(A,0,5
:Line(0,A,94,A,0
:End

j'vais oublié le 0 à la fin déjà un bug de cvorrigé

 Adresse email Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1572
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Mar 22 Jan 2008, 20:13   Citer 

Et c'est quoi le truc échanger alors ?

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Mar 22 Jan 2008, 20:14   Citer 

le reste faudra que je compare avec ma version sur ma calto

 Adresse email Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1572
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Mar 22 Jan 2008, 20:31   Citer 

ok bah je t'enverrais le 83p pour que tu le testes stp

(sinon je lui mets combien sur 5 parce qu'à vrai dire je pige rien au jeu)

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Mar 22 Jan 2008, 20:32   Citer 

pour moi il vaut 3
le jeu n'a aucun intret mais pour la beauté du geste e tpour les graphismes il vaut 3

 Adresse email Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1572
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Mar 22 Jan 2008, 20:57   Citer 

ok je lui ais mis 3

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1572
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Mer 23 Jan 2008, 20:00   Citer 


Code
:Lbl X
:intrand(1,16->theta
:If L2(theta)=/=0
:Goto X



tu veux pas verifier cette ligne svp ?

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Mer 23 Jan 2008, 21:21   Citer 

selon mon code c'est l1 pas l2

 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





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

Site hébergé par Free Page sous licence creative commons Page validée par le W3C (XHTML 1.0 Transitional) Feuille de style validée par le W3C Flux RSS 2.0 valide Page étiquetée par l'ICRA Page testée par Ocawa