Voici comment passer un tableau complet !

[jerexgrz]

Voici, un petit code tout simple pour passer un tableau en argument.

Code : Tout sélectionner

global dim train.l (10,10)
global dim moto.l (10,10)

global dim temp.l (10,10)

macro tab (nom_tableau)

  for YY = 1 to 10
     for XX = 1 to 10
         nom_tableau (xx,yy)= train(xx,yy)
    next xx
  next yy
endmacro

tab(moto)

Et voila, comme ca toutes les valeurs de "moto = train" ! Et ainsi si on a un autre tableau comme voiture, on peut faire de meme sans réecrire plusieurs la meme chose !! nom_tableau sera dans ce cas "voiture".
ex: tab(voiture) ... "voiture = train".

C'est un truc important que j'avais besoin !!

[AWEAR]

C'est pas plus simple comme ca ?

Code : Tout sélectionner

Global Dim train.l (10,10) 
Global Dim moto.l (10,10) 

moto(0, 0) = 1

Debug moto(0, 0)
Debug train(0, 0)

Macro Tab(nom_tableau)
CopyMemory(@nom_tableau(), @train(), 11*11*4)
EndMacro


tab(moto)
Debug moto(0, 0)
Debug train(0, 0)

et puis attention dans ton code il faut faire :

Code : Tout sélectionner

for YY =  0 to 10 
     for XX = 0 to 10 
         nom_tableau (xx,yy)= train(xx,yy) 
    next xx 
  next yy 

[jerexgrz]

Ouais, c pas mal du tout !
Normalement, ton prog doit etre + rapide que le mien !

(je ne connais pas encore la fonction copymemory!)