Subversion Repositories Kolibri OS

Rev

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

Rev 3465 Rev 3475
Line 12... Line 12...
12 
include '../../macros.inc'
 12 
include '../../macros.inc'
13 
include '../../proc32.inc'
 13 
include '../../proc32.inc'
14 
include '../../develop/libraries/box_lib/load_lib.mac'
 14 
include '../../develop/libraries/box_lib/load_lib.mac'
15 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
 15 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
16 
include '../../dll.inc'
 16 
include '../../dll.inc'
- 
 
 17 
include '../../system/desktop/trunk/kglobals.inc'
- 
 
 18 
include '../../system/desktop/trunk/unpacker.inc'
17 
include 'strlen.inc'
 19 
include 'strlen.inc'
18 
include 'obj_codes.inc'
 20 
include 'obj_codes.inc'
Line 19... Line 21...
19 
 
 21 
 
Line 20... Line 22...
20 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load
 22 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load
Line 21... Line 23...
21 
 
 23 
 
Line 22... Line 24...
22 
hed db 'kol_f_edit 11.04.13',0
 24 
hed db 'kol_f_edit 17.04.13',0
23 
 
 25 
 
Line 323... Line 325...
323 
 
 325 
 
324 
	stdcall mem.Alloc,ecx ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ä ©«  ᨭ⠪á¨á 
 326 
	stdcall mem.Alloc,ecx ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ä ©«  ᨭ⠪á¨á 
Line 325... Line 327...
325 
	mov ted_syntax_file,eax
 327 
	mov ted_syntax_file,eax
326 
 
 - 
 
327 
	;¯à®¡ã¥¬ ®âªàëâì ä ©« ᨭ⠪á¨á 
 - 
 
328 
	mov ebx,run_file_70
 - 
 
329 
	mov dword[ebx], 0
 - 
 
330 
	mov dword[ebx+4], 0
 - 
 
331 
	mov dword[ebx+8], 0
 - 
 
332 
	mov dword[ebx+12], ecx
 - 
 
333 
	mov dword[ebx+16], eax ;ted_syntax_file
 - 
 
334 
	mov  byte[ebx+20], 0
 - 
 
335 
	m2m dword[ebx+21], file_name
 - 
 
336 
	mcall 70
 - 
 
337 
	cmp eax,0
 328 
 
338 
	jne @f
 329 
	;¯à®¡ã¥¬ ®âªàëâì ä ©« ᨭ⠪á¨á 
339 
		stdcall [ted_init_syntax_file],edi
 330 
	call open_unpac_synt_file
340 
		jmp .end_0
 331 
	jmp .end_0
341 
	@@:
 332 
	@@:
Line 636... Line 627...
636 
	stdcall [buf2d_delete],buf_font ;㤠«ï¥¬ ¡ãä¥à
627 
	stdcall [buf2d_delete],buf_font ;㤠«ï¥¬ ¡ãä¥à
637 
	stdcall [buf2d_delete],buf_skin1
 628 
	stdcall [buf2d_delete],buf_skin1
638 
	stdcall [buf2d_delete],buf_skin2
 629 
	stdcall [buf2d_delete],buf_skin2
639 
	stdcall [buf2d_delete],buf_skin3
 630 
	stdcall [buf2d_delete],buf_skin3
640 
	stdcall [ted_delete], tedit0
 631 
	stdcall [ted_delete], tedit0
- 
 
 632 
	cmp dword[unpac_mem],0
- 
 
 633 
	je @f
- 
 
 634 
		stdcall mem.Free,[unpac_mem]
- 
 
 635 
	@@:
641 
	mcall -1
 636 
	mcall -1
Line 642... Line 637...
642 
 
 637 
 
643 
align 4
 638 
align 4
644 
but_open_proj:
 639 
but_open_proj:
Line 866... Line 861...
866 
	pop eax
 861 
	pop eax
867 
	cmp eax,0
 862 
	cmp eax,0
868 
	je @f
 863 
	je @f
869 
		xor ecx,ecx
 864 
		xor ecx,ecx
870 
		mov cx,word[eax+obj_opt.img-obj_opt] ;cx - ¨­¤¥ªá £« ¢­®© ¨ª®­ª¨ ¤®¡ ¢«ï¥¬®£® ®¡ê¥ªâ 
 865 
		mov cx,word[eax+obj_opt.img-obj_opt] ;cx - ¨­¤¥ªá £« ¢­®© ¨ª®­ª¨ ¤®¡ ¢«ï¥¬®£® ®¡ê¥ªâ 
