BrendanP
18-01-2006, 05:26
This is an on going problem that Hippy gave me some help with a few weeks back. Ive tried everything I can think off. Ive reduced the program to this simple version to demonstrate the problem. Im sering in data via RF. 50 serins takes around a second so I am using a for... next loop to give the illuison of a timer between serins. This way you can have a idea of how long since youve got fresh data comming in.
It works fine as long as I dont try and use the serin line of code. I cant understand why this would affect the program. Im using a 40X and the rev ed LCD.
main:
b1 = 0
serout 7,n2400, (254,1)
pause 30
serout 7, 2400,(254,128)
serout 7, n2400, ("REFRESH SCREEN")
pause 2000
serout 7, n2400, (254,1)
pause 30
serout 7, n24000, (254,192)
serout 7, n2400, ("SEC SINCE REF")
loop:
for b6 = 1 to 50 step 1
serin 4, n2400, (":01"), b2 'prob is here
next
'pause 1000 'use if serin disbaled
b1= b1 + 1
serout 7, n2400, (254,205)
serout 7, n2400, (#b1)
if b1 > 20 then main
goto loop
Â*
It works fine as long as I dont try and use the serin line of code. I cant understand why this would affect the program. Im using a 40X and the rev ed LCD.
main:
b1 = 0
serout 7,n2400, (254,1)
pause 30
serout 7, 2400,(254,128)
serout 7, n2400, ("REFRESH SCREEN")
pause 2000
serout 7, n2400, (254,1)
pause 30
serout 7, n24000, (254,192)
serout 7, n2400, ("SEC SINCE REF")
loop:
for b6 = 1 to 50 step 1
serin 4, n2400, (":01"), b2 'prob is here
next
'pause 1000 'use if serin disbaled
b1= b1 + 1
serout 7, n2400, (254,205)
serout 7, n2400, (#b1)
if b1 > 20 then main
goto loop
Â*