forked from KolibriOS/kolibrios
bc47ee30d7
Application can determine own path now. Some boot messages changed (it is version Kolibri 5.1.0 now). Some rd functions updated (thanks to michael). Switch to another bank-switching procedure. git-svn-id: svn://kolibrios.org@5 a494cfbc-eb01-0410-851d-a64ba20cac60
991 lines
18 KiB
PHP
991 lines
18 KiB
PHP
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; ;;
|
|
;; VESA12.INC ;;
|
|
;; ;;
|
|
;; Vesa 1.2 functions for MenuetOS ;;
|
|
;; ;;
|
|
;; Copyright 2002 Ville Turjanmaa ;;
|
|
;; ;;
|
|
;; quickcode@mail.ru - bankswitch for S3 cards ;;
|
|
;; ;;
|
|
;; See file COPYING for details ;;
|
|
;; ;;
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
|
; A complete video driver should include the following types of function
|
|
;
|
|
; Putpixel
|
|
; Getpixel
|
|
;
|
|
; Drawimage
|
|
; Drawbar
|
|
;
|
|
; Drawbackground
|
|
;
|
|
;
|
|
; Modifying the set_bank -function is mostly enough
|
|
; for different Vesa 1.2 setups.
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
; set_bank for Trident videocards, work on Trident 9440
|
|
; modified by Mario79
|
|
;set_bank:
|
|
;cli
|
|
;cmp al,[0xfff2]
|
|
;je retsb
|
|
;mov [0xfff2],al
|
|
;push dx
|
|
;mov dx,3D8h
|
|
;out dx,al
|
|
;pop dx
|
|
;retsb:
|
|
;sti
|
|
;ret
|
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
; set_bank for S3 videocards, work on S3 ViRGE PCI (325)
|
|
; modified by kmeaw
|
|
set_bank:
|
|
cli
|
|
cmp al,[0xfff2]
|
|
je retsb
|
|
mov [0xfff2],al
|
|
push ax
|
|
push dx
|
|
push cx
|
|
mov cl, al
|
|
mov dx, 0x3D4
|
|
mov al, 0x38
|
|
out dx, al ;CR38 Register Lock 1 ;Note: Traditionally 48h is used to
|
|
;unlock and 00h to lock
|
|
inc dx
|
|
mov al, 0x48
|
|
out dx, al ;3d5 -?
|
|
dec dx
|
|
mov al, 0x31
|
|
out dx, al ;CR31 Memory Configuration Register
|
|
;0 Enable Base Address Offset (CPUA BASE). Enables bank operation if set, ;disables if clear.
|
|
;4-5 Bit 16-17 of the Display Start Address. For the 801/5,928 see index 51h,
|
|
;for the 864/964 see index 69h.
|
|
|
|
inc dx
|
|
in al, dx
|
|
dec dx
|
|
mov ah, al
|
|
mov al, 0x31
|
|
out dx, ax
|
|
mov al, ah
|
|
or al, 9
|
|
inc dx
|
|
out dx, al
|
|
dec dx
|
|
mov al, 0x35
|
|
out dx, al ;CR35 CRT Register Lock
|
|
inc dx
|
|
in al, dx
|
|
dec dx
|
|
and al, 0xF0
|
|
mov ch, cl
|
|
and ch, 0x0F
|
|
or ch, al
|
|
mov al, 0x35
|
|
out dx, al
|
|
inc dx
|
|
mov al, ch
|
|
out dx, ax
|
|
dec dx
|
|
mov al, 0x51 ;Extended System Control 2 Register
|
|
out dx, al
|
|
inc dx
|
|
in al, dx
|
|
dec dx
|
|
and al, 0xF3
|
|
shr cl, 2
|
|
and cl, 0x0C
|
|
or cl, al
|
|
mov al, 0x51
|
|
out dx, al
|
|
inc dx
|
|
mov al, cl
|
|
out dx, al
|
|
dec dx
|
|
mov al, 0x38
|
|
out dx, al
|
|
inc dx
|
|
xor al, al
|
|
out dx, al
|
|
dec dx
|
|
pop cx
|
|
pop dx
|
|
pop ax
|
|
retsb:
|
|
sti
|
|
ret
|
|
|
|
;Set bank function for Intel 810/815 chipsets
|
|
; *****Modified by Protopopius, Russia.*****
|
|
; ********* http://menuetos.hut.ru **************
|
|
; ************************************************
|
|
;
|
|
;set_bank:
|
|
;cli
|
|
;cmp al,[0xfff2]
|
|
;je retsb
|
|
;mov [0xfff2],al
|
|
;push ax
|
|
;push dx
|
|
;mov dx,3CEh
|
|
;mov ah,al ; Save value for later use
|
|
;mov al,10h ; Index GR10 (Address Mapping)
|
|
;out dx,al ; Select GR10
|
|
;inc dl
|
|
;mov al,3 ; Set bits 0 and 1 (Enable linear page mapping)
|
|
;out dx,al ; Write value
|
|
;dec dl
|
|
;mov al,11h ; Index GR11 (Page Selector)
|
|
;out dx,al ; Select GR11
|
|
;inc dl
|
|
;mov al,ah ; Write address
|
|
;out dx,al ; Write the value
|
|
;pop dx
|
|
;pop ax
|
|
;retsb:
|
|
;sti
|
|
;ret
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!}
|
|
|
|
;set_bank:
|
|
; cli
|
|
; cmp al,[0xfff2]
|
|
; je retsb
|
|
; mov [0xfff2],al
|
|
; push ax
|
|
; push dx
|
|
; mov ah,al
|
|
; mov dx,0x03D4
|
|
; mov al,0x39
|
|
; out dx,al
|
|
; inc dl
|
|
; mov al,0xA5
|
|
; out dx,al
|
|
; dec dl
|
|
; mov al,6Ah
|
|
; out dx,al
|
|
; inc dl
|
|
; mov al,ah
|
|
; out dx,al
|
|
; dec dl
|
|
; mov al,0x39
|
|
; out dx,al
|
|
; inc dl
|
|
; mov al,0x5A
|
|
; out dx,al
|
|
; dec dl
|
|
; pop dx
|
|
; pop ax
|
|
;
|
|
; retsb:
|
|
; ret
|
|
|
|
|
|
vesa12_drawbackground:
|
|
|
|
call [disable_mouse]
|
|
|
|
push eax
|
|
push ebx
|
|
push ecx
|
|
push edx
|
|
|
|
xor edx,edx
|
|
mov eax,dword[WinMapAddress-8]
|
|
mov ebx,dword[WinMapAddress-4]
|
|
mul ebx
|
|
mov ebx,3
|
|
mul ebx
|
|
mov [imax],eax
|
|
mov eax,[draw_data+32+0]
|
|
mov ebx,[draw_data+32+4]
|
|
mov edi,0 ;no force
|
|
|
|
v12dp3:
|
|
|
|
push eax
|
|
push ebx
|
|
mov esi,0x300000
|
|
|
|
cmp [WinMapAddress-12],dword 1 ; tiled background
|
|
jne no_vesa12_tiled_bgr
|
|
|
|
push edx
|
|
|
|
xor edx,edx
|
|
mov ecx,[WinMapAddress-8]
|
|
div ecx
|
|
mov eax,edx
|
|
|
|
push eax
|
|
mov eax,ebx
|
|
xor edx,edx
|
|
mov ecx,[WinMapAddress-4]
|
|
div ecx
|
|
mov ebx,edx
|
|
pop eax
|
|
|
|
pop edx
|
|
|
|
no_vesa12_tiled_bgr:
|
|
|
|
cmp [WinMapAddress-12],dword 2 ; stretched background
|
|
jne no_vesa12_stretched_bgr
|
|
|
|
push edx
|
|
|
|
imul eax,dword [WinMapAddress-8]
|
|
xor edx,edx
|
|
mov ecx,[0xfe00]
|
|
inc ecx
|
|
div ecx
|
|
|
|
push eax
|
|
mov eax,ebx
|
|
imul eax,dword [WinMapAddress-4]
|
|
xor edx,edx
|
|
mov ecx,[0xfe04]
|
|
inc ecx
|
|
div ecx
|
|
mov ebx,eax
|
|
pop eax
|
|
|
|
pop edx
|
|
|
|
no_vesa12_stretched_bgr:
|
|
|
|
|
|
push eax
|
|
mov eax,ebx
|
|
xor edx,edx
|
|
mov ebx,[WinMapAddress-8]
|
|
add ebx,[WinMapAddress-8]
|
|
add ebx,[WinMapAddress-8]
|
|
mul ebx
|
|
mov esi,eax
|
|
pop eax
|
|
add esi,eax
|
|
add esi,eax
|
|
add esi,eax
|
|
add esi,0x300000
|
|
pop ebx
|
|
pop eax
|
|
|
|
v12di4:
|
|
|
|
mov ecx,[esi]
|
|
pusha
|
|
mov esi,eax
|
|
mov edi,ebx
|
|
mov eax,[0xfe00]
|
|
add eax,1
|
|
mul ebx
|
|
add eax,esi
|
|
add eax,WinMapAddress
|
|
cmp [eax],byte 1
|
|
jnz v12nbgp
|
|
mov eax,[0xfe08]
|
|
mov ebx,edi
|
|
mul ebx
|
|
add eax,esi
|
|
add eax,esi
|
|
add eax,esi
|
|
cmp [0xFBF1],byte 24
|
|
jz v12bgl3
|
|
add eax,esi
|
|
|
|
v12bgl3:
|
|
|
|
push ebx
|
|
push eax
|
|
|
|
sub eax,[0xfe80]
|
|
|
|
shr eax,16
|
|
call set_bank
|
|
pop eax
|
|
and eax,65535
|
|
add eax,0xa0000
|
|
pop ebx
|
|
|
|
mov [eax],cx
|
|
add eax,2
|
|
shr ecx,16
|
|
mov [eax],cl
|
|
sti
|
|
|
|
v12nbgp:
|
|
|
|
popa
|
|
add esi,3
|
|
inc eax
|
|
cmp eax,[draw_data+32+8]
|
|
jg v12nodp31
|
|
jmp v12dp3
|
|
|
|
v12nodp31:
|
|
|
|
mov eax,[draw_data+32+0]
|
|
inc ebx
|
|
cmp ebx,[draw_data+32+12]
|
|
jg v12dp4
|
|
jmp v12dp3
|
|
|
|
v12dp4:
|
|
|
|
pop edx
|
|
pop ecx
|
|
pop ebx
|
|
pop eax
|
|
ret
|
|
|
|
|
|
vesa12_drawbar:
|
|
|
|
call [disable_mouse]
|
|
|
|
;; mov [novesachecksum],dword 0
|
|
sub edx,ebx
|
|
sub ecx,eax
|
|
push esi
|
|
push edi
|
|
push eax
|
|
push ebx
|
|
push ecx
|
|
push edx
|
|
mov ecx,[0x3010]
|
|
add eax,[ecx-twdw]
|
|
add ebx,[ecx-twdw+4]
|
|
push eax
|
|
mov eax,ebx ; y
|
|
mov ebx,[0xfe08]
|
|
mul ebx
|
|
pop ecx
|
|
add eax,ecx ; x
|
|
add eax,ecx
|
|
add eax,ecx
|
|
cmp [0xfbf1],byte 24 ; 24 or 32 bpp ? - x start
|
|
jz dbpi2412
|
|
add eax,ecx
|
|
|
|
dbpi2412:
|
|
|
|
add eax,[0xfe80]
|
|
mov edi,eax
|
|
|
|
; x size
|
|
|
|
mov eax,[esp+4] ; [esp+6]
|
|
mov ecx,eax
|
|
add ecx,eax
|
|
add ecx,eax
|
|
cmp [0xfbf1],byte 24 ; 24 or 32 bpp ? - x size
|
|
jz dbpi24312
|
|
add ecx,eax
|
|
|
|
dbpi24312:
|
|
|
|
mov ebx,[esp+0]
|
|
|
|
; check limits ?
|
|
|
|
push eax
|
|
push ecx
|
|
mov eax,[0x3010]
|
|
mov ecx,[eax+draw_data-0x3000+0]
|
|
cmp ecx,0
|
|
jnz dbcblimitlset12
|
|
mov ecx,[eax+draw_data-0x3000+4]
|
|
cmp ecx,0
|
|
jnz dbcblimitlset12
|
|
mov ecx,[eax+draw_data-0x3000+8]
|
|
cmp ecx,[0xfe00]
|
|
jnz dbcblimitlset12
|
|
mov ecx,[eax+draw_data-0x3000+12]
|
|
cmp ecx,[0xfe04]
|
|
jnz dbcblimitlset12
|
|
pop ecx
|
|
pop eax
|
|
push dword 0
|
|
jmp dbcblimitlno12
|
|
|
|
dbcblimitlset12:
|
|
|
|
pop ecx
|
|
pop eax
|
|
push dword 1
|
|
|
|
dbcblimitlno12:
|
|
|
|
cmp [0xfbf1],byte 24 ; 24 or 32 bpp ?
|
|
jz dbpi24bit12
|
|
jmp dbpi32bit12
|
|
|
|
|
|
; DRAWBAR 24 BBP
|
|
|
|
|
|
dbpi24bit12:
|
|
|
|
push eax
|
|
push ebx
|
|
push edx
|
|
mov eax,ecx
|
|
mov ebx,3
|
|
div ebx
|
|
mov ecx,eax
|
|
pop edx
|
|
pop ebx
|
|
pop eax
|
|
cld
|
|
|
|
dbnewpi12:
|
|
|
|
push ebx
|
|
push edi
|
|
push ecx
|
|
|
|
xor edx,edx
|
|
mov eax,edi
|
|
sub eax,[0xfe80]
|
|
mov ebx,3
|
|
div ebx
|
|
add eax,WinMapAddress
|
|
mov ebx,[0x3010]
|
|
movzx ebx,byte[ebx+0xe]
|
|
cld
|
|
|
|
dbnp2412:
|
|
|
|
mov dl,[eax]
|
|
push eax
|
|
push ecx
|
|
cmp dl,bl
|
|
jnz dbimp24no12
|
|
cmp [esp+5*4],dword 0
|
|
jz dbimp24yes12
|
|
; call dbcplimit
|
|
; jnz dbimp24no12
|
|
|
|
dbimp24yes12:
|
|
|
|
push edi
|
|
mov eax,edi
|
|
sub eax,[0xfe80]
|
|
shr eax,16
|
|
call set_bank
|
|
and edi,0xffff
|
|
add edi,0xa0000
|
|
mov eax,[esp+8+3*4+16+4+4]
|
|
stosw
|
|
shr eax,16
|
|
stosb
|
|
sti
|
|
pop edi
|
|
add edi,3
|
|
pop ecx
|
|
pop eax
|
|
inc eax
|
|
loop dbnp2412
|
|
jmp dbnp24d12
|
|
|
|
dbimp24no12:
|
|
|
|
pop ecx
|
|
pop eax
|
|
cld
|
|
add edi,3
|
|
inc eax
|
|
loop dbnp2412
|
|
|
|
dbnp24d12:
|
|
|
|
mov eax,[esp+3*4+16+4]
|
|
test eax,0x80000000
|
|
jz nodbgl2412
|
|
cmp al,0
|
|
jz nodbgl2412
|
|
dec eax
|
|
mov [esp+3*4+16+4],eax
|
|
|
|
nodbgl2412:
|
|
|
|
pop ecx
|
|
pop edi
|
|
pop ebx
|
|
add edi,[0xfe08]
|
|
dec ebx
|
|
jz dbnonewpi12
|
|
jmp dbnewpi12
|
|
|
|
dbnonewpi12:
|
|
|
|
add esp,7*4
|
|
|
|
ret
|
|
|
|
|
|
; DRAWBAR 32 BBP
|
|
|
|
|
|
dbpi32bit12:
|
|
|
|
cld
|
|
shr ecx,2
|
|
|
|
dbnewpi3212:
|
|
|
|
push ebx
|
|
push edi
|
|
push ecx
|
|
|
|
mov eax,edi
|
|
sub eax,[0xfe80]
|
|
shr eax,2
|
|
add eax,WinMapAddress
|
|
mov ebx,[0x3010]
|
|
movzx ebx,byte[ebx+0xe]
|
|
cld
|
|
|
|
dbnp3212:
|
|
|
|
mov dl,[eax]
|
|
push eax
|
|
push ecx
|
|
cmp dl,bl
|
|
jnz dbimp32no12
|
|
cmp [esp+5*4],dword 0
|
|
jz dbimp32yes12
|
|
; call dbcplimit
|
|
; jnz dbimp32no12
|
|
|
|
dbimp32yes12:
|
|
|
|
push edi
|
|
mov eax,edi
|
|
sub eax,[0xfe80]
|
|
shr eax,16
|
|
call set_bank
|
|
and edi,0xffff
|
|
add edi,0xa0000
|
|
mov eax,[esp+8+3*4+16+4+4]
|
|
stosw
|
|
shr eax,16
|
|
stosb
|
|
sti
|
|
pop edi
|
|
add edi,4
|
|
inc ebp
|
|
pop ecx
|
|
pop eax
|
|
inc eax
|
|
loop dbnp3212
|
|
jmp dbnp32d12
|
|
|
|
dbimp32no12:
|
|
|
|
pop ecx
|
|
pop eax
|
|
inc eax
|
|
add edi,4
|
|
inc ebp
|
|
loop dbnp3212
|
|
|
|
dbnp32d12:
|
|
|
|
mov eax,[esp+12+16+4]
|
|
test eax,0x80000000
|
|
jz nodbgl3212
|
|
cmp al,0
|
|
jz nodbgl3212
|
|
dec eax
|
|
mov [esp+12+16+4],eax
|
|
|
|
nodbgl3212:
|
|
|
|
pop ecx
|
|
pop edi
|
|
pop ebx
|
|
add edi,[0xfe08]
|
|
dec ebx
|
|
jz nodbnewpi3212
|
|
jmp dbnewpi3212
|
|
|
|
nodbnewpi3212:
|
|
|
|
add esp,7*4
|
|
ret
|
|
|
|
|
|
Vesa12_putpixel24:
|
|
|
|
mov edi,eax ; x
|
|
mov eax,ebx ; y
|
|
lea edi,[edi+edi*2]
|
|
mov ebx,[0xfe08]
|
|
mul ebx
|
|
add edi,eax
|
|
mov eax,edi
|
|
shr eax,16
|
|
call set_bank
|
|
and edi,65535
|
|
add edi,0xa0000
|
|
mov eax,[esp+28]
|
|
stosw
|
|
shr eax,16
|
|
mov [edi],al
|
|
sti
|
|
ret
|
|
|
|
|
|
|
|
Vesa12_putpixel32:
|
|
|
|
mov edi,eax ; x
|
|
mov eax,ebx ; y
|
|
shl edi,2
|
|
mov ebx,[0xfe08]
|
|
mul ebx
|
|
add edi,eax
|
|
mov eax,edi
|
|
shr eax,16
|
|
call set_bank
|
|
and edi,65535
|
|
add edi,0xa0000
|
|
mov ecx,[esp+28]
|
|
mov [edi],ecx
|
|
sti
|
|
ret
|
|
|
|
|
|
Vesa12_getpixel24:
|
|
|
|
mov edi,eax ; x
|
|
mov eax,ebx ; y
|
|
lea edi,[edi+edi*2]
|
|
mov ebx,[0xfe08]
|
|
mul ebx
|
|
add edi,eax
|
|
mov eax,edi
|
|
shr eax,16
|
|
call set_bank
|
|
and edi,65535
|
|
add edi,0xa0000
|
|
mov ecx,[edi]
|
|
and ecx,255*256*256+255*256+255
|
|
sti
|
|
ret
|
|
|
|
|
|
Vesa12_getpixel32:
|
|
|
|
mov edi,eax ; x
|
|
mov eax,ebx ; y
|
|
shl edi,2
|
|
mov ebx,[0xfe08]
|
|
xor edx,edx
|
|
mul ebx
|
|
add edi,eax
|
|
mov eax,edi
|
|
shr eax,16
|
|
call set_bank
|
|
and edi,65535
|
|
add edi,0xa0000
|
|
mov ecx,[edi]
|
|
and ecx,255*256*256+255*256+255
|
|
sti
|
|
|
|
ret
|
|
|
|
|
|
|
|
vesa12_putimage:
|
|
|
|
; mov ebx,image
|
|
; mov ecx,320*65536+240
|
|
; mov edx,20*65536+20
|
|
|
|
call [disable_mouse]
|
|
|
|
mov [novesachecksum],dword 0
|
|
push esi
|
|
push edi
|
|
push eax
|
|
push ebx
|
|
push ecx
|
|
push edx
|
|
movzx eax,word [esp+2]
|
|
movzx ebx,word [esp+0]
|
|
mov ecx,[0x3010]
|
|
add eax,[ecx-twdw]
|
|
add ebx,[ecx-twdw+4]
|
|
push eax
|
|
mov eax,ebx ; y
|
|
mov ebx,[0xfe08]
|
|
mul ebx
|
|
pop ecx
|
|
add eax,ecx ; x
|
|
add eax,ecx
|
|
add eax,ecx
|
|
cmp [0xfbf1],byte 24 ; 24 or 32 bpp ? - x start
|
|
jz pi2412
|
|
add eax,ecx
|
|
|
|
pi2412:
|
|
|
|
add eax,[0xfe80]
|
|
mov edi,eax
|
|
|
|
; x size
|
|
|
|
movzx eax,word [esp+6]
|
|
mov ecx,eax
|
|
add ecx,eax
|
|
add ecx,eax
|
|
cmp [0xfbf1],byte 24 ; 24 or 32 bpp ? - x size
|
|
jz pi24312
|
|
add ecx,eax
|
|
|
|
pi24312:
|
|
|
|
mov esi,[esp+8]
|
|
movzx ebx,word [esp+4]
|
|
|
|
; check limits while draw ?
|
|
|
|
push eax
|
|
push ecx
|
|
mov eax,[0x3010]
|
|
mov ecx,[eax+draw_data-0x3000+0]
|
|
cmp ecx,0
|
|
jnz dbcblimitlset212
|
|
mov ecx,[eax+draw_data-0x3000+4]
|
|
cmp ecx,0
|
|
jnz dbcblimitlset212
|
|
mov ecx,[eax+draw_data-0x3000+8]
|
|
cmp ecx,[0xfe00]
|
|
jnz dbcblimitlset212
|
|
mov ecx,[eax+draw_data-0x3000+12]
|
|
cmp ecx,[0xfe04]
|
|
jnz dbcblimitlset212
|
|
pop ecx
|
|
pop eax
|
|
push dword 0
|
|
jmp dbcblimitlno212
|
|
|
|
dbcblimitlset212:
|
|
|
|
pop ecx
|
|
pop eax
|
|
push dword 1
|
|
|
|
dbcblimitlno212:
|
|
|
|
cmp [0xfbf1],byte 24 ; 24 or 32 bpp ?
|
|
jz pi24bit12
|
|
jmp pi32bit12
|
|
|
|
pi24bit12:
|
|
|
|
cld
|
|
push eax
|
|
push ebx
|
|
push edx
|
|
xor edx,edx
|
|
mov eax,ecx
|
|
mov ebx,3
|
|
div ebx
|
|
mov ecx,eax
|
|
pop edx
|
|
pop ebx
|
|
pop eax
|
|
|
|
newpi12:
|
|
|
|
push edi
|
|
push esi
|
|
push ecx
|
|
push ebx
|
|
|
|
xor edx,edx
|
|
mov eax,edi
|
|
sub eax,[0xfe80]
|
|
mov ebx,3
|
|
div ebx
|
|
add eax,WinMapAddress
|
|
mov ebx,[0x3010]
|
|
mov bl,[ebx+0xe]
|
|
mov bh,[esp+4*4]
|
|
|
|
np2412:
|
|
|
|
cmp bl,[eax]
|
|
jnz imp24no12
|
|
mov edx,[esi]
|
|
cmp bh,0
|
|
jz imp24yes12
|
|
; call dbcplimit
|
|
; jnz imp24no12
|
|
|
|
imp24yes12:
|
|
|
|
push eax
|
|
push edi
|
|
mov eax,edi
|
|
sub eax,[0xfe80]
|
|
shr eax,16
|
|
call set_bank
|
|
and edi,0xffff
|
|
add edi,0xa0000
|
|
mov [edi],edx
|
|
shr edx,2
|
|
mov [edi+2],dl
|
|
sti
|
|
pop edi
|
|
pop eax
|
|
|
|
imp24no12:
|
|
|
|
inc eax
|
|
add esi,3
|
|
add edi,3
|
|
dec ecx
|
|
jnz np2412
|
|
|
|
np24d12:
|
|
|
|
pop ebx
|
|
pop ecx
|
|
pop esi
|
|
pop edi
|
|
|
|
add edi,[0xfe08]
|
|
xor eax,eax
|
|
mov ax,[esp+4+2+4]
|
|
lea eax,[eax+eax*2]
|
|
add esi,eax
|
|
dec ebx
|
|
jz nonewpi12
|
|
jmp newpi12
|
|
|
|
nonewpi12:
|
|
|
|
add esp,7*4
|
|
mov eax,0
|
|
ret
|
|
|
|
|
|
pi32bit12:
|
|
|
|
cld
|
|
shr ecx,2
|
|
|
|
newpi3212:
|
|
|
|
push edi
|
|
push esi
|
|
push ecx
|
|
push ebx
|
|
|
|
mov eax,edi
|
|
sub eax,[0xfe80]
|
|
shr eax,2
|
|
add eax,WinMapAddress
|
|
mov ebx,[0x3010]
|
|
mov bl,[ebx+0xe]
|
|
mov bh,[esp+4*4]
|
|
|
|
np3212:
|
|
|
|
cmp bl,[eax]
|
|
jnz imp32no12
|
|
mov edx,[esi]
|
|
cmp bh,0
|
|
jz imp32yes12
|
|
; call dbcplimit
|
|
; jnz imp32no12
|
|
|
|
imp32yes12:
|
|
|
|
push eax
|
|
push edi
|
|
mov eax,edi
|
|
sub eax,[0xfe80]
|
|
shr eax,16
|
|
call set_bank
|
|
and edi,0xffff
|
|
add edi,0xa0000
|
|
mov [edi],edx
|
|
sti
|
|
pop edi
|
|
pop eax
|
|
|
|
imp32no12:
|
|
|
|
inc eax
|
|
add esi,3
|
|
add edi,4
|
|
dec ecx
|
|
jnz np3212
|
|
|
|
np32d12:
|
|
|
|
pop ebx
|
|
pop ecx
|
|
pop esi
|
|
pop edi
|
|
|
|
add edi,[0xfe08]
|
|
movzx eax,word [esp+4+2+4]
|
|
lea eax,[eax+eax*2]
|
|
add esi,eax
|
|
dec ebx
|
|
jz nonewpi3212
|
|
jmp newpi3212
|
|
|
|
nonewpi3212:
|
|
|
|
add esp,7*4
|
|
mov eax,0
|
|
ret
|
|
|
|
|
|
vesa12_read_screen_pixel:
|
|
|
|
and eax,0x3FFFFF
|
|
cmp [0xfbf1],byte 24 ; 24 or 32 bpp ?
|
|
jz v12rsp24
|
|
mov edi,eax
|
|
shl edi,2
|
|
mov eax,edi
|
|
shr eax,16
|
|
call set_bank
|
|
and edi,65535
|
|
add edi,0xa0000
|
|
mov eax,[edi]
|
|
and eax,0x00ffffff
|
|
ret
|
|
v12rsp24:
|
|
|
|
imul eax,3
|
|
mov edi,eax
|
|
shr eax,16
|
|
call set_bank
|
|
and edi,65535
|
|
add edi,0xa0000
|
|
mov eax,[edi]
|
|
and eax,0x00ffffff
|
|
ret
|
|
|
|
|