Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 1719 → Rev 1720

/programs/develop/kol_f_edit/ced_constr.inc
207,50 → 207,108
coor_x dd ?
coor_y dd ?
ot_txt dd ? ;®âáâ㯠¤«ï ⥪áâ 
size_wh dd ? ;à §¬¥à ª¢ ¤à â¨ª 
size_w dd ? ;à §¬¥à ª¢ ¤à â¨ª  w
size_h dd ? ;à §¬¥à ª¢ ¤à â¨ª  h
col_txt dd ? ;梥â ⥪âá 
endl
pushad
mov ebx,dword[p_obj]
;1,2,3, 4,5,6, 7,8 - x,y,txt, col_fon,col_frame,col_txt, w_txt,w_h
;1,2,3,4,5, 6,7,8, 9 - ot_x,ot_y,w,h,ot_w_txt, col_fon,col_frame,col_txt, txt
 
stdcall get_obj_text_col,ebx,1
stdcall get_obj_text_col,ebx,1 ;ot_x
stdcall conv_str_to_int,edx
mov [coor_x],eax
stdcall get_obj_text_col,ebx,2
stdcall get_obj_text_col,ebx,2 ;ot_y
stdcall conv_str_to_int,edx
mov [coor_y],eax
move_to_skin [coor_x],[coor_y]
stdcall get_obj_text_col,ebx,7
stdcall get_obj_text_col,ebx,5 ;ot_w_txt
stdcall conv_str_to_int,edx
mov [ot_txt],eax
stdcall get_obj_text_col,ebx,8
stdcall get_obj_text_col,ebx,3 ;w
stdcall conv_str_to_int,edx
dec eax ;à §¬¥à ¬¥­ìè¥ ­  1 ¯¨ªá¥«ì
mov [size_wh],eax
stdcall get_obj_text_col,ebx,5
mov [size_w],eax
stdcall get_obj_text_col,ebx,4 ;h
stdcall conv_str_to_int,edx
dec eax ;à §¬¥à ¬¥­ìè¥ ­  1 ¯¨ªá¥«ì
mov [size_h],eax
stdcall get_obj_text_col,ebx,7 ;col_frame
stdcall conv_str_to_int,edx
stdcall [buf2d_rect_by_size], buf_fon, dword[coor_x],dword[coor_y],\
dword[size_wh],dword[size_wh], eax
dword[size_w],dword[size_h], eax
 
;§ «¨¢ª  ä®­  checkbox- 
inc dword[coor_x]
inc dword[coor_y]
sub dword[size_wh],2
stdcall get_obj_text_col,ebx,4
sub dword[size_w],2
sub dword[size_h],2
stdcall get_obj_text_col,ebx,6 ;col_fon
stdcall conv_str_to_int,edx
stdcall [buf2d_filled_rect_by_size], buf_fon, dword[coor_x],dword[coor_y],\
dword[size_wh],dword[size_wh], eax
dword[size_w],dword[size_h], eax
 
stdcall get_obj_text_col,ebx,6
test_bool_prop ebx,BIT_MOD_CHE
jnc @f
;à¨á®¢ ­¨¥ ®â¬¥âª¨ ¢ checkbox-¥
inc dword[coor_x]
inc dword[coor_y]
sub dword[size_w],2
sub dword[size_h],2
stdcall get_obj_text_col,ebx,7 ;col_frame
stdcall conv_str_to_int,edx
stdcall [buf2d_filled_rect_by_size], buf_fon, dword[coor_x],dword[coor_y],\
dword[size_w],dword[size_h], eax
@@:
 
;¢®áâ ­ ¢«¨¢ ¥¬ ¯®«®¦¥­¨¥ ¨ à §¬¥àë
stdcall get_obj_text_col,ebx,1 ;ot_x
stdcall conv_str_to_int,edx
mov [coor_x],eax
stdcall get_obj_text_col,ebx,2 ;ot_y
stdcall conv_str_to_int,edx
mov [coor_y],eax
move_to_skin [coor_x],[coor_y]
stdcall get_obj_text_col,ebx,3 ;w
stdcall conv_str_to_int,edx
dec eax ;à §¬¥à ¬¥­ìè¥ ­  1 ¯¨ªá¥«ì
mov [size_w],eax
stdcall get_obj_text_col,ebx,4 ;h
stdcall conv_str_to_int,edx
dec eax ;à §¬¥à ¬¥­ìè¥ ­  1 ¯¨ªá¥«ì
mov [size_h],eax
 
stdcall get_obj_text_col,ebx,8 ;col_txt
stdcall conv_str_to_int,edx
mov [col_txt],eax
mov eax,[ot_txt]
add eax,[size_wh]
add eax,2-1 ;sub dword[size_wh],2 ;inc dword[coor_x]
add [coor_x],eax ;¢ëç¨á«ï¥¬ ª®®à¤¨­ âë ¤«ï ⥪á⮢®© ¯®¤¯¨á¨
add [coor_y],5-1 ;inc dword[coor_y]
stdcall get_obj_text_col,ebx,3
stdcall [buf2d_draw_text], buf_fon, buf_font,edx,dword[coor_x],dword[coor_y],\
mov eax,[coor_x]
add eax,[size_w]
add eax,[ot_txt] ;¢ëç¨á«ï¥¬ ª®®à¤¨­ âë ¤«ï ⥪á⮢®© ¯®¤¯¨á¨
 
test_bool_prop ebx,BIT_MOD_CHE_T
jc .end_txt_align ;if text aligment = top
 
test_bool_prop ebx,BIT_MOD_CHE_M
jnc @f
shl [coor_y],1 ;㬭®¦ ¥¬ ­  2
mov ecx,[size_h]
add [coor_y],ecx ;¤®¡ ¢«ï¥¬ ¢ëá®âã checkbox
sub [coor_y],9 ;®â­¨¬ ¥¬ ¢ëá®âã ᨬ¢®« 
shr [coor_y],1 ;¤¥«¨¬ ­  ¯®«ã稢襥áï 2, ¯®«ãç ¥¬ ®âáâ㯠¤«ï áâ®ï饣® ¯® 業âàã ⥪áâ 
jmp .end_txt_align
@@:
 
test_bool_prop ebx,BIT_MOD_CHE_B
jnc @f
mov ecx,[size_h]
add [coor_y],ecx ;¤®¡ ¢«ï¥¬ ¢ëá®âã checkbox
sub [coor_y],9 ;®â­¨¬ ¥¬ ¢ëá®âã ᨬ¢®« 
;¯®«ãç ¥¬ ®âáâ㯠¤«ï áâ®ï饣® á­¨§ã ⥪áâ 
@@:
.end_txt_align:
 
stdcall get_obj_text_col,ebx,9 ;txt
stdcall [buf2d_draw_text], buf_fon, buf_font,edx,eax,dword[coor_y],\
dword[col_txt] ;à¨á㥬 áâபã á ⥪á⮬
popad
ret