BOX

Action

Create a filled box on a graphical display.

 

 

Syntax

BOX (x1,y1) - (x2,y2) , color

 

 

Remarks

x1	The left corner position of the box
y1	The top position of the box
x2	The right corner position of the box
y2	The bottom position of the box
color	The color to use to fill the box

 

On COLOR displays, the box will be filled with the specified color.

On B&W displays, the box will not be filled. Only the box is drawn in the specified color.

On B&W displays you can use the BOXFILL statement to create a solid box.

 

 

See also

LINE, CIRCLE , BOXFILL

 

 

ASM

NONE

 

 

Example

' ----------------------------------------------------------------------------------------
' The support for this display has been made possible by Peter Küsters from (c) Display3000
' You can buy the displays from Display3000 or MCS Electronics
' ----------------------------------------------------------------------------------------'
'
$lib "lcd-pcf8833.lbx" 'special color display support
 
$regfile = "m88def.dat" 'ATMega 8, change if using different processors
$crystal = 8000000 '8 MHz
 
'First we define that we use a graphic LCD
Config Graphlcd = Color , Controlport = Portc , Cs = 1 , Rs = 0 , Scl = 3 , Sda = 2
 
'here we define the colors
 
Const Blue = &B00000011 ''predefined contants are making programming easier
Const Yellow = &B11111100
Const Red = &B11100000
Const Green = &B00011100
Const Black = &B00000000
Const White = &B11111111
Const Brightgreen = &B00111110
Const Darkgreen = &B00010100
Const Darkred = &B10100000
Const Darkblue = &B00000010
Const Brightblue = &B00011111
Const Orange = &B11111000
 
 
'clear the display
Cls
 
'create a cross
Line(0 , 0) -(130 , 130) , Blue
Line(130 , 0) -(0 , 130) , Red
 
Waitms 1000
 
'show an RLE encoded picture
Showpic 0 , 0 , Plaatje
Showpic 40 , 40 , Plaatje
 
Waitms 1000
 
'select a font
Setfont Color16x16
'and show some text
Lcdat 100 , 0 , "12345678" , Blue , Yellow
 
 
Waitms 1000
Circle(30 , 30) , 10 , Blue
 
Waitms 1000
'make a box
Box(10 , 30) -(60 , 100) , Red
 
'set some pixels
Pset 32 , 110 , Black
Pset 38 , 110 , Black
Pset 35 , 112 , Black
 
End
 
 
Plaatje:
$bgf "a.bgc"
 
$include "color.font"
$include "color16x16.font"

Languages	English • Deutsch