hello. I found this program. But I need to understand it. I do not know where I change my numbers received.
Example I want to run the Circuit after the following order numbers 3432657
Thank you
''''''''''''''''''''''''''''''''''''
' Receiver Basic Program
''''''''''''''''''''''''''''''''''''
device = 16f628A
config INTRC_OSC_NOCLKOUT, WDT_OFF, PWRTE_ON, BODEN_OFF, LVP_OFF, CP_on, MCLRE_ON
all_digital true
Dim Temp as byte
Dim Time as byte
Dim loop as byte
Dim flag as bit
''''''''''''''''''''''''''
SYMBOL NO = 5
'************************
Dim dat[NO] as byte
'&&&&&&&&&&&&&&&
dat[0]=1
dat[1]=2
dat[2]=3
dat[3]=4
dat[4]=5
trisb = %00011111
trisa = %11111111
OPTION_REG = %11000000
low portb.4
low portb.6
low portb.5
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
' First Timer, Delay after starting
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
for Time = 1 to 120
delayms 2000 ' 4 min. low speed flash delay
toggle portb.5
next Time
for Time = 1 to 60
delayms 500 ' 1 min. high speed flash delay
toggle portb.5
if Time > 50 then high portb.4
next loop
low portb.4
low portb.5
''''''''''''''''''''%%%%%%%%%%%%%%%%%%%%%----------
on interrupt ISR
INTCON = %10011000
portb.0 = 0
loop = 0
main:
goto main
disable
ISR:
if INTCON.1 = 1 then intf1
goto Exit_ISR
intf1:
INTCON.1 = 0
Temp = porta
Temp = Temp & %00001111
if Temp = dat[loop-1] and loop > 0 then
goto Exit_ISR
else
loop = loop + 1
if Temp <> dat[loop-1] then
loop = 0
else
if loop = NO then high portb.6 : high portb.5 : delayms 10000 : low portb.6 : low portb.5 : loop=0
endif
endif
goto Exit_ISR
Exit_ISR:
resume
enable
goto main