| 0,0 → 1,422 |
|---|
| func check_mouse_in_edit_area |
| mcall 37,1 |
| mov ebx,eax |
| and ebx,0x0000FFFF |
| shr eax,16 |
| mov ecx,[top_ofs] |
| inc ecx |
| pushd [left_ofs] ATOPH [p_info.client_box.width] ATOPH |
| popd [__rc+0xC] [__rc+0x8] [__rc+0x4] [__rc+0x0] |
| sub [__rc+0x8],SCRLW+6 |
| imul ecx,[lines.scr],LINEH |
| dec ecx |
| add [__rc+0xC],ecx |
| mov ecx,__rc |
| call pt_in_rect |
| ret |
| endf |
| |
| func get_mouse_event |
| mcall 37,2 |
| and al,3 |
| mov bl,[ecx] |
| cmp [ecx],al |
| mov [ecx],al |
| jne @f |
| mov eax,MEV_MOVE |
| ret |
| @@: mov bh,al |
| and ebx,0x0101 |
| cmp bl,bh |
| je .rb |
| test al,1 |
| jz @f |
| mov eax,MEV_LDOWN |
| ret |
| @@: mov eax,MEV_LUP |
| ret |
| .rb: test al,2 |
| jz @f |
| mov eax,MEV_RDOWN |
| ret |
| @@: mov eax,MEV_RUP |
| ret |
| endf |
| |
| mouse_ev dd mouse.l_down,mouse.l_up,mouse.r_down,mouse.r_up,mouse.move |
| |
| mouse: |
| mov ecx,mst |
| call get_mouse_event |
| cmp [bot_mode],0 |
| je @f |
| mov ah,al |
| mov al,4 |
| call [bot_dlg_handler] |
| jmp still |
| @@: cmp al,MEV_MOVE |
| jne .no_move |
| cmp [popup_active],1 |
| je @f |
| .no_move: |
| mov [s_status],0 |
| |
| push eax |
| mcall 9,p_info,-1 |
| cmp ax,[p_info.window_stack_position] |
| pop eax |
| jne still.skip_write |
| @@: |
| cmp [just_from_popup],0 |
| je @f |
| cmp al,MEV_LUP |
| jne still.skip_write |
| @@: mov [mev],al |
| jmp [mouse_ev+eax*4-4] |
| |
| .move: |
| mcall 37,1 |
| movsx ebx,ax |
| sar eax,16 |
| cmp [body_capt],0 |
| jge .check_body.2 |
| cmp [vscrl_capt],0 |
| jge .check_vscroll.2 |
| cmp [hscrl_capt],0 |
| jge .check_hscroll.2 |
| |
| cmp [do_not_draw],0 |
| jne still.skip_write |
| mov eax,[mi_cur] |
| call get_active_menu_item |
| cmp eax,[mi_cur] |
| je still.skip_write |
| push [mi_cur] |
| cmp [popup_active],0 |
| je @f |
| mov [mi_cur],eax |
| @@: call draw_main_menu |
| pop [mi_cur] |
| cmp [popup_active],0 |
| je still.skip_write |
| ; mcall 18,2,[h_popup] |
| mov ecx,[mi_cur] |
| or ecx,ecx |
| js still.skip_write |
| mov eax,[main_menu.popups+ecx*4-4] |
| mov edx,main_menu |
| call dword[main_menu.onshow+ecx*4-4] |
| call setup_main_menu_popup |
| mcall 60,2,[h_popup],POPUP_STACK,4 |
| ; mcall 51,1,popup_thread_start,POPUP_STACK |
| |
| jmp still.skip_write |
| |
| |
| .r_down: |
| @@: cmp [popup_active],0 |
| je @f |
| mcall 5,1 |
| jmp @b |
| @@: cmp [mouse_captured],0 |
| jne still.skip_write |
| call check_mouse_in_edit_area |
| jnc still.skip_write |
| mcall 37,0 |
| mov [popup_edit+POPUP.pos],eax |
| @@: mcall 37,2 |
| cmp eax,ebx |
| jnz @f |
| mcall 5,1 |
| jmp @b |
| @@: and [mst],0xFD |
| call onshow.edit |
| mov dword[POPUP_STACK],popup_edit |
| mcall 51,1,popup_thread_start,POPUP_STACK |
| mov [h_popup],eax |
| jmp still.skip_write |
| |
| .r_up: |
| jmp still.skip_write |
| |
| .l_down: |
| call check_mouse_in_edit_area |
| jnc .check_vscroll |
| mov [mouse_captured],1 |
| mov [body_capt],1 |
| |
| call clear_selection |
| |
| .check_body.2: |
| sub eax,[left_ofs] |
| sub ebx,[top_ofs] |
| dec ebx |
| ; sub ebx,[__rc+0x4] |
| push eax |
| mov eax,ebx |
| cdq;xor edx,edx |
| mov ecx,LINEH |
| idiv ecx |
| @@: add eax,[top_line] |
| mov ebx,eax |
| pop eax |
| cdq;xor edx,edx |
| mov ecx,6 |
| idiv ecx |
| @@: add eax,[left_col] |
| |
| cmp eax,[columns] |
| jl @f |
| mov eax,[columns] |
| @@: cmp ebx,[lines] |
| jl @f |
| mov ebx,[lines] |
| dec ebx |
| @@: |
| cmp [pos.x],eax |
| jne .change_cur_pos |
| cmp [pos.y],ebx |
| je still.skip_write |
| |
| .change_cur_pos: |
| mov [pos.x],eax |
| mov eax,[pos.y] |
| mov [pos.y],ebx |
| call check_cur_vis_inv |
| jc .check_ldown |
| ; cmp eax,ebx |
| ; je @f |
| ; push ebx |
| ; mov ebx,eax |
| ; call drawfile.ex |
| ; pop eax |
| ; @@: mov ebx,eax |
| call draw_file.ex |
| .check_ldown: |
| jmp still |
| |
| .check_vscroll: |
| mov ecx,[p_info.client_box.width] |
| sub ecx,SCRLW-2 |
| pushd ecx [top_ofs] ecx [bot_ofs] |
| popd [__rc+0xC] [__rc+0x8] [__rc+0x4] [__rc+0x0] |
| add [__rc+0x8],SCRLW-1;!!!!!!!!!!!!!!-2 |
| add [__rc+0x4],SCRLW;!!!!!!!!!!!!!!+1 |
| sub [__rc+0xC],SCRLW*2+3 |
| mov ecx,__rc |
| call pt_in_rect |
| jnc .check_hscroll |
| |
| .check_vscroll.2: |
| sub ebx,[top_ofs] |
| sub ebx,SCRLW;!!!!!!!!!!!!!!+1 |
| ; sub ebx,[__rc+0x4] |
| cmp [vscrl_capt],0 |
| jge .vcaptured |
| mov eax,[vscrl_top] |
| cmp ebx,eax |
| jb .center_vcapture |
| add eax,[vscrl_size] |
| cmp ebx,eax |
| jae .center_vcapture |
| mov eax,ebx |
| sub eax,[vscrl_top] |
| dec eax |
| mov [vscrl_capt],eax |
| dec ebx |
| jmp .vcaptured |
| .center_vcapture: |
| mov eax,[vscrl_size] |
| shr eax,1 |
| mov [vscrl_capt],eax |
| .vcaptured: |
| sub ebx,[vscrl_capt] |
| jns @f |
| xor ebx,ebx |
| @@: mov [mouse_captured],1 |
| mov eax,[bot_ofs] |
| sub eax,[top_ofs] |
| sub eax,[vscrl_size] |
| sub eax,SCRLW*3-2 |
| cmp eax,ebx |
| jge @f |
| mov ebx,eax |
| @@: |
| mov [vscrl_top],ebx |
| mov eax,[lines] |
| sub eax,[lines.scr] |
| imul ebx |
| mov ebx,[bot_ofs] |
| sub ebx,[top_ofs] |
| sub ebx,SCRLW*3-2 ;** |
| sub ebx,[vscrl_size] |
| idiv ebx |
| cmp eax,[top_line] |
| je still.skip_write |
| mov [top_line],eax |
| call check_bottom_right |
| call draw_file |
| jmp still.skip_write |
| |
| .check_hscroll: |
| pushd (5+SCRLW+1) [bot_ofs] [p_info.box.width] [bot_ofs] |
| popd [__rc+0xC] [__rc+0x8] [__rc+0x4] [__rc+0x0] |
| add [__rc+0x8],-SCRLW*2-10-1 |
| add [__rc+0x4],-SCRLW |
| add [__rc+0xC],-2 |
| mov ecx,__rc |
| call pt_in_rect |
| jnc .check_main_menu |
| |
| .check_hscroll.2: |
| mov ebx,eax |
| sub ebx,(5+SCRLW+1) |
| ; sub ebx,[__rc+0x0] |
| cmp [hscrl_capt],0 |
| jge .hcaptured |
| mov eax,[hscrl_top] |
| cmp ebx,eax |
| jl .center_hcapture |
| add eax,[hscrl_size] |
| cmp ebx,eax |
| jge .center_hcapture |
| mov eax,ebx |
| sub eax,[hscrl_top] |
| dec eax |
| mov [hscrl_capt],eax |
| dec ebx |
| jmp .hcaptured |
| .center_hcapture: |
| mov eax,[hscrl_size] |
| shr eax,1 |
| mov [hscrl_capt],eax |
| .hcaptured: |
| sub ebx,[hscrl_capt] |
| jns @f |
| xor ebx,ebx |
| @@: mov [mouse_captured],1 |
| mov eax,[p_info.box.width] |
| sub eax,[hscrl_size] |
| sub eax,SCRLW*3+10+1 |
| cmp eax,ebx |
| jge @f |
| mov ebx,eax |
| @@: |
| mov [hscrl_top],ebx |
| mov eax,[columns] |
| sub eax,[columns.scr] |
| imul ebx |
| mov ebx,[p_info.box.width] |
| sub ebx,SCRLW*3+10+1 ;** |
| sub ebx,[hscrl_size] |
| idiv ebx |
| cmp eax,[left_col] |
| je still.skip_write |
| mov [left_col],eax |
| call check_bottom_right |
| call draw_file |
| jmp still.skip_write |
| |
| .check_main_menu: |
| cmp [do_not_draw],0 |
| jne .capture_off |
| |
| @@: mcall 37,2 |
| test eax,0x01 |
| jz @f |
| mcall 5,1 |
| jmp @b |
| @@: and [mst],0xFE |
| |
| cmp [mi_cur],0 |
| jle .capture_off |
| mov ecx,[mi_cur] |
| mov eax,[main_menu.popups+ecx*4-4] |
| mov edx,main_menu |
| call dword[main_menu.onshow+ecx*4-4] |
| call setup_main_menu_popup |
| mcall 51,1,popup_thread_start,POPUP_STACK |
| mov [h_popup],eax |
| |
| .l_up: |
| .capture_off: |
| or eax,-1 |
| mov [vscrl_capt],eax |
| mov [hscrl_capt],eax |
| mov [body_capt],eax |
| mov [mouse_captured],0 |
| mov [just_from_popup],0 |
| jmp still.skip_write |
| |
| |
| func setup_main_menu_popup |
| mov ebx,[p_info.box.left] |
| add ebx,[p_info.client_box.left] |
| @@: dec ecx |
| jz @f |
| add edx,8+1 |
| movzx esi,byte[edx-1] |
| add edx,esi |
| jmp @b |
| @@: movzx ecx,word[edx+2] |
| add ebx,ecx |
| |
| mov [eax+POPUP.x],bx |
| mov ebx,[p_info.box.top] |
| add ebx,[p_info.client_box.top] |
| add ebx,ATOPH-1 |
| mov [eax+POPUP.y],bx |
| mov [POPUP_STACK],eax |
| ret |
| endf |
| |
| onshow: |
| |
| .file: |
| or byte[popup_file+3],0x01 |
| cmp [f_info.length],0 |
| jne @f |
| and byte[popup_file+3],0xFE |
| @@: ret |
| |
| .edit: |
| or byte[popup_edit+2],0x01 |
| cmp [copy_size],0 |
| jne @f |
| and byte[popup_edit+2],0xFE |
| @@: or dword[popup_edit+0],0x01000101 |
| cmp [sel.selected],0 |
| jne @f |
| and dword[popup_edit+0],0xFEFFFEFE |
| @@: ret |
| |
| .search: |
| mov byte[popup_search+0],0 |
| ;mov byte[popup_search+4],0 |
| ret |
| .run: |
| ret |
| .options: |
| mov word[popup_options+0],0 |
| mov byte[popup_options+5],0 |
| or byte[popup_options+2],0x02 |
| test [options],OPTS_SECURESEL |
| jnz @f |
| and byte[popup_options+2],0xFD |
| @@: or byte[popup_options+3],0x02 |
| test [options],OPTS_AUTOBRACES |
| jnz @f |
| and byte[popup_options+3],0xFD |
| @@: or byte[popup_options+4],0x02 |
| test [options],OPTS_AUTOINDENT |
| jnz @f |
| and byte[popup_options+4],0xFD |
| @@: or byte[popup_options+6],0x02 |
| test [options],OPTS_OPTIMSAVE |
| jnz @f |
| and byte[popup_options+6],0xFD |
| @@: or byte[popup_options+8],0x02 |
| test [options],OPTS_LINENUMS |
| jnz @f |
| and byte[popup_options+8],0xFD |
| @@: ret |