'Circuit#1 Manual Pump control, picaxe 08M June 2009 'Open outlet,no tap start: high 0 'pump off setint %00000000,%00001000 'enable monitor on pin3 low,foot switch readadc 4,b1 'check tank level if b1>150 then empty low 2 'empty led on b2=b2+1 'start no activity timer 15 minutes pause 1000 if b2<60 then start b2=0 b3=b3+1 if b3<15 then start b3=0 setint %00000000,%00000000 'disable monitor on pin3 low,foot switch alert: b2=0 b3=0 high 0 readadc 4,b1 if b1>150 then empty if pin3=0 then start sound 1,(110,10) gosub trans sound 1,(120,10) gosub trans goto alert trans: for b6=1 to 40 pause 50 if pin3=0 then start next b6 return empty: setint %00000000,%00000000 'disable monitor on pin3 low,foot switch high 0 'pump off low 2 pause 200 high 2 pause 200 readadc 4,b1 if b1<150 then start b2=b2+1 'start no activity timer 15 minutes pause 200 if b2<60 then empty b2=0 b3=b3+1 if b3<15 then empty b3=0 time: readadc 4,b1 if b1<150 then start low 2 sound 1,(120,30) pause 2000 high 2 sound 1,(120,30) pause 2000 goto time etybuz: high 0 'pump off sound 1,(120,10) pause 200 sound 1,(120,10) pause 200 if pin3=0 then etybuz setint %00000000,%00001000 're-enable monitor on pin3 low,foot switch return interrupt: b2=0 b3=0 readadc 4,b1 if b1>150 then etybuz low 0 'pump on if pin3=0 then interrupt 'if foot switch on, pump on setint %00000000,%00001000 're-enable monitor on pin3 low,foot switch return