Subversion Repositories Kolibri OS

Rev

Rev 485 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
485 heavyiron 1 
include '..\..\..\..\macros.inc'
118 diamond 2 
use32
3 
        db      'MENUET01'
4 
        dd      1
5 
        dd      start
6 
        dd      i_end
7 
        dd      mem
8 
        dd      mem
9 
        dd      0
10 
        dd      0
11 
 
12 
start:
13 
        push    66
14 
        pop     eax
15 
        push    4
16 
        pop     ebx
17 
        mov     cl, 45h         ; NumLock scancode
18 
        xor     edx, edx
485 heavyiron 19 
        mcall
118 diamond 20 
        mov     al, 40          ; старшие биты уже обнулены
21 
        mov     bl, 2           ; старшие биты уже обнулены
485 heavyiron 22 
        mcall
118 diamond 23 
event:
24 
        push    10
25 
        pop     eax
485 heavyiron 26 
        mcall
118 diamond 27 
; у нас может быть только одно событие - нажата клавиша
28 
        mov     al, 2
485 heavyiron 29 
        mcall
118 diamond 30 
        cmp     al, 2
31 
        jnz     event
32 
; у нас есть только одна горячая клавиша
33 
        push    70
34 
        pop     eax
35 
        mov     ebx, fileinfo
485 heavyiron 36 
        mcall
118 diamond 37 
        jmp     event
38 
 
39 
fileinfo:
40 
        dd      7
41 
        dd      0
42 
        dd      0
43 
        dd      0
44 
        dd      0
539 spraid 45 
        db      '/sys/calc',0
118 diamond 46 
 
47 
i_end:
48 
        align   16
49 
        rb      16
50 
mem: