Alarm Timer 12C508

ALARM TIMER 12c508.BAS
'****************************************************************
a var byte
n var byte

trisio=%011111
gpio.5=1

a=gpio-32
if a=0 then a=60

for n=1 to a
pause 1000
next n

gpio.5=0
end


This a small timer of "couple of seconds" duration which can be used as an alarm, but also for other purposes.

Program is developed in Basic, while the circuit is developed in Eagle.