Deltarune (Chapter 3) script viewer

← back to main script listing

gml_GlobalScript_scr_charbox

(view raw script w/o annotations or w/e)
1
function 
scr_charbox
scr_charbox

function
scr_charbox()
{ for (c = 0; c < 4; c += 1) { if (havechar[c] == 1) { if (c == 0) charcolor = hpcolor[0]; if (c == 1) charcolor = hpcolor[1]; if (c == 2) charcolor = hpcolor[2]; if (c == 3) charcolor = hpcolor[3]; gc = global.charturn; xchunk = 0; if (charpos[c] == 0 && chartotal == 3) xchunk = 0; if (charpos[c] == 1 && chartotal == 3) xchunk = 213; if (charpos[c] == 2 && chartotal == 3) xchunk = 426; if (charpos[c] == 0 && chartotal == 2) xchunk = 108; if (charpos[c] == 1 && chartotal == 2) xchunk = 322; if (charpos[c] == 0 && chartotal == 1) xchunk = 213; if (gc == charpos[c]) { if (rouxlsgridenabled == false) { if (mmy[c] > -32) mmy[c] -= 2; if (mmy[c] > -24) mmy[c] -= 4; if (mmy[c] > -16) mmy[c] -= 6; if (mmy[c] > -8) mmy[c] -= 8; if (mmy[c] < -32) mmy[c] = -64; } else { if (mmy[c] > -170) mmy[c] -= 2; if (mmy[c] > -160) mmy[c] -= 4; if (mmy[c] > -150) mmy[c] -= 6; if (mmy[c] > -140) mmy[c] -= 12; if (mmy[c] > -32) mmy[c] -= 32; } } else if (rouxlsgridenabled == false) { if (mmy[c] < -14) mmy[c] += 15; else mmy[c] = 0; } else { if (mmy[c] < -14) mmy[c] += 32; if (mmy[c] > -14) mmy[c] = 0; } if (rouxlsgridenabled && mmy[c] != 0) { draw_set_color(c_black); draw_rectangle(xx + xchunk + 2, (480 - bp - 1) + yy + mmy[c], xx + xchunk + 210, (480 - bp) + yy + 0 + 33, false); } if (gc == charpos[c]) { if (global.myfight == 0) { if (rouxlsgridenabled == false) {
scr_selectionmatrix(xx + xchunk, (480 - bp) + yy);
} else { draw_rectangle(xx + xchunk, (480 - bp - 3) + yy + mmy[c], xx + xchunk + 212, 480 - bp, false); draw_set_color(c_black); draw_rectangle(xx + xchunk + 2, (480 - bp - 1) + yy + mmy[c], xx + xchunk + 210, 480 - bp, false); slmxx = xx + xchunk; slmyy = (480 - bp) + yy; s_siner += 2; draw_set_color(charcolor); draw_rectangle(slmxx, (480 - bp) + 40 + yy + mmy[c], slmxx + 212, (480 - bp) + 43 + yy + mmy[c], false); for (i = 0; i < 12; i += 1) { myxx = s_siner + (i * (10 * pi)); draw_set_alpha(sin(myxx / 60)); draw_line_width(slmxx, (slmyy - 3) + (mmy[c] * 0.75), slmxx, slmyy + 33, 2); draw_line_width(slmxx + 210 + 1, (slmyy - 3) + (mmy[c] * 0.75), slmxx + 210 + 1, slmyy + 33, 2); if (mmy[c] < -140) ...
()
2
{
3
    for (c = 0; c < 4; c += 1)
4
    {
5
        if (havechar[c] == 1)
6
        {
7
            if (c == 0)
8
                charcolor = hpcolor[0];
9
            if (c == 1)
10
                charcolor = hpcolor[1];
11
            if (c == 2)
12
                charcolor = hpcolor[2];
13
            if (c == 3)
14
                charcolor = hpcolor[3];
15
            gc = global.charturn;
16
            xchunk = 0;
17
            if (charpos[c] == 0 && chartotal == 3)
18
                xchunk = 0;
19
            if (charpos[c] == 1 && chartotal == 3)
20
                xchunk = 213;
21
            if (charpos[c] == 2 && chartotal == 3)
22
                xchunk = 426;
23
            if (charpos[c] == 0 && chartotal == 2)
24
                xchunk = 108;
25
            if (charpos[c] == 1 && chartotal == 2)
26
                xchunk = 322;
27
            if (charpos[c] == 0 && chartotal == 1)
28
                xchunk = 213;
29
            if (gc == charpos[c])
30
            {
31
                if (rouxlsgridenabled == false)
32
                {
33
                    if (mmy[c] > -32)
34
                        mmy[c] -= 2;
35
                    if (mmy[c] > -24)
36
                        mmy[c] -= 4;
37
                    if (mmy[c] > -16)
38
                        mmy[c] -= 6;
39
                    if (mmy[c] > -8)
40
                        mmy[c] -= 8;
41
                    if (mmy[c] < -32)
42
                        mmy[c] = -64;
43
                }
44
                else
45
                {
46
                    if (mmy[c] > -170)
47
                        mmy[c] -= 2;
48
                    if (mmy[c] > -160)
49
                        mmy[c] -= 4;
50
                    if (mmy[c] > -150)
51
                        mmy[c] -= 6;
52
                    if (mmy[c] > -140)
53
                        mmy[c] -= 12;
54
                    if (mmy[c] > -32)
55
                        mmy[c] -= 32;
56
                }
57
            }
58
            else if (rouxlsgridenabled == false)
59
            {
60
                if (mmy[c] < -14)
61
                    mmy[c] += 15;
62
                else
63
                    mmy[c] = 0;
64
            }
65
            else
66
            {
67
                if (mmy[c] < -14)
68
                    mmy[c] += 32;
69
                if (mmy[c] > -14)
70
                    mmy[c] = 0;
71
            }
72
            if (rouxlsgridenabled && mmy[c] != 0)
73
            {
74
                draw_set_color(c_black);
75
                draw_rectangle(xx + xchunk + 2, (480 - bp - 1) + yy + mmy[c], xx + xchunk + 210, (480 - bp) + yy + 0 + 33, false);
76
            }
77
            if (gc == charpos[c])
78
            {
79
                if (global.myfight == 0)
80
                {
81
                    if (rouxlsgridenabled == false)
82
                    {
83
                        
scr_selectionmatrix
scr_selectionmatrix

function
scr_selectionmatrix(arg0, arg1)
{ slmxx = arg0; slmyy = arg1; s_siner += 2; draw_set_color(charcolor); draw_rectangle(slmxx, slmyy, slmxx + 210, slmyy + 3, false); for (i = 0; i < 12; i += 1) { myxx = s_siner + (i * (10 * pi)); draw_set_alpha(sin(myxx / 60)); draw_line_width(slmxx, slmyy - 3, slmxx, slmyy + 33, 2); draw_line_width(slmxx + 210 + 1, slmyy - 3, slmxx + 210 + 1, slmyy + 33, 2); if (cos(myxx / 60) < 0) { draw_line_width((slmxx - (sin(myxx / 60) * 30)) + 30, slmyy, (slmxx - (sin(myxx / 60) * 30)) + 30, slmyy + 33, 2); draw_line_width((slmxx + 210 + (sin(myxx / 60) * 30)) - 30, slmyy, (slmxx + 210 + (sin(myxx / 60) * 30)) - 30, slmyy + 33, 2); } } draw_set_alpha(1); }
(xx + xchunk, (480 - bp) + yy);
84
                    }
85
                    else
86
                    {
87
                        draw_rectangle(xx + xchunk, (480 - bp - 3) + yy + mmy[c], xx + xchunk + 212, 480 - bp, false);
88
                        draw_set_color(c_black);
89
                        draw_rectangle(xx + xchunk + 2, (480 - bp - 1) + yy + mmy[c], xx + xchunk + 210, 480 - bp, false);
90
                        slmxx = xx + xchunk;
91
                        slmyy = (480 - bp) + yy;
92
                        s_siner += 2;
93
                        draw_set_color(charcolor);
94
                        draw_rectangle(slmxx, (480 - bp) + 40 + yy + mmy[c], slmxx + 212, (480 - bp) + 43 + yy + mmy[c], false);
95
                        for (i = 0; i < 12; i += 1)
96
                        {
97
                            myxx = s_siner + (i * (10 * pi));
98
                            draw_set_alpha(sin(myxx / 60));
99
                            draw_line_width(slmxx, (slmyy - 3) + (mmy[c] * 0.75), slmxx, slmyy + 33, 2);
100
                            draw_line_width(slmxx + 210 + 1, (slmyy - 3) + (mmy[c] * 0.75), slmxx + 210 + 1, slmyy + 33, 2);
101
                            if (mmy[c] < -140)
102
                            {
103
                                if (cos(myxx / 60) < 0)
104
                                {
105
                                    draw_set_alpha(lerp(0, sin(myxx / 60), (abs(mmy[c]) - 140) / 30));
106
                                    draw_line_width((slmxx - (sin(myxx / 60) * 30)) + 30, slmyy + (mmy[c] * 0.75), (slmxx - (sin(myxx / 60) * 30)) + 30, slmyy + 33, 2);
107
                                    draw_line_width((slmxx + 210 + (sin(myxx / 60) * 30)) - 30, slmyy + (mmy[c] * 0.75), (slmxx + 210 + (sin(myxx / 60) * 30)) - 30, slmyy + 33, 2);
108
                                }
109
                            }
110
                        }
111
                        draw_set_alpha(1);
112
                    }
113
                }
114
            }
115
            btc[0] = 0;
116
            btc[1] = 0;
117
            btc[2] = 0;
118
            btc[3] = 0;
119
            btc[4] = 0;
120
            if (i_ex(obj_rouxls_ch3_enemy))
121
            {
122
                var rep = 5;
123
                repeat (20)
124
                {
125
                    btc[rep] = 0;
126
                    rep++;
127
                }
128
            }
129
            if (gc == charpos[c])
130
                btc[global.bmenucoord[0][global.charturn] + (rouxlsbuttoncount_y * 5)] = 1;
131
            if (global.fighting == 1)
132
            {
133
                spare_glow = 0;
134
                for (sglowi = 0; sglowi < 3; sglowi += 1)
135
                {
136
                    if (global.monster[sglowi] == 1 && global.mercymod[sglowi] >= 100)
137
                        spare_glow = 1;
138
                }
139
                pacify_glow = 0;
140
                if (c == 2 || c == 3)
141
                {
142
                    for (sglowi = 0; sglowi < 3; sglowi += 1)
143
                    {
144
                        var tensionamount = 40;
145
                        if (c == 3)
146
                            tensionamount = 80;
147
                        if (global.monster[sglowi] == 1 && global.monsterstatus[sglowi] == 1 && global.tension >= tensionamount)
148
                            pacify_glow = 1;
149
                        if (global.encounterno == 31)
150
                            pacify_glow = 0;
151
                    }
152
                }
153
                var icon_offset = 5;
154
                if (obj_battlecontroller.oopsallacts == 1 && (i_ex(obj_rouxls_ch3_enemy) || i_ex(obj_tenna_board4_enemy)))
155
                {
156
                    var _rouxls_sprite = spr_btrouxls;
157
                    if (global.lang == "ja")
158
                        _rouxls_sprite = spr_ja_btrouxls;
159
                    var _spadesprite = 
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btspade");
160
                    var _heartsprite = spr_btheart;
161
                    var _actsprite = 
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact");
162
                    if (global.lang == "ja")
163
                        _actsprite = spr_ja_btact_tenna;
164
                    if (dogcon == 1)
165
                        _spadesprite = spr_btdog;
166
                    if (dogcon == 2)
167
                    {
168
                        _spadesprite = spr_btdog;
169
                        _heartsprite = spr_btdog;
170
                        _actsprite = spr_btdog;
171
                    }
172
                    if (rouxlserrorcon == 1 && dogcon < 1)
173
                    {
174
                        rouxlstelegraphtimer++;
175
                        if (global.lang == "ja")
176
                        {
177
                            if (rouxlstelegraphtimer >= 1 && rouxlstelegraphtimer <= 4)
178
                                _rouxls_sprite = spr_ja_btrouxls_select1;
179
                            if (rouxlstelegraphtimer >= 5 && rouxlstelegraphtimer <= 8)
180
                                _rouxls_sprite = spr_ja_btrouxls_select2;
181
                        }
182
                        else
183
                        {
184
                            if (rouxlstelegraphtimer >= 1 && rouxlstelegraphtimer <= 4)
185
                                _rouxls_sprite = spr_btrouxls_select1;
186
                            if (rouxlstelegraphtimer >= 5 && rouxlstelegraphtimer <= 8)
187
                                _rouxls_sprite = spr_btrouxls_select2;
188
                        }
189
                        if (rouxlstelegraphtimer == 8)
190
                            rouxlstelegraphtimer = 0;
191
                    }
192
                    if (rouxlstelegraphcon == 1 && dogcon < 1)
193
                    {
194
                        if (!audio_is_playing(snd_bombfall))
195
                            snd_play(snd_bombfall);
196
                        rouxlstelegraphtimer++;
197
                        if (rouxlstelegraphtimer >= 1 && rouxlstelegraphtimer <= 4)
198
                            _rouxls_sprite = spr_btexclamation1;
199
                        if (rouxlstelegraphtimer >= 5 && rouxlstelegraphtimer <= 8)
200
                            _rouxls_sprite = spr_btexclamation2;
201
                        if (rouxlstelegraphtimer == 8)
202
                            rouxlstelegraphtimer = 0;
203
                    }
204
                    if (spadetelegraphcon == 1 && dogcon < 1)
205
                    {
206
                        spadetelegraphtimer++;
207
                        if (spadetelegraphtimer >= 1 && spadetelegraphtimer <= 4)
208
                            _spadesprite = spr_btexclamation1_spade;
209
                        if (spadetelegraphtimer >= 5 && spadetelegraphtimer <= 8)
210
                            _spadesprite = spr_btexclamation2;
211
                        if (spadetelegraphtimer == 8)
212
                            spadetelegraphtimer = 0;
213
                    }
214
                    if (spadesuccesscon == 1 && heartsuccesscon == 0)
215
                    {
216
                        spadetelegraphtimer++;
217
                        if (spadetelegraphtimer >= 1 && spadetelegraphtimer <= 4)
218
                        {
219
                            if (spadefail == true)
220
                            {
221
                                _actsprite = spr_btact_fail1;
222
                                if (global.lang == "ja")
223
                                    _actsprite = spr_ja_btact_tenna_fail1;
224
                            }
225
                            else
226
                            {
227
                                _spadesprite = spr_btspade_success;
228
                                if (dogcon == 1)
229
                                {
230
                                    _spadesprite = spr_btdog_success;
231
                                    _actsprite = spr_btdog_success;
232
                                }
233
                                if (dogcon == 2)
234
                                {
235
                                    _spadesprite = spr_btdog_success;
236
                                    _actsprite = spr_btdog_success;
237
                                }
238
                            }
239
                        }
240
                        if (spadetelegraphtimer >= 5 && spadetelegraphtimer <= 8)
241
                        {
242
                            if (spadefail == true)
243
                            {
244
                                _actsprite = spr_btact_fail2;
245
                                if (global.lang == "ja")
246
                                    _actsprite = spr_ja_btact_tenna_fail2;
247
                            }
248
                            else
249
                            {
250
                                _spadesprite = spr_btspade_success2;
251
                                if (dogcon == 1)
252
                                {
253
                                    _spadesprite = spr_btdog_success2;
254
                                    _actsprite = spr_btdog_success2;
255
                                }
256
                                if (dogcon == 2)
257
                                {
258
                                    _spadesprite = spr_btdog_success2;
259
                                    _actsprite = spr_btdog_success2;
260
                                }
261
                            }
262
                        }
263
                        if (spadetelegraphtimer == 8)
264
                            spadetelegraphtimer = 0;
265
                    }
266
                    if (heartsuccesscon == 1)
267
                    {
268
                        heartsuccesstimer++;
269
                        if (heartsuccesstimer >= 1 && heartsuccesstimer <= 4)
270
                            _heartsprite = spr_btheart_success1;
271
                        if (heartsuccesstimer >= 5 && heartsuccesstimer <= 8)
272
                            _heartsprite = spr_btheart_success2;
273
                        if (heartsuccesstimer == 8)
274
                            heartsuccesstimer = 0;
275
                    }
276
                    if (i_ex(obj_rouxls_ch3_enemy) && obj_rouxls_ch3_enemy.intro == 2)
277
                    {
278
                        obj_rouxls_ch3_enemy.introtimer++;
279
                        if (obj_rouxls_ch3_enemy.introtimer == 1)
280
                            snd_play(snd_petrify);
281
                        var alpha;
282
                        if (obj_rouxls_ch3_enemy.introtimer < 30)
283
                        {
284
                            draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btfight"), 0, xx + xchunk + 15 + icon_offset, (485 - bp) + yy);
285
                            if (global.lang == "ja")
286
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 50 + icon_offset, (485 - bp) + yy);
287
                            else
288
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 50 + icon_offset, (485 - bp) + yy);
289
                            draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_bttech"), 0, xx + xchunk + 85 + icon_offset, (485 - bp) + yy);
290
                            draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btitem"), 0, xx + xchunk + 120 + icon_offset, (485 - bp) + yy);
291
                            draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btspare"), 0, xx + xchunk + 155 + icon_offset, (485 - bp) + yy);
292
                            alpha = lerp(0, 1.2, obj_rouxls_ch3_enemy.introtimer / 29);
293
                            if (obj_rouxls_ch3_enemy.introtimer < 0)
294
                                alpha = 0;
295
                        }
296
                        if (obj_rouxls_ch3_enemy.introtimer >= 30)
297
                        {
298
                            if (global.lang == "ja")
299
                            {
300
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 15 + icon_offset, (485 - bp) + yy);
301
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 50 + icon_offset, (485 - bp) + yy);
302
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 85 + icon_offset, (485 - bp) + yy);
303
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 120 + icon_offset, (485 - bp) + yy);
304
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 155 + icon_offset, (485 - bp) + yy);
305
                            }
306
                            else
307
                            {
308
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 15 + icon_offset, (485 - bp) + yy);
309
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 50 + icon_offset, (485 - bp) + yy);
310
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 85 + icon_offset, (485 - bp) + yy);
311
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 120 + icon_offset, (485 - bp) + yy);
312
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 155 + icon_offset, (485 - bp) + yy);
313
                            }
314
                            alpha = lerp(1, 0, (obj_rouxls_ch3_enemy.introtimer - 30) / 30);
315
                        }
316
                        draw_sprite_ext(spr_btact_rouxls_white, 0, xx + xchunk + 15 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, alpha);
317
                        draw_sprite_ext(spr_btact_rouxls_white, 0, xx + xchunk + 50 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, alpha);
318
                        draw_sprite_ext(spr_btact_rouxls_white, 0, xx + xchunk + 85 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, alpha);
319
                        draw_sprite_ext(spr_btact_rouxls_white, 0, xx + xchunk + 120 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, alpha);
320
                        draw_sprite_ext(spr_btact_rouxls_white, 0, xx + xchunk + 155 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, alpha);
321
                        if (obj_rouxls_ch3_enemy.introtimer == 60)
322
                            obj_rouxls_ch3_enemy.intro = 3;
323
                    }
