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
89
90
|
use macroquad::{Camera2D, DARKPURPLE, KeyCode, SKYBLUE, clear_background, draw_rectangle, get_frame_time, is_key_down, next_frame, set_camera, vec2};
use std::path::Path;
use tihdy::{Type, Value};
use tihdy::vm::OpResult;
use tihdy_derive::extern_function;
const SCREEN_WIDTH: f32 = 20.0;
const SCREEN_HEIGHT: f32 = 20.0;
extern_function!(log
[Value::Float(f1), Value::Float(f2)] -> Type::Void => {
println!("({}, {})", f1, f2);
Ok(Value::Nil)
},
);
extern_function!(get_delta
[] -> Type::Float => {
Ok(Value::Float(get_frame_time() as f64))
},
);
extern_function!(key_down
[Value::String(s)] -> Type::Bool => {
let s: &str = s;
Ok(Value::Bool(match s {
"w" => is_key_down(KeyCode::W),
"s" => is_key_down(KeyCode::S),
"i" => is_key_down(KeyCode::I),
"k" => is_key_down(KeyCode::K),
_ => false,
}))
},
);
extern_function!(my_draw_rectangle
[Value::Float(x), Value::Float(y), Value::Float(w), Value::Float(h)] -> Type::Void => {
draw_rectangle(*x as f32, *y as f32, *w as f32, *h as f32, DARKPURPLE);
Ok(Value::Nil)
},
);
extern_function!(clear
[] -> Type::Void => {
clear_background(SKYBLUE);
Ok(Value::Nil)
},
);
#[macroquad::main("Pong")]
async fn main() {
let functions: Vec<(String, tihdy::RustFunction)> = vec![
("log".to_string(), log),
("get_delta".to_string(), get_delta),
("key_down".to_string(), key_down),
("draw_rectangle".to_string(), my_draw_rectangle),
("clear".to_string(), clear),
];
let vm = tihdy::compile_file(Path::new("pong.tdy"), false, functions);
if let Err(errs) = vm {
for err in errs {
println!("{}", err);
}
return;
}
set_camera(Camera2D {
zoom: vec2(1. / SCREEN_WIDTH * 2., -1. / SCREEN_HEIGHT * 2.),
target: vec2(SCREEN_WIDTH / 2., SCREEN_HEIGHT / 2.),
..Default::default()
});
let mut vm = vm.unwrap();
loop {
match vm.run() {
Err(e) => {
println!("{:?}", e);
break;
}
Ok(OpResult::Yield) => {
next_frame().await
}
_ => {
break;
}
}
}
}
|
