97,7 → 97,7 |
;--------------------------------------------------------------------- |
START: ; start of execution |
;--------------------------------------------------------------------- |
mcall 68,11 |
mcall SF_SYS_MISC,SSF_HEAP_INIT |
|
test eax,eax |
jz close |
118,14 → 118,11 |
stdcall string.length, app_param |
add eax, app_param |
mov ecx, [eax-4] |
or ecx, 0x20202000 ;letters to lowercase |
cmp ecx, '.skn' |
je load_skin_from_param |
cmp ecx, '.SKN' |
je load_skin_from_param |
cmp ecx, '.dtp' |
je load_dtp_from_param |
cmp ecx, '.DTP' |
je load_dtp_from_param |
jmp no_param |
|
load_dtp_from_param: |
139,7 → 136,7 |
jmp skin_path_ready |
|
no_param: |
mcall 48,3,color_table,4*10 ; get current colors |
mcall SF_STYLE_SETTINGS,SSF_GET_COLORS,color_table,4*10 ; get current colors |
call load_skin_file.2 |
|
skin_path_ready: |
166,7 → 163,7 |
call draw_window ; at first, draw the window |
;--------------------------------------------------------------------- |
still: |
mcall 10 ; wait here for event |
mcall SF_WAIT_EVENT |
|
dec eax ; redraw request ? |
jz red |
180,11 → 177,11 |
jmp still |
;--------------------------------------------------------------------- |
key: ; key |
mcall 2 ; just read it and ignore |
mcall SF_GET_KEY |
jmp still |
;--------------------------------------------------------------------- |
button: ; button |
mcall 17 ; get id |
mcall SF_GET_BUTTON |
|
cmp ah,12 ; load file |
jne no_load |
204,7 → 201,7 |
cmp ah,14 ; set 3d buttons |
jne no_3d |
|
mcall 48,1,1 |
mcall SF_STYLE_SETTINGS,SSF_SET_BUTTON_STYLE,1 |
invoke ini_set_int, aIni, aSectionSkn, aButtonStyle, 1 |
jmp doapply |
;-------------------------------------- |
213,10 → 210,10 |
jne no_flat |
|
invoke ini_set_int, aIni, aSectionSkn, aButtonStyle, 0 |
mcall 48, 1, 0 |
mcall SF_STYLE_SETTINGS,SSF_SET_BUTTON_STYLE, 0 |
;-------------------------------------- |
doapply: |
mcall 48, 0, 0 |
mcall SF_STYLE_SETTINGS,SSF_APPLY, 0 |
jmp still |
;-------------------------------------- |
no_flat: |
224,7 → 221,7 |
jne no_apply |
;-------------------------------------- |
apply_direct: |
mcall 48,2,color_table,10*4 |
mcall SF_STYLE_SETTINGS,SSF_SET_COLORS,color_table,10*4 |
jmp doapply |
;-------------------------------------- |
no_apply: |
242,7 → 239,7 |
cmp [skin_info],0 |
je no_apply_skin |
|
mcall 48,8,skin_info |
mcall SF_STYLE_SETTINGS,SSF_SET_SKIN,skin_info |
call draw_window |
jmp still |
;-------------------------------------- |
317,7 → 314,7 |
mov dword [ebx+8], eax ; offset (high dword) |
mov dword [ebx+12], 40 ; read colors file: 4*10 bytes |
mov dword [ebx+16], color_table ; address |
mcall 70 |
mcall SF_FILE |
ret |
;--------------------------------------------------------------------- |
load_skin_file: |
343,7 → 340,7 |
mov dword [ebx+8], eax ; offset (high dword) |
mov dword [ebx+12], 32*1024 ; read: max 32 KBytes |
mov dword [ebx+16], file_load_area ; address |
mcall 70 |
mcall SF_FILE |
|
mov esi, file_load_area |
|
400,7 → 397,7 |
and [ebx+8],eax ; (reserved) |
mov [ebx+12],dword 10*4 ; bytes to write |
mov [ebx+16],dword color_table ; address |
mcall 70 |
mcall SF_FILE |
ret |
;--------------------------------------------------------------------- |
draw_button_row: |
470,8 → 467,8 |
;---------------------------------------------------------------------- |
draw_PathShow: |
pusha |
mcall 13,<frame_1.x+10,frame_1.w-25>,<frame_1.y+16,15>,0xffffff |
mcall 13,<frame_2.x+10,frame_2.w-25>,<frame_2.y+16,15>,0xffffff |
mcall SF_DRAW_RECT,<frame_1.x+10,frame_1.w-25>,<frame_1.y+16,15>,0xffffff |
mcall SF_DRAW_RECT,<frame_2.x+10,frame_2.w-25>,<frame_2.y+16,15>,0xffffff |
; draw for PathShow |
push dword PathShow_data_1 |
call [PathShow_draw] |
485,10 → 482,10 |
; ******* WINDOW DEFINITIONS AND DRAW ******** |
; ********************************************* |
draw_window: |
mcall 12,1 |
mcall 48,3,app_colours,10*4 |
mcall 14 |
mcall 48,4 |
mcall SF_REDRAW,SSF_BEGIN_DRAW |
mcall SF_STYLE_SETTINGS,SSF_GET_COLORS,app_colours,10*4 |
mcall SF_GET_SCREEN_SIZE |
mcall SF_STYLE_SETTINGS,SSF_GET_SKIN_HEIGHT |
mov [current_skin_high],eax |
; DRAW WINDOW |
xor eax,eax ; function 0 : define and draw window |
499,7 → 496,7 |
add ecx,[current_skin_high] |
mcall ,<110, win.w>,,,,title |
|
mcall 9,procinfo,-1 |
mcall SF_THREAD_INFO,procinfo,-1 |
|
mov eax,[procinfo+70] ;status of window |
test eax,100b |
519,7 → 516,7 |
;----------------------------------- |
; select color DTP frame |
; LOAD BUTTON ; button 12 |
mcall 8,<frame_1.x+10,load_w>,<frame_1.y+38,18>,12,[w_work_button] |
mcall SF_DEFINE_BUTTON,<frame_1.x+10,load_w>,<frame_1.y+38,18>,12,[w_work_button] |
; SAVE BUTTON |
add ebx,(load_w+2)*65536-load_w+save_w |
inc edx |
526,13 → 523,13 |
mcall ; button 13 |
; APPLY BUTTON |
mov ebx,(frame_1.x + frame_1.w - apply_w - 15)*65536+apply_w |
mcall 8,,,16 ; button 17 |
mcall SF_DEFINE_BUTTON,,,16 ; button 17 |
; select color DTP button text |
mcall 4,<frame_1.x+16,frame_1.y+44>,[w_work_button_text],t1,t1.size |
mcall SF_DRAW_TEXT,<frame_1.x+16,frame_1.y+44>,[w_work_button_text],t1,t1.size |
;----------------------------------- |
; select skin frame |
; LOAD SKIN BUTTON ; button 17 |
mcall 8,<frame_2.x+10,load_w>,<frame_2.y+38,18>,17,[w_work_button] |
mcall SF_DEFINE_BUTTON,<frame_2.x+10,load_w>,<frame_2.y+38,18>,17,[w_work_button] |
; 3D |
mov ebx,(frame_2.x+155)*65536+34 |
mcall ,,,14 ; button 14 |
544,7 → 541,7 |
mov ebx,(frame_2.x + frame_2.w - apply_w -15)*65536+apply_w |
mcall ,,,18 ; button 18 |
; select skin button text |
mcall 4,<frame_2.x+16,frame_2.y+44>,[w_work_button_text],t2,t2.size |
mcall SF_DRAW_TEXT,<frame_2.x+16,frame_2.y+44>,[w_work_button_text],t2,t2.size |
;----------------------------------- |
call draw_button_row |
call draw_button_row_of_texts |
576,7 → 573,7 |
call draw_skin |
@@: |
.end: |
mcall 12,2 |
mcall SF_REDRAW,SSF_END_DRAW |
ret |
;----------------------------------------------------------------------------- |
include 'drawskin.inc' |