324
                    else if (i_ex(obj_tenna_board4_enemy) && obj_tenna_board4_enemy.intro == 1)
325
                    {
326
                        obj_tenna_board4_enemy.introtimer++;
327
                        if (obj_tenna_board4_enemy.introtimer == 1)
328
                            snd_play(snd_petrify);
329
                        var alpha;
330
                        if (obj_tenna_board4_enemy.introtimer < 30)
331
                        {
332
                            draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btfight"), 0, xx + xchunk + 15 + icon_offset, (485 - bp) + yy);
333
                            if (global.lang == "ja")
334
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 50 + icon_offset, (485 - bp) + yy);
335
                            else
336
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 50 + icon_offset, (485 - bp) + yy);
337
                            draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_bttech"), 0, xx + xchunk + 85 + icon_offset, (485 - bp) + yy);
338
                            draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btitem"), 0, xx + xchunk + 120 + icon_offset, (485 - bp) + yy);
339
                            draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btspare"), 0, xx + xchunk + 155 + icon_offset, (485 - bp) + yy);
340
                            alpha = lerp(0, 1.2, obj_tenna_board4_enemy.introtimer / 29);
341
                            if (obj_tenna_board4_enemy.introtimer < 0)
342
                                alpha = 0;
343
                        }
