home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power-Programmierung
/
CD1.mdf
/
magazine
/
nan_news
/
vol2
/
no2
/
dborder.asm
< prev
next >
Wrap
Assembly Source File
|
1987-12-08
|
1KB
|
45 lines
; FUNCTION BORDER
; USAGE: BORDER(N)
; N IS THE COLOR NUMBER TO WHICH YOU WANT THE BORDER SET:
;
; 0 Black 8 Dark grey
; 1 Blue 9 Light blue
; 2 Green 10 Light green
; 3 Cyan 11 Light cyan
; 4 Red 12 Light red
; 5 Magenta 13 Light magenta
; 6 Brown 14 Yellow
; 7 Light grey 15 Bright white
PUBLIC BORDER
EXTRN _PARNI:FAR
CODESG SEGMENT BYTE 'PROG'
ASSUME CS:CODESG
BORDER PROC FAR
; INITIALIZATION
PUSH BP
MOV BP,SP
; GET PARAMETER
MOV AX,1
PUSH AX
CALL _PARNI
ADD SP,2
; MOVE COLOR NUMBER INTO BH AND
; SET UP REGISTERS FOR INT 10H CALL
MOV BH,AL
MOV AH,10H
MOV AL,1
INT 10H
POP BP
RET
BORDER ENDP
CODESG ENDS
END