SERAD IMD Série Manuel D'utilisation page 180

Documentation Drive IMD, IMD20 et IMDL
repeat
VL100=ReadParam(6064h,00h) 'position actuelle
VR100=VL100
VR100=VR100/100 'divise par la précision du DPL
until VR100>0
WriteParam(2800h,03h)=1 'stoppe le muvement
'attend que le mouvement soit terminé
repeat
VI100=ReadParam(6510h,06h)
VI100=VI100 and 1
until VI100=0
'---Ecriture de la trajectoire---
VR0=0'WriteParam(3400h,00h)=0 'position 0
VL100=2 'mode : Infini +
VL100=VL100 << 8
VL100=VL100+30 'vitesse : 30
VL100=VL100 << 8
VL100=VL100+100 'acceleration : 100
VL100=VL100 << 8
VL100=VL100+100 'deceleration : 100
VL0=VL100'WriteParam(3300h,00h)=VL100 'options
'---Lancement---
WriteParam(2800h,02h)=1
delay (1000)
WriteParam(2800h,03h)=1 'stoppe le mouvement
halt 1
EndProg
R724 - 180 - SERAD S.A