344
                        if (obj_tenna_board4_enemy.introtimer >= 30)
345
                        {
346
                            if (global.lang == "ja")
347
                            {
348
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 15 + icon_offset, (485 - bp) + yy);
349
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 50 + icon_offset, (485 - bp) + yy);
350
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 85 + icon_offset, (485 - bp) + yy);
351
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 120 + icon_offset, (485 - bp) + yy);
352
                                draw_sprite(spr_ja_btact_tenna, 0, xx + xchunk + 155 + icon_offset, (485 - bp) + yy);
353
                            }
354
                            else
355
                            {
356
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 15 + icon_offset, (485 - bp) + yy);
357
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 50 + icon_offset, (485 - bp) + yy);
358
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 85 + icon_offset, (485 - bp) + yy);
359
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 120 + icon_offset, (485 - bp) + yy);
360
                                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), 0, xx + xchunk + 155 + icon_offset, (485 - bp) + yy);
361
                            }
362
                            alpha = lerp(1, 0, (obj_tenna_board4_enemy.introtimer - 30) / 30);
363
                            global.bmenucoord[0][0] = 2;
364
                            global.bmenucoord[0][1] = 2;
365
                            global.bmenucoord[0][2] = 2;
366
                        }
367
                        draw_sprite_ext(spr_btact_rouxls_white, 0, xx + xchunk + 15 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, alpha);
