Accueil Ti-Gen Foire Aux Questions Chat sur le chan #tigcc sur IRC
Liste des membres Rechercher Aide
Bienvenue Invité !   Se connecter             Mes sujets   
Administrer
0 membre(s) et 1 visiteur(s) actif(s) durant les 5 dernières minutes Utilisateurs actifs : Aucun membre + 1 visiteur
Avant de poster sur le forum, il y a des régles de bases à respecter pour une bonne entente et un respect de tous.
Veuillez lire la charte du forum.
  :: Index » Forum Ti68K » Programmation TI-Basic » questions diverses (31 réponse(s))
./POST DE DEPART (post n°0)   Marquer comme non lu.
Scythe Ecrit le: Mardi 4 mai 2004 à 17:46 Déconnecté(e)    Voir le profil de Scythe Envoyer un email à Scythe Envoyer un message privé à Scythe  

(plusieurs questions, j'ai looké les faqs vite fait et j'ai rien trouvé :
si on met plusieurs infos dans une variable (ex : {truc, bidule, machin}>Var est-ce qu'on peut les repécher individuellement ? (pourquoi j'essaye pas pour voir ? beuuuh...^^)

Où est le problème :
prog()
Prgm
Dialog
Title "titre"
Dropdown "nom",{choix1, choix2},choix
EndDlog
If choix=1 Then "string1"->var1
Elseif choix=2 Then "string2"->var2
EndIf
EndPrgm

parait qu'il y a une erreur de syntaxe et il me met entre " et string1 quand je lui dis de me montrer...que faire ?

Scythe, qui postera la suite quand il aura le temps, merci de rép

edit : ah vi au fait j'ai une ti89 ^^

-Edité le: Mardi 4 mai 2004 à 17:47 par Scythe-
Hail to ya
    
./Post n°1   Marquer comme non lu.
kaz00 Ecrit le: Mardi 4 mai 2004 à 18:42 Déconnecté(e)    Voir le profil de kaz00 Envoyer un email à kaz00 Envoyer un message privé à kaz00  

essaye ca:
[glow]
prog()
Prgm
Dialog
Title "titre"
Dropdown "nom",{choix1, choix2},choix
EndDlog
If choix=1 Then
"string1"->var1
Elseif choix=2 Then
"string2"->var2
EndIf
EndPrgm
[/glow]

(plusieurs questions, j'ai looké les faqs vite fait et j'ai rien trouvé :
si on met plusieurs infos dans une variable (ex : {truc, bidule, machin}>Var est-ce qu'on peut les repécher individuellement ? (pourquoi j'essaye pas pour voir ? beuuuh...^^)

tu parle d'une liste?
var[1] retourne truc
var[3] retourne machin
    
./Post n°2   Marquer comme non lu.
Scythe Ecrit le: Mardi 4 mai 2004 à 22:11 Déconnecté(e)    Voir le profil de Scythe Envoyer un email à Scythe Envoyer un message privé à Scythe  

ça marche au poil pour le premier, merci bien camarade. J'essayerai la liste quand j'aurai le temps.

par contre est-ce que c'est possible de mettre

If choix=1 Then
"string1"->var
ElseIf choix=2
"string2"->var
EndIf

mettre la même variable quoi...(sinon à la limite ça aurait pas un grand intérêt si ?)
EDIT : ah ben vi ça marche, désolé ^^

ensuite...comment se fait-ce que quand je met
"stringX"->Var, il me met des guillemets autour de la string ? du coup quand je lui dis de me l'afficher il m'affiche "stringX" avec les guillemets...normal ? pas ? comment faire ?

La question suivante c'est : comment définir une variable avec un pas pour enregistrer différentes sauvegardes par exemple

genre : définition de la variable "truc" avec "truc + 1 ->truc" à chaque fois qu'on le lance ; et apres, sauvegarder une liste sous le nom "liste[valeur de truc]" ?

c'est compréhensible ce que je raconte moi ?

Scythe, le pur noob de base ^^

-Edité le: Mardi 4 mai 2004 à 22:15 par Scythe-

-Edité le: Mardi 4 mai 2004 à 22:16 par Scythe-

-Edité le: Mardi 4 mai 2004 à 22:20 par Scythe-
Hail to ya
    
./Post n°3   Marquer comme non lu.
Kevin Kofler Ecrit le: Mercredi 5 mai 2004 à 02:41 Déconnecté(e)    Voir le profil de Kevin Kofler Envoyer un email à Kevin Kofler Visiter le site WEB de Kevin Kofler Envoyer un message privé à Kevin Kofler  


"stringX"->Var, il me met des guillemets autour de la string ? du coup quand je lui dis de me l'afficher il m'affiche "stringX" avec les guillemets...normal ? pas ? comment faire ?

Évite d'utiliser la fonction string sur quelque chose qui est déjà une chaîne de caractères, et tu n'auras pas ce problème.

La question suivante c'est : comment définir une variable avec un pas pour enregistrer différentes sauvegardes par exemple

Ben, tu la gardes en global (il suffit de ne pas la mettre en Local) et tu comptes.
Membre de l'équipe de TIGCC: http://tigcc.ticalc.org
Mainteneur du portage Linux/Unix de TIGCC: http://tigcc.ticalc.org/linux/
Membre de l'équipe de CalcForge: http://www.calcforge.org:70/

Participez à la reprise de Ti-Gen!
    
./Post n°4   Marquer comme non lu.
Thor Ecrit le: Mercredi 5 mai 2004 à 08:29 Déconnecté(e)    Voir le profil de Thor Envoyer un email à Thor Visiter le site WEB de Thor Envoyer un message privé à Thor  


prog()
Prgm
Dialog
Title "titre"
Dropdown "nom",{choix1, choix2},choix
EndDlog
If choix=1 Then
"string1"->var1
Elseif choix=2 Then
"string2"->var2
EndIf
EndPrgm

Moi je ne ferais pas ça car lorsqu'il n'y a qu'une et (une seule instruction) aprés un if on peut faire :
 If var=X:action();

Cyril MOTTIER aka {==Thor==}
Modérateur général du forum de Tigen
[Etudiant à l'Institut National des Sciences Appliquées (INSA) de Rennes]
Mon site perso c'est ici
    
./Post n°5   Marquer comme non lu.
kaz00 Ecrit le: Mercredi 5 mai 2004 à 13:23 Déconnecté(e)    Voir le profil de kaz00 Envoyer un email à kaz00 Envoyer un message privé à kaz00  

oui, c'est sur., mais j'ai mis ca pour reprendre sa structure principale.
    
./Post n°6   Marquer comme non lu.
matth Ecrit le: Mercredi 5 mai 2004 à 16:28 Déconnecté(e)    Voir le profil de matth Envoyer un email à matth Visiter le site WEB de matth Envoyer un message privé à matth  

alors Scythe, ca a répondu a tes question ?
ou bien tu en as encore d'autres ?
Ici un peu de pub pour bestofmicro, n'hésiter pas a double-cliquer, vous y trouverez du matériel informatique tres interressant

http://www.informatiquefrance.com/stop-faute.jpg
    
./Post n°7   Marquer comme non lu.
Scythe Ecrit le: Mercredi 5 mai 2004 à 16:54 Déconnecté(e)    Voir le profil de Scythe Envoyer un email à Scythe Envoyer un message privé à Scythe  

prog()
Prgm
Dialog
Title "titre"
Dropdown "nom",{choix1, choix2},choix
EndDlog
If choix=1 Then
"string1"->var1
Elseif choix=2 Then
"string2"->var2
EndIf
EndPrgm


Moi je ne ferais pas ça car lorsqu'il n'y a qu'une et (une seule instruction) aprés un if on peut faire :

If var=X:action();


ya pas qu'une action mais je note quand même le truc ^^

des questions j'en aurai encore tout plein jusqu'à ce que j'ai fini mon rpg sur la caletose sans aucun bouquin...
mais là je suis au bahut je posterai ça en rentrant

Scythe
Hail to ya
    
./Post n°8   Marquer comme non lu.
verytourist Ecrit le: Mercredi 5 mai 2004 à 17:23 Déconnecté(e)    Voir le profil de verytourist Envoyer un email à verytourist Envoyer un message privé à verytourist  

si il n'y a qu'une action, c'est
"string1"->var1
et
"string2"->var2


donc tu peu métre

:If choix=1
:"string1"->var1
:If choix=2
:"string2"->var2


Ou sinon, c'es la même chose:


:If choix=1:"string1"->var1
:If choix=2:"string2"->var2



pas de Then ,de Else , ni de EndIf... notation beaucoup plus légére :)
    
./Post n°9   Marquer comme non lu.
Scythe Ecrit le: Mercredi 5 mai 2004 à 18:20 Déconnecté(e)    Voir le profil de Scythe Envoyer un email à Scythe Envoyer un message privé à Scythe  

on peut plus éditer ? ben je flooderai, ne vous déplaise ^^

le moyen le plus court pour simuler un lancer de 3d6 et de faire la somme des résultats c'est quoi donc à votre avis ? (sans lancer 1d18...) j'ai fait trois "If rand(6)=1 then 1->var1 ... ,etc" et la somme mais il doit sûrement y avoir moyen de faire mieux (mais si on fait une boucle du coup ça efface le premier lancer nan ?) fin bon...par contre le rand est moyennement efficace...j'aimerais pas avoir ça le jour où je tirerai mes caracs ! lookez ça ! 8,8,11,5,10,7...pas top, hé ? m'en vais rajouter trois ou quatre points automatiquement...pis c'est pas mal lent kemêm, ça prend presque une demi-seconde rien que pour ça, d'où la question de savoir si il y a plus rapide.

Histoire d'éviter le bazar je met mes trois variables qui correspondent aux trois lancers en local...kémen faire pour les récupérer à la fin et stocker la somme dans une globale ?

Scythe
Hail to ya
    
./Post n°10   Marquer comme non lu.
geogeo Ecrit le: Mercredi 5 mai 2004 à 18:22 Déconnecté(e)    Voir le profil de geogeo Envoyer un email à geogeo Visiter le site WEB de geogeo Envoyer un message privé à geogeo  


on peut plus éditer ? ben je flooderai, ne vous déplaise ^^


Comment ça? Tu peux éditer en cliquant sur le bouton éditer en bas de ton post.
Webmaster du site.
Programmeur sur TI68K. Arkanoid, Nebulus, GFA-Basic.

Plus d'informations sur GFA-Basic (un langage Basic pour TI68K).
http://www.tigen.org/gfabasic
    
./Post n°11   Marquer comme non lu.
matth Ecrit le: Mercredi 5 mai 2004 à 18:53 Déconnecté(e)    Voir le profil de matth Envoyer un email à matth Visiter le site WEB de matth Envoyer un message privé à matth  

Alors :
pour le rand(x), c'est bien connu qu'il n'est pas tres equiprobable, mais ca, on y peut rien ...
Pour lancer x dés puis faire la somme des lancé, moi je ne ferai pas un programme, mais une fonction (quand tu est dans le menu creer un nouveau programme, tu séléctionne fontion en haut), pour le code, je ferai :

des(x)
func
local a,b,c,d,a1,a2,a3,a4,a5,a6
0->a1
0->a2
0->a3
0->a4
0->a5
0->a6
newlist(1)->b
newlist(6)->c
for a,1,x
   rand(6)->b[a]
   "a"&string(b[a])->c
   #c+1->#c
endfor
return {a1,a2,a3,a4,a5,a6}
endfunc

cela te retourne les statistiques du lancé de x dé à 6 faces. Dans ton prog principal, tu fait :

...
folder/des(3)->stats
---

et tu auras les stats dans la variable stats.

note : # est une fonction qui permet de d'utiliser une variable qui as un nom variable :

"a"->x
1->#x

ne stock pas 1 dans x, mais dans a, si vous avez toujours pas compris redemander ...
-Edité le Mercredi 5 mai 2004 à 19:31 par matth-
Ici un peu de pub pour bestofmicro, n'hésiter pas a double-cliquer, vous y trouverez du matériel informatique tres interressant

http://www.informatiquefrance.com/stop-faute.jpg
    
./Post n°12   Marquer comme non lu.
Kevin Kofler Ecrit le: Mercredi 5 mai 2004 à 23:06 Déconnecté(e)    Voir le profil de Kevin Kofler Envoyer un email à Kevin Kofler Visiter le site WEB de Kevin Kofler Envoyer un message privé à Kevin Kofler  


Pour lancer 3 d6, c'est rand(6)+rand(6)+rand(6). Pour n d6, c'est S(rand(6),i,1,n).
Membre de l'équipe de TIGCC: http://tigcc.ticalc.org
Mainteneur du portage Linux/Unix de TIGCC: http://tigcc.ticalc.org/linux/
Membre de l'équipe de CalcForge: http://www.calcforge.org:70/

Participez à la reprise de Ti-Gen!
    
./Post n°13   Marquer comme non lu.
matth Ecrit le: Jeudi 6 mai 2004 à 17:15 Déconnecté(e)    Voir le profil de matth Envoyer un email à matth Visiter le site WEB de matth Envoyer un message privé à matth  

Ben oué, mais avec ca, tu aura la somme, et pas les détail ...
Ici un peu de pub pour bestofmicro, n'hésiter pas a double-cliquer, vous y trouverez du matériel informatique tres interressant

http://www.informatiquefrance.com/stop-faute.jpg
    
./Post n°14   Marquer comme non lu.
Scythe Ecrit le: Jeudi 6 mai 2004 à 18:10 Déconnecté(e)    Voir le profil de Scythe Envoyer un email à Scythe Envoyer un message privé à Scythe  

Pour lancer 3 d6, c'est rand(6)+rand(6)+rand(6).


yey ça confirme que je suis un sacré boulet ^^ tx

par contre je sais toujours pas pour mes sauvegardes...que je m'explique mieux : comment définir le nom de la variable dans le prog/la fonction, et le faire changer (le nom de la var) à chaque fois qu'on lance le prog ; en gros comment avoir une nouvelle variable à chaque fois qu'on lance le schmillblick...

Scythe
Hail to ya
    
./Post n°15   Marquer comme non lu.
Kevin Kofler Ecrit le: Jeudi 6 mai 2004 à 22:58 Déconnecté(e)    Voir le profil de Kevin Kofler Envoyer un email à Kevin Kofler Visiter le site WEB de Kevin Kofler Envoyer un message privé à Kevin Kofler  


#("mavar"&string(exact(compteur)))
compteur est incrémenté à chaque lancement du programme.
Membre de l'équipe de TIGCC: http://tigcc.ticalc.org
Mainteneur du portage Linux/Unix de TIGCC: http://tigcc.ticalc.org/linux/
Membre de l'équipe de CalcForge: http://www.calcforge.org:70/

Participez à la reprise de Ti-Gen!
    
./Post n°16   Marquer comme non lu.
kaz00 Ecrit le: Vendredi 7 mai 2004 à 13:57 Déconnecté(e)    Voir le profil de kaz00 Envoyer un email à kaz00 Envoyer un message privé à kaz00  

ba oui, ty a pas pensé?
    
./Post n°17   Marquer comme non lu.
verytourist Ecrit le: Samedi 8 mai 2004 à 10:18 Déconnecté(e)    Voir le profil de verytourist Envoyer un email à verytourist Envoyer un message privé à verytourist  

pourqoui tu met une exact() ici ? sa va servir à rien :|
    
./Post n°18   Marquer comme non lu.
arvi89 Ecrit le: Samedi 8 mai 2004 à 17:28 Déconnecté(e)    Voir le profil de arvi89 Envoyer un email à arvi89 Visiter le site WEB de arvi89 Envoyer un message privé à arvi89  

Pour le coup du rand, l'an passé, j'ai fait 10 000 lancé sur rand(4), et c'était à peu près 25% à chaque fois ...
Sinon, j'ai une petite question : quel est l'interêt de fair une fonction lorsque l'on peut faire un programme ?
Arvi le druide sur Ysondre, si vous le voeyz, c'est déjà trop tard :)
    
./Post n°19   Marquer comme non lu.
Kevin Kofler Ecrit le: Samedi 8 mai 2004 à 17:30 Déconnecté(e)    Voir le profil de Kevin Kofler Envoyer un email à Kevin Kofler Visiter le site WEB de Kevin Kofler Envoyer un message privé à Kevin Kofler  


De pouvoir l'utiliser dans une expression.
Membre de l'équipe de TIGCC: http://tigcc.ticalc.org
Mainteneur du portage Linux/Unix de TIGCC: http://tigcc.ticalc.org/linux/
Membre de l'équipe de CalcForge: http://www.calcforge.org:70/

Participez à la reprise de Ti-Gen!
    
  :: Index » Forum Ti68K » Programmation TI-Basic » questions diverses (31 réponse(s))
Pages : 1/2     « [1] 2 » »|

.Répondre à ce sujet
Les boutons de code
[B]old[I]talic[U]nderline[S]trikethrough[L]ine Flip Hori[Z]ontallyFlip [V]erticallySha[D]ow[G]low[S]poilerCode [G][C]ite
Bullet [L]istList Item [K] Link [H][E]mail[P]icture SmileysHelp
Couleurs :
Saisissez votre message
Activer les smileys
     

Forum de Ti-Gen v3.0 Copyright ©2004 by Geoffrey ANNEHEIM
Webmaster: Kevin KOFLER, Content Admins: list, Server Admins: Tyler CASSIDY and Kevin KOFLER, DNS Admin: squalyl
Page générée en 76.59ms avec 18 requetes