PK
     <ò§²  ²     TRI8900.ASM;
; QPV/386 video driver
; for Trident 8900 and 9000 chipsets
;

	.286
Code    Segment Para 'Code'
        Assume  cs:Code
	Org 100h

Procs   dw      Bank,Init,Exit,0

Bank:   push    ax
	mov     al,0eh
	mov     dx,03c4h
	out     dx,al
	inc     dx
	pop     ax
	xor     al,02h
	out     dx,al
	retf

Init:   mov     dx,3ceh         ; set pagesize to 64k
	mov     al,6
	out     dx,al
	inc     dl
	in      al,dx
	dec     dl
	or      al,4
	mov     ah,al
	mov     al,6
	out     dx,ax
	mov     dl,0c4h         ; switch to BPS mode
	mov     al,0bh
	out     dx,al
	inc     dl
	in      al,dx
	retf

Exit:   retf

Code    Ends
	End Procs

; End of source.
PK
     ­“}¼*  *  	   SS24X.ASM;
; QPV/386 video driver
; for Diamond SpeedStar 24X
;
; Written by Jan van Loenen for QPV/386
;

        .286
Code    Segment Para 'Code'
        Assume  cs:Code
        Org 100h

Procs   dw      Bank,Init,Exit,0

Bank:   shl     al,4
        push    ax
        mov     dx,03ceh
        mov     al,09h
        out     dx,al
        inc     dx
        pop     ax
        push    ax
        out     dx,al
        dec     dx
        mov     al,0ah
        out     dx,al
        inc     dx
        pop     ax
        out     dx,al
        retf

Init:   mov     dx,03ceh
        mov     al,0fh
        out     dx,al
        inc     dx
        mov     al,05h
        out     dx,al
        mov     dx,03c4h
        mov     al,06h
        out     dx,al
        inc     dx
        mov     al,48h
        out     dx,al
        mov     dx,03d4h
        mov     al,29h
        out     dx,al
        inc     dx
        mov     al,85h
        out     dx,al
        dec     dx
        mov     al,2fh
        out     dx,al
        inc     dx
        in      al,dx
        and     al,0fdh
        out     dx,al
        mov     dx,03ceh
        mov     al,0bh
        out     dx,al
        inc     dx
        in      al,dx
        or 