368
                        draw_sprite_ext(spr_btact_rouxls_white, 0, xx + xchunk + 50 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, alpha);
369
                        draw_sprite_ext(spr_btact_rouxls_white, 0, xx + xchunk + 85 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, alpha);
370
                        draw_sprite_ext(spr_btact_rouxls_white, 0, xx + xchunk + 120 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, alpha);
371
                        draw_sprite_ext(spr_btact_rouxls_white, 0, xx + xchunk + 155 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, alpha);
372
                    }
373
                    else
374
                    {
375
                        var y_extra = 0;
376
                        var rep = 1;
377
                        var _actsprite2 = _actsprite;
378
                        if (rouxlsgridenabled == true)
379
                        {
380
                            y_extra = 0;
381
                            rep = 5;
382
                        }
383
                        if (gc == charpos[c])
384
                        {
385
                            repeat (rep)
386
                            {
387
                                var __y2 = lerp(140, 0, abs(mmy[c] / 170));
388
                                var __y = (y_extra * 32) + (mmy[c] * 0.75) + __y2;
389
                                if (rep == 1)
390
                                    __y += 32;
391
                                if (__y > 0)
392
                                    __y = 0;
393
                                if (y_extra != 4 && rouxlsgridenabled == true)
394
                                    _actsprite = spr_btact_ex;
395
                                if (y_extra != 4 && rouxlsgridenabled == true && global.lang == "ja")
396
                                    _actsprite = spr_ja_btact_tenna_ex;
397
                                if (rouxlsbuttoncount == (1 + (y_extra * 5)))
398
                                    draw_sprite(_rouxls_sprite, btc[0 + (y_extra * 5)], xx + xchunk + 15 + icon_offset, (485 - bp) + yy + __y);
399
                                else if (rouxlsbuttoncount2 == (1 + (y_extra * 5)))
400
                                    draw_sprite(_rouxls_sprite, btc[0 + (y_extra * 5)], xx + xchunk + 15 + icon_offset, (485 - bp) + yy + __y);
401
                                else if (spadebuttoncount == (1 + (y_extra * 5)))
402
                                    draw_sprite(_spadesprite, btc[0 + (y_extra * 5)], xx + xchunk + 15 + icon_offset, (485 - bp) + yy + __y);
403
                                else if (heartbuttoncount == (1 + (y_extra * 5)))
404
                                    draw_sprite(_heartsprite, btc[0 + (y_extra * 5)], xx + xchunk + 15 + icon_offset, (485 - bp) + yy + __y);
405
                                else
406
                                    draw_sprite(_actsprite, btc[0 + (y_extra * 5)], xx + xchunk + 15 + icon_offset, (485 - bp) + yy + __y);
407
                                if (rouxlsbuttoncount == (2 + (y_extra * 5)))
408
                                    draw_sprite(_rouxls_sprite, btc[1 + (y_extra * 5)], xx + xchunk + 50 + icon_offset, (485 - bp) + yy + __y);
409
                                else if (rouxlsbuttoncount2 == (2 + (y_extra * 5)))
410
                                    draw_sprite(_rouxls_sprite, btc[1 + (y_extra * 5)], xx + xchunk + 50 + icon_offset, (485 - bp) + yy + __y);
411
                                else if (spadebuttoncount == (2 + (y_extra * 5)))
412
                                    draw_sprite(_spadesprite, btc[1 + (y_extra * 5)], xx + xchunk + 50 + icon_offset, (485 - bp) + yy + __y);
413
                                else if (heartbuttoncount == (2 + (y_extra * 5)))
414
                                    draw_sprite(_heartsprite, btc[1 + (y_extra * 5)], xx + xchunk + 50 + icon_offset, (485 - bp) + yy + __y);
415
                                else
416
                                    draw_sprite(_actsprite, btc[1 + (y_extra * 5)], xx + xchunk + 50 + icon_offset, (485 - bp) + yy + __y);
417
                                if (rouxlsbuttoncount == (3 + (y_extra * 5)))
418
                                    draw_sprite(_rouxls_sprite, btc[2 + (y_extra * 5)], xx + xchunk + 85 + icon_offset, (485 - bp) + yy + __y);
419
                                else if (rouxlsbuttoncount2 == (3 + (y_extra * 5)))
420
                                    draw_sprite(_rouxls_sprite, btc[2 + (y_extra * 5)], xx + xchunk + 85 + icon_offset, (485 - bp) + yy + __y);
421
                                else if (spadebuttoncount == (3 + (y_extra * 5)))
422
                                    draw_sprite(_spadesprite, btc[2 + (y_extra * 5)], xx + xchunk + 85 + icon_offset, (485 - bp) + yy + __y);
423
                                else if (heartbuttoncount == (3 + (y_extra * 5)))
424
                                    draw_sprite(_heartsprite, btc[2 + (y_extra * 5)], xx + xchunk + 85 + icon_offset, (485 - bp) + yy + __y);
425
                                else
426
                                    draw_sprite(_actsprite, btc[2 + (y_extra * 5)], xx + xchunk + 85 + icon_offset, (485 - bp) + yy + __y);
427
                                if (rouxlsbuttoncount == (4 + (y_extra * 5)))
428
                                    draw_sprite(_rouxls_sprite, btc[3 + (y_extra * 5)], xx + xchunk + 120 + icon_offset, (485 - bp) + yy + __y);
429
                                else if (rouxlsbuttoncount2 == (4 + (y_extra * 5)))
430
                                    draw_sprite(_rouxls_sprite, btc[3 + (y_extra * 5)], xx + xchunk + 120 + icon_offset, (485 - bp) + yy + __y);
431
                                else if (spadebuttoncount == (4 + (y_extra * 5)))
432
                                    draw_sprite(_spadesprite, btc[3 + (y_extra * 5)], xx + xchunk + 120 + icon_offset, (485 - bp) + yy + __y);
433
                                else if (heartbuttoncount == (4 + (y_extra * 5)))
434
                                    draw_sprite(_heartsprite, btc[3 + (y_extra * 5)], xx + xchunk + 120 + icon_offset, (485 - bp) + yy + __y);
435
                                else
436
                                    draw_sprite(_actsprite, btc[3 + (y_extra * 5)], xx + xchunk + 120 + icon_offset, (485 - bp) + yy + __y);
437
                                if (rouxlsbuttoncount == (5 + (y_extra * 5)))
438
                                    draw_sprite(_rouxls_sprite, btc[4 + (y_extra * 5)], xx + xchunk + 155 + icon_offset, (485 - bp) + yy + __y);
439
                                else if (rouxlsbuttoncount2 == (5 + (y_extra * 5)))
440
                                    draw_sprite(_rouxls_sprite, btc[4 + (y_extra * 5)], xx + xchunk + 155 + icon_offset, (485 - bp) + yy + __y);
441
                                else if (spadebuttoncount == (5 + (y_extra * 5)))
442
                                    draw_sprite(_spadesprite, btc[4 + (y_extra * 5)], xx + xchunk + 155 + icon_offset, (485 - bp) + yy + __y);
443
                                else if (heartbuttoncount == (5 + (y_extra * 5)))
444
                                    draw_sprite(_heartsprite, btc[4 + (y_extra * 5)], xx + xchunk + 155 + icon_offset, (485 - bp) + yy + __y);
445
                                else
446
                                    draw_sprite(_actsprite, btc[4 + (y_extra * 5)], xx + xchunk + 155 + icon_offset, (485 - bp) + yy + __y);
447
                                y_extra++;
448
                                _actsprite = _actsprite2;
449
                            }
450
                        }
451
                    }
