Rev 2132 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 2132 | Rev 2862 | ||
---|---|---|---|
Line 16... | Line 16... | ||
16 | dd I_PARAM ; адрес буфера для параметров |
16 | dd I_PARAM ; адрес буфера для параметров |
17 | dd 0x0 ; зарезервировано |
17 | dd 0x0 ; зарезервировано |
18 | 18 | ||
Line 19... | Line 19... | ||
19 | 19 | ||
Line 20... | Line 20... | ||
20 | include 'macros.inc' ; |
20 | include "..\..\..\macros.inc" |
21 | 21 | ||
22 | ;--------------------------------------------------------------------- |
22 | ;--------------------------------------------------------------------- |
Line 57... | Line 57... | ||
57 | 57 | ||
Line 58... | Line 58... | ||
58 | cmp ah, 1 |
58 | cmp ah, 1 |
59 | jne still ; return if button id != 1 |
59 | jne still ; return if button id != 1 |
Line 60... | Line -... | ||
60 | - | ||
61 | or eax, -1 ; exit application |
60 | |
Line 62... | Line 61... | ||
62 | mcall |
61 | call exit |
63 | 62 | ||
64 | key: ; key event handler |
63 | key: ; key event handler |
Line 77... | Line 76... | ||
77 | draw_window: |
76 | draw_window: |
Line 78... | Line 77... | ||
78 | 77 | ||
Line 79... | Line 78... | ||
79 | mcall 12, 1 ; функция 12: сообщить ОС об отрисовке окна |
78 | mcall 12, 1 ; функция 12: сообщить ОС об отрисовке окна |
80 | - | ||
81 | mov eax,14 ;получим ширину экрана |
- | |
82 | mov ebx, 4 |
79 | |
83 | mcall |
80 | mcall 14, 4 ;получим ширину экрана |
84 | shr eax, 16 |
81 | shr eax, 16 |
85 | and eax,0x0000FFFF |
82 | and eax,0x0000FFFF |
86 | sub eax,300 ;отнимем от нее 300 |
83 | sub eax,300 ;отнимем от нее 300 |
Line 124... | Line 121... | ||
124 | 121 | ||
Line 125... | Line 122... | ||
125 | fin: ;дорисовали |
122 | fin: ;дорисовали |
Line 126... | Line 123... | ||
126 | 123 | ||
127 | mcall 4, <3, 12>, 0x80000000, I_PARAM, 0 ;тень за текстом |
124 | mcall 4, <3, 12>, 0x80000000, I_PARAM, 0 ;тень за текстом |
128 | mcall 4, <5, 12>, 0x80000000, I_PARAM, 0 ; |
125 | mcall , <5, 12> |
129 | mcall 4, <4, 11>, 0x80000000, I_PARAM, 0 ; |
126 | mcall , <4, 11> |
130 | mcall 4, <4, 13>, 0x80000000, I_PARAM, 0 ; |
127 | mcall , <4, 13> |
Line 131... | Line 128... | ||
131 | mcall 4, <4, 12>, 0x80EFEFEF, I_PARAM, 0 ;текст |
128 | mcall , <4, 12>, 0x80EFEFEF ;текст |