Deltarune script viewer

← back to main script listing

gml_Object_obj_shop_ch2_swatch_Create_0

(view raw script w/o annotations or w/e)
1
idletimer = 0;
2
idlefacer = 0;
3
talkfacer = 0;
4
talkbuffer = 0;
5
menu = 0;
6
submenu = 0;
7
global.typer = 6;
8
draw_set_color(c_white);
9
scr_84_set_draw_font
scr_84_set_draw_font

function scr_84_set_draw_font(arg0) { global.chemg_font = arg0; draw_set_font(scr_84_get_font(arg0)); }
("mainbig");
10
talktimer = 0;
11
cur_jewel = 0;
12
shopcharx = 0;
13
siner = 0;
14
for (i = 0; i < 20; i += 1)
15
{
16
    menuc[i] = 0;
17
    submenuc[i] = 0;
18
}
19
onebuffer = 0;
20
twobuffer = 0;
21
upbuffer = 0;
22
downbuffer = 0;
23
hold_up = 0;
24
hold_down = 0;
25
_up_pressed = 0;
26
_down_pressed = 0;
27
murder = 0;
28
moff = 415;
29
global.currentsong[0] = snd_init("hip_shop.ogg");
30
global.currentsong[1] = mus_loop_ext(global.currentsong[0], 1, 0.98);
31
menu = 0;
32
menuc[0] = 0;
33
menuc[1] = 0;
34
menuc[2] = 0;
35
menuc[3] = 0;
36
menuc[4] = 0;
37
item0pic = spr_heart;
38
item1pic = spr_heart;
39
item2pic = spr_heart;
40
item3pic = spr_heart;
41
itemtotal = 4;
42
item[0] = 24;
43
item[1] = 25;
44
item[2] = 12;
45
item[3] = 22;
46
item[4] = 0;
47
item[5] = 0;
48
item[6] = 0;
49
itemtype[0] = "item";
50
itemtype[1] = "item";
51
itemtype[2] = "armor";
52
itemtype[3] = "armor";
53
itemtype[4] = "item";
54
itemtype[5] = "item";
55
itemtype[6] = "item";
56
shopdesc[0] = stringsetloc(
ITEM#Short for#ButlerJuice#+100HP
"ITEM#Short for#ButlerJuice#+100HP", "obj_shop_ch2_swatch_slash_Create_0_gml_80_0"
);
57
shopdesc[1] = stringsetloc(
ITEM#Spaghetti#woven by#master coders#Party +30HP
"ITEM#Spaghetti#woven by#master coders#Party +30HP", "obj_shop_ch2_swatch_slash_Create_0_gml_79_0"
);
58
shopdesc[2] = stringsetloc(
ARMOR#A handsome#bowtie.
"ARMOR#A handsome#bowtie.", "obj_shop_ch2_swatch_slash_Create_0_gml_81_0"
);
59
shopdesc[3] = stringsetloc(
ARMOR#Luxurious#brooch.
"ARMOR#Luxurious#brooch.", "obj_shop_ch2_swatch_slash_Create_0_gml_81_0_b"
);
60
for (i = 0; i < itemtotal; i += 1)
61
{
62
    itematk[i] = 0;
63
    itemdef[i] = 0;
64
    itemmagic[i] = 0;
65
    canequip[i][1] = 0;
66
    canequip[i][2] = 0;
67
    canequip[i][3] = 0;
68
    if (itemtype[i] == "item")
69
    {
70
        scr_iteminfo
scr_iteminfo

function scr_iteminfo(arg0) { usable = 0; replaceable = 0; value = 0; itemtarget = 0; itemnameb = " "; itemdescb = " "; switch (arg0) { case 0: itemnameb = " "; itemdescb = "---"; break; case 1: itemnameb = stringsetloc(
Dark Candy
"Dark Candy", "scr_iteminfo_slash_scr_iteminfo_gml_15_0"
); itemdescb = stringsetloc(
Heals#40HP
"Heals#40HP", "scr_iteminfo_slash_scr_iteminfo_gml_16_0"
); itemtarget = 1; value = 25; usable = 1; break; case 2: itemnameb = stringsetloc(
ReviveMint
"ReviveMint", "scr_iteminfo_slash_scr_iteminfo_gml_22_0"
); itemdescb = stringsetloc(
Heal#Downed#Ally
"Heal#Downed#Ally", "scr_iteminfo_slash_scr_iteminfo_gml_23_0"
); itemtarget = 1; value = 400; usable = 1; break; case 3: itemnameb = stringsetloc(
Glowshard
"Glowshard", "scr_iteminfo_slash_scr_iteminfo_gml_29_0"
); itemdescb = stringsetloc(
Sell#at#shops
"Sell#at#shops", "scr_iteminfo_slash_scr_iteminfo_gml_30_0"
); itemtarget = 0; value = 200 + (global.chapter * 100); usable = 0; break; case 4: itemnameb = stringsetloc(
Manual
"Manual", "scr_iteminfo_slash_scr_iteminfo_gml_36_0"
); itemdescb = stringsetloc(
Read#out of#battle
"Read#out of#battle", "scr_iteminfo_slash_scr_iteminfo_gml_37_0"
); itemtarget = 2; value = 1; usable = 0; break; case 5: itemnameb = stringsetloc(
BrokenCake
"BrokenCake", "scr_iteminfo_slash_scr_iteminfo_gml_43_0"
); itemdescb = stringsetloc(
Heals#20HP
"Heals#20HP", "scr_iteminfo_slash_scr_iteminfo_gml_44_0"
); itemtarget = 1; value = 5; usable = 1; break; case 6: itemnameb = stringsetloc(
Top Cake
"Top Cake", "scr_iteminfo_slash_scr_iteminfo_gml_50_0"
); itemdescb = stringsetloc(
Heals#team#160HP
"Heals#team#160HP", "scr_iteminfo_slash_scr_iteminfo_gml_51_0"
); itemtarget = 2; value = 150; usable = 1; break; case 7: var healamount = (global.chapter == 1) ? 80 : 140; itemnameb = stringsetloc(
Spincake
"Spincake", "scr_iteminfo_slash_scr_iteminfo_gml_58_0"
); itemdescb = stringsetsubloc("Heals#team#~1HP", string(healamount), "scr_iteminfo_slash_scr_iteminfo_gml_59_0"); itemtarget = 2; value = 5; usable = 1; break; case 8: itemnameb = stringsetloc(
Darkburger
"Darkburger", "scr_iteminfo_slash_scr_iteminfo_gml_65_0"
); itemdescb = stringsetloc(
Heals#70HP
"Heals#70HP", "scr_iteminfo_slash_scr_iteminfo_gml_66_0"
); itemtarget = 1; value = 70; usable = 1; break; case 9: itemnameb = stringsetloc(
LancerCookie
"LancerCookie", "scr_iteminfo_slash_scr_iteminfo_gml_72_0"
); itemdescb = stringsetloc(
Heals#50HP
"Heals#50HP", "scr_iteminfo_slash_scr_iteminfo_gml_73_0"
); itemtarget = 1; value = 10; usable = 1; break; case 10: itemnameb = stringsetloc(
GigaSalad
"GigaSalad", "scr_iteminfo_slash_scr_iteminfo_gml_79_0"
); itemdescb = stringsetloc(
Heals#4HP
"Heals#4HP", "scr_iteminfo_slash_scr_iteminfo_gml_80_0"
); itemtarget = 1; value = 10; usable = 1; break; case 11: itemnameb = stringsetloc(
ClubsSandwich
"ClubsSandwich", "scr_iteminfo_slash_scr_iteminfo_gml_86_0"
); itemdescb = stringsetloc(
Heals#team#70HP
"Heals#team#70HP", "scr_iteminfo_slash_scr_iteminfo_gml_87_0"
); itemtarget = 2; value = 70; usable = 1; break; case 12: itemnameb = stringsetloc(
HeartsDonut
"HeartsDonut", "scr_iteminfo_slash_scr_iteminfo_gml_93_0"
); itemdescb = stringsetloc(
Healing#varies
"Healing#varies", "scr_iteminfo_slash_scr_iteminfo_gml_94_0"
); itemtarget = 1; value = 40; usable = 1; break; case 13: itemnameb = stringsetloc(
ChocDiamond
"ChocDiamond", "scr_iteminfo_slash_scr_iteminfo_gml_100_0"
); ...
(item[i]);
71
        shopitemname[i] = itemnameb;
72
        buyvalue[i] = value;
73
    }
74
    if (itemtype[i] == "armor")
75
    {
76
        scr_armorinfo
scr_armorinfo

function scr_armorinfo(arg0) { armorchar4temp = 1; armornametemp = stringsetloc(
" ", "scr_armorinfo_slash_scr_armorinfo_gml_2_0"
); armorelementtemp = 0; armorelementamounttemp = 0; switch (arg0) { case 0: armornametemp = stringsetloc(
" ", "scr_armorinfo_slash_scr_armorinfo_gml_7_0"
); armordesctemp = stringsetloc(
" ", "scr_armorinfo_slash_scr_armorinfo_gml_8_0_b"
); amessage2temp = stringsetloc(
Hey, hands off!
"Hey, hands off!", "scr_armorinfo_slash_scr_armorinfo_gml_8_0"
); amessage3temp = stringsetloc(
" ", "scr_armorinfo_slash_scr_armorinfo_gml_10_0"
); amessage4temp = stringsetloc(
" ", "scr_armorinfo_slash_scr_armorinfo_gml_11_0"
); armorattemp = 0; armordftemp = 0; armormagtemp = 0; armorboltstemp = 0; armorgrazeamttemp = 0; armorgrazesizetemp = 0; armorchar1temp = 1; armorchar2temp = 0; armorchar3temp = 1; armorchar4temp = 1; armorabilitytemp = stringsetloc(
" ", "scr_armorinfo_slash_scr_armorinfo_gml_22_0"
); armorabilityicontemp = 0; armoricontemp = 0; value = 0; break; case 1: armornametemp = stringsetloc(
Amber Card
"Amber Card", "scr_armorinfo_slash_scr_armorinfo_gml_28_0"
); armordesctemp = stringsetloc(
A thin square charm that sticks#to you, increasing defense.
"A thin square charm that sticks#to you, increasing defense.", "scr_armorinfo_slash_scr_armorinfo_gml_29_0"
); amessage2temp = stringsetloc(
... better than nothing.
"... better than nothing.", "scr_armorinfo_slash_scr_armorinfo_gml_30_0"
); amessage3temp = stringsetloc(
It's sticky, huh, Kris...
"It's sticky, huh, Kris...", "scr_armorinfo_slash_scr_armorinfo_gml_31_0"
); amessage4temp = stringsetloc(
It's like a name-tag!
"It's like a name-tag!", "scr_armorinfo_slash_scr_armorinfo_gml_33_0"
); armorattemp = 0; armordftemp = 1; armormagtemp = 0; armorboltstemp = 0; armorgrazeamttemp = 0; armorgrazesizetemp = 0; armorchar1temp = 1; armorchar2temp = 1; armorchar3temp = 1; armorabilitytemp = stringsetloc(
" ", "scr_armorinfo_slash_scr_armorinfo_gml_43_0"
); armorabilityicontemp = 0; armoricontemp = 4; value = 100; break; case 2: armornametemp = stringsetloc(
Dice Brace
"Dice Brace", "scr_armorinfo_slash_scr_armorinfo_gml_49_0"
); armordesctemp = stringsetloc(
A bracelet made out of various#symbol-inscribed cubes.
"A bracelet made out of various#symbol-inscribed cubes.", "scr_armorinfo_slash_scr_armorinfo_gml_50_0"
); amessage2temp = stringsetloc(
... okay.
"... okay.", "scr_armorinfo_slash_scr_armorinfo_gml_51_0"
); amessage3temp = stringsetloc(
It says "Friendship!"
"It says \"Friendship!\"", "scr_armorinfo_slash_scr_armorinfo_gml_52_0"
); amessage4temp = stringsetloc(
Hey, y-you jumbled it...
"Hey, y-you jumbled it...", "scr_armorinfo_slash_scr_armorinfo_gml_54_0"
); armorattemp = 0; armordftemp = 2; armormagtemp = 0; armorboltstemp = 0; armorgrazeamttemp = 0; armorgrazesizetemp = 0; armorchar1temp = 1; armorchar2temp = 1; armorchar3temp = 1; armorabilitytemp = stringsetloc(
" ", "scr_armorinfo_slash_scr_armorinfo_gml_64_0"
); armorabilityicontemp = 0; armoricontemp = 4; value = 150; break; case 3: armornametemp = stringsetloc(
Pink Ribbon
"Pink Ribbon", "scr_armorinfo_slash_scr_armorinfo_gml_70_0"
); armordesctemp = stringsetloc(
A cute hair ribbon that increases#the range bullets increase tension.
"A cute hair ribbon that increases#the range bullets increase tension.", "scr_armorinfo_slash_scr_armorinfo_gml_71_0"
); amessage2temp = stringsetloc(
Nope. Not in 1st grade anymore.
"Nope. Not in 1st grade anymore.", "scr_armorinfo_slash_scr_armorinfo_gml_72_0"
); amessage3temp = stringsetloc(
Um... D-do I look cute...?
"Um... D-do I look cute...?", "scr_armorinfo_slash_scr_armorinfo_gml_73_0"
); amessage4temp = stringsetloc(
... feels familiar.
"... feels familiar.", "scr_armorinfo_slash_scr_armorinfo_gml_75_0"
); if (global.chapter == 2) { amessage2temp = stringsetloc(
I said NO! C'mon already!
"I said NO! C'mon already!", "scr_armorinfo_slash_scr_armorinfo_gml_78_0"
); amessage3temp = stringsetloc(
It's nice dressing up...
"It's nice dressing up...", "scr_armorinfo_slash_scr_armorinfo_gml_79_0"
); } armorattemp = 0; armordftemp = 1; armormagtemp = 0; armorboltstemp = 0; armorgrazeamttemp = 0; armorgrazesizetemp = 20; armorchar1temp = 1; armorchar2temp = 0; armorchar3temp = 1; armorchar4temp = 1; armorabilitytemp = stringsetloc(
GrazeArea
"GrazeArea", "scr_armorinfo_slash_scr_armorinfo_gml_91_0"
); armorabilityicontemp = 7; armoricontemp = 4; value = 100; break; case 4: armornametemp = stringsetloc(
White Ribbon
"White Ribbon", "scr_armorinfo_slash_scr_armorinfo_gml_98_0"
); armordesctemp = stringsetloc(
A crinkly hair ribbon that slightly#increases your defense.
"A crinkly hair ribbon that slightly#increases your defense.", "scr_armorinfo_slash_scr_armorinfo_gml_99_0"
); amessage2temp = stringsetloc(
Nope. Not in 1st grade anymore.
"Nope. Not in 1st grade anymore.", "scr_armorinfo_slash_scr_armorinfo_gml_100_0"
); amessage3temp = stringsetloc(
Um... D-do I look cute...?
"Um... D-do I look cute...?", "scr_armorinfo_slash_scr_armorinfo_gml_101_0"
); if (global.chapter == 2) ...
(item[i]);
77
        shopitemname[i] = armornametemp;
78
        buyvalue[i] = value;
79
        itemdef[i] = armordftemp;
80
        canequip[i][1] = armorchar1temp;
81
        canequip[i][2] = armorchar2temp;
82
        canequip[i][3] = armorchar3temp;
83
    }
84
    if (itemtype[i] == "weapon")
85
    {
86
        scr_weaponinfo
scr_weaponinfo

function scr_weaponinfo(arg0) { weaponchar4temp = 0; weaponnametemp = stringsetloc(
" ", "scr_weaponinfo_slash_scr_weaponinfo_gml_2_0"
); switch (arg0) { case 0: weaponnametemp = stringsetloc(
" ", "scr_weaponinfo_slash_scr_weaponinfo_gml_11_0"
); weapondesctemp = stringsetloc(
" ", "scr_weaponinfo_slash_scr_weaponinfo_gml_12_0"
); wmessage2temp = stringsetloc(
" ", "scr_weaponinfo_slash_scr_weaponinfo_gml_13_0"
); wmessage3temp = stringsetloc(
" ", "scr_weaponinfo_slash_scr_weaponinfo_gml_14_0"
); wmessage4temp = stringsetloc(
" ", "scr_weaponinfo_slash_scr_weaponinfo_gml_15_0"
); weaponattemp = 0; weapondftemp = 0; weaponmagtemp = 0; weaponboltstemp = 0; weaponstyletemp = " "; weapongrazeamttemp = 0; weapongrazesizetemp = 0; weaponchar1temp = 0; weaponchar2temp = 0; weaponchar3temp = 0; weaponchar4temp = 0; weaponabilitytemp = " "; weaponabilityicontemp = 0; weaponicontemp = 0; value = 0; break; case 1: weaponnametemp = stringsetloc(
Wood Blade
"Wood Blade", "scr_weaponinfo_slash_scr_weaponinfo_gml_33_0"
); weapondesctemp = stringsetloc(
A wooden practice blade with a carbon-#reinforced core.
"A wooden practice blade with a carbon-#reinforced core.", "scr_weaponinfo_slash_scr_weaponinfo_gml_34_0"
); wmessage2temp = stringsetloc(
What's this!? A CHOPSTICK?
"What's this!? A CHOPSTICK?", "scr_weaponinfo_slash_scr_weaponinfo_gml_35_0"
); if (global.plot < 30 && global.chapter == 1) wmessage2tempt = stringsetloc(
... You have a SWORD!?
"... You have a SWORD!?", "scr_weaponinfo_slash_scr_weaponinfo_gml_39_0"
); wmessage3temp = stringsetloc(
That's yours, Kris...
"That's yours, Kris...", "scr_weaponinfo_slash_scr_weaponinfo_gml_40_0"
); wmessage4temp = stringsetloc(
(It has bite marks...)
"(It has bite marks...)", "scr_weaponinfo_slash_scr_weaponinfo_gml_42_0"
); weaponattemp = 0; weapondftemp = 0; weaponmagtemp = 0; weaponboltstemp = 1; weaponstyletemp = "?"; weapongrazeamttemp = 0; weapongrazesizetemp = 0; weaponchar1temp = 1; weaponchar2temp = 0; weaponchar3temp = 0; weaponicontemp = 1; weaponabilityicontemp = 0; weaponabilitytemp = " "; value = 60; break; case 2: weaponnametemp = stringsetloc(
Mane Ax
"Mane Ax", "scr_weaponinfo_slash_scr_weaponinfo_gml_59_0"
); weapondesctemp = stringsetloc(
Beginner's ax forged from the#mane of a dragon whelp.
"Beginner's ax forged from the#mane of a dragon whelp.", "scr_weaponinfo_slash_scr_weaponinfo_gml_60_0"
); wmessage2temp = stringsetloc(
I'm too GOOD for that.
"I'm too GOOD for that.", "scr_weaponinfo_slash_scr_weaponinfo_gml_61_0"
); wmessage3temp = stringsetloc(
Ummm... it's a bit big.
"Ummm... it's a bit big.", "scr_weaponinfo_slash_scr_weaponinfo_gml_62_0"
); wmessage4temp = stringsetloc(
It... smells nice...
"It... smells nice...", "scr_weaponinfo_slash_scr_weaponinfo_gml_64_0"
); weaponattemp = 0; weapondftemp = 0; weaponmagtemp = 0; weaponboltstemp = 1; weaponstyletemp = "?"; weapongrazeamttemp = 0; weapongrazesizetemp = 0; weaponchar1temp = 0; weaponchar2temp = 0; weaponchar3temp = 0; weaponicontemp = 2; weaponabilityicontemp = 0; weaponabilitytemp = " "; value = 80; break; case 3: weaponnametemp = stringsetloc(
Red Scarf
"Red Scarf", "scr_weaponinfo_slash_scr_weaponinfo_gml_81_0"
); weapondesctemp = stringsetloc(
A basic scarf made of lightly#magical fiber.
"A basic scarf made of lightly#magical fiber.", "scr_weaponinfo_slash_scr_weaponinfo_gml_82_0"
); wmessage2temp = stringsetloc(
No. Just... no.
"No. Just... no.", "scr_weaponinfo_slash_scr_weaponinfo_gml_83_0"
); wmessage3temp = stringsetloc(
Comfy! Touch it, Kris!
"Comfy! Touch it, Kris!", "scr_weaponinfo_slash_scr_weaponinfo_gml_84_0"
); wmessage4temp = stringsetloc(
Huh? No, I'm not cold.
"Huh? No, I'm not cold.", "scr_weaponinfo_slash_scr_weaponinfo_gml_86_0"
); weaponattemp = 0; weapondftemp = 0; weaponmagtemp = 0; weaponboltstemp = 1; weaponstyletemp = "?"; weapongrazeamttemp = 0; weapongrazesizetemp = 0; weaponchar1temp = 0; weaponchar2temp = 0; weaponchar3temp = 1; weaponicontemp = 3; weaponabilityicontemp = 0; weaponabilitytemp = " "; value = 100; break; case 4: weaponnametemp = stringsetloc(
EverybodyWeapon
"EverybodyWeapon", "scr_weaponinfo_slash_scr_weaponinfo_gml_105_0"
); weapondesctemp = stringsetloc(
It felt right for everyone.
"It felt right for everyone.", "scr_weaponinfo_slash_scr_weaponinfo_gml_106_0"
); wmessage2temp = stringsetloc(
Uhhh... Ok.
"Uhhh... Ok.", "scr_weaponinfo_slash_scr_weaponinfo_gml_107_0"
); wmessage3temp = stringsetloc(
A perfect fit!
"A perfect fit!", "scr_weaponinfo_slash_scr_weaponinfo_gml_108_0"
); wmessage4temp = stringsetloc(
Wh... what is this?
"Wh... what is this?", "scr_weaponinfo_slash_scr_weaponinfo_gml_109_0"
); weaponattemp = 12; weapondftemp = 6; ...
(item[i]);
87
        itematk[i] = weaponattemp;
88
        itemmagic[i] = weaponmagtemp;
89
        shopitemname[i] = weaponnametemp;
90
        canequip[i][1] = weaponchar1temp;
91
        canequip[i][2] = weaponchar2temp;
92
        canequip[i][3] = weaponchar3temp;
93
        buyvalue[i] = value;
94
    }
95
}
96
sell = 0;
97
bought = 0;
98
mainmessage = 0;
99
minimenuy = 220;
100
global.typer = 23;
101
scr_84_set_draw_font
scr_84_set_draw_font

function scr_84_set_draw_font(arg0) { global.chemg_font = arg0; draw_set_font(scr_84_get_font(arg0)); }
("mainbig");
102
sidemessage = 0;
103
selling = 0;
104
global.msc = 0;
105
glow = 0;
106
shx = 130;
107
soldo = 0;
108
global.fe = 0;
109
an = 0;
110
global.fe = 0;
111
siner = 0;
112
shx = 0;
113
guysiner = 0;
114
talksiner = 0;
115
shinetimer = 0;
116
nothingcount = 0;
117
selltype = "item";
118
selltotal = max(global.flag[64 storage_size], 12);
119
for (i = 0; i < selltotal; i++)
120
{
121
    itemsellvalue[i] = 0;
122
    itemsellname[i] = "";
123
}