452
                }
453
                else
454
                {
455
                    draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btfight"), btc[0], xx + xchunk + 15 + icon_offset, (485 - bp) + yy);
456
                    if (c == 0)
457
                        draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btact"), btc[1], xx + xchunk + 50 + icon_offset, (485 - bp) + yy);
458
                    else if (disablesusieact == 1 && c == 1)
459
                        draw_sprite(spr_ja_bttech_grey, btc[1], xx + xchunk + 50 + icon_offset, (485 - bp) + yy);
460
                    else
461
                        draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_bttech"), btc[1], xx + xchunk + 50 + icon_offset, (485 - bp) + yy);
462
                    draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btitem"), btc[2], xx + xchunk + 85 + icon_offset, (485 - bp) + yy);
463
                    draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btspare"), btc[3], xx + xchunk + 120 + icon_offset, (485 - bp) + yy);
464
                    draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btdefend"), btc[4], xx + xchunk + 155 + icon_offset, (485 - bp) + yy);
465
                    if (spare_glow == 1 && gc == charpos[c])
466
                        draw_sprite_ext(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_btspare"), 2, xx + xchunk + 120 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, 0.4 + (sin(global.time / 6) * 0.4));
467
                    if (pacify_glow == 1 && gc == charpos[c])
468
                        draw_sprite_ext(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_bttech"), 2, xx + xchunk + 50 + icon_offset, (485 - bp) + yy, 1, 1, 0, c_white, 0.4 + (sin(global.time / 6) * 0.4));
469
                }
470
            }
471
            if (gc == charpos[c])
472
                draw_set_color(charcolor);
473
            else
474
                draw_set_color(bcolor);
475
            if (global.charselect == charpos[c] || global.charselect == 3)
476
                draw_set_color(charcolor);
477
            if (rouxlsgridenabled == false)
478
            {
479
                draw_rectangle(xx + xchunk, (480 - bp - 3) + yy + mmy[c], xx + xchunk + 212, ((480 - bp) + yy) - 2, false);
480
                draw_set_color(c_black);
481
                draw_rectangle(xx + xchunk + 2, (480 - bp - 1) + yy + mmy[c], xx + xchunk + 210, (480 - bp) + yy + mmy[c] + 33, false);
482
            }
483
            else
484
            {
485
                draw_rectangle(xx + xchunk, (480 - bp - 3) + yy + mmy[c], xx + xchunk + 212, (480 - bp - 2) + yy + mmy[c], false);
486
                if (mmy[c] < -32)
487
                {
488
                    draw_rectangle(xx + xchunk, (480 - bp - 3) + yy + mmy[c], xx + xchunk + 1, bpoff + b_offset + 39 + mmy[c], false);
489
                    draw_rectangle(xx + xchunk + 211, (480 - bp - 3) + yy + mmy[c], xx + xchunk + 212, bpoff + b_offset + 39 + mmy[c], false);
490
                }
491
                draw_set_color(c_black);
492
                if (gc != charpos[c] && mmy[c] != 0)
493
                    draw_rectangle(xx + xchunk + 2, (480 - bp - 1) + yy + mmy[c], xx + xchunk + 210, (480 - bp) + yy + 0 + 33, false);
494
                else
495
                    draw_rectangle(xx + xchunk + 2, (480 - bp - 1) + yy + mmy[c], xx + xchunk + 210, (480 - bp) + yy + mmy[c] + 33, false);
496
            }
497
            b_offset = 480;
498
            if (global.fighting == 0)
499
                b_offset = 430;
500
            if (global.fighting == 1)
501
                b_offset = 336;
502
            if (c == 0)
503
            {
504
                draw_sprite(spr_headkris, global.faceaction[charpos[c]], xx + 13 + xchunk, bpoff + b_offset + mmy[c]);
505
                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_bnamekris"), 0, xx + 51 + xchunk, bpoff + b_offset + 3 + mmy[c]);
506
            }
507
            if (c == 1)
508
            {
509
                draw_sprite(spr_headsusie, global.faceaction[charpos[c]], xx + 13 + xchunk, bpoff + b_offset + mmy[c]);
510
                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_bnamesusie"), 0, xx + 51 + xchunk, bpoff + b_offset + 3 + mmy[c]);
511
            }
512
            if (c == 2)
513
            {
514
                draw_sprite(spr_headralsei, global.faceaction[charpos[c]], xx + 13 + xchunk, bpoff + b_offset + mmy[c]);
515
                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_bnameralsei"), 0, xx + 51 + xchunk, bpoff + b_offset + 3 + mmy[c]);
516
            }
517
            if (c == 3)
518
            {
519
                draw_sprite(spr_headnoelle, global.faceaction[charpos[c]], xx + 13 + xchunk, bpoff + b_offset + mmy[c]);
520
                draw_sprite(
scr_84_get_sprite
scr_84_get_sprite

function
scr_84_get_sprite(arg0)
{ return ds_map_find_value(global.chemg_sprite_map, arg0); }
("spr_bnamenoelle"), 0, xx + 51 + xchunk, bpoff + b_offset + 3 + mmy[c]);
521
            }
522
            draw_sprite(spr_hpname, 0, xx + 109 + xchunk, bpoff + b_offset + 11 + mmy[c]);
523
            draw_set_color(c_white);
524
            draw_set_font(global.hpfont);
525
            if ((global.hp[c + 1] / global.maxhp[c + 1]) <= 0.25)
526
                draw_set_color(c_yellow);
527
            if (global.hp[c + 1] <= 0)
528
                draw_set_color(c_red);
529
            draw_set_halign(fa_right);
530
            draw_text(xx + 160 + xchunk, ((bpoff + b_offset) - 2) + mmy[c], string_hash_to_newline(global.hp[c + 1]));
531
            draw_sprite(spr_hpslash, 0, xx + 159 + xchunk, ((bpoff + b_offset) - 4) + mmy[c]);
532
            draw_text(xx + 205 + xchunk, ((bpoff + b_offset) - 2) + mmy[c], string_hash_to_newline(global.maxhp[c + 1]));
533
            draw_set_halign(fa_left);
534
            draw_set_color(c_maroon);
535
            draw_rectangle(xx + 128 + xchunk, bpoff + b_offset + 11 + mmy[c], xx + 203 + xchunk, bpoff + b_offset + 19 + mmy[c], false);
536
            if (global.hp[c + 1] > 0 && global.maxhp[c + 1] > 0)
537
            {
538
                draw_set_color(charcolor);
539
                draw_rectangle(xx + 128 + xchunk, bpoff + b_offset + 11 + mmy[c], xx + xchunk + 128 + ceil((global.hp[c + 1] / global.maxhp[c + 1]) * 75), bpoff + b_offset + 19 + mmy[c], false);
540
            }
541
        }
542
    }
543
}