;=========================================================================
; Titre     :       Capture de ISA0 par programmation
; Fichier   :       lecture ANA_01.txt
; Produit   :       LUST
; Materiel  :       CDD
; Firmware  :       Firmware > 2.20-4
;-------------------------------------------------------------------------
; Revision  :       1.01
; Auteur    :       Gerald Froment
; Date rev. :       15 Novembre 2005
;-------------------------------------------------------------------------
; Exemple pour utiliser la valeur analogique ISA0
; Chargement de la valeur analogique para[416] dans la variable H50
; parametre 417 pour utiliser la ISA1
; La var H51 fait une mise a l'echelle
;-------------------------------------------------------------------------
;            Copyright (c) 2005 Transtechnik
;
;                      Transtechnik
;               17 rue des Grandes Varennes
;                      21121 AHUY
;                   www.transtechnik.fr
;                   tel : 03.80.55.00.00
;=========================================================================



%P00(PROG_PRINCIPAL)
N005 SET H51=1
N010 SET H50=PARA[416]
N020 SET H50:65535
N030 SET H50*H51
N040 WAIT 100              ;capture de la position tous les 100 ms
N050 JMP N010
END