Friday, 30 April 2010

Another Attempt at Programming

readadc 1, b1
readadc 2, b2

select case b1
case 0 to 80
low 2
high 1
case 81 to 200
high 2
pause 600
low 1
end select

select case b2
case 0 to 80 ;on detection of light
low 4
pause 600
high 3
case 81 to 200 ;if the light isnt detected
high 4
low 3
end select

debug b1
debug b2

goto main

No comments:

Post a Comment