|
33 | 33 | (glut-display (lambda () |
34 | 34 | (imgui-render-start) |
35 | 35 | ;(imgui-test) |
36 | | - (imgui-set-next-window-size (imgui-make-vec2 210.0 230.0) 1) |
| 36 | + (imgui-set-next-window-size (imgui-make-vec2 210.0 280.0) 1) |
37 | 37 | (imgui-begin "calculator" 0) |
38 | 38 | (imgui-text "exp:") |
39 | 39 | (imgui-separator) |
40 | | - (if (imgui-button "7" (imgui-make-vec2 40.0 40.0) ) |
| 40 | + |
| 41 | + |
| 42 | + |
| 43 | + (if (imgui-button "C" (imgui-make-vec2 40.0 40.0) ) |
41 | 44 | 1; |
42 | 45 | ) |
43 | 46 | (imgui-same-line) |
44 | | - (if (imgui-button "8" (imgui-make-vec2 40.0 40.0) ) |
| 47 | + (if (imgui-button "+/-" (imgui-make-vec2 40.0 40.0) ) |
45 | 48 | 1; |
46 | 49 | ) |
47 | 50 | (imgui-same-line) |
48 | | - (if (imgui-button "9" (imgui-make-vec2 40.0 40.0) ) |
49 | | - 1; |
50 | | - ) |
51 | | - |
52 | | - (if (imgui-button "4" (imgui-make-vec2 40.0 40.0) ) |
53 | | - 1; |
54 | | - ) |
55 | | - (imgui-same-line) |
56 | | - (if (imgui-button "5" (imgui-make-vec2 40.0 40.0) ) |
| 51 | + (if (imgui-button "%" (imgui-make-vec2 40.0 40.0) ) |
57 | 52 | 1; |
58 | 53 | ) |
59 | 54 | (imgui-same-line) |
60 | | - (if (imgui-button "6" (imgui-make-vec2 40.0 40.0) ) |
| 55 | + (if (imgui-button "÷" (imgui-make-vec2 40.0 40.0) ) |
61 | 56 | 1; |
62 | 57 | ) |
63 | 58 |
|
64 | | - (if (imgui-button "1" (imgui-make-vec2 40.0 40.0) ) |
65 | | - 1; |
66 | | - ) |
| 59 | + |
| 60 | + (if (imgui-button "7" (imgui-make-vec2 40.0 40.0) ) |
| 61 | + 1; |
| 62 | + ) |
| 63 | + (imgui-same-line) |
| 64 | + (if (imgui-button "8" (imgui-make-vec2 40.0 40.0) ) |
| 65 | + 1; |
| 66 | + ) |
67 | 67 | (imgui-same-line) |
68 | | - (if (imgui-button "2" (imgui-make-vec2 40.0 40.0) ) |
| 68 | + (if (imgui-button "9" (imgui-make-vec2 40.0 40.0) ) |
69 | 69 | 1; |
70 | 70 | ) |
71 | 71 | (imgui-same-line) |
72 | | - (if (imgui-button "3" (imgui-make-vec2 40.0 40.0) ) |
| 72 | + (if (imgui-button "x" (imgui-make-vec2 40.0 40.0) ) |
73 | 73 | 1; |
74 | 74 | ) |
75 | 75 |
|
76 | | - (if (imgui-button "0" (imgui-make-vec2 40.0 40.0) ) |
77 | | - 1; |
78 | | - ) |
79 | | - (imgui-same-line) |
80 | | - (if (imgui-button "." (imgui-make-vec2 40.0 40.0) ) |
81 | | - 1; |
82 | | - ) |
83 | | - (imgui-same-line) |
84 | | - (if (imgui-button "c" (imgui-make-vec2 40.0 40.0) ) |
85 | | - 1; |
86 | | - ) |
87 | | - (imgui-same-line) |
88 | | - (if (imgui-button "=" (imgui-make-vec2 40.0 40.0) ) |
89 | | - 1; |
90 | | - ) |
| 76 | + (if (imgui-button "4" (imgui-make-vec2 40.0 40.0) ) |
| 77 | + 1; |
| 78 | + ) |
| 79 | + (imgui-same-line) |
| 80 | + (if (imgui-button "5" (imgui-make-vec2 40.0 40.0) ) |
| 81 | + 1; |
| 82 | + ) |
| 83 | + (imgui-same-line) |
| 84 | + (if (imgui-button "6" (imgui-make-vec2 40.0 40.0) ) |
| 85 | + 1; |
| 86 | + ) |
| 87 | + |
| 88 | + (imgui-same-line) |
| 89 | + (if (imgui-button "-" (imgui-make-vec2 40.0 40.0) ) |
| 90 | + 1; |
| 91 | + ) |
| 92 | + |
| 93 | + (if (imgui-button "1" (imgui-make-vec2 40.0 40.0) ) |
| 94 | + 1; |
| 95 | + ) |
| 96 | + (imgui-same-line) |
| 97 | + (if (imgui-button "2" (imgui-make-vec2 40.0 40.0) ) |
| 98 | + 1; |
| 99 | + ) |
| 100 | + (imgui-same-line) |
| 101 | + (if (imgui-button "3" (imgui-make-vec2 40.0 40.0) ) |
| 102 | + 1; |
| 103 | + ) |
| 104 | + (imgui-same-line) |
| 105 | + (if (imgui-button "+" (imgui-make-vec2 40.0 40.0) ) |
| 106 | + 1; |
| 107 | + ) |
| 108 | + |
| 109 | + (if (imgui-button "0" (imgui-make-vec2 88.0 40.0) ) |
| 110 | + 1; |
| 111 | + ) |
| 112 | + (imgui-same-line) |
| 113 | + (if (imgui-button "." (imgui-make-vec2 40.0 40.0) ) |
| 114 | + 1; |
| 115 | + ) |
| 116 | + |
| 117 | + (imgui-same-line) |
| 118 | + (if (imgui-button "=" (imgui-make-vec2 40.0 40.0) ) |
| 119 | + 1; |
| 120 | + ) |
91 | 121 |
|
92 | 122 | (imgui-end) |
93 | 123 | (imgui-render-end) |
|
0 commit comments