Rev 1706 | Rev 1714 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 1706 | Rev 1711 | ||
---|---|---|---|
Line 116... | Line 116... | ||
116 | stdcall [ted_text_add], tedit0,txt_ret,4,ted_opt_ed_move_cursor |
116 | stdcall [ted_text_add], tedit0,txt_ret,4,ted_opt_ed_move_cursor |
117 | } |
117 | } |
Line 118... | Line 118... | ||
118 | 118 | ||
119 | 119 | ||
- | 120 | align 4 |
|
- | 121 | but_update: |
|
- | 122 | call draw_constructor |
|
- | 123 | cmp byte[show_mode],0 ;óñëîâèå âèäèìîñòè îêíà êîíñòðóêòîðà |
|
- | 124 | jne @f |
|
120 | align 4 |
125 | stdcall [buf2d_draw], buf_fon |
121 | but_code_gen: |
126 | @@: |
122 | call code_gen |
127 | call code_gen |
123 | cmp byte[show_mode],1 ;óñëîâèå âèäèìîñòè òåêñòîâîãî îêíà |
128 | cmp byte[show_mode],1 ;óñëîâèå âèäèìîñòè òåêñòîâîãî îêíà |
124 | jne @f |
129 | jne @f |
Line 161... | Line 166... | ||
161 | 166 | ||
162 | cmp byte[eax],C_ST |
167 | cmp byte[eax],C_ST |
163 | jne @f |
168 | jne @f |
164 | stdcall get_code_struct,eax ;îáðàáîòêà îáúåêòà |
169 | stdcall get_code_struct,eax ;îáðàáîòêà îáúåêòà |
165 | stdcall dword[tl_node_poi_get_next_info], esi,tree2 |
170 | stdcall dword[tl_node_poi_get_next_info], esi,tree2 |
166 | pop ecx ;ïåðåõîäèì ê ñëåäóùåìó óçëó |
171 | pop esi ;ïåðåõîäèì ê ñëåäóùåìó óçëó |
167 | cmp ecx,0 |
172 | cmp esi,0 |
168 | je .find_no |
173 | je .end_st |
169 | cmp byte[ecx+2],bl ;lev |
174 | cmp byte[esi+2],bl ;lev |
170 | jle .end_st |
- | |
171 | mov esi,ecx |
175 | jle .end_st |
172 | push bx |
176 | push bx |
173 | mov bl,byte[esi+2] |
177 | mov bl,byte[esi+2] |
174 | call code_gen_obj ;ðåêóðñèâíûé âûçîâ äî÷åðíèõ îáúåêòîâ |
178 | call code_gen_obj ;ðåêóðñèâíûé âûçîâ äî÷åðíèõ îáúåêòîâ |
175 | pop bx |
179 | pop bx |
Line 360... | Line 364... | ||
360 | mov edx,fp_icon |
364 | mov edx,fp_icon |
361 | stdcall get_obj_id, ebx,edx |
365 | stdcall get_obj_id, ebx,edx |
362 | stdcall insert_text,edx |
366 | stdcall insert_text,edx |
Line 363... | Line 367... | ||
363 | 367 | ||
- | 368 | stdcall insert_text, txt_mouse_dd |
|
- | 369 | ||
- | 370 | stdcall insert_text, txt_0 ;òóò áóäóò ñâîéñòâà editbox à ïîêà ïðîñòî ñòàâèì 0 |
|
- | 371 | xchg eax,edx ;ñîõðàíÿåì çíà÷åíèå edx |
|
- | 372 | stdcall get_obj_text_col,ebx,10 |
|
- | 373 | cmp byte[edx],0 ;ïðîâåðÿåì ïóñòàÿ ëè ñòðîêà ïðè çàïóñêå editbox |
|
- | 374 | je .null_string |
|
- | 375 | xchg eax,edx ;âîñòàíàâëèâàåì çíà÷åíèå edx |
|
- | 376 | stdcall insert_text, txt_coma |
|
- | 377 | ||
- | 378 | stdcall insert_text, txt_txt |
|
- | 379 | stdcall insert_text,edx |
|
- | 380 | stdcall insert_text,txt_met_end |
|
- | 381 | stdcall insert_text,txt_minus |
|
- | 382 | stdcall insert_text, txt_txt |
|
- | 383 | stdcall insert_text,edx |
|
- | 384 | stdcall insert_text,txt_minus |
|
- | 385 | stdcall insert_text, txt_1 |
|
- | 386 | stdcall insert_text, txt_coma |
|
- | 387 | ||
- | 388 | stdcall insert_text, txt_txt |
|
- | 389 | stdcall insert_text,edx |
|
- | 390 | stdcall insert_text,txt_met_end |
|
- | 391 | stdcall insert_text,txt_minus |
|
- | 392 | stdcall insert_text, txt_txt |
|
- | 393 | stdcall insert_text,edx |
|
- | 394 | stdcall insert_text,txt_minus |
|
- | 395 | stdcall insert_text, txt_1 |
|
- | 396 | .null_string: |
|
- | 397 | insert_nl |
|
- | 398 | @@: |
|
- | 399 | cmp byte[ebx],C_DT |
|
- | 400 | jne @f |
|
- | 401 | stdcall insert_text, txt_txt |
|
- | 402 | mov edx,fp_icon |
|
- | 403 | stdcall get_obj_id, ebx,edx |
|
- | 404 | stdcall insert_text,edx |
|
- | 405 | stdcall insert_text, txt_db |
|
364 | stdcall insert_text, txt_mouse_dd |
406 | stdcall insert_text_prop, ebx,0 |
365 | insert_nl |
407 | insert_nl |
366 | @@: |
- | |
367 | ;cmp byte[ebx],C_CB |
- | |
368 | ;jne @f |
- | |
Line 369... | Line 408... | ||
369 | ;@@: |
408 | @@: |
370 | 409 | ||
Line 371... | Line 410... | ||
371 | stdcall dword[tl_node_poi_get_next_info], esi,tree2 |
410 | stdcall dword[tl_node_poi_get_next_info], esi,tree2 |
Line 629... | Line 668... | ||
629 | 668 | ||
630 | cmp byte[ebx],C_ED |
669 | cmp byte[ebx],C_ED |
631 | jne @f |
670 | jne @f |
632 | ;1,2,3,4,...,6,...8,...,10 - w,x,y,col_fon,...,col_frame,...,col_txt,...,txt |
671 | ;1,2,3,4,...,6,...8,...,10 - w,x,y,col_fon,...,col_frame,...,col_txt,...,txt |
633 | stdcall insert_text, txt_txt |
- | |
634 | 672 | stdcall insert_text, txt_txt |
|
635 | mov edx,fp_icon |
673 | mov edx,fp_icon |
636 | stdcall get_obj_id, ebx,edx |
- | |
637 | stdcall str_len,edx ;eax = len(fp_icon) |
- | |
638 | stdcall [ted_text_add], tedit0,edx,eax,ted_opt_ed_move_cursor |
674 | stdcall get_obj_id, ebx,edx |
Line 639... | Line 675... | ||
639 | stdcall insert_text, txt_times |
675 | stdcall insert_text,edx |
- | 676 | ||
- | 677 | stdcall get_obj_text_col,ebx,10 |
|
- | 678 | cmp byte[edx],0 |
|
- | 679 | je .no_text |
|
- | 680 | stdcall insert_text, txt_d_poi |
|
640 | 681 | stdcall insert_text, txt_db |
|
641 | stdcall get_obj_text_col,ebx,9 |
682 | stdcall insert_text, txt_str_beg |
- | 683 | stdcall str_len,edx |
|
- | 684 | stdcall [ted_text_add], tedit0,edx,eax,ted_opt_ed_move_cursor |
|
- | 685 | stdcall insert_text, txt_str_end |
|
- | 686 | insert_nl |
|
- | 687 | ||
- | 688 | insert_tab |
|
- | 689 | stdcall insert_text, txt_met_end |
|
- | 690 | stdcall insert_text, txt_rb |
|
- | 691 | stdcall insert_text, txt_txt |
|
- | 692 | mov edx,fp_icon |
|
- | 693 | stdcall get_obj_id, ebx,edx |
|
- | 694 | stdcall insert_text,edx |
|
- | 695 | ||
- | 696 | stdcall insert_text, txt_minus |
|
- | 697 | stdcall insert_text, txt_txt |
|
Line 642... | Line 698... | ||
642 | stdcall str_len,edx |
698 | stdcall insert_text,edx |
- | 699 | stdcall insert_text, txt_met_end |
|
- | 700 | ||
- | 701 | insert_plus |
|
- | 702 | stdcall insert_text_prop,ebx,9 |
|
- | 703 | insert_plus |
|
- | 704 | stdcall insert_text, txt_3 |
|
- | 705 | ||
- | 706 | insert_nl |
|
- | 707 | ||
- | 708 | jmp @f |
|
- | 709 | ||
- | 710 | .no_text: ;ïåðâîíà÷àëüíî òåêñò íå çàäàí |
|
- | 711 | stdcall insert_text, txt_times |
|
643 | stdcall [ted_text_add], tedit0,edx,eax,ted_opt_ed_move_cursor |
712 | |
644 | 713 | stdcall insert_text_prop,ebx,9 |
|
645 | insert_plus |
714 | insert_plus |
646 | stdcall insert_text, txt_2 |
715 | stdcall insert_text, txt_2 |
647 | stdcall insert_text, txt_db |
716 | stdcall insert_text, txt_db |
Line 1016... | Line 1085... | ||
1016 | 1085 | ||
1017 | insert_tab |
1086 | insert_tab |
1018 | stdcall insert_text, txt_i_40 |
1087 | stdcall insert_text, txt_i_40 |
1019 | insert_nl |
1088 | insert_nl |
- | 1089 | @@: |
|
- | 1090 | cmp byte[ebx],C_DT ;ðèñîâàíèå òåêñòà ÷åðåç ñèñò. ô. 4 |
|
- | 1091 | jne @f |
|
- | 1092 | insert_tab |
|
- | 1093 | stdcall insert_text, txt_mov |
|
- | 1094 | insert_reg txt_eax |
|
- | 1095 | insert_coma |
|
- | 1096 | stdcall insert_text, txt_4 |
|
- | 1097 | insert_nl |
|
- | 1098 | ||
- | 1099 | insert_tab |
|
- | 1100 | stdcall insert_text, txt_mov |
|
- | 1101 | insert_reg txt_ebx |
|
- | 1102 | insert_coma |
|
- | 1103 | stdcall insert_text_prop, ebx,1 |
|
- | 1104 | insert_i65p |
|
- | 1105 | stdcall insert_text_prop, ebx,2 |
|
- | 1106 | insert_nl |
|
- | 1107 | ||
- | 1108 | insert_tab |
|
- | 1109 | stdcall insert_text, txt_mov |
|
- | 1110 | insert_reg txt_ecx |
|
- | 1111 | insert_coma |
|
- | 1112 | stdcall insert_text_prop, ebx,3 |
|
- | 1113 | insert_nl |
|
- | 1114 | ||
- | 1115 | ;or ecx,0x80000000 |
|
- | 1116 | ||
- | 1117 | insert_tab |
|
- | 1118 | stdcall insert_text, txt_mov |
|
- | 1119 | insert_reg txt_edx |
|
- | 1120 | insert_coma |
|
- | 1121 | stdcall insert_text, txt_txt |
|
- | 1122 | mov edx,fp_icon |
|
- | 1123 | stdcall get_obj_id, ebx,edx |
|
- | 1124 | stdcall insert_text,edx |
|
- | 1125 | insert_nl |
|
- | 1126 | ||
- | 1127 | ;mov esi,... |
|
- | 1128 | ||
- | 1129 | insert_tab |
|
- | 1130 | stdcall insert_text, txt_i_40 |
|
- | 1131 | insert_nl |
|
Line 1020... | Line 1132... | ||
1020 | @@: |
1132 | @@: |
1021 | 1133 | ||
Line 1022... | Line 1134... | ||
1022 | stdcall dword[tl_node_poi_get_next_info], esi,tree2 |
1134 | stdcall dword[tl_node_poi_get_next_info], esi,tree2 |
Line 1102... | Line 1214... | ||
1102 | txt_2 db '2',0 |
1214 | txt_2 db '2',0 |
1103 | txt_3 db '3',0 |
1215 | txt_3 db '3',0 |
1104 | txt_4 db '4',0 |
1216 | txt_4 db '4',0 |
1105 | txt_8 db '8',0 |
1217 | txt_8 db '8',0 |
1106 | txt_plus db '+',0 |
1218 | txt_plus db '+',0 |
- | 1219 | txt_minus db '-',0 |
|
- | 1220 | ;txt_dol db '$',0 |
|
1107 | txt_nl db 13,0 |
1221 | txt_nl db 13,0 |
1108 | txt_com db ';',0 |
1222 | txt_com db ';',0 |
1109 | txt_sp db ' ',0 |
1223 | txt_sp db ' ',0 |
1110 | txt_tab db 9,0 |
1224 | txt_tab db 9,0 |
1111 | txt_br db '\',13,9,0 |
1225 | txt_br db '\',13,9,0 |
1112 | txt_txt db 'txt_',0 |
1226 | txt_txt db 'txt_',0 |
1113 | txt_db db ' db ',0 |
1227 | txt_db db ' db ',0 |
1114 | txt_dd db ' dd ',0 |
1228 | txt_dd db ' dd ',0 |
- | 1229 | txt_rb db ' rb ',0 |
|
1115 | txt_dd_0_0 db 9,'dd 0,0',13,0 |
1230 | txt_dd_0_0 db 9,'dd 0,0',13,0 |
1116 | txt_mouse_dd db ', mouse_dd, ',0 |
1231 | txt_mouse_dd db ', mouse_dd, ',0 |
1117 | txt_times db ':',13,9,'times ',0 |
1232 | txt_times db ':',13,9,'times ',0 |
1118 | txt_draw_wb: |
1233 | txt_draw_wb: |
1119 | db 13,'align 4',13,'draw_window:',13,'pushad',13,9,'mcall 12,1',13,0 |
1234 | db 13,'align 4',13,'draw_window:',13,'pushad',13,9,'mcall 12,1',13,0 |
Line 1132... | Line 1247... | ||
1132 | txt_head_i db 'head_f_i',0 |
1247 | txt_head_i db 'head_f_i',0 |
1133 | txt_ll_end db 'l_libs_end:',13,0 |
1248 | txt_ll_end db 'l_libs_end:',13,0 |
1134 | txt_but_create db '0x40000000',0 ;tmp |
1249 | txt_but_create db '0x40000000',0 ;tmp |
1135 | txt_0x33000000 db '0x33000000',0 ;tmp |
1250 | txt_0x33000000 db '0x33000000',0 ;tmp |
1136 | txt_struct db 'struct ',0 |
1251 | txt_struct db 'struct ',0 |
- | 1252 | txt_met_end db '.end',0 |
|
1137 | txt_ends db 'ends',13,13,0 |
1253 | txt_ends db 'ends',13,13,0 |
1138 | txt_mov db 'mov ',0 |
1254 | txt_mov db 'mov ',0 |
1139 | txt_xor db 'xor ',0 |
1255 | txt_xor db 'xor ',0 |
1140 | txt_or db 'or ',0 |
1256 | txt_or db 'or ',0 |
1141 | txt_cmp db 'cmp ',0 |
1257 | txt_cmp db 'cmp ',0 |