bouge(ph,g)
Prgm
Clrhome
Local temp,key,yy,tt,yyi,tti,h,i
{6,8}->h
{93,91}->i
1->yyi
1->tti
left(ph,20)->ph
0->tt
0->yy
vertel("save","temp",0,0,159,99)
try
loop
getkey->key()
vertel("brek",0,"","bufr","","clrs","","draw",ph,tt,yy,g,1,"","bufr")
tt+tti->tt
yy+yyi->yy
if tt=-1 or tt=160-h[g]*dim(ph)
-tti->tti
if yy=0 or yy=i[g]
-yyi->yyi
if key=264
exit
endloop
else
text "Erreur !"
endtry
vertel("pict","temp",0,0,1)
endPrgm
Ça va mieux sur un vrai clavier :)
Clrhome
Local temp,key,yy,tt,yyi,tti,h,i
{6,8}->h
{93,91}->i
1->yyi
1->tti
left(ph,20)->ph
0->tt
0->yy vertel("save","temp",0,0,159,99)
try
loop
getkey->key()
vertel("brek",0,"","bufr","","clrs","","draw",ph,tt,yy,g,1,"","bufr")
tt+tti->tt
yy+yyi->yy
if tt=-1 or tt=160-h[g]*dim(ph)
-tti->tti
if yy=0 or yy=i[g]
-yyi->yyi
if key=264
exit
endloop
else
text "Erreur !" endtry
Brunni :
(c'est illisible à 500% avec vertel) je t'attends Vertyos
Mes programmes ne sont pas conçus pour être lusBah dès que tu feras de gros projets et que tu devras recommencer trois fois parce que ton collègue qui doit t'écrire trois routines hardware s'en sort pas avec ta source illisible... tu comprendras!
Vertyos :Oui, mais un prog écrit avec flib ou avec ma ch'tite lib est lisible même si on ne connait pas la syntaxe!
Qu'est-ce que tu "attends" ? Quand on connait pas la syntaxe, évidement que c'est illisible
Par contre la syntaxe de ta lib, *ahem*2,Salut tout le monde! Rect 0,0,159,10 ")
comprends po OK ça dépend de ce que tu fais, mais bon...lib("
ClrScr
Font 1
DrawStr 1,Ca reste quand-même bien lisible à mon goût... Maintenant si tu utilises les variables, boucles et compagnie c'est clair que c'est autre chose, mais bon comme c'est pas disponible dans les autres libs, il ne faut pas comparer.
Tu cherche à dessendre Vertel juste pour le plaisir ou bien parceque t'es jaloux de qqchose ? Peut-être du fait que j'ai refusé de te passer les sources pour que tu les repompe, hmm ?Non, j'exprime ma pensée c'est tout
Le genre de sources postées plus haut me déprime car elles ne sont compréhensibles que par des utilisateurs largement initiés à vertel, et je trouve ça dommage...
(je suis méchant là!)Le code est impossible à lire pour quelqun qui ne connait pas la lib, autant qu'il est très clair pour qqun qui sait s'en servirC'est ce que je disais:
Brunni:
Le genre de sources postées plus haut me déprime car elles ne sont compréhensibles que par des utilisateurs largement initiés à vertel, et je trouve ça dommage...
C'est ça ou bien reproduire FLib, et étant donné la différence en terme de performances, mon choix est très vite fait.Effectivement. Par contre je ne vois pas ce qui est si lent dans flib, à mon avis c'est le fait qu'il traite les expressions avec un truc équivalent à push_parse_text ou je ne sais pas quoi (chez lui les arguments se trouvent dans une chaîne de caractères).
lib("
ClrScr
Font 1
DrawStr 1,2,Salut tout le monde!
Rect 0,0,159,10
")
naPO :Alors pourquoi tu les postes, crétin !
Mes programmes ne sont pas conçus pour être lus
