ti-basic

comme promis, voila le code avec, en plus, quelques renseignements.
- le nom sera: the magical quest (je sais, c'est pas original, mais on peut toujours changer^^)
- je m'attaque d'abord au "gros" du jeu, je ferais les graphismes plus tard.
-on ne peut quitter le jeu qu'en faisant [2nd] + [ON]
-je n'ai pas pu écrire le symbole pi à l'ordinateur; je l'ai donc écrit comme ici. si vous voyez "pi" , cela coresspond à: "symbole pi" et non pas écrire pi à l'écran!

et le code:

ClrHome
ClrAllLists
Clear Entries
1->X:1->Y
1->A:1->B
Disp "QUEL EST TON NOM"
Input Str1
ClrHome
Lbl 1
ClrHome
Output(3,1,"<"
Output(2,14,"?"
Repeat K=23
Output(A,B," "
Output(Y,X,"pi"
Y->A:X->B
getKey->K
X-(K=24)+(K=26)->X
Y-(K=25)+(K=34)->Y
If X=0:1->X
If X=17:16->X
If Y=0:1->Y
If Y=9:8->Y
If X=14 and Y=2:Goto A
If X=1 and Y=3:Goto 2
End
End
Lbl 2
ClrHome
Output(1,8,"^"
Output(3,16,">"
Repeat K=23
Output(A,B," "
Output(Y,X,"pi"
Y->A:X->B
getKey->K
X-(K=24)+(K=26)->X
Y-(K=25)+(K=34)->Y
If X=0:1->X
If X=17:16->X
If Y=0:1->Y
If Y=9:8->Y
If X=8 and Y=1:Goto 3
If X=16 and Y=3:Goto 1
End
End
Lbl A
ClrHome
Disp "BIENVENUE","JEUNE TEMERAIRE.","JE SUIS LE CHE-","VALIER SOLITAIRE","J'AI PERDU LA","VUE LORS DE MA","QUETE...JE SUIS"
Pause
ClrHome
Disp "REVENU ICI PAR","HASARD. J'AI","ALORS DECIDE D'","ATTENDRE MON SUC","CESSEUR...","JE T'AIDERAIS","DONC DANS CETTE"
Pause
ClrHome
Disp "PERILLEUSE ET","DIFFICILE QUETE."
Pause
ClrHome
Output(1,1,"ALLONS-Y"
Output(1,10,Str1
Pause
ClrHome
Goto 2
end

LOL !!

nan, plus serieusement, je ferais peut être un article sur les casio mais comme je n'en ai pas... je connais pas!
mais promis, je mettrais des liens et quelques explications

http://www.progmatique.fr/article-44-Introduction.html

j'en rajouterais au fur et à mesure...
sinon, faîtes une recherche google et mettez les liens en commentaires de cet article

bientôt, je mettrais en ligne un programme de triche sur les stats, la trigo (enfin, une partie^^) et les fonctions paires/impaires

voila...