forked from KolibriOS/kolibrios
Andrew
bacbce5313
- 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.
57 lines
1.1 KiB
NASM
Executable File
57 lines
1.1 KiB
NASM
Executable File
; SPDX-License-Identifier: NOASSERTION
|
|
;
|
|
|
|
; Text encoded with Code Page Windows 1251 - Cyrillic
|
|
|
|
|
|
include '..\..\..\macros.inc'
|
|
use32
|
|
db 'MENUET01'
|
|
dd 1
|
|
dd start
|
|
dd i_end
|
|
dd mem
|
|
dd mem
|
|
dd 0
|
|
dd 0
|
|
|
|
start:
|
|
push 66
|
|
pop eax
|
|
push 4
|
|
pop ebx
|
|
mov cl, 45h ; NumLock scancode
|
|
xor edx, edx
|
|
mcall
|
|
mov al, 40 ; ñòàðøèå áèòû óæå îáíóëåíû
|
|
mov bl, 2 ; ñòàðøèå áèòû óæå îáíóëåíû
|
|
mcall
|
|
event:
|
|
push 10
|
|
pop eax
|
|
mcall
|
|
; ó íàñ ìîæåò áûòü òîëüêî îäíî ñîáûòèå - íàæàòà êëàâèøà
|
|
mov al, 2
|
|
mcall
|
|
cmp al, 2
|
|
jnz event
|
|
; ó íàñ åñòü òîëüêî îäíà ãîðÿ÷àÿ êëàâèøà
|
|
push 70
|
|
pop eax
|
|
mov ebx, fileinfo
|
|
mcall
|
|
jmp event
|
|
|
|
fileinfo:
|
|
dd 7
|
|
dd 0
|
|
dd 0
|
|
dd 0
|
|
dd 0
|
|
db '/sys/calc',0
|
|
|
|
i_end:
|
|
align 16
|
|
rb 16
|
|
mem:
|