Subversion Repositories Kolibri OS

Rev

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

Rev Author Line No. Line
307 Lrz 1 
;====================================================================
2 
;===== ОКНО ПРЕДПРОСМОТРА ===========================================
3 
;====================================================================
205 heavyiron 4 
scr_window:
5 
.start:
6 
.red:
1098 Lrz 7 
        call    .draw_window
205 heavyiron 8 
.still:
1098 Lrz 9 
        wait_event .red,close
10 
        jmp     .still
205 heavyiron 11 
 
12 
.draw_window:
1098 Lrz 13 
        start_draw_window
14 
        xor     eax,eax
15 
        movsx   ebx,word [scr.width]
16 
        movsx   ecx,word [scr.height]
17 
        ;xor     edx,edx
18 
        mov     edx,0x01000000
19 
        xor     esi,esi
20 
        xor     edi,edi
21 
        mcall
205 heavyiron 22 
 
1098 Lrz 23 
        mov     eax,7
24 
        mov     ebx,dword [scr_buf.ptr]
25 
        mov     ecx,dword [scr_buf.size]
26 
        xor     edx,edx
27 
        mcall
205 heavyiron 28 
 
1098 Lrz 29 
        mov     eax,13
30 
        mov     ebx,19*65536+231
31 
        mov     ecx,19*65536+10
32 
        mov     edx,0x00FF00
33 
        mcall
205 heavyiron 34 
 
1098 Lrz 35 
        mov     edi,.label
36 
        call    draw_label
205 heavyiron 37 
 
1098 Lrz 38 
        stop_draw_window
205 heavyiron 39 
ret
40 
.label label 20,20,0x80000000,$+4
1098 Lrz 41 
db 'Это ваш снимок. Выход - любая клавиша.',0
42