Forum Graph100

Forum Graph100

Vous n'êtes pas identifié.

Annonce

Bonjour et bienvenue sur le nouveau Forum Graph100 !
L'intégralité des données a été transférée sur un forum PunBB et tout les comptes sont fonctionnels avec le même nom d'utilisateur et mot de passe.
Un wiki est aussi disponible avec le même compte ! N'oubliez pas de remettre votre avatar, bon surf !
Pour plus d'informations, consultez ce post.

#1 05 Oct 2003 07:52:03

Guest
Invité

aidre moi pour ce piti programme !!!!!!!!!

Je veux créer un mini jeux de voitures très court. mais i marche pas.
Voici le scipt (g une graph 100):

0->A~Z
ClrText
Lbl A
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}->List 1
1->P
" * * * * * * * * * * * * "
" * * * * * * "
" * * * * * * * * "
" * * * * * * "
" * * * * * * * * * * "
" "
" ENTREE"
Lbl 8
While GetKey <> 31
WhileEnd
ClrText
For 1->I To 7
7->List 1[1]
1->H
7->B
8->D
8->C
0->S
For 1->S To 9000
Lbl C
Int (3Ran#) - 1->T
List 1[H] + T->C
(C = (-)1) + (C = 1) => 0->T
List 1[H] + T->List 1[B]
B->H
B + 1->B
B = 8 => 1->B
GetKey->K
K = 73 => P - 1->P
K = 53 => P + 1->P
" "
C < 21 => Locate C + 1, 7, "..." Locate P, 1, "I"(P <= List 1[B]) Or (P >= List 1[B] + 4) => Goto F
Next
Lbl F
S < 12 => Goto C
Locate P, 1, "X"
Locate 1, 3, "CRASH!!!"
Locate 1, 4, "SCORE"
Locate 7, 4, S
While GetKey <> 31
WhileEnd
Goto 8



Voila g un prob la ou c rouge, erreur syntaxe, aider moi sinon demain le cour de mat sera chiant !!!!!!!

 

#2 05 Oct 2003 07:56:18

Overlord
Membre Communauté Graph100
Lieu: Bruxelles (BE)
Date d'inscription: 09 Mar 2003
Messages: 276
Site web

Re: aidre moi pour ce piti programme !!!!!!!!!

le truc entre guillemets rouges c'est ... ou c'est autre chose ? dans ce cas, c'est quoi exactement ?


Pour comprendre la récursivité, il faut d'abord comprendre la récursivité

Hors ligne

 

#3 05 Oct 2003 08:11:42

Jean-Fran
Membre Communauté Graph100
Date d'inscription: 05 Dec 2002
Messages: 331

Re: aidre moi pour ce piti programme !!!!!!!!!

Peut etre que tu peut pas mettre autant de chose, sur une seule ligne...
et avec
if
then
endif
...
ca donnerai quoi

Hors ligne

 

#4 05 Oct 2003 08:46:44

Overlord
Membre Communauté Graph100
Lieu: Bruxelles (BE)
Date d'inscription: 09 Mar 2003
Messages: 276
Site web

Re: aidre moi pour ce piti programme !!!!!!!!!

pour la ligne c'est probablement un enter qui a sauté quand il a mis en rouge


Pour comprendre la récursivité, il faut d'abord comprendre la récursivité

Hors ligne

 

#5 05 Oct 2003 12:28:16

Guest
Invité

Re: aidre moi pour ce piti programme !!!!!!!!!

entre guillemets, c un ...
jen c pas plus, aider moi slvousplait !!!!!!!!
si vous lavez essayer, dites moi les modifes apportées !!!!
Merci davance !!!!

 

#6 05 Oct 2003 12:30:06

Guest
Invité

Re: aidre moi pour ce piti programme !!!!!!!!!

puis g oublier un truc.
après "..." on va a la ligne...
VOILA, réponder moi plise !

 

#7 05 Oct 2003 13:32:00

Neo Fantasyboss
Membre
Lieu: Grenoble QG de la FMW producti
Date d'inscription: 07 May 2003
Messages: 67

Re: aidre moi pour ce piti programme !!!!!!!!!

Dans l'absolu ton prgramme n'a pas l'air de contenir des erreurs.
A mon avis si tu kiffes les voitures et comme j'ai vu ke t'avai une g100.
Download flash100 et direxplor (ou gexplo2 sinon Casiomax va me tuer)
et envoie The Race par Roeoender dispo sur le site de Casioworld


~Coin coin will lol you~

Hors ligne

 

#8 05 Oct 2003 13:52:30

Guest
Invité

Re: aidre moi pour ce piti programme !!!!!!!!!

Merci pour le conseil !!!!
Le probleme c que g pas de cordon pour relier ma g100 a mon pc !!!!!
Si le scrip est correct, c peut etre qui fo utiliser une touche spééciale ?
je voudrai aussi savoir le prix du cordon, tout seul, sans programmes....
Merci !!!!!

 

#9 05 Oct 2003 14:25:22

Jean-Fran
Membre Communauté Graph100
Date d'inscription: 05 Dec 2002
Messages: 331

Re: aidre moi pour ce piti programme !!!!!!!!!

Hors ligne

 

#10 07 Oct 2003 06:40:12

Gentil Kiwi
Membre Communauté Graph100
Lieu: Caché dans son T2 à Paris :)
Date d'inscription: 11 Sep 2003
Messages: 353
Site web

