files
kolibrios/programs/develop/examples/numcalc/@numcalc.asm
Andrew bacbce5313 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.
2025-05-23 03:10:49 +01:00

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: