Subversion Repositories Kolibri OS

Rev

Rev 7786 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
6215 leency 1
macro DrawBar  x, y, width, height, color
2
{
3
	mcall 13, (x) shl 16 + (width), (y) shl 16 + (height), color
4
}
5
 
6
macro DrawRectangle  x, y, w, h, color
7
{
8
	DrawBar x,y,w,1,color
9
	DrawBar x,y+h,w,1
10
	DrawBar x,y,1,h
11
	DrawBar x+w,y,1,h+1
12
}
13
 
14
macro DrawRectangle3D  x, y, w, h, color1, color2
15
{
16
	DrawBar x,y,w,1,color1
17
	DrawBar x,y,1,h
18
	DrawBar x,y+h,w,1,color2
19
	DrawBar x+w,y,1,h+1
6642 leency 20
}
21
 
22
macro DrawWideRectangle  x, y, w, h, boder, color
23
{
24
	DrawBar x, y, w, boder, color
25
	DrawBar x, y+h-boder, w, boder
26
	DrawBar x, y+boder, boder, h-boder-boder
27
	DrawBar x+w-boder, y+boder, boder, h-boder-boder
28
}
29