Re: aidre moi pour ce piti programme !!!!!!!!!

essaye de passer a la ligne aussi apres : ' Locate P, 1, "I" ', sinon met un ' : ' apres ton premier locate et passe a la ligne apres ton second

merci pour la pub JF wink, dans ma prochaine MAJ de cette page, comment avoir son MAX232 ou MAX233 gratos big_smile


http://www.gentilkiwi.com/signature.png

Hors ligne

 

#11 07 Oct 2003 13:31:11

Azor
Le Coté Obscur De La G100
Lieu: glop glop!
Date d'inscription: 04 May 2002
Messages: 5479
Site web

Re: aidre moi pour ce piti programme !!!!!!!!!

dit le maintenant  :!:


Anciennement X-thunder28
Cats shall rule teh world!

Hors ligne

 

#12 07 Oct 2003 13:56:59

Gentil Kiwi
Membre Communauté Graph100
Lieu: Caché dans son T2 à Paris :)
Date d'inscription: 11 Sep 2003
Messages: 353
Site web

Re: aidre moi pour ce piti programme !!!!!!!!!

attend je vé te filer l'url de demande d'échantillon

il m'ont envoyer 2 x MAX232A, 2 x MAX233 [ceu la il pete] gratos !

en clair, actuellement, je fonctionne avé :

1 connecteur SERIE
[1 régulateur de tension 7805, optionel]
1 max233
1 connecteur JACK

le 233 na pas besoin de condos  :P


http://www.gentilkiwi.com/signature.png

Hors ligne

 

#13 07 Oct 2003 15:45:13

Tenkoh
Membre
Lieu: Village Pache
Date d'inscription: 13 Aug 2003
Messages: 131

Re: aidre moi pour ce piti programme !!!!!!!!!

Fo pas en demander trop a un prog basique et peut etre que ta boucle for est trop grande.. a mon avis essaye plutot avec un label et une incrementation...

sinon ya ca :
(C = (-)1) + (C = 1) => 0->T
List 1[H] + T->List 1[B]


qui me chiffone...

surtout le + entre tess conditions (c bien ca?)fodrait mettre and plutot... et franchement pour els conditions, utilise plutot if et ifend comme ca a ete dis par Jean fran.

sinon des fois elle aime pas trop quon lui demande de faire des calculs directement avec les cases de listes, essaye putot dassocier  List1[H] a une variable pour lui ajouter 1 ensuite...

