ik heb een stuk code van internet af geplukt alleen is de code niet compleet.
Code: Selecteer alles
SYMBOL FALSE = 0
SYMBOL HOOG = 1
SYMBOL LAAG = 0
SYMBOL TRUE = 1
DIM Neutraal AS BIT ;Check neutraalstand
WHILE 1 = 1
LinksOm = FALSE
RechtsOm = FALSE
WHILE PORTB.0 = HOOG : WEND ;Wacht op laag niveau
WHILE PORTB.0 = LAAG : WEND ;Wacht op hoog niveau
DELAYUS 1350 ;= 1,35mSec
IF PORTB.0 = LAAG THEN LinksOm = TRUE
DELAYUS 150 ;= 0,15mSec
IF PORTB.0 = HOOG THEN
DELAYUS 150 ;= 0,15mSec
IF PORTB.0 = LAAG THEN RechtsOm = TRUE
ENDIF
IF LinksOm = FALSE AND RechtsOm = FALSE THEN Neutraal = TRUE
IF LinksOm = TRUE AND Neutraal = TRUE THEN
Neutraal = FALSE
PORTA.1 = ~PORTA.1
ENDIF
IF RechtsOm = TRUE AND Neutraal = TRUE THEN
Neutraal = FALSE
PORTA.2 = ~PORTA.2
ENDIF
WEND omdat die nog geen naam heeft, maar hoe kan ik aan geven wat het is.