- 
 
 866 
 
- 
 
 867 
		cmp ecx,count_main_icons ;¢ áâ àè¨å ¡¨â å ecx ¡ã¤ãâ 0, ¯®â®¬ã ®âà¨æ â¥«ì­ë¥ ç¨á«  ⮦¥ ¯à®¢¥àïîâáï
- 
 
 868 
		jl .end_0
- 
 
 869 
			;¥á«¨ ¨ª®­ª¨ ­¥â, ¯® 㬮«ç ­¨î ¡¥à¥¬ 0-î
- 
 
 870 
			xor cx,cx
- 
 
 871 
		.end_0:
- 
 
 872 
 
871 
		shl ecx,16
 873 
		shl ecx,16
872 
		stdcall mem_clear, u_object,sizeof.object
 874 
		stdcall mem_clear, u_object,sizeof.object
873 
		mov ebx,dword[eax]
 875 
		mov ebx,dword[eax]
874 
		mov dword[u_object.id],ebx
 876 
		mov dword[u_object.id],ebx
875 
		stdcall dword[tl_node_add], u_object, ecx, tree2 ;¤®¡ ¢«ï¥¬ ®¡ê¥ªâ
 877 
		stdcall dword[tl_node_add], u_object, ecx, tree2 ;¤®¡ ¢«ï¥¬ ®¡ê¥ªâ
Line 886... Line 888...
886 
	ret
 888 
	ret
887 
align 4
 889 
align 4
888 
but_ctrl_s:
 890 
but_ctrl_s:
889 
	ret
 891 
	ret
Line -... Line 892...
- 
 
 892 
 
- 
 
 893 
;®âªàë⨥ ¨ à á¯ ª®¢ª  ä ©«  ¯®¤á¢¥âª¨ ᨭ⠪á¨á 
- 
 
 894 
;input:
- 
 
 895 
; ted_syntax_file - ¡ãä¥à ¤«ï ®âªà뢠¥¬®£® ä ©«  ᨭ⠪á¨á 
- 
 
 896 
; ted_syntax_file_size - à §¬¥à ®âªà뢠¥¬®£® ä ©«  ᨭ⠪á¨á 
- 
 
 897 
;output:
- 
 
 898 
; ebx - ç¨á«® ¯à®ç¨â ­­ëå ¡ ©â ¨§ ä ©« 
- 
 
 899 
align 4
- 
 
 900 
open_unpac_synt_file:
- 
 
 901 
push eax edi esi
- 
 
 902 
	mov edi, tedit0
- 
 
 903 
	mov [run_file_70.Function], 0
- 
 
 904 
	mov [run_file_70.Position], 0
- 
 
 905 
	mov [run_file_70.Flags], 0
- 
 
 906 
	mov ecx, ted_syntax_file_size
- 
 
 907 
	mov dword[run_file_70.Count], ecx
- 
 
 908 
	m2m dword[run_file_70.Buffer], ted_syntax_file
- 
 
 909 
	mov byte[run_file_70+20], 0
- 
 
 910 
	mov [run_file_70.FileName], file_name
- 
 
 911 
	mcall 70, run_file_70
- 
 
 912 
	cmp ebx,-1
- 
 
 913 
	jne .end_0
- 
 
 914 
		;¥á«¨ ¢®§­¨ª«¨ ®è¨¡ª¨ ¯à¨ ®âªàë⨨ ä ©«  ᨭ⠪á¨á 
- 
 
 915 
		mov byte[txt_not_syntax_file.err],'0'
- 
 
 916 
		add byte[txt_not_syntax_file.err],al
- 
 
 917 
		notify_window_run txt_not_syntax_file ;Can-t open color options file!
- 
 
 918 
		jmp @f
- 
 
 919 
	.end_0:
- 
 
 920 
 
- 
 
 921 
		mov eax,ted_syntax_file
- 
 
 922 
		cmp dword[eax],'KPCK'
- 
 
 923 
		jne .end_unpack
- 
 
 924 
 
- 
 
 925 
		mov ecx,dword[eax+4] ;ecx - à §¬¥à ä ©«  ᨭ⠪á¨á  ¯®á«¥ à á¯ ª®¢ª¨
- 
 
 926 
		cmp dword[unpac_mem],0
