forked from KolibriOS/kolibrios
develop/examples/numcalc: Post-SVN tidy
- Move source code from `trunk` into program root directory. - Update build files and ASM include paths. - Note: Line endings standardised from `CRLF` > `LF`, so best to view diffs with whitespace changes hidden.
This commit is contained in:
@@ -1,50 +1,56 @@
|
|||||||
include '..\..\..\..\macros.inc'
|
; SPDX-License-Identifier: NOASSERTION
|
||||||
use32
|
;
|
||||||
db 'MENUET01'
|
|
||||||
dd 1
|
; Text encoded with Code Page Windows 1251 - Cyrillic
|
||||||
dd start
|
|
||||||
dd i_end
|
|
||||||
dd mem
|
include '..\..\..\macros.inc'
|
||||||
dd mem
|
use32
|
||||||
dd 0
|
db 'MENUET01'
|
||||||
dd 0
|
dd 1
|
||||||
|
dd start
|
||||||
start:
|
dd i_end
|
||||||
push 66
|
dd mem
|
||||||
pop eax
|
dd mem
|
||||||
push 4
|
dd 0
|
||||||
pop ebx
|
dd 0
|
||||||
mov cl, 45h ; NumLock scancode
|
|
||||||
xor edx, edx
|
start:
|
||||||
mcall
|
push 66
|
||||||
mov al, 40 ; старшие биты уже обнулены
|
pop eax
|
||||||
mov bl, 2 ; старшие биты уже обнулены
|
push 4
|
||||||
mcall
|
pop ebx
|
||||||
event:
|
mov cl, 45h ; NumLock scancode
|
||||||
push 10
|
xor edx, edx
|
||||||
pop eax
|
mcall
|
||||||
mcall
|
mov al, 40 ; ñòàðøèå áèòû óæå îáíóëåíû
|
||||||
; у нас может быть только одно событие - нажата клавиша
|
mov bl, 2 ; ñòàðøèå áèòû óæå îáíóëåíû
|
||||||
mov al, 2
|
mcall
|
||||||
mcall
|
event:
|
||||||
cmp al, 2
|
push 10
|
||||||
jnz event
|
pop eax
|
||||||
; у нас есть только одна горячая клавиша
|
mcall
|
||||||
push 70
|
; ó íàñ ìîæåò áûòü òîëüêî îäíî ñîáûòèå - íàæàòà êëàâèøà
|
||||||
pop eax
|
mov al, 2
|
||||||
mov ebx, fileinfo
|
mcall
|
||||||
mcall
|
cmp al, 2
|
||||||
jmp event
|
jnz event
|
||||||
|
; ó íàñ åñòü òîëüêî îäíà ãîðÿ÷àÿ êëàâèøà
|
||||||
fileinfo:
|
push 70
|
||||||
dd 7
|
pop eax
|
||||||
dd 0
|
mov ebx, fileinfo
|
||||||
dd 0
|
mcall
|
||||||
dd 0
|
jmp event
|
||||||
dd 0
|
|
||||||
db '/sys/calc',0
|
fileinfo:
|
||||||
|
dd 7
|
||||||
i_end:
|
dd 0
|
||||||
align 16
|
dd 0
|
||||||
rb 16
|
dd 0
|
||||||
mem:
|
dd 0
|
||||||
|
db '/sys/calc',0
|
||||||
|
|
||||||
|
i_end:
|
||||||
|
align 16
|
||||||
|
rb 16
|
||||||
|
mem:
|
Reference in New Issue
Block a user