Subversion Repositories Kolibri OS

Rev

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

Rev 633 Rev 1751
Line 23... Line 23...
23 
  dd     START          ; start of code
 23 
  dd     START          ; start of code
24 
  dd     I_END          ; size of image
 24 
  dd     I_END          ; size of image
25 
  dd     icon_data+0x30000        ; memory for app
 25 
  dd     icon_data+0x30000        ; memory for app
26 
  dd     icon_data+0x30000        ; esp
 26 
  dd     icon_data+0x30000        ; esp
27 
  dd     I_Param , 0x0  ; I_Param , I_Icon
 27 
  dd     I_Param , 0x0  ; I_Param , I_Icon
28 
include  '..\..\..\macros.inc'
 28 
include  '../../../macros.inc'
29 
include  'lang.inc'
 29 
include  'lang.inc'
30 
COLOR_ORDER equ MENUETOS
 30 
COLOR_ORDER equ MENUETOS
31 
include  'gif_lite.inc'
 31 
include  'gif_lite.inc'
32 
;include  'debug.inc'
 32 
;include  'debug.inc'
33 
purge newline
 33 
purge newline
Line 996... Line 996...
996 
 
 996 
 
997 
  button2:
 997 
  button2:
998 
    mov  al,17
 998 
    mov  al,17
Line -... Line 999...
- 
 
 999 
    mcall
- 
 
 1000 
 
Line 999... Line 1001...
999 
    mcall
 1001 
	cmp	ah, 2
1000 
 
 1002 
	jnz	still2
1001 
 
 1003 
 
1002 
    mov  esi,[ebp+8]
 1004 
    mov  esi,[ebp+8]
Line 1292... Line 1294...
1292 
    xor  eax,eax             ; function 0 : define and draw window
 1294 
    xor  eax,eax             ; function 0 : define and draw window
1293 
    mov  ebx,[ebp+0-2]
 1295 
    mov  ebx,[ebp+0-2]
1294 
    mov  ecx,[ebp+4-2]
 1296 
    mov  ecx,[ebp+4-2]
1295 
    add  ebx,[yw]           ; [x start] *65536 + [x size]
 1297 
    add  ebx,[yw]           ; [x start] *65536 + [x size]
1296 
    add  ecx,51            ; [y start] *65536 + [y size]
 1298 
    add  ecx,51            ; [y start] *65536 + [y size]
1297 
    mov  edx,0x01000000        ; color of work area RRGGBB,8->color gl
 1299 
    mov  edx,0x41000000        ; color of work area RRGGBB,8->color gl
1298 
    mcall
 1300 
    mcall
Line 1299... Line 1301...
1299 
 
 1301 
 
1300 
    mov  eax,8      ; button
 1302 
    mov  eax,8      ; button
1301 
    mov  ebx,51
 1303 
    mov  ebx,51
1302 
    mov  ecx,50
 1304 
    mov  ecx,50
1303 
    mov  edx,0x40000001
 1305 
    mov  edx,0x40000002
Line 1304... Line 1306...
1304 
    mcall
 1306 
    mcall
1305 
 
 1307 
 
1306 
    mov  eax,5
 1308 
    mov  eax,5