;-------------------------------------------------------------
;Aplicación 	-> seguridad
;Fecha		-> sep 30 2002
;-------------------------------------------------------------
 MIDA 14
;[REG_RELAYS]
sensor	equ	0
salida	equ	105
;[REG_INTEGERS] 

;[REG_FLOATS]

;[TIM] 

;[CNT] 

;[NOP]

;-----------------------------------------------
INICIO		Nop
	set	101
	ldnt	sensor
	out	100
	ld	100
	jz	inicio
ini1	ld	100
	ld	101
	tim	48	50
	out	salida
	set	101	
	ld	salida
	jz	ini1
Fin		end