Rev 6215 | Rev 7786 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 6215 | Rev 6642 | ||
|---|---|---|---|
| Line 16... | Line 16... | ||
| 16 | DrawBar x,y,w,1,color1 |
16 | DrawBar x,y,w,1,color1 |
| 17 | DrawBar x,y,1,h |
17 | DrawBar x,y,1,h |
| 18 | DrawBar x,y+h,w,1,color2 |
18 | DrawBar x,y+h,w,1,color2 |
| 19 | DrawBar x+w,y,1,h+1 |
19 | DrawBar x+w,y,1,h+1 |
| 20 | } |
20 | } |
| 21 | 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 | ||
| - | 30 | macro WriteText x, y, fontType, color, text |
|
| - | 31 | { |
|
| - | 32 | mcall 4, (x) shl 16 + (y), (fontType) shl 24 + (color), text |
|
| - | 33 | } |
|
| - | 34 | ||
| - | 35 | macro WriteTextBold x, y, fontType, color, text |
|
| - | 36 | { |
|
| - | 37 | mcall 4, (x) shl 16 + (y), (fontType) shl 24 + (color), text |
|
| - | 38 | add ebx,1 shl 16 |
|
| - | 39 | mcall |
|
| - | 40 | } |
|
| - | 41 | ||
| - | 42 | BT_DEL equ 0x80000000 |
|
| - | 43 | BT_HIDE equ 0x40000000 |
|
| - | 44 | BT_NOFRAME equ 0x20000000 |
|
| - | 45 | ||
| - | 46 | macro DefineButton x, y, w, h, id, background_color |
|
| - | 47 | { |
|
| - | 48 | mcall 8, (x) shl 16 + (w), (y) shl 16 + (h), id, background_color |
|
| - | 49 | } |
|
| - | 50 | ||