235 lines
5.6 KiB
NASM
235 lines
5.6 KiB
NASM
; SPDX-License-Identifier: GPL-2.0-only
|
|
;
|
|
; Magnify - Screen Magnifier
|
|
; Copyright (C) 2005-2025 MenuetOS, KolibriOS team
|
|
;
|
|
; Contributor MenuetOS - Main code
|
|
; Contributor Mario - Checking for "rolled up" window
|
|
; Contributor Leency - Display of grid between pixels
|
|
; Contributor Burer - Massive code refactoring and logic update
|
|
|
|
;---------------------------------------------------------------------
|
|
|
|
use32
|
|
org 0x0
|
|
|
|
db 'MENUET01'
|
|
dd 1
|
|
dd START
|
|
dd I_END
|
|
dd MEM
|
|
dd STACKTOP
|
|
dd 0, 0
|
|
|
|
;---------------------------------------------------------------------
|
|
|
|
include '../../../macros.inc'
|
|
include "../../../KOSfuncs.inc"
|
|
include "../../../encoding.inc"
|
|
|
|
;---------------------------------------------------------------------
|
|
|
|
START:
|
|
mcall SF_SET_EVENTS_MASK, 0x00000027
|
|
|
|
mcall SF_SYS_MISC, SSF_HEAP_INIT
|
|
|
|
; initializing MAG_H * MAG_W rect of pixels from screen
|
|
mcall SF_SYS_MISC, SSF_MEM_ALLOC, MAG_H * MAG_W * 3
|
|
mov [screen_rect], eax
|
|
|
|
call logic_read_screen
|
|
|
|
still:
|
|
mcall SF_WAIT_EVENT_TIMEOUT, DELAY
|
|
|
|
cmp eax, 1
|
|
je redraw
|
|
|
|
cmp eax, 3
|
|
je button
|
|
|
|
cmp eax, 6
|
|
je mouse
|
|
|
|
jmp redraw
|
|
|
|
redraw:
|
|
call draw_window
|
|
call draw_magnify
|
|
|
|
jmp still
|
|
|
|
;---------------------------------------------------------------------
|
|
|
|
button:
|
|
; we have only one button, close
|
|
or eax, SF_TERMINATE_PROCESS
|
|
mcall
|
|
|
|
mouse:
|
|
mcall SF_MOUSE_GET, SSF_BUTTON
|
|
test ax, 0x0001
|
|
jz .move
|
|
jmp still
|
|
|
|
.move:
|
|
call logic_read_screen
|
|
call draw_magnify
|
|
|
|
jmp still
|
|
|
|
;---------------------------------------------------------------------
|
|
; ******* WINDOW DEFINITIONS AND DRAW ********
|
|
;---------------------------------------------------------------------
|
|
|
|
draw_window:
|
|
|
|
mcall SF_REDRAW, SSF_BEGIN_DRAW
|
|
|
|
mcall SF_STYLE_SETTINGS, SSF_GET_SKIN_HEIGHT
|
|
|
|
mov ecx, eax
|
|
add ecx, WIN.Y shl 16 + WIN.H
|
|
|
|
mcall SF_CREATE_WINDOW, <WIN.X, WIN.W>, , 0x34181818, , labelt
|
|
|
|
mcall SF_REDRAW, SSF_END_DRAW
|
|
|
|
ret
|
|
|
|
|
|
; MAG_H * MAG_W pixels grid
|
|
draw_magnify:
|
|
|
|
mcall SF_THREAD_INFO, WIN_INFO, -1
|
|
mov al, byte [WIN_INFO + 70]
|
|
test al, 0x04
|
|
jne .du_loop_end
|
|
|
|
mov eax, SF_DRAW_RECT
|
|
mov ebx, MAG_S - 1
|
|
mov ecx, MAG_S - 1
|
|
mov esi, [screen_rect]
|
|
mov edi, MAG_W * MAG_H
|
|
|
|
.du_loop_rect:
|
|
mcall , , , dword [esi]
|
|
add ebx, MAG_S shl 16
|
|
cmp ebx, MAG_S * MAG_W shl 16
|
|
jle .du_loop_rect_row
|
|
mov ebx, MAG_S - 1
|
|
add ecx, MAG_S shl 16
|
|
|
|
.du_loop_rect_row:
|
|
add esi, 3
|
|
dec edi
|
|
jne .du_loop_rect
|
|
|
|
.du_loop_end:
|
|
ret
|
|
|
|
;---------------------------------------------------------------------
|
|
; LOGIC AREA
|
|
;---------------------------------------------------------------------
|
|
|
|
; read array of pixels from screen by mouse coords
|
|
logic_read_screen:
|
|
|
|
mcall SF_MOUSE_GET, SSF_SCREEN_POSITION
|
|
mov edx, eax
|
|
|
|
; clamping mouse coords to stay within the screen
|
|
mcall SF_GET_SCREEN_SIZE
|
|
mov ebx, eax
|
|
call logic_clamp_pixels
|
|
|
|
sub edx, (MAG_W / 2) shl 16 + (MAG_H / 2)
|
|
mcall SF_GET_IMAGE, [screen_rect], <MAG_W, MAG_H>,
|
|
|
|
ret
|
|
|
|
|
|
; clamping mouse coords to stay within the screen
|
|
logic_clamp_pixels:
|
|
|
|
mov eax, edx
|
|
shr eax, 16
|
|
mov cx, ax
|
|
mov ax, dx
|
|
|
|
push ax
|
|
push cx
|
|
mov ax, bx
|
|
mov di, ax
|
|
mov eax, ebx
|
|
shr eax, 16
|
|
mov si, ax
|
|
|
|
pop cx
|
|
pop ax
|
|
|
|
.check_min_x:
|
|
cmp cx, MAG_W / 2
|
|
jge .check_min_y
|
|
mov cx, MAG_W / 2
|
|
.check_min_y:
|
|
cmp ax, MAG_H / 2
|
|
jge .check_max_x
|
|
mov ax, MAG_H / 2
|
|
.check_max_x:
|
|
mov dx, si
|
|
sub dx, MAG_W / 2 - 1
|
|
cmp cx, dx
|
|
jle .check_max_y
|
|
mov cx, dx
|
|
.check_max_y:
|
|
mov dx, di
|
|
sub dx, MAG_H / 2 - 1
|
|
cmp ax, dx
|
|
jle .combine_coords
|
|
mov ax, dx
|
|
|
|
.combine_coords:
|
|
mov dx, cx
|
|
shl edx, 16
|
|
or dx, ax
|
|
|
|
ret
|
|
|
|
;---------------------------------------------------------------------
|
|
; DATA AREA
|
|
;---------------------------------------------------------------------
|
|
|
|
DELAY = 5
|
|
|
|
MAG_W = 40
|
|
MAG_H = 30
|
|
MAG_S = 8
|
|
|
|
WIN RECT 100, 100, MAG_W * MAG_S + 8, MAG_H * MAG_S + 3
|
|
|
|
;---------------------------------------------------------------------
|
|
|
|
if lang eq ru_RU
|
|
labelt cp866 'Magnify - Экранная лупа', 0
|
|
else if lang eq es_ES
|
|
labelt db 'Magnify - Lupa de Pantalla', 0
|
|
else
|
|
labelt db 'Magnify - Screen Magnifier', 0
|
|
endf
|
|
|
|
;---------------------------------------------------------------------
|
|
|
|
screen_rect dd 0x00000000
|
|
|
|
;---------------------------------------------------------------------
|
|
|
|
I_END:
|
|
rb 512
|
|
align 512
|
|
|
|
STACKTOP:
|
|
WIN_INFO rb 1024
|
|
MEM:
|