SERAD IMD Série Manuel D'utilisation page 200

Documentation Drive IMD, IMD20 et IMDL
SUB Calcul
VR2=0
IF VR1=0 EXIT SUB
VR2=VR10/VR1 ' Division
END SUB
Un sous-programme peut être appelé partout dans le programme mais ne peut
s'appeler lui-même. Si des données sont utilisées dans le programme et dans des sous
programmes, il est recommandé d'utiliser des variables bien spécifiques. En fait,
toutes les variables peuvent être modifiées par un sous-programme, vous pouvez donc
utiliser ces variables spécifiques dans chaque sous-programme en les affectant
simplement avant l'appel. Par exemple :
...
VR100=VR1
VR101=VR18
CALL Divise
IF VR102>10 Goto ...
...
SUB Divise
VR102=0
IF VR100=0 EXIT SUB
VR102=VR100/VR101
END SUB
c) Branchement à une étiquette
L'instruction GOTO sert à effectuer un saut à une adresse représentée par une
étiquette. Une étiquette est composée d'un nom terminé par ":". Si l'instruction GOTO
se trouve à l'intérieur d'une structure de sous-programme SUB...END SUB, l'étiquette
doit se trouver dans cette même structure.
Un branchement avec l'instruction GOTO peut être effectué indifféremment vers
l'avant ou l'arrière du programme. Par exemple:
GOTO Label1
...
Label1:
...
d) Opérateurs
R724
' Si VR1 est égal à zéro la division est impossible
- 200 - SERAD S.A