Deltarune (Chapter 3) script viewer

← back to main script listing

gml_GlobalScript_scr_setparty

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

function
scr_setparty(arg0, arg1, arg2)
{ var kris = obj_mainchara; var slot = 0; var __make = true; if (!i_ex(kris)) __make = false;
scr_losechar();
safe_delete(obj_caterpillarchara); if (arg0 == true) {
scr_getchar(2);
if (__make) { with (
scr_makecaterpillar(kris.x, kris.y, 2, slot))
{ halign = (global.darkzone == 0) ? 3 : 6; valign = (global.darkzone == 0) ? 6 : 16; x -= halign; y -= valign; } } slot++; } if (arg1 == true) {
scr_getchar(3);
if (__make) { with (
scr_makecaterpillar(kris.x, kris.y, 3, slot))
{ halign = 2; valign = 12; x -= halign; y -= valign; } } slot++; } if (arg2 == true) {
scr_getchar(4);
if (__make) { with (
scr_makecaterpillar(kris.x, kris.y, 4, slot))
{ halign = (global.darkzone == 0) ? 2 : 4; valign = (global.darkzone == 0) ? 9 : 18; x -= halign; y -= valign; } } slot++; } }
(arg0, arg1, arg2)
2
{
3
    var kris = obj_mainchara;
4
    var slot = 0;
5
    var __make = true;
6
    if (!i_ex(kris))
7
        __make = false;
8
    
scr_losechar
scr_losechar

function
scr_losechar()
{ global.char[2] = 0; global.char[1] = 0; with (obj_darkcontroller) { chartotal = 0; havechar[0] = 0; havechar[1] = 0; havechar[2] = 0; havechar[3] = 0; for (i = 0; i < 3; i += 1) { global.faceaction[i] = 0; if (global.char[i] != 0) chartotal += 1; if (global.char[i] == 1) { havechar[0] = 1; charpos[0] = i; } if (global.char[i] == 2) { havechar[1] = 1; charpos[1] = i; } if (global.char[i] == 3) { havechar[2] = 1; charpos[2] = i; } if (global.char[i] == 4) { havechar[3] = 1; charpos[3] = i; } } } global.submenu = 0; global.charselect = -1; for (i = 0; i < 36; i += 1) global.submenucoord[i] = 0; }
();
9
    safe_delete(obj_caterpillarchara);
10
    if (arg0 == true)
11
    {
12
        
scr_getchar
scr_getchar

function
scr_getchar(arg0)
{ switch (arg0) { case "kr": case "kris": arg0 = 1; break; case "su": case "susie": arg0 = 2; break; case "ra": case "ralsei": arg0 = 3; break; case "no": case "noelle": arg0 = 4; break; } var characterToGet = arg0; getchar = 0; if (global.char[0] == 0) { global.char[0] = characterToGet; getchar = 1; } if (global.char[1] == 0 && getchar == 0) { global.char[1] = characterToGet; getchar = 1; } if (global.char[2] == 0 && getchar == 0) { global.char[2] = characterToGet; getchar = 1; } with (obj_darkcontroller) { chartotal = 0; havechar[0] = 0; havechar[1] = 0; havechar[2] = 0; havechar[3] = 0; for (i = 0; i < 3; i += 1) { global.faceaction[i] = 0; if (global.char[i] != 0) chartotal += 1; if (global.char[i] == 1) { havechar[0] = 1; charpos[0] = i; } if (global.char[i] == 2) { havechar[1] = 1; charpos[1] = i; } if (global.char[i] == 3) { havechar[2] = 1; charpos[2] = i; } if (global.char[i] == 4) { havechar[3] = 1; charpos[3] = i; } } } }
(2);
13
        if (__make)
14
        {
15
            with (
scr_makecaterpillar
scr_makecaterpillar

function
scr_makecaterpillar(arg0, arg1, arg2, arg3)
{ global.cinstance[arg3] = instance_create(arg0, arg1, obj_caterpillarchara); global.cinstance[arg3].target = 12 + (arg3 * 12); if (arg2 == 3) { with (global.cinstance[arg3]) { usprite = spr_ralseiu; dsprite = spr_ralseid; rsprite = spr_ralseir; lsprite = spr_ralseil; if (global.chapter >= 2) { name = "ralsei"; usprite = spr_ralsei_walk_up; dsprite = spr_ralsei_walk_down; rsprite = spr_ralsei_walk_right; lsprite = spr_ralsei_walk_left; } } } if (arg2 == 4) { with (global.cinstance[arg3]) { name = "noelle"; usprite = spr_noelle_walk_up_dw; dsprite = spr_noelle_walk_down_dw; rsprite = spr_noelle_walk_right_dw; lsprite = spr_noelle_walk_left_dw; if (global.chapter == 2 && global.plot == 95) { dsprite = spr_noelle_walk_down_blush_dw; rsprite = spr_noelle_walk_right_blush_dw; lsprite = spr_noelle_walk_left_blush_dw; } } } if (arg2 == 5) { with (global.cinstance[arg3]) { name = "berdly"; usprite = spr_berdly_walk_up_dw; dsprite = spr_berdly_walk_down_dw; rsprite = spr_berdly_walk_right_dw; lsprite = spr_berdly_walk_left_dw; } } if (arg2 == 6) { with (global.cinstance[arg3]) { name = "starwalker"; usprite = spr_npc_originalstarwalker; dsprite = spr_npc_originalstarwalker; rsprite = spr_npc_originalstarwalker; lsprite = spr_npc_originalstarwalker; } } return global.cinstance[arg3]; }
(kris.x, kris.y, 2, slot))
16
            {
17
                halign = (global.darkzone == 0) ? 3 : 6;
18
                valign = (global.darkzone == 0) ? 6 : 16;
19
                x -= halign;
20
                y -= valign;
21
            }
22
        }
23
        slot++;
24
    }
25
    if (arg1 == true)
26
    {
27
        
scr_getchar
scr_getchar

function
scr_getchar(arg0)
{ switch (arg0) { case "kr": case "kris": arg0 = 1; break; case "su": case "susie": arg0 = 2; break; case "ra": case "ralsei": arg0 = 3; break; case "no": case "noelle": arg0 = 4; break; } var characterToGet = arg0; getchar = 0; if (global.char[0] == 0) { global.char[0] = characterToGet; getchar = 1; } if (global.char[1] == 0 && getchar == 0) { global.char[1] = characterToGet; getchar = 1; } if (global.char[2] == 0 && getchar == 0) { global.char[2] = characterToGet; getchar = 1; } with (obj_darkcontroller) { chartotal = 0; havechar[0] = 0; havechar[1] = 0; havechar[2] = 0; havechar[3] = 0; for (i = 0; i < 3; i += 1) { global.faceaction[i] = 0; if (global.char[i] != 0) chartotal += 1; if (global.char[i] == 1) { havechar[0] = 1; charpos[0] = i; } if (global.char[i] == 2) { havechar[1] = 1; charpos[1] = i; } if (global.char[i] == 3) { havechar[2] = 1; charpos[2] = i; } if (global.char[i] == 4) { havechar[3] = 1; charpos[3] = i; } } } }
(3);
28
        if (__make)
29
        {
30
            with (
scr_makecaterpillar
scr_makecaterpillar

function
scr_makecaterpillar(arg0, arg1, arg2, arg3)
{ global.cinstance[arg3] = instance_create(arg0, arg1, obj_caterpillarchara); global.cinstance[arg3].target = 12 + (arg3 * 12); if (arg2 == 3) { with (global.cinstance[arg3]) { usprite = spr_ralseiu; dsprite = spr_ralseid; rsprite = spr_ralseir; lsprite = spr_ralseil; if (global.chapter >= 2) { name = "ralsei"; usprite = spr_ralsei_walk_up; dsprite = spr_ralsei_walk_down; rsprite = spr_ralsei_walk_right; lsprite = spr_ralsei_walk_left; } } } if (arg2 == 4) { with (global.cinstance[arg3]) { name = "noelle"; usprite = spr_noelle_walk_up_dw; dsprite = spr_noelle_walk_down_dw; rsprite = spr_noelle_walk_right_dw; lsprite = spr_noelle_walk_left_dw; if (global.chapter == 2 && global.plot == 95) { dsprite = spr_noelle_walk_down_blush_dw; rsprite = spr_noelle_walk_right_blush_dw; lsprite = spr_noelle_walk_left_blush_dw; } } } if (arg2 == 5) { with (global.cinstance[arg3]) { name = "berdly"; usprite = spr_berdly_walk_up_dw; dsprite = spr_berdly_walk_down_dw; rsprite = spr_berdly_walk_right_dw; lsprite = spr_berdly_walk_left_dw; } } if (arg2 == 6) { with (global.cinstance[arg3]) { name = "starwalker"; usprite = spr_npc_originalstarwalker; dsprite = spr_npc_originalstarwalker; rsprite = spr_npc_originalstarwalker; lsprite = spr_npc_originalstarwalker; } } return global.cinstance[arg3]; }
(kris.x, kris.y, 3, slot))
31
            {
32
                halign = 2;
33
                valign = 12;
34
                x -= halign;
35
                y -= valign;
36
            }
37
        }
38
        slot++;
39
    }
40
    if (arg2 == true)
41
    {
42
        
scr_getchar
scr_getchar

function
scr_getchar(arg0)
{ switch (arg0) { case "kr": case "kris": arg0 = 1; break; case "su": case "susie": arg0 = 2; break; case "ra": case "ralsei": arg0 = 3; break; case "no": case "noelle": arg0 = 4; break; } var characterToGet = arg0; getchar = 0; if (global.char[0] == 0) { global.char[0] = characterToGet; getchar = 1; } if (global.char[1] == 0 && getchar == 0) { global.char[1] = characterToGet; getchar = 1; } if (global.char[2] == 0 && getchar == 0) { global.char[2] = characterToGet; getchar = 1; } with (obj_darkcontroller) { chartotal = 0; havechar[0] = 0; havechar[1] = 0; havechar[2] = 0; havechar[3] = 0; for (i = 0; i < 3; i += 1) { global.faceaction[i] = 0; if (global.char[i] != 0) chartotal += 1; if (global.char[i] == 1) { havechar[0] = 1; charpos[0] = i; } if (global.char[i] == 2) { havechar[1] = 1; charpos[1] = i; } if (global.char[i] == 3) { havechar[2] = 1; charpos[2] = i; } if (global.char[i] == 4) { havechar[3] = 1; charpos[3] = i; } } } }
(4);
43
        if (__make)
44
        {
45
            with (
scr_makecaterpillar
scr_makecaterpillar

function
scr_makecaterpillar(arg0, arg1, arg2, arg3)
{ global.cinstance[arg3] = instance_create(arg0, arg1, obj_caterpillarchara); global.cinstance[arg3].target = 12 + (arg3 * 12); if (arg2 == 3) { with (global.cinstance[arg3]) { usprite = spr_ralseiu; dsprite = spr_ralseid; rsprite = spr_ralseir; lsprite = spr_ralseil; if (global.chapter >= 2) { name = "ralsei"; usprite = spr_ralsei_walk_up; dsprite = spr_ralsei_walk_down; rsprite = spr_ralsei_walk_right; lsprite = spr_ralsei_walk_left; } } } if (arg2 == 4) { with (global.cinstance[arg3]) { name = "noelle"; usprite = spr_noelle_walk_up_dw; dsprite = spr_noelle_walk_down_dw; rsprite = spr_noelle_walk_right_dw; lsprite = spr_noelle_walk_left_dw; if (global.chapter == 2 && global.plot == 95) { dsprite = spr_noelle_walk_down_blush_dw; rsprite = spr_noelle_walk_right_blush_dw; lsprite = spr_noelle_walk_left_blush_dw; } } } if (arg2 == 5) { with (global.cinstance[arg3]) { name = "berdly"; usprite = spr_berdly_walk_up_dw; dsprite = spr_berdly_walk_down_dw; rsprite = spr_berdly_walk_right_dw; lsprite = spr_berdly_walk_left_dw; } } if (arg2 == 6) { with (global.cinstance[arg3]) { name = "starwalker"; usprite = spr_npc_originalstarwalker; dsprite = spr_npc_originalstarwalker; rsprite = spr_npc_originalstarwalker; lsprite = spr_npc_originalstarwalker; } } return global.cinstance[arg3]; }
(kris.x, kris.y, 4, slot))
46
            {
47
                halign = (global.darkzone == 0) ? 2 : 4;
48
                valign = (global.darkzone == 0) ? 9 : 18;
49
                x -= halign;
50
                y -= valign;
51
            }
52
        }
53
        slot++;
54
    }
55
}