Restore "dt"+str(i)

[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 :

Code : Tout sélectionner

Restore "dt"+str(i)

Mais cela fait une erreur (je le savais). Comment detourner ca ??

[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

[SPH]

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...

[Backup]

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 ...

[SPH]

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 ?!!