Click above to get retro games delivered to your door ever month!

 bordercolor()       Change screen border color
------------------------------------------------------------------------------
 Declaration
   color.hdr

 Syntax
   func byte bordercolor extern
   param value byte bColor

 Arguments
   bColor is a byte specifying the new color of the screen border. Valid
   values are 0 to 15 (see the foreground portions of the BLACK_...
   macros in color.hdr for color equivalences).

 Return
   A byte representing the previous screen border color.

 Description
   The bordercolor() function changes the border color of the screen.
   Normally the color of the border is black. The bordercolor() function
   can be used to "enlarge" the screen by eliminating the black border. The
   changed border color can be reset with the DOS cls command.

 Example
   #define EXAMPLE_SCREEN
   #include example.hdr

   proc Test_bordercolor
   vardef
      byte bColorCurr
      byte bColorPrev
   enddef
   bColorPrev := bordercolor( BLACK_BLACK )
   for bColorCurr := BLACK_BLUE to BLACK_WHITE // border set to foreground
      clear
      bordercolor( bColorCurr )
      @ 12, 0 ?? "Border color", istr( bColorCurr )
      wait
   next
   bordercolor( bColorPrev )
   endproc

   proc main
   Test_bordercolor()
   endproc