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 [mm.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],mm.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,[cur_editor.TopLeft.Y] ;! eax,[top_line] mov ebx,eax pop eax cdq;xor edx,edx mov ecx,6 idiv ecx @@: add eax,[cur_editor.TopLeft.X] ;! eax,[left_col] cmp eax,[cur_editor.Columns.Count] ;! eax,[columns] jl @f mov eax,[cur_editor.Columns.Count] ;! eax,[columns] @@: cmp ebx,[cur_editor.Lines.Count] ;! ebx,[lines] jl @f mov ebx,[cur_editor.Lines.Count] ;! ebx,[lines] dec ebx @@: cmp [cur_editor.Caret.X],eax ;! [pos.x],eax jne .change_cur_pos cmp [cur_editor.Caret.Y],ebx ;! [pos.y],ebx je still.skip_write .change_cur_pos: mov [cur_editor.Caret.X],eax ;! [pos.x],eax mov eax,[cur_editor.Caret.Y] ;! eax,[pos.y] mov [cur_editor.Caret.Y],ebx ;! [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,[cur_editor.VScroll.Top] ;! eax,[vscrl_top] cmp ebx,eax jb .center_vcapture add eax,[cur_editor.VScroll.Size] ;! eax,[vscrl_size] cmp ebx,eax jae .center_vcapture mov eax,ebx sub eax,[cur_editor.VScroll.Top] ;! eax,[vscrl_top] dec eax mov [vscrl_capt],eax dec ebx jmp .vcaptured .center_vcapture: mov eax,[cur_editor.VScroll.Size] ;! 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,[cur_editor.VScroll.Size] ;! eax,[vscrl_size] sub eax,SCRLW*3-2 cmp eax,ebx jge @f mov ebx,eax @@: mov [cur_editor.VScroll.Top],ebx ;! [vscrl_top],ebx mov eax,[cur_editor.Lines.Count] ;! eax,[lines] sub eax,[lines.scr] imul ebx mov ebx,[bot_ofs] sub ebx,[top_ofs] sub ebx,SCRLW*3-2 ;** sub ebx,[cur_editor.VScroll.Size] ;! ebx,[vscrl_size] idiv ebx cmp eax,[cur_editor.TopLeft.Y] ;! eax,[top_line] je still.skip_write mov [cur_editor.TopLeft.Y],eax ;! [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,[cur_editor.HScroll.Top] ;! eax,[hscrl_top] cmp ebx,eax jl .center_hcapture add eax,[cur_editor.HScroll.Size] ;! eax,[hscrl_size] cmp ebx,eax jge .center_hcapture mov eax,ebx sub eax,[cur_editor.HScroll.Top] ;! eax,[hscrl_top] dec eax mov [hscrl_capt],eax dec ebx jmp .hcaptured .center_hcapture: mov eax,[cur_editor.HScroll.Size] ;! 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,[cur_editor.HScroll.Size] ;! eax,[hscrl_size] sub eax,SCRLW*3+10+1 cmp eax,ebx jge @f mov ebx,eax @@: mov [cur_editor.HScroll.Top],ebx ;! [hscrl_top],ebx mov eax,[cur_editor.Columns.Count] ;! eax,[columns] sub eax,[columns.scr] imul ebx mov ebx,[p_info.box.width] sub ebx,SCRLW*3+10+1 ;** sub ebx,[cur_editor.HScroll.Size] ;! ebx,[hscrl_size] idiv ebx cmp eax,[cur_editor.TopLeft.X] ;! eax,[left_col] je still.skip_write mov [cur_editor.TopLeft.X],eax ;! [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