' {$STAMP BS1}
' {$PBASIC 1.0}


'  Chute Timer
DIRS = %0000011


Main:

DEBUG CLS
DEBUG " Looping thru Main "

IF PIN6 = 0 THEN Start_Time
IF PIN6 = 1 THEN Main



Start_Time:

DEBUG CLS
DEBUG " Start Timer! ", CR
PIN7 = 0
PAUSE 8000
DEBUG " Kapow! "
OUTPUT 7
PAUSE 6000
INPUT 7






GOTO Main