Subversion Repositories Kolibri OS

Rev

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

Rev 4284 Rev 5665
Line 1... Line 1...
1 
;
 1 
; END
2 
; END
 2 
; KolibriOS Team 2005-2015
3 
; KolibriOS Team 2005-2013
 3 
 
4 
;
 4 
fade equ 0
5 
;  note that 'mov al,xx' is shorter than 'mov eax,xx'
 - 
 
6 
;           and if we know that high 24 bits of eax are zero, we can use 1st form
 - 
 
7 
;           the same about ebx,ecx,edx
 - 
 
8 
fade equ 0
 5 
 
Line 9... Line 6...
9 
 
 6 
use32	     ; ¢ª«îç¨âì 32-¡¨â­ë© ०¨¬  áᥬ¡«¥à 
10 
use32        ; ¢ª«îç¨âì 32-¡¨â­ë© ०¨¬  áᥬ¡«¥à 
 7 
org 0x0      ;  ¤à¥á æ¨ï á ­ã«ï
Line 129... Line 126...
129 
    cmp  [autosave],1
 126 
    jne   no_save
130 
    jne   no_save
 127 
 
Line 131... Line 128...
131 
 
 128 
if fade=0
132 
if fade=0
 129 
    mov   al,4
133 
    mov   al,4
 130 
    mcall   ,<50,120> ,0x800000cc,label7	;eax=4 - write text
134 
    mcall   ,<50,110> ,0x800000cc,label7        ;eax=4 - write text
 131 
end if
Line 135... Line 132...
135 
end if
 132 
 
136 
 
 133 
    mcall 70,rdsave
137 
    mcall 70,rdsave
 134 
    test  eax,eax
Line 176... Line 173...
176 
    mov   al,14
 173 
    mcall				     ;eax=14 - get screen max x & max y
177 
    mcall                                    ;eax=14 - get screen max x & max y
 174 
    movzx ecx,ax
178 
    movzx ecx,ax
 175 
    shr   eax,17
179 
    shr   eax,17
 176 
    shl   eax,16
180 
    shl   eax,16
 177 
    lea   ebx,[eax-165 shl 16+332]
181 
    lea   ebx,[eax-110 shl 16+222]
 178 
    shr   ecx,1
182 
    shr   ecx,1
 179 
    shl   ecx,16
183 
    shl   ecx,16
 180 
    lea   ecx,[ecx-70 shl 16+132]
184 
    lea   ecx,[ecx-70 shl 16+122]
 181 
 
Line 185... Line 182...
185 
 
 182 
    xor   eax,eax
186 
    xor   eax,eax
 183 
    mcall  , , ,[color1],0x01000000	   ;define and draw window
Line 187... Line 184...
187 
    mcall  , , ,[color1],0x01000000        ;define and draw window
 184 
 
188 
 
 185 
    mov   al,13
189 
    mov   al,13
 186 
    mcall   ,<0,333> ,<0,133>
190 
    mcall   ,<0,223> ,<0,123>
 187 
    mcall   ,<1,331>,<1,131>,[color2]
Line 191... Line 188...
191 
    mcall   ,<1,221>,<1,121>,[color2]
 188 
    mcall   ,<2,330>,<2,130>, [color3]
192 
    mcall   ,<2,220>,<2,120>, [color3]
 189 
 
193 
 
 190 
    mov   al,8
194 
    mov   al,8
 191 
    mcall   ,<16,144> ,<16,36>,4,[color4]     ;eax=8 - draw buttons
195 
    mcall   ,<16,90> ,<20,27>,4,[color4]     ;eax=8 - draw buttons
 192 
    mcall   ,<170,144>,       ,2,[color5]
Line 196... Line 193...
196 
    mcall   ,<113,90>,       ,2,[color5]
 193 
    mcall   ,	      ,<62,36>,1,[color6]
197 
    mcall   ,        ,<54,27>,1,[color6]
 194 
    mcall   ,<16,144> ,       ,3,[color7]
198 
    mcall   ,<16,90> ,       ,3,[color7]
 195 
 
199 
 
 196 
    mov   al,4
200 
    mov   al,4
 197 
    mcall   ,<28,19> ,[color8],label2	     ;eax=4 - write text
Line 201... Line 198...
201 
    mcall   ,<27,24> ,[color8],label2        ;eax=4 - write text
 198 
    mcall   ,<28,65> ,	      ,label3
202 
    mcall   ,<23,58> ,        ,label3
 199 
    mcall   ,<64,40> ,[color9],label5
Line 203... Line 200...
203 
    mcall   ,<47,37> ,        ,label5
 200 
    mcall   ,<64,86> ,	     ,label6