Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.
ZESKAP - Ne vous laissez pas attrapez !
coc5 le 21/06/2008 à 17:34
Voici un jeu que j'avais fais il y a de là deux mois, dans la même lignée que certais précédents: ZESKAP.
> TELECHARGER ICI <
Vous êtes enfermé dans l'écran, et un ennemis cherche à vous attraper.
Mais vous laissez une trace derrière vous ! Votre trace est un mur infranchissable. Enfin, pas par l'ennemi, uniquement par vous.
Différents degrés de difficultés, rapportants plus ou moins de points sont proposés.
[liste] correspond au petit L du catalogue (à la lettre L)
Code
"DEBUTANT FACILE AMATEUR DIFFICILEEXTREME -> Str1
ClrHome
5 -> dim([liste]VV
If not([liste]VV(1:{2,3,2,0,0 -> [liste]VV
Disp "ZESKAP Par COC5","****************",""," TA FORME",""," FORME AI
Output(8,2,"DIFF:
3 -> F:4 -> A
Repeat K=105
If F:Then
F-1 -> F:25 -> K:Else:getKey -> K:End
If K=45 or K=22:Goto 0
If A-4:Output(2+2A,1,"
min(3,max(1,A+(Ans=34)-(Ans=25 -> A
Output(2+2A,1,"-
min(3+2(A=3),max(1,(K=26)-(K=24)+[liste]VV(A -> [liste]VV(A
Ans -> B
sub(Str1,9B-8,9
If A<3:sub("•¤+",B,1 <----------- note: ces symboles se trouvent dans le catalogue : ***[3] + 13x[flèche du bas]***
Output(2A+2,14-7(A=3),Ans:End
ClrDraw:AxesOff
FnOff
0 -> Xmin:0 -> Ymin
62 -> Ymax:94 -> Xmax:11 -> E:4 -> F
59 -> A:91 -> B
For(I,0,6
Horizontal I
End
For(I,0,1
Horizontal Ymax-I
Vertical I
Vertical Xmax-I
End:0 -> U
0 -> I:0 -> J:1 -> Q
[liste]VV(3 -> V
For(M,0,20V^1.5-20(V[diff de]5
8+3randInt(0,17 -> N:1+3randInt(1,29
If getKey=26:3 -> Q
Pt-On(Ans,N,2
Pt-On(Ans,N
End
[liste]VV(1 -> S:2-(Ans=2 -> R
min(4,6-V -> V
[liste]VV(2 -> P
Q[liste]VV(3) -> -> Z
Text(57,57," ",sub(Str1,9[liste]VV(3)-8,9
Text(57,3,"SCORE
Text(57,25,"
Repeat F=B and E=A
Text(57,26,U
If A-D or B-T:Then
U+Z -> U:Pt-On(T,D,R:End
Pt-On(B,A,S
D -> G:T -> H
A -> D:B -> T
getKey -> K
If Ans:Then
If K=31:Pause
3(K=26)-3(K=24 -> I
3(K=25)-3(K=34 -> J:End
max(7,A+J -> A:B+I -> B
If B=47 and A=31:Pause
If pxl-Test(62-A,B:Then:D -> A:T -> B:End
Pt-Off(F,E
Pt-Off(F,E,2
not(L -> L
If E=A:0 -> L
If F=B:1 -> L
If L:Then
{2A-D,A,D,G
Ans(V
E+3(E<Ans)-3(E>Ans -> E
Else
{2B-T,B,T,H
Ans(V
F+3(F<Ans)-3(F>Ans -> F
End
Pt-On(F,E,P
End
ClrHome:UYscl -> U
If U>[liste]VV(4:Then
U -> [liste]VV(4
[liste]VV(3 -> [liste]VV(5
Disp "RECORD BATTU !
End
Disp "","SCORE:
Pause U
ClrHome
Disp "RECORD ACTUEL:","","","SCORE","DIFF:
Output(4,11,[liste]VV(4:Output(5,7,sub(Str1,9[liste]VV(5)-8,9
Pause
Lbl 0:ClrHome
DelVar Str1
10 -> Xmax:-Ans -> Xmin:Ans -> Ymin:Xmax -> Ymax
FnOn :AxesOn
ratuss le 21/06/2008 à 23:53
ça à l'air amusant ! :pmad67 le 22/06/2008 à 10:23
pas mal du tout a vrai dire je totalise 1 heure d'amusement.Eightech le 11/09/2008 à 12:44
J'ai une TI-82 Stats fr et je souhaiterais y mettre ton jeu (d'ailleurs chapeau pour le programme) mais je ne trouve pas la fonction sub(, même dans le catalogue, ni dans la page de traduction français/anglais de sangohan38. Quelqu'un peut me donner l'équivalent de cette fonction ? Merci d'avance
chakal37 le 16/10/2008 à 17:20
Comment on écrit ce code ?
coc5 le 16/10/2008 à 18:58
Voilà j'ai modifié
Pense à chercher dans les symboles du catalogue (avant la lettre A).
Sinon désolé pour le sub() en français mais mon logiciel Ti-graph étant totalement bugué, je suis dans l'impossibilité de faire quoi que ce soit pour la traduction en français.
chakal37 le 02/11/2008 à 18:13
Code
("•¤+",B,1 <------------------ note: ces symboles se trouvent dans le catalogue, dans les symboles.
Je ne les trouve pas dans mon catalogue, j'ai une ti 82 stats.
coc5 le 02/11/2008 à 19:39
Tu les as c'est certain, en revanche ce n'est pas exactement comme indiqué... il n'y a pas l'équivalent dans la police affichable ici
J’ai indiqué où ils se trouvent dans le catalogue dans mon premier poste.
chakal37 le 05/11/2008 à 16:05
Je lance le programme tout va bien et quand je me fait manger, ça me met score : 0 et apprés ça met erreur la :
Code
Disp "RECORD ACTUEL:","","","SCORE","DIFF:
Output(4,11,[liste]VV(4:Output(5,7,sub(Str1,9[liste]VV(5)-8,9 <-- ici (sur l'espace pas le chiffre)
Pause
J'éspére quez aprés je pourrai enfin utiliser se code ^^
coc5 le 05/11/2008 à 18:56
C'est qu'il n'y a pas d'espace après le 9
chakal37 le 06/11/2008 à 19:22
Quand tu tape un truc un espace est directement mis :
tu tape 9 la chose qui clignote c'est automatiquement déplacé derriére ^^, je sais pas si je me suis bien exprimer
coc5 le 06/11/2008 à 21:00
Aaah ok je vois. Ce n'est pas un espace, mais j'ai compris
Donc si tu me dis quelle est la nature de l'erreur indiquer je pourrais t'aider( lors de l'erreur, il y a marqué ERROR:XXXXXX et c'est ce XXXXXX que je te demandes
)
chakal37 le 07/11/2008 à 14:46
Ok c'est marquer ça :
Code
ERR:SYNTAX
1:Quit
2:Goto
Quand a moi je suis en train d'apprendre a faire les getkey, bientot je ferait un programme du style snake ou peut être un jeu moins lourd
coc5 le 07/11/2008 à 15:19
Tu as donc fais une erreur lors du recopiage.[liste] désigne le petit L du catalogue, c'est bien ce que tu as fais ?chakal37 le 07/11/2008 à 19:47
Oui j'ai bien fais le petit L, bon je vais relire le programme
, bon merci je mettrai demain si je peux enfin y jouer
$had0vv le 11/11/2008 à 15:19
Bonjour, je voudrais savoir comment on fait pour taper "[flèche du bas]***"
merci de votre réponse. bonne journée
coc5 le 11/11/2008 à 16:03
Ce qui est entre [] ne se tape pas, il faut simplement faire ce qu'il y est marqué !
Donc appuie juste 13 fois sur flèches de bas (une fois dans le catalogue évidemment) et tu seras sur la zone où ces symboles sont présents (ils se repèrent facilement).chakal37 le 16/11/2008 à 16:07
J'ai beau vérifier je ne trouve pas ou il peut y avoir une erreur
sinon rassure moi il y une erreur sur cette ligne :
Code
Q[liste]VV(3) -> -> Z
coc5 le 16/11/2008 à 16:29
Mais oui
Ca alors, j'ai pourtant fais un copié-collé du code transféré de ma calculatrice !
Un bug de Tigraph peut-être. Ou quand j'ai transformé les balises ü ù Â ö etc... en caractères lisibles...
Mince =/
chakal37 le 16/11/2008 à 19:03
Sinon y a besoin de metre un espace de chaque coté de sto ?coc5 le 16/11/2008 à 19:04
Il faut même éviter, le programme buguerait.englef69 le 19/11/2008 à 19:30
salut je ne trouve pas la fonction Str1 sur ma ti 82 non stat (ligne 2)
merci @+
englef69 le 19/11/2008 à 19:35
resalut
pour les liste on utilise L1 ou L2 ou L3 ou ou L4 ou L5 ou L6
.
Et si c'est pas ça c'est quoi et où.
merci @+
Sangohan38 le 19/11/2008 à 19:49
Il n'y a pas de chaines (strig en anglais) sur une 82 non stats.
Tu ne peut donc pas recopier ce programme.
Sangohan38alexvire le 06/12/2008 à 14:02
Salut, j'ai tapé ton programme sur ma Ti-Stats.fr, mais il y a une erreur ici:
J'ai pourtant mis
au lieu de
et
au lieu de
Aidez-moi!
coc5 le 06/12/2008 à 14:15
suite() ne correspond pas à
sub().
C'est
sous-chaîne() alexvire le 06/12/2008 à 14:30
Ok, merci, je vais le refaire, réponse rapide!
alexvire le 06/12/2008 à 14:35
Ca met erreur invalide cette fois à la même ligne.
alexvire le 06/12/2008 à 14:41
C'est une erreur: dim invalide, au début ça a marché, puis j'ai essayé de modifier la difficulté, et sa ma marqué ça, et maintenant ça met erreur à chaque fois que je le lance.coc5 le 06/12/2008 à 15:08
Vérifie que tu as bien entré la chaîne au début. Il ne faut pas négliger les espaces.alexvire le 06/12/2008 à 15:53
Merci, j'ai modifié, par contre quelle est la touche pour:
Pour faire le UYscl?
coc5 le 06/12/2008 à 17:07
Ce sont deux choses différentes : U et Yscl.
Le deuxième se trouve dans [VARS] + [1].alexivire le 06/12/2008 à 21:04
Merci, j'ai finis de le copier, félicitations, c'est le meilleur de mes jeux. Avertissement :Il s'agit d'une page optimisée pour la navigation mobile. Voir la
page originale.
