badpork/kolibrios
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

Disptest - some optimisations and code refactoring

Browse Source 
git-svn-id: svn://kolibrios.org@2474 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Marat Zakiyanov (Mario79) 2012-03-16 22:51:51 +00:00
parent b7914ab4cd
commit 97ca8b9031
1 changed files with 192 additions and 199 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

391
programs/system/disptest/trunk/disptest.ASM
View File

@ -1,9 +1,15 @@
; <--- description ---> ;------------------------------------------------------------------------------
; compiler: FASM 1.50 ; Display Test for KolibriOS
; name: Display Test ;------------------------------------------------------------------------------
; version: 0.4 ; version: 0.41
; author: barsuk ; last update: 17/03/2012
; written by: Marat Zakiyanov aka Mario79, aka Mario
; changes: some optimisations and code refactoring
;------------------------------------------------------------------------------
; compiler: FASM 1.50
; name: Display Test
; version: 0.4
; original author: barsuk
; <--- include all MeOS stuff ---> ; <--- include all MeOS stuff --->
include "lang.inc" include "lang.inc"
@ -17,21 +23,17 @@ MEOS_APP_START
; <--- start of code ---> ; <--- start of code --->
CODE CODE
mov eax, 37 mcall 37,4,cursor,2
mov ebx, 4
mov edx, 2
mov ecx, cursor
int 0x40
or eax, eax or eax, eax
jz exit jz exit
mov [cursorID], eax mov [cursorID], eax
;------------------------------------------------------------------------------
redraw:
call draw_window ; at first create and draw the window call draw_window ; at first create and draw the window
;------------------------------------------------------------------------------
wait_event: ; main cycle wait_event: ; main cycle
xor ebx, ebx xor ebx, ebx
mov eax, 10 mcall 10
int 0x40
cmp eax, 1 ; if event == 1 cmp eax, 1 ; if event == 1
je redraw ; jump to redraw handler je redraw ; jump to redraw handler
@ -41,16 +43,9 @@ CODE
je button ; jump to button handler je button ; jump to button handler
jmp wait_event ; else return to the start of main cycle jmp wait_event ; else return to the start of main cycle
;------------------------------------------------------------------------------
key: ; key event handler
redraw: ; redraw event handler mcall 2 ; get key code
call draw_window
jmp wait_event
key: ; key event handler
mov eax, 2 ; get key code
int 0x40
cmp ah, 27 cmp ah, 27
jz exit jz exit
@ -83,7 +78,7 @@ CODE
jz redraw jz redraw
jmp wait_event jmp wait_event
;------------------------------------------------------------------------------
next_test: next_test:
cmp dword [test_done], 1 cmp dword [test_done], 1
jz wait_event jz wait_event
@ -91,7 +86,7 @@ next_test:
inc dword [test_num] inc dword [test_num]
call draw_window call draw_window
jmp wait_event jmp wait_event
;------------------------------------------------------------------------------
prev_test: prev_test:
cmp dword [test_num], ebx cmp dword [test_num], ebx
jz wait_event jz wait_event
@ -100,13 +95,12 @@ prev_test:
mov dword [test_done], ebx mov dword [test_done], ebx
call draw_window call draw_window
jmp wait_event jmp wait_event
;------------------------------------------------------------------------------
toggle_info: toggle_info:
xor dword [show_info], 1 xor dword [show_info], 1
call draw_window call draw_window
jmp wait_event jmp wait_event
;------------------------------------------------------------------------------
toggle_cursor: toggle_cursor:
mov eax, cursorVisible mov eax, cursorVisible
cmp dword [eax], 0 cmp dword [eax], 0
@ -115,34 +109,27 @@ toggle_cursor:
mov dword [eax], 0 mov dword [eax], 0
mov ecx, [cursorID] mov ecx, [cursorID]
jmp .set jmp .set
;--------------------------------------
.no_cursor: .no_cursor:
mov dword [eax], 1 mov dword [eax], 1
xor ecx, ecx xor ecx, ecx
;--------------------------------------
.set: .set:
mov eax, 37 mcall 37,5
mov ebx, 5 mcall 18,15 ; çâ®¡ë ®¡­®¢¨«áï
int 0x40
mov eax, 18
mov ebx, 15
int 0x40 ; çâ®¡ë ®¡­®¢¨«áï
jmp wait_event jmp wait_event
;------------------------------------------------------------------------------
button: ; button event handler button: ; button event handler
mov eax, 17 ; get button identifier mcall 17 ; get button identifier
int 0x40
cmp ah, 1 cmp ah, 1
jne wait_event ; return if button id != 1 jne wait_event ; return if button id != 1
;--------------------------------------
exit: exit:
or eax, -1 ; exit application or eax, -1 ; exit application
int 0x40 mcall
;------------------------------------------------------------------------------
draw_window: draw_window:
mov eax, 12 ; start drawing mcall 12,1
mov ebx, 1
int 0x40
; ªãàá®à ; ªãàá®à
;mov eax, 37 ;mov eax, 37
@ -150,8 +137,8 @@ draw_window:
;mov ecx, cursorID ;mov ecx, cursorID
;int 0x40 ;int 0x40
mov eax, 14 ; screen size mcall 14 ; screen size
int 0x40
mov ebx, eax mov ebx, eax
shr ebx, 16 shr ebx, 16
mov ecx, eax mov ecx, eax
@ -161,16 +148,14 @@ draw_window:
inc ebx inc ebx
inc ecx inc ecx
mov eax, 0 ; create and draw the window xor eax, eax ; create and draw the window
mov edx, 0x01000000 mov edx, 0x01000000
mov esi, edx mov esi, edx
int 0x40 mcall
; áâ¥à¥âì £à ­¨æë ®ª­  ; áâ¥à¥âì £à ­¨æë ®ª­ 
mov eax, 13 ; £àã¡® â ª
xor edx, edx xor edx, edx
int 0x40 mcall 13 ; £àã¡® â ª
dec ebx dec ebx
dec ecx dec ecx
@ -180,30 +165,21 @@ draw_window:
jz end_of_test jz end_of_test
call eax call eax
jmp exit_draw jmp exit_draw
;--------------------------------------
end_of_test: end_of_test:
mov eax, 4 mcall 4,<8,8>,0xffffff,test_finish,test_finish.size
mov ebx, 8 * 65536 + 8
mov ecx, 0xffffff
mov edx, test_finish
mov esi, test_finish.size
int 0x40
mov dword [test_done], 1 mov dword [test_done], 1
jmp no_info jmp no_info
;--------------------------------------
exit_draw: exit_draw:
cmp dword [show_info], 1 cmp dword [show_info], 1
jnz no_info jnz no_info
; á­®¢  à §¬¥àë íªà ­  ; á­®¢  à §¬¥àë íªà ­ 
mov ebx, [screenx] mov ebx, [screenx]
mov ecx, [screeny] mov ecx, [screeny]
; ᣥ­¥à¨âì áâà®çªã á à §à¥è¥­¨¥¬ íªà ­ . <20>… ­ã¦­®, ¯®â®¬ã çâ® ¯¯æ ; ᣥ­¥à¨âì áâà®çªã á à §à¥è¥­¨¥¬ íªà ­ . <20>… ­ã¦­®, ¯®â®¬ã çâ® ¯¯æ
; ¯àאַ㣮«ì­¨ª 200å40 á ¨­ä®© ; ¯àאַ㣮«ì­¨ª 200å40 á ¨­ä®©
mov edx, 200 mov edx, 200
mov eax, 13
sub ebx, edx sub ebx, edx
shl ebx, 15 shl ebx, 15
mov bx, dx mov bx, dx
@ -211,64 +187,60 @@ exit_draw:
sub ecx, edx sub ecx, edx
shl ecx, 15 shl ecx, 15
mov cx, dx mov cx, dx
mov edx, 0xffffff mcall 13,,,0xffffff
int 0x40
xor edx, edx xor edx, edx
add ebx, 0x0000fffe ; ®ç¥­ì 㤮¡­® :)))) add ebx, 0x0000fffe ; ®ç¥­ì 㤮¡­® :))))
add ecx, 0x0000fffe add ecx, 0x0000fffe
int 0x40 mcall
; ⥪áâ ; ⥪áâ
mov eax, 4
shr ecx, 16 shr ecx, 16
mov bx, cx mov bx, cx
add ebx, 0x00010001 add ebx, 0x00010001
mov ecx, 0x80ffffff mov ecx, 0x80ffffff
mov edx, [test_num] mov edx, [test_num]
mov edx, [test_info + edx*4] mov edx, [test_info + edx*4]
int 0x40 mcall 4
add ebx, 8
mov edx, press_space
int 0x40
add ebx, 8
mov edx, press_i
int 0x40
add ebx, 8
mov edx, press_c
int 0x40
add ebx, 8
mcall ,,,press_space
add ebx, 8
mcall ,,,press_i
add ebx, 8
mcall ,,,press_c
;--------------------------------------
no_info: no_info:
mov eax, 12 ; finish drawing mcall 12,2
mov ebx, 2 ret
int 0x40 ;------------------------------------------------------------------------------
ret
; <---- procedures for various tests of display -----> ; <---- procedures for various tests of display ----->
; in: ebx = screen_width, ecx = screen_height ; in: ebx = screen_width, ecx = screen_height
;------------------------------------------------------------------------------
lsz i_image_size, ru, "Image Size and Placement" lsz i_image_size, ru, "Image Size and Placement"
db 0 db 0
;------------------------------------------------------------------------------
t_image_size: t_image_size:
mov eax, 38
mov esi, ebx mov esi, ebx
mov edi, ecx mov edi, ecx
mov edx, 0xffffff
; 6 ®â१ª®¢ ; 6 ®â१ª®¢
xor ecx, ecx xor ecx, ecx
int 0x40 mcall 38,,,0xffffff
mov ecx, edi mov ecx, edi
shl ecx, 16 shl ecx, 16
xor ebx, ebx xor ebx, ebx
int 0x40 mcall
mov ebx, esi mov ebx, esi
shl ebx, 16 shl ebx, 16
add ecx, edi add ecx, edi
int 0x40 mcall
sub ecx, edi sub ecx, edi
add ebx, esi add ebx, esi
int 0x40 mcall
; à ¬ª  £®â®¢  ; à ¬ª  £®â®¢ 
mov ebx, esi mov ebx, esi
shl ebx, 16 shl ebx, 16
@ -276,18 +248,19 @@ t_image_size:
shl ecx, 15 shl ecx, 15
mov cx, di mov cx, di
shr cx, 1 shr cx, 1
int 0x40 mcall
shr ebx, 1 shr ebx, 1
mov bx, si mov bx, si
shr bx, 1 shr bx, 1
mov ecx, edi mov ecx, edi
shl ecx, 16 shl ecx, 16
int 0x40 mcall
ret ret
;------------------------------------------------------------------------------
lsz i_grid, ru, "Grid" lsz i_grid, ru, "Grid"
db 0 db 0
;------------------------------------------------------------------------------
t_grid: t_grid:
; á¥âª  à §¬¥à®¬ ¢ 64 ¯¨ªá¥«  ; á¥âª  à §¬¥à®¬ ¢ 64 ¯¨ªá¥« 
mov eax, 38 mov eax, 38
@ -300,29 +273,32 @@ t_grid:
; £®à¨§®­â «ì­ë¥ «¨­¨¨ ; £®à¨§®­â «ì­ë¥ «¨­¨¨
shl ebx, 16 shl ebx, 16
xor ecx, ecx xor ecx, ecx
;--------------------------------------
grid_next_y: grid_next_y:
int 0x40 mcall
add ecx, ebp add ecx, ebp
cmp cx, di cmp cx, di
jnae grid_next_y jnae grid_next_y
sub ecx, 0x00010001 sub ecx, 0x00010001
int 0x40 mcall
; ¢¥à⨪ «ì­ë¥ «¨­¨¨ ; ¢¥à⨪ «ì­ë¥ «¨­¨¨
mov ecx, edi mov ecx, edi
shl ecx, 16 shl ecx, 16
xor ebx, ebx xor ebx, ebx
;--------------------------------------
grid_next_x: grid_next_x:
int 0x40 mcall
add ebx, ebp add ebx, ebp
cmp bx, si cmp bx, si
jnae grid_next_x jnae grid_next_x
sub ebx, 0x00010001 sub ebx, 0x00010001
int 0x40 mcall
ret ret
;------------------------------------------------------------------------------
lsz i_horstr, ru, "Horizontal Straightness" lsz i_horstr, ru, "Horizontal Straightness"
db 0 db 0
;------------------------------------------------------------------------------
t_horstr: t_horstr:
mov eax, 38 mov eax, 38
mov edi, ecx mov edi, ecx
@ -339,14 +315,17 @@ t_horstr:
shr ecx, 1 shr ecx, 1
mov cx, bp mov cx, bp
shr cx, 1 shr cx, 1
;--------------------------------------
hor_next_y: hor_next_y:
int 0x40 mcall
add ecx, ebp add ecx, ebp
cmp cx, di cmp cx, di
jnae hor_next_y jnae hor_next_y
ret ret
;------------------------------------------------------------------------------
lsz i_vertstr, ru, "Vertical Straightness",0 lsz i_vertstr, ru, "Vertical Straightness",0
db 0 db 0
;------------------------------------------------------------------------------
t_vertstr: t_vertstr:
mov eax, 38 mov eax, 38
mov edx, 0xffffff mov edx, 0xffffff
@ -361,25 +340,25 @@ t_vertstr:
shr ebx, 1 shr ebx, 1
mov bx, bp mov bx, bp
shr bx, 1 shr bx, 1
;--------------------------------------
vert_next_x: vert_next_x:
int 0x40 mcall
add ebx, ebp add ebx, ebp
cmp bx, si cmp bx, si
jnae vert_next_x jnae vert_next_x
ret ret
;------------------------------------------------------------------------------
lsz i_distort, ru, "Distortion",0 lsz i_distort, ru, "Distortion",0
db 0 db 0
;------------------------------------------------------------------------------
t_distort: t_distort:
mov edx, 0xffffff mov edx, 0xffffff
mov esi, ebx mov esi, ebx
mov edi, ecx mov edi, ecx
mov ebp, 3 mov ebp, 3
xor ebx, ebx xor ebx, ebx
;--------------------------------------
dist_next: dist_next:
mov eax, 38
push ebp push ebp
mov ebp, ebx mov ebp, ebx
shl ebx, 16 shl ebx, 16
@ -388,23 +367,23 @@ dist_next:
mov ecx, edi mov ecx, edi
shl ecx, 16 shl ecx, 16
or ecx, ebp or ecx, ebp
int 0x40 mcall 38
mov ebx, esi mov ebx, esi
shl ebx, 16 shl ebx, 16
mov bx, si mov bx, si
int 0x40 mcall
mov bx, bp mov bx, bp
mov ecx, ebp mov ecx, ebp
shl ecx, 16 shl ecx, 16
or ecx, ebp or ecx, ebp
int 0x40 mcall
mov ecx, edi mov ecx, edi
shl ecx, 16 shl ecx, 16
mov cx, di mov cx, di
int 0x40 mcall
mov eax, 30 mov eax, 30
sub esi, eax sub esi, eax
@ -414,11 +393,11 @@ dist_next:
pop ebp pop ebp
dec ebp dec ebp
jnz dist_next jnz dist_next
ret ret
;------------------------------------------------------------------------------
lsz i_horres, ru, "Horizontal Resolution",0 lsz i_horres, ru, "Horizontal Resolution",0
db 0 db 0
;------------------------------------------------------------------------------
t_horres: t_horres:
mov eax, 38 mov eax, 38
mov edx, 0xffffff mov edx, 0xffffff
@ -428,25 +407,30 @@ t_horres:
xor ebx, ebx xor ebx, ebx
mov edi, 0x003A003A mov edi, 0x003A003A
mov ebp, 0x00030003 mov ebp, 0x00030003
;--------------------------------------
horres_next: horres_next:
add ebx, edi add ebx, edi
int 0x40 mcall
add ebx, ebp add ebx, ebp
int 0x40 mcall
add ebx, ebp add ebx, ebp
int 0x40 mcall
add ebx, ebp add ebx, ebp
int 0x40 mcall
add ebx, ebp add ebx, ebp
int 0x40 mcall
cmp bx, si cmp bx, si
jna horres_next jna horres_next
ret ret
;------------------------------------------------------------------------------
lsz i_vertres, ru, "Vertical Resolution",0 lsz i_vertres, ru, "Vertical Resolution",0
db 0 db 0
;------------------------------------------------------------------------------
t_vertres: t_vertres:
mov eax, 38 mov eax, 38
mov edx, 0xffffff mov edx, 0xffffff
@ -456,26 +440,31 @@ t_vertres:
xor ecx, ecx xor ecx, ecx
mov ebp, 0x00030003 mov ebp, 0x00030003
mov esi, 0x002A002A mov esi, 0x002A002A
;--------------------------------------
vertres_next: vertres_next:
add ecx, esi add ecx, esi
int 0x40 mcall
add ecx, ebp add ecx, ebp
int 0x40 mcall
add ecx, ebp add ecx, ebp
int 0x40 mcall
add ecx, ebp add ecx, ebp
int 0x40 mcall
add ecx, ebp add ecx, ebp
int 0x40 mcall
add ecx, 0x00540054 add ecx, 0x00540054
cmp cx, di cmp cx, di
jna vertres_next jna vertres_next
ret ret
;------------------------------------------------------------------------------
lsz i_moire, ru, "Moire Patterns",0 lsz i_moire, ru, "Moire Patterns",0
db 0 db 0
;------------------------------------------------------------------------------
t_moire: t_moire:
mov eax, 38 mov eax, 38
mov edx, 0xffffff mov edx, 0xffffff
@ -484,23 +473,22 @@ t_moire:
mov esi, ebx mov esi, ebx
xor ebx, ebx xor ebx, ebx
mov ebp, 0x00030003 mov ebp, 0x00030003
;--------------------------------------
moire_next: moire_next:
int 0x40 mcall
add ebx, ebp add ebx, ebp
cmp bx, si cmp bx, si
jna moire_next jna moire_next
ret ret
;------------------------------------------------------------------------------
lsz i_revsharp, ru, "Reverse Video Sharpness",0 lsz i_revsharp, ru, "Reverse Video Sharpness",0
db 0 db 0
;------------------------------------------------------------------------------
t_revsharp: t_revsharp:
mov esi, ebx mov esi, ebx
mov edi, ecx mov edi, ecx
shr ecx, 1 shr ecx, 1
mov eax, 13 mcall 13,,,0xffffff
mov edx, 0xffffff
int 0x40
;   ⥯¥àì - ¨­¢¥àá­ë¥ «¨­¨¨ ;   ⥯¥àì - ¨­¢¥àá­ë¥ «¨­¨¨
mov eax, 38 mov eax, 38
mov ecx, edi mov ecx, edi
@ -508,68 +496,71 @@ t_revsharp:
xor ebx, ebx xor ebx, ebx
mov ebp, 0x00010001 mov ebp, 0x00010001
mov edi, 0x003F003F mov edi, 0x003F003F
;--------------------------------------
revsharp_next: revsharp_next:
add ebx, edi add ebx, edi
int 0x40 mcall
add ebx, ebp add ebx, ebp
int 0x40 mcall
add ebx, ebp add ebx, ebp
int 0x40 mcall
add ebx, edi add ebx, edi
sub ebx, ebp sub ebx, ebp
int 0x40 mcall
cmp bx, si cmp bx, si
jna revsharp_next jna revsharp_next
ret ret
;------------------------------------------------------------------------------
lsz i_flicker, ru, "Flicker Severity",0 lsz i_flicker, ru, "Flicker Severity",0
db 0 db 0
;------------------------------------------------------------------------------
t_flicker: t_flicker:
mov eax, 13 mcall 13,,,0xffffff
mov edx, 0xffffff
int 0x40
ret ret
;------------------------------------------------------------------------------
lsz i_glare, ru, "Glare Severity",0 lsz i_glare, ru, "Glare Severity",0
db 0 db 0
;------------------------------------------------------------------------------
t_glare: ; ®¯â¨¬¨§¨à®¢ âì ­¥ç¥£® t_glare: ; ®¯â¨¬¨§¨à®¢ âì ­¥ç¥£®
ret ret
;------------------------------------------------------------------------------
lsz i_interlace, ru, "Interlacing Detection",0 lsz i_interlace, ru, "Interlacing Detection",0
db 0 db 0
;------------------------------------------------------------------------------
t_interlace: t_interlace:
mov edi, ecx mov edi, ecx
mov eax, 38 mov eax, 38
mov edx, 0xffffff mov edx, 0xffffff
xor ecx, ecx xor ecx, ecx
mov ebp, 0x00020002 mov ebp, 0x00020002
;--------------------------------------
interlace_next: interlace_next:
add ecx, ebp add ecx, ebp
int 0x40 mcall
cmp cx, di cmp cx, di
jna interlace_next jna interlace_next
ret ret
;------------------------------------------------------------------------------
lsz i_scrreg, ru, "Screen Regulation",0 lsz i_scrreg, ru, "Screen Regulation",0
db 0 db 0
;------------------------------------------------------------------------------
t_scrreg: t_scrreg:
mov eax, 13
mov edx, 0xffffff
add ebx, 0x0018FFCD ; +25 ª ­ ç «ã ¨ -50 ®â ¤«¨­ë add ebx, 0x0018FFCD ; +25 ª ­ ç «ã ¨ -50 ®â ¤«¨­ë
shr ecx, 1 shr ecx, 1
add ecx, 0x0013FFEC ; +19 ª ­ ç «ã ¨ -19 ®â ¤«¨­ë add ecx, 0x0013FFEC ; +19 ª ­ ç «ã ¨ -19 ®â ¤«¨­ë
int 0x40 mcall 13,,,0xffffff
ret ret
;------------------------------------------------------------------------------
lsz i_pricol, ru, "Primary Color Purity" lsz i_pricol, ru, "Primary Color Purity"
db 0 db 0
;------------------------------------------------------------------------------
t_pricol: t_pricol:
mov esi, ebx mov esi, ebx
mov edi, ecx mov edi, ecx
mov eax, 13
shr ebx, 4 ; /16 shr ebx, 4 ; /16
mov ebp, ebx mov ebp, ebx
@ -584,21 +575,20 @@ t_pricol:
;shr cx, 1 ;shr cx, 1
shl bx, 2 shl bx, 2
mov edx, 0xff0000 mcall 13,,,0xff0000
int 0x40
add ebx, ebp add ebx, ebp
shr edx, 8 shr edx, 8
int 0x40 mcall
add ebx, ebp add ebx, ebp
shr edx, 8 shr edx, 8
int 0x40 mcall
ret ret
;------------------------------------------------------------------------------
lsz i_colint, ru, "Color Intensity Gradient" lsz i_colint, ru, "Color Intensity Gradient"
db 0 db 0
;------------------------------------------------------------------------------
t_colint: t_colint:
mov esi, ebx mov esi, ebx
@ -652,15 +642,16 @@ t_colint:
mov dword [color_index], 0 mov dword [color_index], 0
jmp colint_next jmp colint_next
;------------------------------------------------------------------------------
color_table dd 0x00ff0000, 0x0000ff00, 0x00ffff00, \ color_table dd 0x00ff0000, 0x0000ff00, 0x00ffff00, \
0x000000ff, 0x00ff00ff, 0x0000ffff, 0x00ffffff 0x000000ff, 0x00ff00ff, 0x0000ffff, 0x00ffffff
color_index dd 0 color_index dd 0
;------------------------------------------------------------------------------
colint_next: colint_next:
xor edx, edx xor edx, edx
xor ebx, ebx xor ebx, ebx
mov eax, 38 mov eax, 38
;--------------------------------------
colint_next_line: colint_next_line:
push edx push edx
push eax push eax
@ -672,7 +663,7 @@ colint_next_line:
mov eax, [color_table + eax * 4] mov eax, [color_table + eax * 4]
and edx, eax and edx, eax
pop eax pop eax
int 0x40 mcall
pop edx pop edx
add ebx, 0x00010001 add ebx, 0x00010001
add edx, edi add edx, edi
@ -683,13 +674,12 @@ colint_next_line:
inc dword [color_index] inc dword [color_index]
cmp dword [color_index], 7 cmp dword [color_index], 7
jb colint_next jb colint_next
ret ret
;------------------------------------------------------------------------------
lsz i_colalign, ru, "Color Alignment Grid" lsz i_colalign, ru, "Color Alignment Grid"
db 0 db 0
;------------------------------------------------------------------------------
t_colalign: t_colalign:
; ªà á­ ï á¥âª  ; ªà á­ ï á¥âª 
inc ebx ; â ª ­ã¦­® inc ebx ; â ª ­ã¦­®
inc ecx inc ecx
@ -707,14 +697,15 @@ t_colalign:
pop edi pop edi
mov [yshift], ebp mov [yshift], ebp
mov eax, 38 mov eax, 38
;--------------------------------------
cgrid_next_y: cgrid_next_y:
int 0x40 mcall
add ecx, ebp add ecx, ebp
cmp cx, di cmp cx, di
jnae cgrid_next_y jnae cgrid_next_y
; ¯®á«¥¤­ïï «¨­¨ï: ; ¯®á«¥¤­ïï «¨­¨ï:
sub ecx, 0x00010001 sub ecx, 0x00010001
int 0x40 mcall
; ¢¥à⨪ «ì­ë¥ «¨­¨¨ ; ¢¥à⨪ «ì­ë¥ «¨­¨¨
mov ecx, edi mov ecx, edi
@ -728,19 +719,21 @@ cgrid_next_y:
mov [xshift], ebp mov [xshift], ebp
pop esi pop esi
mov eax, 38 mov eax, 38
;--------------------------------------
cgrid_next_x: cgrid_next_x:
int 0x40 mcall
add ebx, ebp add ebx, ebp
cmp bx, si cmp bx, si
jnae cgrid_next_x jnae cgrid_next_x
; ¯®á«¥¤­ïï «¨­¨ï ; ¯®á«¥¤­ïï «¨­¨ï
sub ebx, 0x00010001 sub ebx, 0x00010001
int 0x40 mcall
jmp cgrid_green jmp cgrid_green
;------------------------------------------------------------------------------
xshift dd 0 xshift dd 0
yshift dd 0 yshift dd 0
shift dd 0 shift dd 0
;------------------------------------------------------------------------------
cgrid_green: cgrid_green:
; §¥«¥­ë¥ «¨­¨¨: £®à¨§®­â «ì­ë¥ ; §¥«¥­ë¥ «¨­¨¨: £®à¨§®­â «ì­ë¥
mov edx, esi mov edx, esi
@ -753,15 +746,17 @@ cgrid_green:
mov edx, 0x00ff00 mov edx, 0x00ff00
xor ecx, ecx xor ecx, ecx
mov ebp, [xshift] mov ebp, [xshift]
;--------------------------------------
ggrid_next_yy: ggrid_next_yy:
mov ebx, [shift] mov ebx, [shift]
;--------------------------------------
ggrid_next_yx: ggrid_next_yx:
int 0x40 mcall
add ebx, ebp add ebx, ebp
cmp bx, si cmp bx, si
jnae ggrid_next_yx jnae ggrid_next_yx
sub ebx, 0x00010001 sub ebx, 0x00010001
int 0x40 mcall
add ecx, [yshift] add ecx, [yshift]
cmp cx, di cmp cx, di
@ -769,8 +764,9 @@ ggrid_next_yx:
; last row of lines ; last row of lines
mov ebx, [shift] mov ebx, [shift]
dec ecx dec ecx
;--------------------------------------
ggrid_last_yx: ggrid_last_yx:
int 0x40 mcall
add ebx, ebp add ebx, ebp
cmp bx, si cmp bx, si
jnae ggrid_last_yx jnae ggrid_last_yx
@ -787,35 +783,36 @@ ggrid_last_yx:
mov edx, 0x00ff00 mov edx, 0x00ff00
mov ecx, [shift] mov ecx, [shift]
mov ebp, [xshift] mov ebp, [xshift]
;--------------------------------------
ggrid_next_xy: ggrid_next_xy:
xor ebx, ebx xor ebx, ebx
;--------------------------------------
ggrid_next_xx: ggrid_next_xx:
int 0x40 mcall
add ebx, ebp add ebx, ebp
cmp bx, si cmp bx, si
jnae ggrid_next_xx jnae ggrid_next_xx
sub ebx, 0x00010001 sub ebx, 0x00010001
int 0x40 mcall
add ecx, [yshift] add ecx, [yshift]
cmp cx, di cmp cx, di
jnae ggrid_next_xy jnae ggrid_next_xy
xor ebx, ebx xor ebx, ebx
dec ecx dec ecx
;--------------------------------------
ggrid_last_xy: ggrid_last_xy:
;int 0x40 ;int 0x40
;add ebx, ebp ;add ebx, ebp
;cmp bx, si ;cmp bx, si
;jnae ggrid_last_xy ;jnae ggrid_last_xy
ret ret
;------------------------------------------------------------------------------
lsz i_colsyn, ru, "Color Synchronization" lsz i_colsyn, ru, "Color Synchronization"
db 0 db 0
;------------------------------------------------------------------------------
t_colsyn: t_colsyn:
inc ebx inc ebx
inc ecx inc ecx
mov esi, ebx mov esi, ebx
@ -833,22 +830,19 @@ t_colsyn:
mov edi, 0x0000ffff mov edi, 0x0000ffff
add ecx, 0x003FFF7F add ecx, 0x003FFF7F
mov edx, edi mov edx, edi
mov eax, 13 mcall 13
int 0x40
mov edx, 0x00ff0000 mov edx, 0x00ff0000
add ebx, ebp add ebx, ebp
int 0x40 mcall
mov edx, edi mov edx, edi
add ebx, ebp add ebx, ebp
int 0x40 mcall
ret ret
;------------------------------------------------------------------------------
; <--- initialised data ---> ; <--- initialised data --->
DATA DATA
screenx dd 0 screenx dd 0
screeny dd 0 screeny dd 0
@ -877,11 +871,10 @@ DATA
cursorVisible dd 1 cursorVisible dd 1
cursorID dd 0 cursorID dd 0
;------------------------------------------------------------------------------
; <--- uninitialised data ---> ; <--- uninitialised data --->
UDATA UDATA
;------------------------------------------------------------------------------
MEOS_APP_END MEOS_APP_END
; <--- end of MenuetOS application ---> ; <--- end of MenuetOS application --->
;------------------------------------------------------------------------------