Subversion Repositories Kolibri OS

Rev

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

Rev 205 Rev 485
Line 11... Line 11...
11 
           dd      I_END                ; image size
 11 
           dd      I_END                ; image size
12 
           dd      mem_end              ; reguired amount of memory
 12 
           dd      mem_end              ; reguired amount of memory
13 
           dd      mem_end
 13 
           dd      mem_end
14 
           dd      0,0                  ; no parameters, no path
 14 
           dd      0,0                  ; no parameters, no path
Line 15... Line 15...
15 
 
 15 
 
Line 16... Line 16...
16 
include 'macros.inc'
 16 
include '..\..\..\macros.inc'
Line 17... Line 17...
17 
 
 17 
 
Line 25... Line 25...
25 
 
 25 
 
Line 26... Line 26...
26 
draw_window:
 26 
draw_window:
27 
 
 27 
 
28 
    mov  eax,12                    ; tell os about redraw
 28 
    mov  eax,12                    ; tell os about redraw
Line 29... Line 29...
29 
    mov  ebx,1
 29 
    mov  ebx,1
30 
    int  0x40
 30 
    mcall
31 
 
 31 
 
32 
    xor  eax,eax                   ; define and draw window
 32 
    xor  eax,eax                   ; define and draw window
33 
    mov  ebx,100*65536+321
 33 
    mov  ebx,100*65536+321
34 
    mov  ecx,70*65536+222
 34 
    mov  ecx,70*65536+222
35 
    mov  edx,0x00000000
 35 
    mov  edx,0x00000000
Line 36... Line 36...
36 
    mov  esi,0x00000000
 36 
    mov  esi,0x00000000
37 
    mov  edi,0x00000000
 37 
    mov  edi,0x00000000
38 
    int  0x40
 38 
    mcall
39 
 
 39 
 
40 
    mov  al,4      ; 'FIRE FOR MENUET'
 40 
    mov  al,4      ; 'FIRE FOR MENUET'
41 
    mov  ebx,110*65536+8
 41 
    mov  ebx,110*65536+8
Line 42... Line 42...
42 
    mov  ecx,dword 0x00FFFFFF
 42 
    mov  ecx,dword 0x00FFFFFF
43 
    mov  edx,text
 43 
    mov  edx,text
44 
    mov  esi,textlen-text
 44 
    mov  esi,textlen-text
45 
    int  0x40
 45 
    mcall
46 
 
 46 
 
47 
    mov  al,8
 47 
    mov  al,8
Line 48... Line 48...
48 
    mov  ebx,(321-19)*65536+12     ; button start x & size
 48 
    mov  ebx,(321-19)*65536+12     ; button start x & size
49 
    mov  ecx,5*65536+12            ; button start y & size
 49 
    mov  ecx,5*65536+12            ; button start y & size
50 
    mov  edx,1                     ; button number
 50 
    mov  edx,1                     ; button number
Line 51... Line 51...
51 
    mov  esi,0x009a0000
 51 
    mov  esi,0x009a0000
52 
    int  0x40
 52 
    mcall
53 
 
 53 
 
Line 54... Line 54...
54 
    mov  ebx,ecx ;5*65536+12
 54 
    mov  ebx,ecx ;5*65536+12
55 
    inc  edx
 55 
    inc  edx
56 
    int  0x40
 56 
    mcall
Line 57... Line 57...
57 
 
 57 
 
58 
    mov  ebx,18*65536+12
 58 
    mov  ebx,18*65536+12
59 
    inc  edx
 59 
    inc  edx
Line 60... Line 60...
60 
    int  0x40
 60 
    mcall
Line 61... Line 61...
61 
 
 61 
 
62 
    mov  ebx,31*65536+12
 62 
    mov  ebx,31*65536+12
Line 132... Line 132...
132 
    mov  [esi - 81], al
 132 
    mov  [esi - 81], al
133 
    loop FIRELOOP
 133 
    loop FIRELOOP
Line 134... Line 134...
134 
 
 134 
 
135 
    mov  al, 5              ; in this moment always high 24 bits of eax are zero!
 135 
    mov  al, 5              ; in this moment always high 24 bits of eax are zero!
136 
    mov  ebx,[delay]
 136 
    mov  ebx,[delay]
Line 137... Line 137...
137 
    int  0x40
 137 
    mcall
138 
 
 138 
 
139 
    inc  [calc]
 139 
    inc  [calc]
Line 182... Line 182...
182 
    mov  al,7           ; display image
 182 
    mov  al,7           ; display image
183 
                        ; high 24 bits of eax are zero!
 183 
                        ; high 24 bits of eax are zero!
184 
    pop  ebx
 184 
    pop  ebx
185 
    mov  ecx,4*80*65536+200
 185 
    mov  ecx,4*80*65536+200
186 
    mov  edx,1*65536+22
 186 
    mov  edx,1*65536+22
187 
    int  0x40
 187 
    mcall
Line 188... Line 188...
188 
 
 188 
 
Line 189... Line 189...
189 
  nodrw:
 189 
  nodrw:
190 
 
 190 
 
191 
    mov  eax,11                  ; check if os wants to talk to us
 191 
    mov  eax,11                  ; check if os wants to talk to us
192 
    int  0x40
 192 
    mcall
193 
    dec  eax
 193 
    dec  eax
194 
    jz   red
 194 
    jz   red
Line 195... Line 195...
195 
    cmp  al, 3-1
 195 
    cmp  al, 3-1
196 
    jnz  nob4
 196 
    jnz  nob4
197 
 
 197 
 
198 
  button:                        ; get button id
 198 
  button:                        ; get button id
Line 199... Line 199...
199 
    mov  al,17
 199 
    mov  al,17
200 
    int  0x40
 200 
    mcall
201 
    shr  eax, 8
 201 
    shr  eax, 8
202 
 
 202 
 
203 
    dec  eax
 203 
    dec  eax
Line 204... Line 204...
204 
    jnz  noclose
 204 
    jnz  noclose
205 
    or   eax,-1                  ; close this program
 205 
    or   eax,-1                  ; close this program
206 
    int  0x40
 206 
    mcall