Un saludo desde la república dominica y quisiera una mano para lograr una parada
en pic basic pro por medio de una interrupción con la condición de permanecer parado el conteo hasta que desaparezca el flanco de subida muchas gracias de ante mano
en pic basic pro por medio de una interrupción con la condición de permanecer parado el conteo hasta que desaparezca el flanco de subida muchas gracias de ante mano
Código:
'****************************************************************
'* Name : UNTITLED.BAS *
'* Author : [select VIEW...EDITOR OPTIONS] *
'* Notice : Copyright (c) 2011 [select VIEW...EDITOR OPTIONS] *
'* : All Rights Reserved *
'* Date : 05/10/2011 *
'* Version : 1.0 *
'* Notes : *
'* : *
'****************************************************************
X1 var portb.1
X2 var portb.2
X3 var portb.3
X4 var portb.4
X5 var portb.5
X6 var portb.6
X7 var portb.7
BOTON var portA.0
X10 var portA.1
pito var porta.2
Trisb=0
TRISA=1
if BOTON=1 then FOUL
low porta.1: low portb.1: high portb.2: low portb.3: low portb.4:high portb.5: low portb.6:low portb.7 ;24
pause 1500
high porta.1: high portb.1:low portb.2:low portb.3::low portb.4:high portb.5:low portb.6:low portb.7 ;23
pause 1500
low porta.1: high portb.1:low portb.2:low portb.3::low portb.4:high portb.5:low portb.6:low portb.7 ;22
pause 1500
high porta.1: low portb.1:low portb.2:low portb.3::low portb.4:high portb.5:low portb.6:low portb.7 ;21
pause 1500
low porta.1: low portb.1:low portb.2:low portb.3::low portb.4:high portb.5:low portb.6:low portb.7 ;20
pause 1500
high porta.1: low portb.1:low portb.2:high portb.3::high portb.4:low portb.5:low portb.6:low portb.7 ;19
pause 1500
low porta.1: low portb.1:low portb.2:high portb.3::high portb.4:low portb.5:low portb.6:low portb.7 ;18
pause 1500
high porta.1: high portb.1:high portb.2:low portb.3::high portb.4:low portb.5:low portb.6:low portb.7 ;17
pause 1500
low porta.1: high portb.1:high portb.2:low portb.3::high portb.4:low portb.5:low portb.6:low portb.7 ;16
pause 1500
high porta.1: low portb.1:high portb.2:low portb.3::high portb.4:low portb.5:low portb.6:low portb.7 ;15
pause 1500
FOUL:
low porta.1: low portb.1:high portb.2:low portb.3::high portb.4:low portb.5:low portb.6:low portb.7 ;14
pause 1500
high porta.1: high portb.1:low portb.2:low portb.3::high portb.4:low portb.5:low portb.6:low portb.7 ;13
pause 1500
low porta.1: high portb.1:low portb.2:low portb.3::high portb.4:low portb.5:low portb.6:low portb.7 ;12
pause 1500
high porta.1: low portb.1:low portb.2:low portb.3::high portb.4:low portb.5:low portb.6:low portb.7 ;11
pause 1500
low porta.1: low portb.1:low portb.2:low portb.3::high portb.4:low portb.5:low portb.6:low portb.7 ;10
pause 1500
high porta.1: low portb.1:low portb.2:high portb.3::low portb.4:low portb.5:low portb.6:low portb.7 ;09
pause 1500
low porta.1: low portb.1:low portb.2:high portb.3::low portb.4:low portb.5:low portb.6:low portb.7 ;08
pause 1500
high porta.1: high portb.1:high portb.2: low portb.3::low portb.4:low portb.5:low portb.6:low portb.7 ;07
pause 1500
low porta.1: high portb.1:high portb.2: low portb.3::low portb.4:low portb.5:low portb.6:low portb.7 ;06
pause 1500
high porta.1: low portb.1:high portb.2: low portb.3::low portb.4:low portb.5:low portb.6:low portb.7 ;05
pause 1500
low porta.1: low portb.1:high portb.2: low portb.3::low portb.4:low portb.5:low portb.6:low portb.7 ;04
pause 1500
high porta.1: high portb.1: low portb.2: low portb.3::low portb.4:low portb.5:low portb.6:low portb.7 ;03
pause 1500
low porta.1: high portb.1: low portb.2: low portb.3::low portb.4:low portb.5:low portb.6:low portb.7 ;02
pause 1500
high porta.1: low portb.1: low portb.2: low portb.3::low portb.4:low portb.5:low portb.6:low portb.7 ;01
pause 1500
high pito: low porta.1: low portb.1: low portb.2: low portb.3::low portb.4:low portb.5:low portb.6:low portb.7 ;00
pause 2500
low pito
end