forked from KolibriOS/kolibrios
Small extension to 86duino GPIO Demo
git-svn-id: svn://kolibrios.org@7295 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
d00e5c3855
commit
077316eb68
@ -67,14 +67,14 @@ key: ; Keypress event handler
|
||||
cmp ah, 'q'
|
||||
jne @f
|
||||
call read_gpio0
|
||||
or al, 1 ; Set bit 0
|
||||
or al, 1 shl 0 ; Set bit 0
|
||||
call write_gpio0
|
||||
jmp event_wait
|
||||
@@:
|
||||
cmp ah, 'w'
|
||||
jne @f
|
||||
call read_gpio0
|
||||
and al, not 1 ; Clear bit 0
|
||||
and al, not (1 shl 0) ; Clear bit 0
|
||||
call write_gpio0
|
||||
jmp event_wait
|
||||
@@:
|
||||
@ -84,6 +84,20 @@ key: ; Keypress event handler
|
||||
mov ecx, eax
|
||||
mcall 47, 0x00040100,,25 shl 16 + 25, 0x40000000, 0x00ffffff ; 4 digits hex number in ecx
|
||||
jmp event_wait
|
||||
@@:
|
||||
cmp ah, 'a'
|
||||
jne @f
|
||||
call read_gpio0
|
||||
or al, 1 shl 2 ; Set bit 2
|
||||
call write_gpio0
|
||||
jmp event_wait
|
||||
@@:
|
||||
cmp ah, 's'
|
||||
jne @f
|
||||
call read_gpio0
|
||||
and al, not (1 shl 2) ; Clear bit 2
|
||||
call write_gpio0
|
||||
jmp event_wait
|
||||
@@:
|
||||
jmp event_wait ; Just read the key, ignore it and jump to event_wait.
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user