- 
 
 927 
		jne .end_1
- 
 
 928 
			;¯¥à¢®­ ç «ì­®¥ ¢ë¤¥«¥­¨¥ ¢à¥¬¥­­®© ¯ ¬ï⨠¤«ï à á¯ ª®¢ª¨ ä ©« 
- 
 
 929 
			stdcall mem.Alloc,ecx
- 
 
 930 
			mov [unpac_mem],eax
- 
 
 931 
			mov [unpac_mem_size],ecx
- 
 
 932 
		.end_1:
- 
 
 933 
		cmp dword[unpac_mem_size],ecx
- 
 
 934 
		jge .end_2
- 
 
 935 
			;¥á«¨ ¤«ï à á¯ ª®¢ ­®£® ä ©«  ­¥ 墠⠥⠢६¥­­®© ¯ ¬ïâ¨
- 
 
 936 
			stdcall mem.ReAlloc,[unpac_mem],ecx ;§ ­®¢® ¢ë¤¥«ï¥¬ ¢à¥¬¥­­ãî ¯ ¬ïâì
- 
 
 937 
			mov [unpac_mem],eax
- 
 
 938 
			mov [unpac_mem_size],ecx
- 
 
 939 
		.end_2:
- 
 
 940 
 
- 
 
 941 
		;à á¯ ª®¢ª  ä ©«  ¢® ¢à¥¬¥­­ãî ¯ ¬ïâì
- 
 
 942 
		stdcall unpack,ted_syntax_file,[unpac_mem]
- 
 
 943 
 
- 
 
 944 
		cmp ted_syntax_file_size,ecx
- 
 
 945 
		jge .end_3
- 
 
 946 
			;¥á«¨ ¤«ï à á¯ ª®¢ ­®£® ä ©«  ­¥ 墠⠥⠯ ¬ïâ¨
- 
 
 947 
			stdcall mem.ReAlloc,ted_syntax_file,ecx ;§ ­®¢® ¢ë¤¥«ï¥¬ ¯ ¬ïâì
- 
 
 948 
			mov ted_syntax_file,eax
- 
 
 949 
			mov ted_syntax_file_size,ecx
- 
 
 950 
		.end_3:
- 
 
 951 
 
- 
 
 952 
		;ª®¯¨à®¢ ­¨¥ à á¯ ª®¢ ­­®£® ä ©«  ¨§ ¢à¥¬¥­­®© ¯ ¬ï⨠¢ ¯ ¬ïâì í«¥¬¥­â 
- 
 
 953 
		mov edi,ted_syntax_file
- 
 
 954 
		mov esi,[unpac_mem]
- 
 
 955 
		cld
- 
 
 956 
		rep movsb
- 
 
 957 
 
- 
 
 958 
		.end_unpack:
- 
 
 959 
		;¯à¨¬¥­¥­¨¥ ä ©«  ¯®¤á¢¥âª¨
- 
 
 960 
		stdcall [ted_init_syntax_file], tedit0
- 
 
 961 
	@@:
- 
 
 962 
pop esi edi eax
- 
 
 963 
	ret
- 
 
 964 
 
- 
 
 965 
align 4
- 
 
 966 
txt_not_syntax_file:
- 
 
 967 
	db 'Žè¨¡ª  ¯à¨ ®âªàë⨨ ä ©«  á 梥⮢묨 ­ áâனª ¬¨! (Š®¤ ®è¨¡ª¨ ='
- 
 
 968 
	.err: db '?'
- 
 
 969 
	db ')',0
890 
 
 970 
 
891 
align 4
 971 
align 4
892 
buf_fon: ;ä®­®¢ë© ¡ãä¥à
 972 
buf_fon: ;ä®­®¢ë© ¡ãä¥à
893 
	dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
 973 
	dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
894 
	dw 310 ;+4 left
 974 
	dw 310 ;+4 left
Line 940... Line 1020...
940 
txtErrOpen db '¥ ­ ©¤¥­ ä ©«, ¯à®¢¥àì⥠¯à ¢¨«ì­®áâì ¨¬¥­¨',0
 1020 
txtErrOpen db '¥ ­ ©¤¥­ ä ©«, ¯à®¢¥àì⥠¯à ¢¨«ì­®áâì ¨¬¥­¨',0
941 
txtErrIni1 db '¥ ®âªàë«áï ä ©« á ®¯æ¨ï¬¨',0
 1021 
