Subversion Repositories Kolibri OS

Rev

Rev 3628 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3628 Rev 3782
Line 3... Line 3...
3 
;--------------------------------------
 3 
;--------------------------------------
4 
; MGB - Menuet Graphics Benchmark 0.3
 4 
; MGB - Menuet Graphics Benchmark 0.3
5 
; Compile with FASM
 5 
; Compile with FASM
6 
;
 6 
;
7 
;=============================================================================
 7 
;=============================================================================
- 
 
 8 
; version:	0.8
- 
 
 9 
; last update:  08/07/2013
- 
 
 10 
; written by:   Marat Zakiyanov aka Mario79, aka Mario
- 
 
 11 
; changes:      benchmark f4 with memory + f65
- 
 
 12 
;---------------------------------------------------------------------
8 
; version:	0.7
 13 
; version:	0.7
9 
; last update:  05/04/2013
 14 
; last update:  05/04/2013
10 
; written by:   Marat Zakiyanov aka Mario79, aka Mario
 15 
; written by:   Marat Zakiyanov aka Mario79, aka Mario
11 
; changes:      benchmark GS selector - read screen area
 16 
; changes:      benchmark GS selector - read screen area
12 
;---------------------------------------------------------------------
 17 
;---------------------------------------------------------------------
Line 68... Line 73...
68 
	@use_library
 73 
	@use_library
69 
;---------------------------------------------------------------------
 74 
;---------------------------------------------------------------------
70 
start:
 75 
start:
71 
	mcall	68,11
 76 
	mcall	68,11
Line -... Line 77...
- 
 
 77 
 
- 
 
 78 
	mcall	68,12,8+9*6*38*4	; 7352
- 
 
 79 
	mov	[text_scren_buffer],eax
- 
 
 80 
 
- 
 
 81 
	mcall	68,12,8+9*6*38*4	; 8216
- 
 
 82 
	mov	[text_scren_buffer2],eax
72 
 
 83
Line 73... Line 84...
73 
load_libraries l_libs_start,end_l_libs
 84 
load_libraries l_libs_start,end_l_libs
74 
 
 85 
 
75 
	cmp	eax,-1
 86 
	cmp	eax,-1
Line 443... Line 454...
443 
	mcall	38,<30,300>,<380,30>,1090207Fh
 454 
	mcall	38,<30,300>,<380,30>,1090207Fh
444 
	ret
 455 
	ret
445 
;---------------------------------------------------------------------
 456 
;---------------------------------------------------------------------
446 
align 4
 457 
align 4
447 
testDrawText1:
 458 
testDrawText1:
448 
	mcall	4,0C012Ch,0AA66h,aTestText,34
 459 
	mcall	4,<12,300>,0x0000AA66,aTestText,34
- 
 
 460 
	ret
- 
 
 461 
;---------------------------------------------------------------------
- 
 
 462 
align 4
- 
 
 463 
testDrawText1m:
- 
 
 464 
	mov	eax,[text_scren_buffer]
- 
 
 465 
	mov	[eax],dword 6*34
- 
 
 466 
	mov	[eax+4],dword 9
- 
 
 467 
	mcall	4,<0,0>,0x0800AA66,aTestText,34,[text_scren_buffer]
- 
 
 468 
	xor	ebp,ebp
- 
 
 469 
	mov	ebx,[text_scren_buffer]
- 
 
 470 
	add	ebx,8
- 
 
 471 
	mcall	65,,<6*34,9>,<18,309>,32
449 
	ret
 472 
	ret
450 
;---------------------------------------------------------------------
 473 
;---------------------------------------------------------------------
451 
align 4
 474 
align 4
452 
testDrawText2:
 475 
testDrawText2:
453 
	mcall	4,1B013Bh,10E7B850h,aTestText,34
 476 
	mcall	4,<27,315>,0x10E7B850,aTestText,34
- 
 
 477 
	ret
- 
 
 478 
;---------------------------------------------------------------------
- 
 
 479 
align 4
- 
 
 480 
testDrawText2m:
- 
 
 481 
	mov	eax,[text_scren_buffer2]
- 
 
 482 
	mov	[eax],dword 6*38
- 
 
 483 
	mov	[eax+4],dword 9
- 
 
 484 
	mcall	4,<0,0>,0x18E7B850,aTestText,34,[text_scren_buffer2]
- 
 
 485 
	xor	ebp,ebp
- 
 
 486 
	mov	ebx,[text_scren_buffer2]
