' {$STAMP BS2}
' {$PBASIC 2.5}

DEBUG " 6 SECONDS HURRY OR PRESS 0 "
  IF (IN0 = 1) THEN                                   'IF PERSON CAN NOT RUSH, PRESS 0 TO STOP THE COUNTDOWN
  LOW 14
  ELSE '...

' Here is were I am stucked, I want that I have 6 seconds to press 0 before the door closes
' while running the sound (underneath)
' I was looking for an answer in the WAM, but I didn't find any clear answer.

FREQOUT 9, 250, 2000
PAUSE 250
FREQOUT 9, 250, 2000
PAUSE 250
FREQOUT 9, 250, 2000
DEBUG " 5 "
FREQOUT 9, 250, 2000
PAUSE 250
FREQOUT 9, 250, 2000
PAUSE 250
FREQOUT 9, 250, 2000
DEBUG " 4 "
FREQOUT 9, 250, 2000
PAUSE 250
FREQOUT 9, 250, 2000
PAUSE 250
FREQOUT 9, 250, 2000
DEBUG " 3 "
FREQOUT 9, 250, 2000
PAUSE 250
FREQOUT 9, 250, 2000
PAUSE 250
FREQOUT 9, 250, 2000
DEBUG " 2 "
FREQOUT 9, 250, 2000
PAUSE 250
FREQOUT 9, 250, 2000
PAUSE 250
FREQOUT 9, 250, 2000
DEBUG " 1 "
FREQOUT 9, 100, 2000
PAUSE 100
FREQOUT 9, 100, 2000
PAUSE 100
FREQOUT 9, 100, 2000
PAUSE 100
FREQOUT 9, 100, 2000
PAUSE 100
FREQOUT 9, 100, 2000
PAUSE 100
DEBUG " DOOR CLOSURE INITIATED"


   FOR counter = 1 TO 150                               ' Door Closes
   PULSOUT 14, 1500
   PAUSE 20
   NEXT

ENDIF