1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
|
#include "raylib/core.h"
const struct mrb_data_type Color_type = {
"Color", mrb_free
};
/*
* @overload init_window(width: 800, height: 600, title: "Hello World from Raylib!")
* @param width [Integer]
* @param height [Integer]
* @param title [String]
*/
static mrb_value
mrb_init_window(mrb_state* mrb, mrb_value self) {
mrb_int screenWidth = 800;
mrb_int screenHeight = 600;
char* title = "Hello World from Raylib!";
uint32_t kw_num = 3;
const mrb_sym kw_names[] = {
mrb_intern_lit(mrb, "width"),
mrb_intern_lit(mrb, "height"),
mrb_intern_lit(mrb, "title"),
};
mrb_value kw_values[kw_num];
const mrb_kwargs kwargs = { kw_num, 0, kw_names, kw_values, NULL };
mrb_get_args(mrb, "|iiz:", &screenWidth, &screenHeight, &title, &kwargs);
if (mrb_undef_p(kw_values[0])) {
kw_values[0] = mrb_fixnum_value(screenWidth);
}
if (mrb_undef_p(kw_values[1])) {
kw_values[1] = mrb_fixnum_value(screenHeight);
}
if (mrb_undef_p(kw_values[2])) {
kw_values[2] = mrb_str_new_cstr(mrb, title);
}
InitWindow(mrb_fixnum(kw_values[0]), mrb_fixnum(kw_values[1]), mrb_str_to_cstr(mrb, kw_values[2]));
return mrb_nil_value();
}
/*
* Check if KEY_ESCAPE pressed or Close icon pressed
* @overload should_window_close?()
*/
static mrb_value
mrb_window_should_close(mrb_state* mrb, mrb_value self) {
return mrb_bool_value(WindowShouldClose());
}
/*
* Set background color *(framebuffer clear color)*
* @overload clear_background(color: Rl:Color.raywhite)
* @param color [Rl::Color]
* @return [Nil]
*/
static mrb_value
mrb_clear_background(mrb_state* mrb, mrb_value self) {
struct RClass *raylib = mrb_module_get(mrb, "Raylib");
struct RClass *color = mrb_class_get_under(mrb, raylib, Color_type.struct_name);
mrb_value color_obj = mrb_funcall(mrb, mrb_obj_value(color), "ray_white", 0);
uint32_t kw_num = 1;
const mrb_sym kw_names[] = {
mrb_intern_lit(mrb, "color"),
};
mrb_value kw_values[kw_num];
const mrb_kwargs kwargs = { kw_num, 0, kw_names, kw_values, NULL };
mrb_get_args(mrb, "|o:", &color_obj, &kwargs);
Color *color_data = DATA_GET_PTR(mrb, color_obj, &Color_type, Color);
ClearBackground(*color_data);
return mrb_nil_value();
}
void
mrb_init_raylib_core(mrb_state* mrb) {
struct RClass *raylib = mrb_define_module(mrb, "Raylib");
mrb_define_module_function(mrb, raylib, "init_window", mrb_init_window, MRB_ARGS_OPT(3));
mrb_define_module_function(mrb, raylib, "window_should_close?", mrb_window_should_close, MRB_ARGS_NONE());
mrb_define_module_function(mrb, raylib, "clear_background", mrb_clear_background, MRB_ARGS_REQ(1));
}
|