- 
 
 487 
	add	ebx,8
- 
 
 488 
	mcall	65,,<6*38,9>,<33,324>,32
454 
	ret
 489 
	ret
455 
;---------------------------------------------------------------------
 490 
;---------------------------------------------------------------------
456 
align 4
 491 
align 4
457 
testDrawNumber:
 492 
testDrawNumber:
458 
	mcall	47,80000h,12345678,2A014Ah,0E0B27Bh
 493 
	mcall	47,0x80000,12345678,<42,333>,0x0E0B27B
459 
	ret
 494 
	ret
460 
;---------------------------------------------------------------------
 495 
;---------------------------------------------------------------------
461 
align 4
 496 
align 4
462 
testDrawPixel:
 497 
testDrawPixel:
463 
	mcall	1,100,100,0FFFFFFh
 498 
	mcall	1,100,100,0FFFFFFh
Line 675... Line 710...
675 
	?,?,testDrawPicture_f73,aDrawingPictF73,\
 710 
	?,?,testDrawPicture_f73,aDrawingPictF73,\
676 
	?,?,testDrawVertLine,aDrawingVLine,\
 711 
	?,?,testDrawVertLine,aDrawingVLine,\
677 
	?,?,testDrawHorzLine,aDrawingHLine,\
 712 
	?,?,testDrawHorzLine,aDrawingHLine,\
678 
	?,?,testDrawFreeLine,aDrawingFLine,\
 713 
	?,?,testDrawFreeLine,aDrawingFLine,\
679 
	?,?,testDrawText1,aDrawingText1,\
 714 
	?,?,testDrawText1,aDrawingText1,\
- 
 
 715 
	?,?,testDrawText1m,aDrawingText1m,\
680 
	?,?,testDrawText2,aDrawingText2,\
 716 
	?,?,testDrawText2,aDrawingText2,\
- 
 
 717 
	?,?,testDrawText2m,aDrawingText2m,\
681 
	?,?,testDrawNumber,aDrawingNumber,\
 718 
	?,?,testDrawNumber,aDrawingNumber,\
682 
	?,?,testDrawPixel,aDrawingPixel,\
 719 
	?,?,testDrawPixel,aDrawingPixel,\
683 
	0,0,0,0
 720 
	0,0,0,0
684 
;---------------------------------------------------------------------
 721 
;---------------------------------------------------------------------
685 
LINE_HEIGHT   = 13
 722 
LINE_HEIGHT   = 13
Line 695... Line 732...
695 
	aGetScreen_GS	db 'Get a piece of screen GS, 90x123, px',0
 732 
	aGetScreen_GS	db 'Get a piece of screen GS, 90x123, px',0
696 
	aDrawingVLine	db 'Linea verticale, 350 px',0
 733 
	aDrawingVLine	db 'Linea verticale, 350 px',0
697 
	aDrawingHLine	db 'Linea orizzontale, 270 px',0
 734 
	aDrawingHLine	db 'Linea orizzontale, 270 px',0
698 
	aDrawingFLine	db 'Free-angled Line, 350 px',0
 735 
	aDrawingFLine	db 'Free-angled Line, 350 px',0
699 
	aDrawingText1	db 'Fixed-width Text, 34 chars',0
 736 
	aDrawingText1	db 'Fixed-width Text, 34 chars',0
- 
 
 737 
	aDrawingText1m	db 'Fixed-width Text(m), 34 chars',0
700 
	aDrawingText2	db 'Proportional Text, 34 chars',0
 738 
	aDrawingText2	db 'Proportional Text, 34 chars',0
- 
 
 739 
	aDrawingText2m	db 'Proportional Text(m), 34 chars',0
701 
	aDrawingNumber	db 'Decimal Number, 8 digits',0
 740 
	aDrawingNumber	db 'Decimal Number, 8 digits',0
702 
	aDrawingPixel	db 'Singolo pixel',0
 741 
	aDrawingPixel	db 'Singolo pixel',0
Line 703... Line 742...
703 
 
 742 
 
704 
	aTestText	db 'This is a 34-charachters test text'
 743 
	aTestText	db 'This is a 34-charachters test text'
705 
	aButtonsText	db 'Test      Commenti    Pattern+     Apri        Salva',0
 744 
	aButtonsText	db 'Test      Commenti    Pattern+     Apri        Salva',0
Line 706... Line 745...
706 
	aCaption	db 'Kolibri Graphical Benchmark 0.7',0
 745 
	aCaption	db 'Kolibri Graphical Benchmark 0.8',0
