24 lines
774 B
Tcl
24 lines
774 B
Tcl
# Defines a struct used to represent colors using 64-bit floats (0.0 - 1.0),
|
|
# which can be used to draw colored rectangles in raylib
|
|
use <raylib.h>
|
|
use vectors
|
|
|
|
struct Color(r,g,b:Num,a=1.0):
|
|
PLAYER := Color(.1,.1,.6,1.)
|
|
GRAY := Color(.4,.4,.4)
|
|
LIGHT_GRAY := Color(.7,.7,.7)
|
|
GOAL := Color(.1,.5,.0)
|
|
|
|
func draw_rectangle(c:Color, pos:Vec2, size:Vec2):
|
|
inline C {
|
|
DrawRectangle(
|
|
(int)($pos.$x), (int)($pos.$y), (int)($size.$x), (int)($size.$y),
|
|
((Color){
|
|
(int8_t)(uint8_t)(255.*$c.$r),
|
|
(int8_t)(uint8_t)(255.*$c.$g),
|
|
(int8_t)(uint8_t)(255.*$c.$b),
|
|
(int8_t)(uint8_t)(255.*$c.$a),
|
|
})
|
|
);
|
|
}
|