Rev 256 | Rev 269 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 256 | Rev 265 | ||
|---|---|---|---|
| Line 717... | Line 717... | ||
| 717 | ; SET KEYBOARD PARAMETERS |
717 | ; SET KEYBOARD PARAMETERS |
| 718 | mov al, 0xf6 ; reset keyboard, scan enabled |
718 | mov al, 0xf6 ; reset keyboard, scan enabled |
| 719 | call kb_write |
719 | call kb_write |
| Line 720... | Line 720... | ||
| 720 | 720 | ||
| 721 | ; wait until 8042 is ready |
721 | ; wait until 8042 is ready |
| 722 | ; xor ecx,ecx |
722 | xor ecx,ecx |
| 723 | ; @@: |
723 | @@: |
| 724 | ; in al,64h |
724 | in al,64h |
| 725 | ; and al,00000010b |
725 | and al,00000010b |
| 726 | ; loopnz @b |
- | |
| Line 727... | Line 726... | ||
| 727 | call Wait8042BufferEmpty |
726 | loopnz @b |
| 728 | 727 | ||
| 729 | ; mov al, 0xED ; svetodiody - only for testing! |
728 | ; mov al, 0xED ; svetodiody - only for testing! |
| 730 | ; call kb_write |
729 | ; call kb_write |
| 731 | ; call kb_read |
730 | ; call kb_read |
| 732 | ; mov al, 111b |
731 | ; mov al, 111b |
| Line 733... | Line 732... | ||
| 733 | ; call kb_write |
732 | ; call kb_write |
| 734 | ; call kb_read |
733 | ; call kb_read |
| 735 | 734 | ||
| 736 | mov al, 0xF3 ; set repeat rate & delay |
735 | mov al, 0xF3 ; set repeat rate & delay |
| 737 | call kb_write |
736 | call kb_write |
| 738 | call kb_read |
737 | ; call kb_read |
| 739 | mov al, 0 ; 30 250 ;00100010b ; 24 500 ;00100100b ; 20 500 |
738 | mov al, 0 ; 30 250 ;00100010b ; 24 500 ;00100100b ; 20 500 |
| 740 | call kb_write |
739 | call kb_write |
| 741 | call kb_read |
740 | ; call kb_read |
| Line 742... | Line 741... | ||
| 742 | ;// mike.dld [ |
741 | ;// mike.dld [ |
| Line 4112... | Line 4111... | ||
| 4112 | kb_write: |
4111 | kb_write: |
| Line 4113... | Line 4112... | ||
| 4113 | 4112 | ||
| Line 4114... | Line 4113... | ||
| 4114 | push ecx edx |
4113 | push ecx edx |
| 4115 | 4114 | ||
| 4116 | mov dl,al |
4115 | mov dl,al |
| 4117 | mov ecx,0x1ffff ; last 0xffff, new value in view of fast CPU's |
4116 | ; mov ecx,0x1ffff ; last 0xffff, new value in view of fast CPU's |
| 4118 | kw_loop1: |
4117 | ; kw_loop1: |
| 4119 | in al,0x64 |
4118 | ; in al,0x64 |
| 4120 | test al,0x20 |
4119 | ; test al,0x20 |
| 4121 | jz kw_ok1 |
4120 | ; jz kw_ok1 |
| 4122 | loop kw_loop1 |
4121 | ; loop kw_loop1 |
| 4123 | mov ah,1 |
4122 | ; mov ah,1 |
| 4124 | jmp kw_exit |
4123 | ; jmp kw_exit |
| 4125 | kw_ok1: |
4124 | ; kw_ok1: |
| 4126 | in al,0x60 |
4125 | in al,0x60 |
| 4127 | mov ecx,0x1ffff ; last 0xffff, new value in view of fast CPU's |
4126 | mov ecx,0x1ffff ; last 0xffff, new value in view of fast CPU's |
| 4128 | kw_loop: |
4127 | kw_loop: |