707 
 
 746 
 
Line 708... Line 747...
708 
	aLeft	db 'Sinistra:',0
 747 
	aLeft	db 'Sinistra:',0
Line 720... Line 759...
720 
	aGetScreen_GS	db 'Get a piece of screen GS, 90x123, px',0
 759 
	aGetScreen_GS	db 'Get a piece of screen GS, 90x123, px',0
721 
	aDrawingVLine	db 'Vertical Line, 350 px',0
 760 
	aDrawingVLine	db 'Vertical Line, 350 px',0
722 
	aDrawingHLine	db 'Horizontal Line, 270 px',0
 761 
	aDrawingHLine	db 'Horizontal Line, 270 px',0
723 
	aDrawingFLine	db 'Free-angled Line, 350 px',0
 762 
	aDrawingFLine	db 'Free-angled Line, 350 px',0
724 
	aDrawingText1	db 'Fixed-width Text, 34 chars',0
 763 
	aDrawingText1	db 'Fixed-width Text, 34 chars',0
- 
 
 764 
	aDrawingText1m	db 'Fixed-width Text(m), 34 chars',0
725 
	aDrawingText2	db 'Proportional Text, 34 chars',0
 765 
	aDrawingText2	db 'Proportional Text, 34 chars',0
- 
 
 766 
	aDrawingText2m	db 'Proportional Text(m), 34 chars',0
726 
	aDrawingNumber	db 'Decimal Number, 8 digits',0
 767 
	aDrawingNumber	db 'Decimal Number, 8 digits',0
727 
	aDrawingPixel	db 'Single Pixel',0
 768 
	aDrawingPixel	db 'Single Pixel',0
Line 728... Line 769...
728 
 
 769 
 
729 
	aTestText	db 'This is a 34-charachters test text'
 770 
	aTestText	db 'This is a 34-charachters test text'
730 
	aButtonsText	db 'Test      Comment+    Pattern+      Open        Save',0
 771 
	aButtonsText	db 'Test      Comment+    Pattern+      Open        Save',0
Line 731... Line 772...
731 
	aCaption	db 'Kolibri Graphical Benchmark 0.7',0
 772 
	aCaption	db 'Kolibri Graphical Benchmark 0.8',0
732 
 
 773 
 
Line 733... Line 774...
733 
	aLeft	db 'Left    :',0
 774 
	aLeft	db 'Left    :',0
Line 938... Line 979...
938 
start_y		rd 1
 979 
start_y		rd 1
939 
size_x		rd 1
 980 
size_x		rd 1
940 
size_y		rd 1
 981 
size_y		rd 1
941 
offset_x	rd 1
 982 
offset_x	rd 1
942 
;---------------------------------------------------------------------
 983 
;---------------------------------------------------------------------
- 
 
 984 
text_scren_buffer	rd 1
- 
 
 985 
text_scren_buffer2	rd 1
- 
 
 986 
;---------------------------------------------------------------------
943 
textarea:
 987 
textarea:
944 
	rb 8
 988 
	rb 8
945 
;---------------------------------------------------------------------
 989 
;---------------------------------------------------------------------
946 
comment_string_1:
 990 
comment_string_1:
947 
	rb 44
 991 
	rb 44
Line 968... Line 1012...
968 
	rb 4096
 1012 
	rb 4096
969 
;---------------------------------------------------------------------
 1013 
;---------------------------------------------------------------------
970 
filename_area:
 1014 
filename_area:
971 
	rb 256
 1015 
	rb 256
972 
;---------------------------------------------------------------------
 1016 
;---------------------------------------------------------------------
- 
 
 1017 
align 4
973 
	rb 4096
 1018 
	rb 4096
974 
thread_stack2:
 1019 
thread_stack2:
975 
;---------------------------------------------------------------------
 1020 
;---------------------------------------------------------------------
- 
 
 1021 
align 4
976 
	rb 4096
 1022 
	rb 4096
977 
thread_stack1:
 1023 
thread_stack1:
978 
;---------------------------------------------------------------------
 1024 
;---------------------------------------------------------------------
- 
 
 1025 
align 4
979 
	rb 4096
 1026 
	rb 4096
980 
	rb 0x2884	; for F73 image size 123*90*4
 1027 
	rb 0x2884	; for F73 image size 123*90*4
981 
stacktop:
 1028 
stacktop:
982 
I_END:
 1029 
I_END: