Metropoli BBS
VIEWER: brnwht.asm MODE: TEXT (ASCII)
page ,132

title brnwht ( brown bak - white crsr + brdr ) 10/24/96 - 01:20 pm

         .model small

         .code

         org   256

brnwht   proc  far

wht      =     15                      ; white

;*------------------------
;*   set border color
;*------------------------

bc1:
         mov   dx,03dah
         in    al,dx

         mov   dx,03c0h
         mov   al,11h
         out   dx,al

         mov   al,wht                  ; color = white
         out   dx,al
bc2:
         mov   ah,16                   ; set color fct
         mov   al,3                    ; toggle intensity/blink bit
         mov   bl,0                    ; set for intensity
         int   16

         mov   ah,16                   ; set color fct
         mov   al,1                    ; set border color
         mov   bh,wht                  ; color = white
         int   16
bc3:
         mov   ah,11                   ; set brdr color
         mov   bh,0                    ; for text mode
         mov   bl,wht                  ; color = white
         int   16


;*------------------------
;*   set cursor position
;*------------------------

scp:
         mov   ah,2                    ; set cursor position fct
         mov   bh,0                    ; page number 0
         mov   dh,0                    ; row 0
         mov   dl,0                    ; col 0
         int   16

;*-----------------------------------
;*   write character and attribute
;*-----------------------------------

wcaa:
         mov   ah,9                    ; write char and attr fct
         mov   al,32                   ; char = space
         mov   bh,0                    ; page number 0
         mov   bl,6fh                  ; attr = brown back, white crsr
         mov   cx,2000                 ; 25 * 80 = full screen
         int   16

exit:    mov   al,0                    ; return code = 0
         mov   ah,76                   ; terminate with ret code fct
         int   33

brnwht   endp

         end   brnwht

;---------------------------------------
;  Color Chart
;---------------------------------------
;
;  Black    = 00   Light Black    = 08
;  Blue     = 01   Light Blue     = 09
;  Green    = 02   Light Green    = 10
;  Cyan     = 03   Light Cyan     = 11
;  Red      = 04   Light Red      = 12
;  Magenta  = 05   Light Magenta  = 13
;  Brown    = 06   Light Brown    = 14     ( Yellow )
;  White    = 07   Light White    = 15
;
;----------------------------------------
[ RETURN TO DIRECTORY ]