Sweetbread/kolibrios
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Issues Pull Requests Actions Activity

MGB - fix "benchmark GS selector" for 16bpp (support SVN r.5154)

Browse Source 
git-svn-id: svn://kolibrios.org@5160 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Marat Zakiyanov (Mario79) 2014-11-03 14:44:07 +00:00
parent 755cc27ea4
commit 6a4e004d0f
1 changed files with 58 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

60
programs/system/mgb/trunk/mgb.asm
View File

@ -1,10 +1,15 @@
;=============================================================================
; Kolibri Graphics Benchmark 0.81
; Kolibri Graphics Benchmark 0.82
;--------------------------------------
; MGB - Menuet Graphics Benchmark 0.3
; Compile with FASM
;
;=============================================================================
; version: 0.82
; last update: 03/11/2014
; written by: Marat Zakiyanov aka Mario79, aka Mario
; changes: fix "benchmark GS selector" for 16bpp (support SVN r.5154)
;---------------------------------------------------------------------
; version: 0.81
; last update: 01/05/2014
; written by: Marat Zakiyanov aka Mario79, aka Mario
@ -374,6 +379,9 @@ testGetScreen_GS:
mcall 61,2
cmp eax,24
je get_area_with_GS_24
cmp eax,16
je get_area_with_GS_16
;-----------------------------------------------------------------------------
align 4
get_area_with_GS_32:
@ -458,6 +466,54 @@ align 4
ret
;-----------------------------------------------------------------------------
align 4
get_area_with_GS_16:
mcall 61,3
mov ebx,eax
mov esi,GS_start_y
imul esi,eax
mov eax,GS_start_x
shl eax,1
add esi,eax
mov ebp,GS_size_x
mov eax,ebp
shl eax,1
sub ebx,eax
mov edx,GS_size_y
sub esi,ebx
;--------------------------------------
align 4
.start_y:
add esi,ebx
mov ecx,ebp
;--------------------------------------
align 4
.start_x:
xor eax,eax
mov ax,[gs:esi]
shl eax, 3
ror eax, 8
shl ax, 2
ror eax, 8
shl al, 3
rol eax, 16
mov [edi],eax
add esi,2
add edi,3
dec ecx
jnz .start_x
dec edx
jnz .start_y
pop edi
ret
;-----------------------------------------------------------------------------
align 4
testDrawVertLine:
mcall 38,<300,300>,<30,380>,1090207Fh
ret
@ -760,7 +816,7 @@ if lang eq it
aTestText db 'This is a 34-charachters test text'
aButtonsText db 'Test Commenti Pattern+ Apri Salva',0
aCaption db 'Kolibri Graphical Benchmark 0.81',0
aCaption db 'Kolibri Graphical Benchmark 0.82',0
aLeft db 'Sinistra:',0
aRight db 'Destra :',0