Subversion Repositories Kolibri OS

Rev

Rev 485 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 485 Rev 5739
Line 6... Line 6...
6 
 
 6 
 
Line 7... Line 7...
7 
use32
 7 
use32
Line 8... Line 8...
8 
 
 8 
 
9 
                org     0x0
 9 
                org     0x0
10 
 
 10 
 
11 
                db      'MENUET00'              ; 8 byte id
 11 
                db      'MENUET01'              ; 8 byte id
12 
                dd      38                      ; required os
 12 
                dd      1                       ; required os
13 
                dd      START                   ; program start
 13 
                dd      START                   ; program start
14 
                dd      I_END                   ; program image size
 14 
                dd      I_END                   ; program image size
Line 15... Line 15...
15 
                dd      0x1000                  ; required amount of memory
 15 
                dd      E_END                   ; required amount of memory
Line 35... Line 35...
35 
    jz   red
 35 
    jz   red
36 
    dec  eax                    ; key in buffer ?
 36 
    dec  eax                    ; key in buffer ?
37 
    jz   key
 37 
    jz   key
Line 38... Line 38...
38 
 
 38 
 
39 
  button:
 39 
  button:
40 
    mov  al,17                 ; get id
 40 
    mov  al,17                  ; get id
Line 41... Line 41...
41 
    mcall
 41 
    mcall
42 
 
 42 
 
43 
    cmp  ah,1                   ; button id=1 ?
 43 
    cmp  ah,1                   ; button id=1 ?
44 
    jne  noclose
 44 
    jne  noclose
Line 45... Line 45...
45 
    or   eax,-1                 ; close this program
 45 
    or   eax,-1                 ; close this program
46 
    mcall
 46 
    mcall
47 
 
 47 
 
48 
  key:                          ; key
 48 
  key:                          ; key
49 
    mov  al,2                  ; just read it and ignore
 49 
    mov  al,2                   ; just read it and ignore
Line 50... Line 50...
50 
    mcall
 50 
    mcall
Line 119... Line 119...
119 
    mov  eax,12                    ; function 12:tell os about windowdraw
 119 
    mov  eax,12                    ; function 12:tell os about windowdraw
120 
    mov  ebx,1                     ; 1, start of draw
 120 
    mov  ebx,1                     ; 1, start of draw
121 
    mcall
 121 
    mcall
Line 122... Line 122...
122 
 
 122 
 
123 
                                   ; DRAW WINDOW
 123 
                                   ; DRAW WINDOW
124 
    xor  eax,eax                     ; function 0 : define and draw window
 124 
    xor  eax,eax                   ; function 0 : define and draw window
125 
    mov  ebx,100*65536             ; [x start] *65536 + [x size]
 125 
    mov  ebx,100*65536+127         ; [x start] *65536 + [x size]
126 
    mov  ecx,100*65536             ; [y start] *65536 + [y size]
 - 
 
127 
    mov  bx,word [x_size]
 - 
 
128 
    mov  cx,word [y_size]
 126 
    mov  ecx,100*65536+127         ; [y start] *65536 + [y size]
129 
    mov  edx,0x00cccc00            ; color of work area RRGGBB,8->color glide
 127 
    mov  edx,0x00cccc00            ; color of work area RRGGBB,8->color glide
130 
    mov  esi,0x00cccc00            ; color of grab bar  RRGGBB,8->color glide
 128 
    mov  esi,0x00cccc00            ; color of grab bar  RRGGBB,8->color glide
131 
    mov  edi,0x00cccc00            ; color of frames    RRGGBB
 129 
    mov  edi,0x00cccc00            ; color of frames    RRGGBB
Line 149... Line 147...
149 
 
 147 
 
Line 150... Line -...
150 
 
 - 
 
151 
; DATA AREA
 - 
 
152 
 
 - 
 
Line 153... Line 148...
153 
 
 148 
 
- 
 
 149 
; DATA AREA
- 
 
 150