Rev 1490 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 1490 | Rev 1581 | ||
|---|---|---|---|
| Line 43... | Line 43... | ||
| 43 | include '../../trunk/box_lib.mac' |
43 | include '../../trunk/box_lib.mac' |
| 44 | ;include 'macros.inc' |
44 | ;include 'macros.inc' |
| 45 | ;include 'load_lib.mac' |
45 | ;include 'load_lib.mac' |
| 46 | ;include 'box_lib.mac' |
46 | ;include 'box_lib.mac' |
| 47 | @use_library |
47 | @use_library |
| - | 48 | ||
| - | 49 | x_minimal_size equ 300 |
|
| - | 50 | y_minimal_size equ 200 |
|
| 48 | ;--------------------------------------------------------------------- |
51 | ;--------------------------------------------------------------------- |
| 49 | ;--------------------------------------------------------------------- |
52 | ;--------------------------------------------------------------------- |
| 50 | START: |
53 | START: |
| 51 | mcall 68,11 |
54 | mcall 68,11 |
| 52 | mcall 66,1,1 |
55 | mcall 66,1,1 |
| Line 101... | Line 104... | ||
| 101 | test [window_status],1b |
104 | test [window_status],1b |
| 102 | jnz .end ;red_1 |
105 | jnz .end ;red_1 |
| 103 | mov esi,-1 |
106 | mov esi,-1 |
| 104 | mov eax,procinfo |
107 | mov eax,procinfo |
| 105 | mov eax,[eax+66] |
108 | mov eax,[eax+66] |
| 106 | cmp eax,200 |
109 | cmp eax,dword y_minimal_size ;200 |
| 107 | jae @f |
110 | jae @f |
| 108 | mov esi,200 |
111 | mov esi,dword y_minimal_size ;200 |
| 109 | mcall 67,-1,ebx,ebx |
112 | mcall 67,-1,ebx,ebx |
| 110 | @@: |
113 | @@: |
| 111 | mov edx,-1 |
114 | mov edx,-1 |
| 112 | mov eax,procinfo |
115 | mov eax,procinfo |
| 113 | mov eax,[eax+62] |
116 | mov eax,[eax+62] |
| 114 | cmp eax,300 |
117 | cmp eax,dword x_minimal_size ;300 |
| 115 | jae @f |
118 | jae @f |
| 116 | mov edx,300 |
119 | mov edx,dword x_minimal_size ;300 |
| 117 | mcall 67,-1,ebx,,ebx |
120 | mcall 67,-1,ebx,,ebx |
| 118 | @@: |
121 | @@: |
| 119 | .end: |
122 | .end: |
| 120 | popa |
123 | popa |
| 121 | ret |
124 | ret |
| Line 369... | Line 372... | ||
| 369 | jnz @f |
372 | jnz @f |
| 370 | call control_minimal_window_size |
373 | call control_minimal_window_size |
| 371 | call draw_window |
374 | call draw_window |
| 372 | ret |
375 | ret |
| 373 | @@: |
376 | @@: |
| 374 | add eax,4 |
377 | add eax,12 |
| 375 | ;copy_path user_selected_name,dir_pach,eax,0 |
378 | ;copy_path user_selected_name,dir_pach,eax,0 |
| 376 | mov esi,dir_pach |
379 | mov esi,dir_pach |
| 377 | mov edi,eax |
380 | mov edi,eax |
| 378 | call copy_dir_name |
381 | call copy_dir_name |
| 379 | mov [edi-1],byte '/' |
382 | mov [edi-1],byte '/' |
| Line 553... | Line 556... | ||
| 553 | mov eax,[N_error] |
556 | mov eax,[N_error] |
| 554 | test eax,eax |
557 | test eax,eax |
| 555 | jz @f |
558 | jz @f |
| 556 | call start_error_window_thread |
559 | call start_error_window_thread |
| 557 | @@: |
560 | @@: |
| - | 561 | call get_window_param |
|
| - | 562 | mov ebx,[communication_area] |
|
| - | 563 | mov ecx,procinfo |
|
| - | 564 | ; mov eax,[window_x] |
|
| - | 565 | mov eax,[ecx+34] |
|
| - | 566 | shl eax,16 |
|
| - | 567 | add eax,[ecx+42] |
|
| - | 568 | mov [ebx+4],eax |
|
| - | 569 | ; mov eax,[window_y] |
|
| - | 570 | mov eax,[ecx+38] |
|
| - | 571 | shl eax,16 |
|
| - | 572 | add eax,[ecx+46] |
|
| - | 573 | mov [ebx+8],eax |
|
| - | 574 | ||
| 558 | mcall -1 |
575 | mcall -1 |
| 559 | ;--------------------------------------------------------------------- |
576 | ;--------------------------------------------------------------------- |
| 560 | .reload_dir: |
577 | .reload_dir: |
| 561 | call check_ctrl |
578 | call check_ctrl |
| 562 | .reload_dir_1: |
579 | .reload_dir_1: |
| Line 928... | Line 945... | ||
| 928 | mov al,[param] |
945 | mov al,[param] |
| 929 | test eax,eax |
946 | test eax,eax |
| 930 | jz @f |
947 | jz @f |
| 931 | mcall 68,22,param,,0x01 |
948 | mcall 68,22,param,,0x01 |
| 932 | mov [communication_area],eax |
949 | mov [communication_area],eax |
| 933 | movzx eax,word [eax+2] |
950 | movzx ebx,word [eax+2] |
| 934 | mov [open_dialog_type],eax |
951 | mov [open_dialog_type],ebx |
| - | 952 | mov ebx,[eax+4] |
|
| - | 953 | cmp bx,word x_minimal_size ;300 |
|
| - | 954 | jb @f |
|
| - | 955 | mov [window_x],ebx |
|
| - | 956 | mov ebx,[eax+8] |
|
| - | 957 | cmp bx,word y_minimal_size ;200 |
|
| - | 958 | jb @f |
|
| - | 959 | mov [window_y],ebx |
|
| 935 | @@: |
960 | @@: |
| 936 | ret |
961 | ret |
| 937 | ;--------------------------------------------------------------------- |
962 | ;--------------------------------------------------------------------- |
| 938 | load_start_directory: |
963 | load_start_directory: |
| 939 | mov eax,[communication_area] |
964 | mov eax,[communication_area] |
| 940 | test eax,eax |
965 | test eax,eax |
| 941 | jz .1 |
966 | jz .1 |
| 942 | movzx ebx,word [eax] |
967 | movzx ebx,word [eax] |
| 943 | test eax,eax |
968 | test eax,eax |
| 944 | jz .1 |
969 | jz .1 |
| 945 | add eax,4 |
970 | add eax,12 ;4 |
| 946 | mov esi,eax |
971 | mov esi,eax |
| 947 | push esi |
972 | push esi |
| 948 | mov esi,[communication_area] |
973 | mov esi,[communication_area] |
| 949 | add esi,4096-256 |
974 | add esi,3840 ;4096-256 |
| 950 | mov eax,[esi] |
975 | mov eax,[esi] |
| 951 | test eax,eax |
976 | test eax,eax |
| 952 | jnz @f |
977 | jnz @f |
| 953 | mov esi,example_name_temp |
978 | mov esi,example_name_temp |
| 954 | @@: |
979 | @@: |
| Line 1088... | Line 1113... | ||
| 1088 | call draw_window |
1113 | call draw_window |
| 1089 | pop ebx |
1114 | pop ebx |
| 1090 | ret |
1115 | ret |
| 1091 | @@: |
1116 | @@: |
| 1092 | mov edi,eax |
1117 | mov edi,eax |
| 1093 | add edi,4 |
1118 | add edi,12 |
| 1094 | mov esi,file_name |
1119 | mov esi,file_name |
| 1095 | call copy_dir_name |
1120 | call copy_dir_name |
| Line 1096... | Line 1121... | ||
| 1096 | 1121 | ||
| 1097 | pop esi |
1122 | pop esi |
| 1098 | mov al,[focus_pointer] |
1123 | mov al,[focus_pointer] |
| 1099 | test al,al |
1124 | test al,al |
| 1100 | jz @f |
1125 | jz @f |
| 1101 | mov esi,user_selected_name |
1126 | mov esi,user_selected_name |
| 1102 | @@: |
1127 | @@: |
| 1103 | mov edi,[communication_area] |
1128 | mov edi,[communication_area] |
| 1104 | add edi,4096-256 |
1129 | add edi,3840 ;4096-256 |
| Line 1105... | Line 1130... | ||
| 1105 | call copy_dir_name |
1130 | call copy_dir_name |
| 1106 | 1131 | ||
| 1107 | mov eax,[communication_area] |
1132 | mov eax,[communication_area] |
| Line 1218... | Line 1243... | ||
| 1218 | ;--------------------------------------------------------------------- |
1243 | ;--------------------------------------------------------------------- |
| 1219 | draw_window: |
1244 | draw_window: |
| Line 1220... | Line 1245... | ||
| 1220 | 1245 | ||
| Line 1221... | Line 1246... | ||
| 1221 | mcall 12,1 |
1246 | mcall 12,1 |
| - | 1247 | ||
| - | 1248 | ; mcall 0,<10,420>,<10,320>,0x63AABBCC, |
|
| Line 1222... | Line 1249... | ||
| 1222 | 1249 | xor esi,esi |
|
| 1223 | mcall 0,<10,420>,<10,320>,0x63AABBCC, |
1250 | mcall 0,[window_x],[window_y],0x63AABBCC, |
| 1224 | 1251 | ||
| 1225 | ; mov ecx,[communication_area] |
1252 | ; mov ecx,[communication_area] |
| Line 1872... | Line 1899... | ||
| 1872 | pop ebx eax |
1899 | pop ebx eax |
| 1873 | jnz .delete |
1900 | jnz .delete |
| Line 1874... | Line 1901... | ||
| 1874 | 1901 | ||
| 1875 | push eax ebx ecx esi |
1902 | push eax ebx ecx esi |
| 1876 | mov edi,[communication_area] |
1903 | mov edi,[communication_area] |
| 1877 | add edi,4096+4 |
1904 | add edi,4100 |
| 1878 | call compare_expansion |
1905 | call compare_expansion |
| 1879 | test eax,eax |
1906 | test eax,eax |
| 1880 | pop esi ecx ebx eax |
1907 | pop esi ecx ebx eax |
| Line 2844... | Line 2871... | ||
| 2844 | 2871 | ||
| Line 2845... | Line 2872... | ||
| 2845 | ;mouse_flag: dd 0x0 |
2872 | ;mouse_flag: dd 0x0 |
| 2846 | 2873 | ||
| - | 2874 | mouse_dd rd 1 |
|
| - | 2875 | ;--------------------------------------------------------------------- |
|
| - | 2876 | window_x: |
|
| - | 2877 | .x_size dw 420 |
|
| - | 2878 | .x_start dw 10 |
|
| - | 2879 | window_y: |
|
| 2847 | mouse_dd rd 1 |
2880 | .y_size dw 320 |
| 2848 | ;--------------------------------------------------------------------- |
2881 | .y_start dw 10 |
| 2849 | ;--------------------------------------------------------------------- |
2882 | ;--------------------------------------------------------------------- |
| 2850 | features_table: |
2883 | features_table: |
| 2851 | .type_table: |
2884 | .type_table: |