You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
25 lines
299 B
Plaintext
25 lines
299 B
Plaintext
|
5 years ago
|
' {$STAMP BS2}
|
||
|
|
' {$PBASIC 2.5}
|
||
|
|
|
||
|
|
LED PIN 8
|
||
|
|
GREENLED PIN 7
|
||
|
|
DWELL CON 1000
|
||
|
|
|
||
|
|
' set io01 and 02 as INPUT
|
||
|
|
INPUT 1
|
||
|
|
INPUT 2
|
||
|
|
|
||
|
|
Main:
|
||
|
|
DO
|
||
|
|
HIGH LED
|
||
|
|
LOW GREENLED
|
||
|
|
PAUSE DWELL
|
||
|
|
LOW LED
|
||
|
|
HIGH GREENLED
|
||
|
|
PAUSE DWELL
|
||
|
|
DEBUG "."
|
||
|
|
' debug status of PIN1 and 2
|
||
|
|
DEBUG ? IN1
|
||
|
|
DEBUG ? IN2
|
||
|
|
LOOP
|
||
|
|
END
|