Paso 5: Paso 4
4. ahora tienes que escribir el código en estampilla básica para probar el dispositivo y asegúrese de que su trabajo. Utilizar el código siguiente y sustituir a la izquierda variable constante para sus los propios. (en una zona iluminada, el orador debe encenderse después de alrededor de 5 segundos).' {$STAMP BS2}
' {$PBASIC 2.5}
TimeLeft VAR Word
leftconstant CON 4000
PAUSE 5000
HACER
GOSUB read_p
Alarma GOSUB
LAZO
read_p:
5 ALTA
PAUSA 3
RCTIME 5, 1, timeleft
VOLVER
alarma:
IF (timeleft < leftconstant) entonces
HACER
FREQOUT 4, 2000, 4000
LAZO
ENDIF
PAUSE 20
VOLVER