forked from KolibriOS/kolibrios
MAGNIFY - checking for "rolled up" window
git-svn-id: svn://kolibrios.org@2063 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
bb83b1c926
commit
1dd5e58c1c
@ -1,5 +1,6 @@
|
|||||||
@erase lang.inc
|
@erase lang.inc
|
||||||
@echo lang fix en >lang.inc
|
@echo lang fix en >lang.inc
|
||||||
@fasm magnify.asm magnify
|
@fasm magnify.asm magnify
|
||||||
|
@kpack magnify
|
||||||
@erase lang.inc
|
@erase lang.inc
|
||||||
@pause
|
@pause
|
@ -1,5 +1,6 @@
|
|||||||
@erase lang.inc
|
@erase lang.inc
|
||||||
@echo lang fix ru >lang.inc
|
@echo lang fix ru >lang.inc
|
||||||
@fasm magnify.asm magnify
|
@fasm magnify.asm magnify
|
||||||
|
@kpack magnify
|
||||||
@erase lang.inc
|
@erase lang.inc
|
||||||
@pause
|
@pause
|
@ -1,13 +1,16 @@
|
|||||||
|
;---------------------------------------------------------------------
|
||||||
|
; MAGNIFY SCREEN v1.0
|
||||||
;
|
;
|
||||||
; MAGNIFY SCREEN
|
; Version for KolibriOS 2005-2011
|
||||||
;
|
;
|
||||||
; Compile with FASM for Menuet
|
; Version for Menuet to 2005
|
||||||
;
|
;---------------------------------------------------------------------
|
||||||
|
; last update: 08/18/2011
|
||||||
|
; changed by: Marat Zakiyanov aka Mario79, aka Mario
|
||||||
|
; changes: Checking for "rolled up" window
|
||||||
|
;---------------------------------------------------------------------
|
||||||
use32
|
use32
|
||||||
|
|
||||||
org 0x0
|
org 0x0
|
||||||
|
|
||||||
db 'MENUET01' ; 8 byte id
|
db 'MENUET01' ; 8 byte id
|
||||||
dd 1 ; header version
|
dd 1 ; header version
|
||||||
dd START ; program start
|
dd START ; program start
|
||||||
@ -15,22 +18,21 @@ use32
|
|||||||
dd 0x1000 ; required amount of memory
|
dd 0x1000 ; required amount of memory
|
||||||
dd 0x1000 ; esp
|
dd 0x1000 ; esp
|
||||||
dd 0, 0 ; no parameters, no path
|
dd 0, 0 ; no parameters, no path
|
||||||
|
;---------------------------------------------------------------------
|
||||||
|
include 'lang.inc'
|
||||||
include '..\..\..\macros.inc'
|
include '..\..\..\macros.inc'
|
||||||
delay equ 20
|
delay equ 20
|
||||||
|
|
||||||
magnify_width = 40
|
magnify_width = 40
|
||||||
magnify_height = 30
|
magnify_height = 30
|
||||||
|
;---------------------------------------------------------------------
|
||||||
START: ; start of execution
|
START: ; start of execution
|
||||||
redraw:
|
redraw:
|
||||||
call draw_window
|
call draw_window
|
||||||
still:
|
still:
|
||||||
call draw_screen
|
call draw_magnify
|
||||||
wtevent:
|
wtevent:
|
||||||
mov eax, 23 ; wait here for event with timeout
|
mcall 23,delay ; wait here for event with timeout
|
||||||
mov ebx, delay
|
|
||||||
mcall
|
|
||||||
dec eax
|
dec eax
|
||||||
js still
|
js still
|
||||||
jz redraw
|
jz redraw
|
||||||
@ -40,24 +42,20 @@ wtevent:
|
|||||||
mov al, 2
|
mov al, 2
|
||||||
mcall
|
mcall
|
||||||
jmp wtevent
|
jmp wtevent
|
||||||
|
;---------------------------------------------------------------------
|
||||||
button:
|
button:
|
||||||
; we have only one button, close
|
; we have only one button, close
|
||||||
or eax, -1
|
or eax, -1
|
||||||
mcall
|
mcall
|
||||||
|
;---------------------------------------------------------------------
|
||||||
; *********************************************
|
|
||||||
; ******* WINDOW DEFINITIONS AND DRAW ********
|
; ******* WINDOW DEFINITIONS AND DRAW ********
|
||||||
; *********************************************
|
;---------------------------------------------------------------------
|
||||||
|
|
||||||
draw_window:
|
draw_window:
|
||||||
mov eax, 12 ; function 12:tell os about windowdraw
|
mcall 12,1
|
||||||
mov ebx, 1 ; 1, start of draw
|
|
||||||
mcall
|
|
||||||
|
|
||||||
mov al, 48 ; function 48 : graphics parameters
|
mov al, 48 ; function 48 : graphics parameters
|
||||||
mov bl, 4 ; subfunction 4 : get skin height
|
mov bl, 4 ; subfunction 4 : get skin height
|
||||||
mcall
|
mcall
|
||||||
|
|
||||||
; DRAW WINDOW
|
; DRAW WINDOW
|
||||||
mov ebx, 100*65536 + 8*magnify_width + 8
|
mov ebx, 100*65536 + 8*magnify_width + 8
|
||||||
lea ecx, [eax + 100*65536 + 8*magnify_height + 3]
|
lea ecx, [eax + 100*65536 + 8*magnify_height + 3]
|
||||||
@ -66,17 +64,16 @@ draw_window:
|
|||||||
xor eax, eax ; function 0 : define and draw window
|
xor eax, eax ; function 0 : define and draw window
|
||||||
mcall
|
mcall
|
||||||
|
|
||||||
|
mcall 12,2
|
||||||
mov al, 12 ; function 12:tell os about windowdraw
|
|
||||||
mov ebx, 2 ; 2, end of draw
|
|
||||||
mcall
|
|
||||||
|
|
||||||
ret
|
ret
|
||||||
|
;---------------------------------------------------------------------
|
||||||
draw_screen:
|
|
||||||
draw_magnify:
|
draw_magnify:
|
||||||
mov eax, 14
|
mcall 9,procinfo,-1
|
||||||
mcall ; get screen size
|
mov eax,[procinfo+70] ;status of window
|
||||||
|
test eax,100b
|
||||||
|
jne .end
|
||||||
|
|
||||||
|
mcall 14 ; get screen size
|
||||||
movzx ecx, ax
|
movzx ecx, ax
|
||||||
inc ecx
|
inc ecx
|
||||||
mov [size_y], ecx
|
mov [size_y], ecx
|
||||||
@ -84,9 +81,8 @@ draw_magnify:
|
|||||||
inc eax
|
inc eax
|
||||||
mov [size_x], eax
|
mov [size_x], eax
|
||||||
|
|
||||||
mov eax, 37
|
|
||||||
xor ebx, ebx
|
xor ebx, ebx
|
||||||
mcall ; get mouse coordinates
|
mcall 37 ; get mouse coordinates
|
||||||
mov ecx, eax
|
mov ecx, eax
|
||||||
shr ecx, 16 ; ecx = x
|
shr ecx, 16 ; ecx = x
|
||||||
movzx edx, ax ; edx = y
|
movzx edx, ax ; edx = y
|
||||||
@ -112,8 +108,7 @@ draw_magnify:
|
|||||||
mov ebx, edx
|
mov ebx, edx
|
||||||
imul ebx, [size_x]
|
imul ebx, [size_x]
|
||||||
add ebx, ecx
|
add ebx, ecx
|
||||||
mov eax, 35
|
mcall 35 ; read pixel
|
||||||
mcall ; read pixel
|
|
||||||
.nopix:
|
.nopix:
|
||||||
push ecx edx
|
push ecx edx
|
||||||
sub ecx, [m_x]
|
sub ecx, [m_x]
|
||||||
@ -125,8 +120,7 @@ draw_magnify:
|
|||||||
shl ecx, 3+16
|
shl ecx, 3+16
|
||||||
mov cl, 7
|
mov cl, 7
|
||||||
mov edx, eax
|
mov edx, eax
|
||||||
mov eax, 13
|
mcall 13
|
||||||
mcall
|
|
||||||
pop edx ecx
|
pop edx ecx
|
||||||
inc ecx
|
inc ecx
|
||||||
cmp ecx, [m_xe]
|
cmp ecx, [m_xe]
|
||||||
@ -135,12 +129,18 @@ draw_magnify:
|
|||||||
inc edx
|
inc edx
|
||||||
cmp edx, [m_ye]
|
cmp edx, [m_ye]
|
||||||
jnz .loop_y
|
jnz .loop_y
|
||||||
|
.end:
|
||||||
ret
|
ret
|
||||||
|
;---------------------------------------------------------------------
|
||||||
; DATA AREA
|
; DATA AREA
|
||||||
|
;---------------------------------------------------------------------
|
||||||
|
if lang eq ru
|
||||||
|
labelt:
|
||||||
|
db 'MAGNIFIER - „‚ˆƒ€‰’… Š“<C5A0>‘Ž<E28098> Œ›˜ˆ', 0
|
||||||
|
else
|
||||||
labelt:
|
labelt:
|
||||||
db 'MAGNIFIER - MOVE MOUSE POINTER', 0
|
db 'MAGNIFIER - MOVE MOUSE POINTER', 0
|
||||||
|
end if
|
||||||
|
|
||||||
I_END:
|
I_END:
|
||||||
align 4
|
align 4
|
||||||
@ -150,3 +150,7 @@ m_xe dd ?
|
|||||||
m_ye dd ?
|
m_ye dd ?
|
||||||
size_x dd ?
|
size_x dd ?
|
||||||
size_y dd ?
|
size_y dd ?
|
||||||
|
;---------------------------------------------------------------------
|
||||||
|
procinfo:
|
||||||
|
rb 1024
|
||||||
|
;---------------------------------------------------------------------
|
Loading…
Reference in New Issue
Block a user