'Code by Shaun Wilson November 11/99
'this program monitors the p0 to p4 to see what state they
'are and if their all ones then p5 is set high to turn on the relay
Dir%=000001
main:
result = in0*in1*in2*in3*in4 'if any pin is 0 then the result will equal 0
if result = 1 then on 'if all the input are 1's
goto main
on:
high 5 'turn on the relay
goto main
               (
geocities.com/siliconvalley/Orchard)                   (
geocities.com/siliconvalley)