home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2000 May
/
Chip_2000-05_cd2.bin
/
dosutils
/
partprog
/
pdisk.arc
/
SCREEN.ASM
< prev
next >
Wrap
Assembly Source File
|
1989-01-12
|
1KB
|
91 lines
PAGE 64D,132D ; make line length 132
% .MODEL memmodel,C
; .286
.RADIX 16
.CODE
actpage db 0
scr_pos proc row:word, col:word
mov ax,row
mov dx,col
mov dh,al
mov bh,CS:[actpage]
mov ah,2
int 10
ret
scr_pos endp
scr_rpos proc
mov bh,CS:[actpage]
mov ah,3
push bp
int 10
pop bp
mov ax,dx
ret
scr_rpos endp
scr_sapage proc newpage:word
mov ax,newpage
mov CS:[actpage],al
mov ah,5
int 10
ret
scr_sapage endp
scr_gapage proc
mov ah,0f
push bp
int 10
pop bp
mov al,bh
mov CS:[actpage],al
cbw
ret
scr_gapage endp
scr_gmode proc
mov ah,0f
push bp
int 10
pop bp
cbw
ret
scr_gmode endp
scr_smode proc newmode:word
mov ax,newmode
mov ah,0
push bp
int 10
pop bp
ret
scr_smode endp
; void scr_scroll(ul_row, ul_col, lr_row, lr_col, num_rows, attrib);
scr_scroll proc ul_row, ul_col, lr_row, lr_col, num_rows, attrib
mov ax,ul_row
mov cx,ul_col
mov ch,al
mov ax,lr_row
mov dx,lr_col
mov dh,al
mov ax,num_rows
mov bx,attrib
mov bh,bl
mov ah,6
int 10
ret
scr_scroll endp
scr_gac proc
mov ah,8
mov bh,CS:[actpage]
push bp
int 10
pop bp
ret
scr_gac endp
END