Autorisation : Membre
Nb de messages : 32
Inscrit le : Lun 08 Oct 2012, 18:28
Posté le : Jeu 28 Fév 2013, 21:10
bonjour,
un ami a moi avait fait un prgm comme celui-ci:
Code
lbl 1
Disp "o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Disp " o
Goto 1
ce qui m'a donné l'idée de ces deux codes:
celui-ci pour editer vos annimations:
Code
" "üStr1
2üH
If A
Then
Lbl 1
End
If H=1
Then
0üH
sub(Str1,2,length(Str1)-1)üStr1
End
If H=2
1üH
Input "",Str2
If length(Str2)=16
Then
Str1+Str2üStr1
Goto 1
End
If length(Str2)<16
Then
While length(Str2)<16
Str2+" "üStr2
End
Str1+Str2üStr1
Goto 1
End
Str1+sub(Str2,1,16)üStr1
If 1
Goto 1
et celui-là pour les annimer:
Code
ClrHome
If fPart(length(Str1)/16)
Then
Output(1,1,"ERREUR LANCEZ LE PPOGRAMME EDIT"
Stop
End
Input "RALENTISSEURS:",R
Lbl 1
For(A,1,length(Str1),16)
Disp sub(Str1,A,16)
For(B,1,R)
69!
End
End
Goto 1
bonnes annimations!
---------------------- une journée sans rire est une journée perdue .
rire 30 minutes par jour rends la santé et augmente la durée de vie!
(ne remplace pas l'avis d'un spécialiste ou d'un professionnel de la santé,veuillez consulter un médecin)
thomas Invité
Posté le : Ven 01 Mar 2013, 11:16
A quoi correspondent les instructions (length) et (strl)?
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Ven 01 Mar 2013, 11:56
--- thomas
Le catalogue dans ma signature est là pour éviter ces questions.
length est dans le catalogue et signifie longueur.
Str1 est dans le menu var+7 et signifie Chaîne1.
Ce programme est incompatible avec la ti82 non-stat.
--- charlesjean
Il n'y a pas besoin de 69! pour ralentir. Il faut juste saisir un grand nombre R si on n'use pas de 69! et cela permet d'ajuster plus précisément et de façon plus stable selon le modèle de ti et la ram libre.
Il est possible de gérer un éditeur avec un unique Input et la commande manuelle 2nde+rappel+2nde+Rép. Ainsi il suffit d'un Input et d'une commande. (méthode de TXT de Maxence)
Placer un Goto1 dans une alternative et palier aux bugs en plaçant le Lbl1 dans un Then est horrible. Il est largement préférable d'utiliser uniquement des boucles. Mais je ne peux pas t'y forcer.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Autorisation : Membre
Nb de messages : 32
Inscrit le : Lun 08 Oct 2012, 18:28
Posté le : Ven 01 Mar 2013, 21:48
je reconnais que je l'ai refais à la vas vite car il a été supprimé une fois;et j'ai voulu y faire des testes (comme le lbl dans un then)!
---------------------- une journée sans rire est une journée perdue .
rire 30 minutes par jour rends la santé et augmente la durée de vie!
(ne remplace pas l'avis d'un spécialiste ou d'un professionnel de la santé,veuillez consulter un médecin)
