-
Notifications
You must be signed in to change notification settings - Fork 1
Expand file tree
/
Copy pathcommands.h
More file actions
119 lines (98 loc) · 1.85 KB
/
commands.h
File metadata and controls
119 lines (98 loc) · 1.85 KB
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
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
DEF_COMMAND(PUSH, 1, 1,
{
PUSH(spu->regs[RHX]);
})
DEF_COMMAND(POP, 2, 1,
{
*arg.storePtr = POP();
})
DEF_COMMAND(IN, 3, 0,
{
elem_t value = 0;
scanf("%lg", &value);
PUSH(value);
})
DEF_COMMAND(ADD, 4, 0,
{
PUSH(POP() + POP());
})
DEF_COMMAND(SUB, 5, 0,
{
elem_t a = POP();
elem_t b = POP();
PUSH(b - a);
})
DEF_COMMAND(MUL, 6, 0,
{
PUSH(POP() * POP());
})
DEF_COMMAND(DIV, 7, 0,
{
elem_t b = POP();
elem_t a = POP();
if (!doubleCompare(b, 0))
PUSH(b / a);
else
return ZERO_DIVISION;
})
DEF_COMMAND(SQRT, 8, 0,
{
PUSH(sqrt(POP()));
})
DEF_COMMAND(SIN, 9, 0,
{
PUSH(sin(POP()));
})
DEF_COMMAND(COS, 10, 0,
{
PUSH(cos(POP()));
})
DEF_COMMAND(OUT, 11, 0,
{
printf("result: %lg\n", POP());
})
DEF_COMMAND(HLT, 12, 0,
{
return EXIT_CODE;
})
#define JUMP_COMMAND(name, num, comparison) \
DEF_COMMAND(name, num, 1, \
{ \
elem_t b = POP(); \
elem_t a = POP(); \
\
if (comparison) \
spu->ip = *(size_t*)arg.value; \
})
DEF_COMMAND(JMP, 13, 1,
{
spu->ip = *(size_t*)arg.value;
})
JUMP_COMMAND(JNE, 14, ! doubleCompare(a, b))
JUMP_COMMAND(JE, 15, doubleCompare(a, b))
JUMP_COMMAND(JBE, 16, a <= b)
JUMP_COMMAND(JB, 17, a < b)
JUMP_COMMAND(JAE, 18, a >= b)
JUMP_COMMAND(JA, 19, a > b)
DEF_COMMAND(CALL, 20, 1,
{
PUSHC(spu->ip);
spu->ip = *(size_t*)arg.value;
})
DEF_COMMAND(RET, 21, 0,
{
spu->ip = POPC();
})
DEF_COMMAND(MEOW, 22, 0,
{
printf("meow :3\n");
})
DEF_COMMAND(RND, 23, 0,
{
elem_t a = POP();
PUSH(round(a));
})
DEF_COMMAND(SCRN, 24, 0,
{
dumpRAM(spu GRAPHICS_ON(, renderer));
})