0->A~Z
ClrText
Lbl A
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}->List 1
1->P
" * * * * * * * * * * * * "
" * * * * * * "
" * * * * * * * * "
" * * * * * * "
" * * * * * * * * * * "
" "
" ENTREE"
Lbl 8
While GetKey <> 31
WhileEnd
ClrText
For 1->I To 7
7->List 1[1]
1->H
7->B
8->D
8->C
0->S
0->Z
Lbl C
If Z<9000
then
Int (3Ran#) - 1->T
List 1[H] + T->C
if (C=-1) and (C=1)
then 0->T
ifend
List 1[H]->r
r + T->List 1[B]
B->H
B + 1->B
B = 8 => 1->B
GetKey->K
K = 73 => P - 1->P
K = 53 => P + 1->P
" "
C < 21 => Locate C + 1, 7, "..." Locate P, 1, "I"(P <= List 1[B]) Or (P >= List 1[B] + 4) => Goto F
Z+1->Z
GotoC
ifend
Lbl F
S < 12 => Goto C
Locate P, 1, "X"
Locate 1, 3, "CRASH!!!"
Locate 1, 4, "SCORE"
Locate 7, 4, S
While GetKey <> 31
WhileEnd
Goto 8



a mon avis essaye un truc dans ce genre... enfin jhe pense plutot quil fo juste changer ca :

(C = (-)1) + (C = 1) => 0->T


Un feneant s'est exprimé dans ce post...

Hors ligne

 

#14 08 Oct 2003 02:19:14

mastermage
Magicien G100
Lieu: Charleville-Mézières,Compiègne
Date d'inscription: 31 Jan 2002
Messages: 1008

Re: aidre moi pour ce piti programme !!!!!!!!!

Euh non le + correspond a OU donc ca marche pas...

mets plutot (C=(-)1) And (C=1)=>0->T

Edit: ET puis svp les modos supprimez cette ligne de 500 points d'exclamation  ca m'oblige a faire défiler la page horizontalement

Hors ligne

 

#15 08 Oct 2003 03:06:09

Guest
Invité

Re: aidre moi pour ce piti programme !!!!!!!!!

C est initialise a 8. "8->C"

ensuite on met une valeur aleatoir dans T : "Int (3Ran#) - 1->T "
Si par malheur Ran# sor t un 0.33, que l'on multiplie par 3 : 0.99, on prend la valeur entiere, soit 0 auquel on retranche 1, donc T=-1, pratiquement tout le temps.

Ensuite on prend "List 1[H] + T->C", a savoir au debut 0 + -1 -> C, donc C vaut -1

On termine par : "C < 21 => Locate C + 1, 7, "..." "
Il est certain que C est inferieur a 21.... Mais la casio ne va pas aimer que l'on essaie d'afficher quelquechose a l'exterieur de l'ecran  wink
[petite remarque, je viens de voir a nouveau mon erreur, la liste 1[1] est initialisee a 7, donc ma solution est fausse]


Autre detail :
"if (C=-1) and (C=1)
then 0->T
ifend"
Tu peux enlever cela, ou corriger ton erreur... Car jamais tu ne mettras 0 dans T... Je crains que C n'ai jamais une valeur qui soit a la fois de -1 et 1...
[heu, je viens de voir que c'est une modif de tenkoh, donc ne met pas AND mais OR (tenkoh  :P ) car effectivement "(C = (-)1) + (C = 1) => 0->T " est tres etrange...]

bon j'ai laisse mes deux erreurs precedentes, on ne sait jamais si cela peut aider quelqu'un...


Les deux seules choses qu'il faudrait verifier, selon moi :
(C = (-)1) + (C = 1) => 0->T
il manque un next quelque part ? deux for, un seul next ? tu vas faire ta boucle pour le S, mais jamais ton I... que tu n'utilises jamais au passage... erreur de recopie ?

 

#16 08 Oct 2003 03:17:09

Guest
Invité

Re: aidre moi pour ce piti programme !!!!!!!!!

marrant de relire ses messages apres avoir poste... on voit que les modifs apportees au cours du message ne sont pas dans l'ordre logique (un a nouveau avant l'explication de la premiere erreur... etc) et ce qui parait clair au moment de taper le message, ne l'est plus quand on lit lol

 

#17 08 Oct 2003 08:52:29

Huji
tekistekeus
Lieu: Paris
Date d'inscription: 30 Jan 2002
Messages: 1533
Site web

Re: aidre moi pour ce piti programme !!!!!!!!!

lol tres bien observe nioupy...
dsl mastermage me je sui pa modo ds le ffg...


Huji http://casiounivers.free.fr/Smileys_Or/smokin.gif
No noise, Nothing but my dreams...

Hors ligne

 

Pied de page des forums

Propulsé par PunBB
© Copyright 2002–2005 Rickard Andersson
Traduction par punbb.fr