Subversion Repositories Kolibri OS

Rev

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

Rev 1098 Rev 1100
Line 4... Line 4...
4 
scr_window:
 4 
scr_window:
5 
.start:
 5 
.start:
6 
.red:
 6 
.red:
7 
        call    .draw_window
 7 
        call    .draw_window
8 
.still:
 8 
.still:
9 
        wait_event .red,close
 9 
        wait_event .red,.close
10 
        jmp     .still
 10 
        jmp     .still
Line 11... Line 11...
11 
 
 11 
 
12 
.draw_window:
 12 
.draw_window:
13 
        start_draw_window
 13 
        start_draw_window
Line 35... Line 35...
35 
        mov     edi,.label
 35 
        mov     edi,.label
36 
        call    draw_label
 36 
        call    draw_label
Line 37... Line 37...
37 
 
 37 
 
38 
        stop_draw_window
 38 
        stop_draw_window
- 
 
 39 
ret
- 
 
 40 
.close:
- 
 
 41 
        bt      word [ch3.flags],1   ; ¢®ááâ ­®¢¨âì ®ª­® ?
- 
 
 42 
        jnc     @f
- 
 
 43 
 
- 
 
 44 
        mov     eax,60
- 
 
 45 
        mov     ebx,2
- 
 
 46 
        mov     ecx,[app.pid]
- 
 
 47 
        mov     edx,messages.act_window
- 
 
 48 
        mov     esi,2
- 
 
 49 
        mcall
- 
 
 50 
@@:
- 
 
 51 
        jmp	close
39 
ret
 52 
 
40 
.label label 20,20,0x80000000,$+4
 53 
.label label 20,20,0x80000000,$+4