Page 1 sur 1
Restore "dt"+str(i)
Publié : sam. 05/mars/2011 14:50
par SPH
Salut a tous,
J'ai des datas qui correspond a des pixels. Chaque ligne a une etiquette "dt0:", "dt1:", "dt2:", etc...
J'aurais voulu faire fauter un restore a la bonne ligne en lui passant ce genre de parametre :
Mais cela fait une erreur (je le savais). Comment detourner ca ??
Re: Restore "dt"+str(i)
Publié : sam. 05/mars/2011 15:45
par Backup
je ne vois qu'un truc genre :
Code : Tout sélectionner
For i=1 To 200
de=Random(2)
Select de
Case 0
Restore dt0
Case 1
Restore dt1
Case 2
Restore dt2
EndSelect
Read.s a$
Debug a$
Next i
DataSection
dt0:
Data.s "zero"
dt1:
Data.s "un"
dt2:
Data.s "deux"
EndDataSection
Re: Restore "dt"+str(i)
Publié : sam. 05/mars/2011 15:47
par SPH
Dobro a écrit :je ne vois qu'un truc genre :
Code : Tout sélectionner
For i=1 To 200
de=Random(2)
Select de
Case 0
Restore dt0
Case 1
Restore dt1
Case 2
Restore dt2
EndSelect
Read.s a$
Debug a$
Next i
DataSection
dt0:
Data.s "zero"
dt1:
Data.s "un"
dt2:
Data.s "deux"
EndDataSection
Mouai, mais comme j'ai 235 lignes, tu imagines le code !!?
Faudrait que fred autorise les restore "dt"+str(i). Je vais le poster...
Re: Restore "dt"+str(i)
Publié : sam. 05/mars/2011 15:56
par Backup
SPH a écrit :
Mouai, mais comme j'ai 235 lignes, tu imagines le code !!?
si tu voyais la taille de mon synthé vocal qui est sur ce principe
Faudrait que fred autorise les restore "dt"+str(i). Je vais le poster...
a mon avis, ça va pas l'faire ...
Re: Restore "dt"+str(i)
Publié : sam. 05/mars/2011 15:58
par SPH
Dobro a écrit :SPH a écrit :
Mouai, mais comme j'ai 235 lignes, tu imagines le code !!?
si tu voyais la taille de mon synthé vocal qui est sur ce principe
Faudrait que fred autorise les restore "dt"+str(i). Je vais le poster...
a mon avis, ça va pas l'faire ...
Mon basic sur MSX des années 85 le faisait alors pourquoi pas purebasic ?!!