Subversion Repositories Kolibri OS

Rev

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

Rev 131 Rev 205
Line 5... Line 5...
5
; Created: December 20, 2004
5
; Created: December 20, 2004
6
;
6
;
7
; Last changed: February 2, 2005
7
; Last changed: February 2, 2005
8
;
8
;
Line 9... Line 9...
9
 
9
 
10
BGIFONT_PATH equ '/RD/1/'
10
BGIFONT_PATH equ '/RD/1/FONTS/'
11
_X equ 340
11
_X equ 340
Line 12... Line 12...
12
_Y equ 240
12
_Y equ 240
13
 
13
 
Line 33... Line 33...
33
   add  ebx,140 shl 16
33
   add  ebx,140 shl 16
34
   mov  edx,ebx
34
   mov  edx,ebx
35
   mcall 47,0x80100,,,0x10ffffff
35
   mcall 47,0x80100,,,0x10ffffff
36
   jecxz .nofont
36
   jecxz .nofont
37
   lea  ebx,[edx+80 shl 16+12]
37
   lea  ebx,[edx+80 shl 16+12]
38
   mov  edx,_BGIfont_Prepare.dest+8
38
   mov  edx,_BGIfont_Prepare.fontfullname
39
   mov  esi,BGIfont_Coo-1
39
   mov  esi,_BGIfont_Prepare.fontattr-1
40
   sub  esi,edx
40
   sub  esi,edx
41
   add  ecx,0x3b800b8
41
   add  ecx,0x3b800b8
42
   BGIfont_Outtext
42
   BGIfont_Outtext
43
   sub  ebx,155 shl 16+12
43
   sub  ebx,155 shl 16+12
44
   mcall 4,,0x1000f000,load_ok,load_fail-load_ok
44
   mcall 4,,0x1000f000,load_ok,load_fail-load_ok