txtErrIni1 db '¥ ®âªàë«áï ä ©« á ®¯æ¨ï¬¨',0
942 
err_opn db 0 ;१. ®âªàëâ¨ï ä ©«  ¯à®íªâ 
 1022 
err_opn db 0 ;१. ®âªàëâ¨ï ä ©«  ¯à®íªâ 
943 
err_ini0 db 0 ;१. ®âªàëâ¨ï ä ©«  á ¨ª®­ª ¬¨
 1023 
err_ini0 db 0 ;१. ®âªàëâ¨ï ä ©«  á ¨ª®­ª ¬¨
944 
err_ini1 db 0 ;१. ®âªàëâ¨ï ä ©«  á ®¯æ¨ï¬¨
 1024 
err_ini1 db 0 ;१. ®âªàëâ¨ï ä ©«  á ®¯æ¨ï¬¨
- 
 
 1025 
unpac_mem dd 0
- 
 
 1026 
unpac_mem_size dd 0
Line 945... Line 1027...
945 
 
 1027 
 
Line 946... Line 1028...
946 
edit1 edit_box 210, 10, 5, 0xffffff, 0xff80, 0xff, 0xff0000, 0x4080, 300, ed_text1, mouse_dd, 0, 7, 7
 1028 
edit1 edit_box 210, 10, 5, 0xffffff, 0xff80, 0xff, 0xff0000, 0x4080, 300, ed_text1, mouse_dd, 0, 7, 7
947 
 
 1029 
 
Line 1092... Line 1174...
1092 
.line_col dd 0x808080 ;+36
 1174 
.line_col dd 0x808080 ;+36
1093 
.redraw   dd   0 ;+40
 1175 
.redraw   dd   0 ;+40
1094 
.delta	  dw   0 ;+44
 1176 
.delta	  dw   0 ;+44
1095 
.delta2   dw   0 ;+46
 1177 
.delta2   dw   0 ;+46
1096 
.run_x:
 1178 
.run_x:
1097 
.r_size_x  dw 0 ;+48
 - 
 
1098 
.r_start_x dw 0 ;+50
 - 
 
1099 
.run_y:
 1179 
rb 32
1100 
.r_size_y   dw 0 ;+52
 - 
 
1101 
.r_start_y  dw 0 ;+54
 - 
 
1102 
.m_pos	    dd 0 ;+56
 - 
 
1103 
.m_pos_2    dd 0 ;+60
 - 
 
1104 
.m_keys     dd 0 ;+64
 - 
 
1105 
.run_size   dd 0 ;+68
 - 
 
1106 
.position2  dd 0 ;+72
 - 
 
1107 
.work_size  dd 0 ;+76
 - 
 
1108 
.all_redraw dd 0 ;+80
 1180 
.all_redraw dd 0 ;+80
1109 
.ar_offset  dd 1 ;+84
 1181 
.ar_offset  dd 1 ;+84
1110 
;---------------------------------------------------------------------
 1182 
;---------------------------------------------------------------------
1111 
align 4
 1183 
align 4
1112 
scrol_h1:
 1184 
scrol_h1:
Line 1125... Line 1197...
1125 
.line_col   dd 0x808080 ;+36
 1197 
.line_col   dd 0x808080 ;+36
1126 
.redraw     dd 0  ;+40
 1198 
.redraw     dd 0  ;+40
1127 
.delta	    dw 0  ;+44
 1199 
.delta	    dw 0  ;+44
1128 
.delta2     dw 0  ;+46
 1200 
.delta2     dw 0  ;+46
1129 
.run_x:
 1201 
.run_x:
1130 
.r_size_x   dw 0  ;+48
 - 
 
1131 
.r_start_x  dw 0  ;+50
 - 
 
1132 
.run_y:
 1202 
rb 32
1133 
.r_size_y   dw 0 ;+52
 - 
 
1134 
.r_start_y  dw 0 ;+54
 - 
 
1135 
.m_pos	    dd 0 ;+56
 - 
 
1136 
.m_pos_2    dd 0 ;+60
 - 
 
1137 
.m_keys     dd 0 ;+64
 - 
 
1138 
.run_size   dd 0 ;+68
 - 
 
1139 
.position2  dd 0 ;+72
 - 
 
1140 
.work_size  dd 0 ;+76
 - 
 
1141 
.all_redraw dd 0 ;+80
 1203 
.all_redraw dd 0 ;+80
1142 
.ar_offset  dd 1 ;+84
 1204 
.ar_offset  dd 1 ;+84
Line 1154... Line 1216...
1154 
.bckg_col   dd 0xeeeeee ;+28
 1216 
.bckg_col   dd 0xeeeeee ;+28
1155 
.frnt_col   dd 0xbbddff ;+32
 1217 
.frnt_col   dd 0xbbddff ;+32
1156 
.line_col   dd 0  ;+36
 1218 
.line_col   dd 0  ;+36
1157 
rb 4+2+2
 1219 
rb 4+2+2
1158 
.run_x:
 1220 
.run_x:
1159 
rb 2+2+2+2+4+4+4+4+4+4
 1221 
rb 32
1160 
.all_redraw dd 0 ;+80
 1222 
.all_redraw dd 0 ;+80
1161 
.ar_offset  dd 1 ;+84
 1223 
.ar_offset  dd 1 ;+84
Line 1162... Line 1224...
1162 
 
 1224 
 
1163 
align 4
 1225 
align 4
Line 1171... Line 1233...
1171 
.bckg_col   dd 0xeeeeee ;+28
 1233 
.bckg_col   dd 0xeeeeee ;+28
1172 
.frnt_col   dd 0xbbddff ;+32
 1234 
.frnt_col   dd 0xbbddff ;+32
1173 
.line_col   dd 0  ;+36
 1235 
.line_col   dd 0  ;+36
1174 
rb 4+2+2
 1236 
rb 4+2+2
1175 
.run_x:
 1237 
.run_x:
1176 
rb 2+2+2+2+4+4+4+4+4+4
 1238 
rb 32
1177 
.all_redraw dd 0 ;+80
 1239 
.all_redraw dd 0 ;+80
1178 
.ar_offset  dd 1 ;+84
 1240 
.ar_offset  dd 1 ;+84
Line 1179... Line 1241...
1179 
 
 1241 
 
1180 
data_of_code dd 0
 1242 
data_of_code dd 0
Line 1195... Line 1257...
1195 
cur_y dd 0
 1257 
cur_y dd 0
1196 
foc_obj dd 0 ;®¡ê¥ªâ ¢ 䮪ãá¥
 1258 
foc_obj dd 0 ;®¡ê¥ªâ ¢ 䮪ãá¥
1197 
obj_count_txt_props dd 0 ;ª®«¨ç¥á⢮ ¨á¯®«ì§ã¥¬ëå ⥪á⮢ëå ᢮©áâ¢
 1259 
obj_count_txt_props dd 0 ;ª®«¨ç¥á⢮ ¨á¯®«ì§ã¥¬ëå ⥪á⮢ëå ᢮©áâ¢
1198 
obj_m_win dd 0 ;áâàãªâãà  £« ¢­®£® ®ª­ 
 1260 
obj_m_win dd 0 ;áâàãªâãà  £« ¢­®£® ®ª­ 
Line 1199... Line -...
1199 
 
 - 
 
1200 
txt_not_syntax_file db '¥ ­ ©¤¥­ ä ©« ¤«ï ¯®¤á¢¥âª¨ ᨭ⠪á¨á .',0
 - 
 
1201 
 
 1261 
 
1202 
;
 1262 
;
Line 1203... Line 1263...
1203 
if 1 ;lang eq ru
 1263 
if 1 ;lang eq ru
1204 
 
 1264 
 
Line 1506... Line 1566...
1506 
align 16
 1566 
align 16
1507 
procinfo process_information
 1567 
procinfo process_information
1508 
run_file_70 FileInfoBlock
 1568 
run_file_70 FileInfoBlock
1509 
open_b rb 560
 1569 
open_b rb 560
Line -... Line 1570...
- 
 
 1570 
 
1510 
 
 1571 
IncludeIGlobals
- 
 
 1572 
i_end:
1511 
i_end:
 1573 
IncludeUGlobals
1512 
	buf_cmd_lin rb 1024
 1574 
	buf_cmd_lin rb 1024
1513 
	file_name rb 1024 ;icon file path
 1575 
	file_name rb 1024 ;icon file path
1514 
	fp_obj_opt rb 1024 ;obj options file patch
 1576 
	fp_obj_opt rb 1024 ;obj options file patch
1515 
	rb 1024
 1577 
	rb 1024