14.07.2013 Views

5.6 Mesure étendue MEASA, MEAWA, MEAC (à partir de SW 4

5.6 Mesure étendue MEASA, MEAWA, MEAC (à partir de SW 4

5.6 Mesure étendue MEASA, MEAWA, MEAC (à partir de SW 4

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Sous-programmes, macroprogrammation 12.97<br />

<br />

840 D<br />

NCU 571<br />

840 D<br />

NCU 572<br />

NCU 573<br />

FM-NC 810D<br />

<br />

Règles <strong>de</strong> définition <strong>de</strong>s paramètres formels :<br />

Dans le cas <strong>de</strong>s tableaux bidimensionnels, il n'est pas<br />

obligatoire d'indiquer le nombre <strong>de</strong> la 1ère dimension, mais<br />

par contre, il convient d'écrire la virgule.<br />

Exemple :<br />

VAR REAL TAB[,5]<br />

Quand on indique une longueur <strong>de</strong> tableau indéfinie, les sousprogrammes<br />

peuvent traiter <strong>de</strong>s tableaux <strong>de</strong> longueur<br />

variable. Toutefois, lors <strong>de</strong> la définition <strong>de</strong>s variables, il<br />

convient <strong>de</strong> préciser le nombre d'éléments <strong>à</strong> entrer.<br />

Vous trouverez d'autres informations sur la définition <strong>de</strong>s<br />

tableaux dans le manuel <strong>de</strong> programmation.<br />

<br />

Programmation avec longueurs <strong>de</strong> tableaux<br />

variables.<br />

%_N_PLAQUE_PERFOREE_MPF Programme principal<br />

DEF REAL TABLEAU[100,2] Définir le tableau <strong>de</strong>s positions<br />

EXTERN RESEAU_TROUS (VAR REAL[,2],INT)<br />

TABLEAU[0,0]=-17.5 Définir les positions<br />

…<br />

TABLEAU[99,1]=45<br />

RESEAU_TROUS(TABLEAU,100) Appel du sous-programme<br />

M30<br />

Réalisation d'un réseau <strong>de</strong> trous avec l'appui du transfert d'un tableau <strong>de</strong> positions <strong>de</strong> longueur<br />

variable<br />

%_N_RESEAU_TROUS_SPF Sous-programme<br />

PROC RES_TROUS(VAR REAL TAB[,2],-> Transfert <strong>de</strong> paramètres<br />

-> INT NOMBRE)<br />

DEF INT COMPTEUR<br />

STEP: G1 X=TAB[COMPTEUR,0]-><br />

-> Y=TAB[COMPTEUR,1] F100<br />

Z=IC(-5)<br />

Z=IC(5)<br />

COMPTEUR=COMPTEUR+1<br />

IF COMPTEUR

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!