home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Hack-Phreak Scene Programs
/
cleanhpvac.zip
/
cleanhpvac
/
VGAKIT60.ZIP
/
svga800.asm
< prev
next >
Wrap
Assembly Source File
|
1994-01-01
|
2KB
|
97 lines
include model.inc
include vesa.inc
;
; VGAKIT Version 6.0
;
; Copyright 1988,89,90,91,92,93,94 John Bridges
; Free for use in commercial, shareware or freeware applications
;
; SVGA800.ASM
;
;
.data
extrn cirrus:byte,everex:byte,paradise:byte,tseng:byte,trident:byte
extrn t8900:byte,ativga:byte,aheada:byte,aheadb:byte
extrn oaktech:byte,video7:byte,chipstech:byte,tseng4:byte,genoa:byte
extrn ncr:byte,compaq:byte,acumos:byte,vesa:byte
extrn maxx:word,maxy:word,scanline:word,ourseg:word
.code
public svga800
extrn mkadrtbl:proc,txtmode:proc,setmany:proc,vesaset:proc
svga800 proc ;Set 800x600x256 on most SVGA cards
mov [ourseg],0a000h
mov ax,800
mov [maxx],ax ;default width to 640 for now
mov [scanline],ax
cmp [vesa],0
jz novs
mov bx,103h
call vesaset
jmp godo2
novs: cmp [genoa],0
jz nogn
mov ax,5eh
jmp godo
nogn: cmp [ncr],0
jz noncr
mov ax,5ch
jmp godo
noncr: cmp [oaktech],0
jz noak
mov ax,54h
jmp short godo
noak: cmp [aheada],0
jnz @f
cmp [aheadb],0
jz noab
@@: mov ax,62h
jmp short godo
noab: cmp [everex],0
jz noev
mov ax,70h
mov bl,31h
jmp short godo
noev: cmp [ativga],0
jz noati
mov ax,63h
jmp short godo
noati: cmp [t8900],0
jz notr
mov ax,5eh
jmp short godo
notr: cmp [video7],0
jz nov7
mov ax,6f05h
mov bl,69h
jmp short godo
nov7: cmp [chipstech],0
jz noct
mov ax,7bh
jmp short godo
noct: cmp [acumos],0
jz noacu
mov ax,5ch
jmp short godo
noacu: cmp [tseng],0
jz nots
mov ax,30h
godo: int 10h
godo2: mov ax,40h
mov es,ax
mov al,es:[84h] ;get height of screen
inc al
mul byte ptr es:[85h]
mov [maxy],ax
call mkadrtbl
nots: ret
svga800 endp
end