kolibrios-fun/programs/system/docky/trunk/NAME.INC
eAndrew a92e5cb862 Docky v5.1
New namewindow style for all dock positions
Increase size of hidden window
Add IRC

git-svn-id: svn://kolibrios.org@4157 a494cfbc-eb01-0410-851d-a64ba20cac60
2013-11-03 16:32:45 +00:00

132 lines
2.8 KiB
Plaintext

n_main:
mov dword[nwin.width], 67
mov dword[nwin.height], 16
mov dword[nwin.bgwidth], 66
mov dword[nwin.bgheight], 1
cmp dword[dock_items.location], 1
je .top
cmp dword[dock_items.location], 4
je .right
cmp dword[dock_items.location], 3
je .bottom
jmp .left
.top:
mov eax, [win.height_opn]
mov [nwin.y], eax
mov dword[nwin.bgx], 1
jmp @f
.left:
mov eax, [win.width_opn]
mov [nwin.x], eax
mov dword[nwin.bgy], 1
mov dword[nwin.bgwidth], 1
mov eax, [nwin.height]
dec eax
mov dword[nwin.bgheight], eax
jmp @f
.bottom:
mov eax, [win.y_opn]
sub eax, 16
mov [nwin.y], eax
mov dword[nwin.bgx], 1
mov eax, [nwin.height]
mov [nwin.bgy], eax
jmp @f
.right:
mov eax, [win.x_opn]
sub eax, 67
mov [nwin.x], eax
mov eax, [nwin.width]
mov [nwin.bgx], eax
mov dword[nwin.bgy], 1
mov dword[nwin.bgwidth], 1
mov eax, [nwin.height]
dec eax
mov dword[nwin.bgheight], eax
@@:
mcall 40, 1b
mcall 9, win.procinfo, -1
mov ecx, [win.procinfo + 30]
mcall 18, 21
and eax, 0xFFFF
mov [nwin.sid], eax
;-------------------------------------------------------------------------------
n_main_loop:
mcall 23, 1
cmp eax, EV_IDLE
je n_event_idle
cmp eax, EV_REDRAW
je n_event_redraw
jmp n_main_loop
;-------------------------------------------------------------------------------
n_event_idle:
cmp byte[nwin.close], 1
jne @f
mov byte[nwin.close], 0
mcall -1
@@:
cmp byte[win.button_index], 100
jne @f
mcall 67, 0, 0, 0, 0
jmp .end
@@:
cmp byte[nwin.change_shape], 1
jne .end
mov byte[nwin.change_shape], 0
mcall 67, [nwin.x], [nwin.y], [nwin.width], [nwin.height]
.end:
jmp n_main_loop
;-------------------------------------------------------------------------------
n_event_redraw:
mcall 12, 1
mcall 0, <[nwin.x], [nwin.width]>, <[nwin.y], [nwin.height]>, [color.bg], [color.bg], [color.frame]
mcall 13, <[nwin.bgx], [nwin.bgwidth]>, <[nwin.bgy], [nwin.bgheight]>, [color.bg]
mov edx, [win.button_index]
imul edx, 16
add edx, dock_items.name
mov eax, 0
@@:
inc eax
cmp byte[edx+eax], 0
jne @b
imul eax, 3
mov ebx, 34
sub ebx, eax
add ebx, 1
shl ebx, 16
add ebx, 5
mcall 4, , [color.text]
mcall 12, 2
jmp n_main_loop