Deltarune script viewer

← back to main script listing

gml_Object_obj_shop2_ch1_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_ch1
scr_84_set_draw_font_ch1

function scr_84_set_draw_font_ch1(arg0) { global.chemg_font = arg0; draw_set_font(scr_84_get_font_ch1(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_ch1("hip_shop.ogg");
30
global.currentsong[1] = mus_loop_ext_ch1(global.currentsong[0], 1, 1);
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_ch1;
38
item1pic = spr_heart_ch1;
39
item2pic = spr_heart_ch1;
40
item3pic = spr_heart_ch1;
41
itemtotal = 4;
42
item[0] = 15;
43
item[1] = 6;
44
item[2] = 10;
45
item[3] = 1;
46
item[4] = 0;
47
item[5] = 0;
48
item[6] = 0;
49
itemtype[0] = "item";
50
itemtype[1] = "weapon";
51
itemtype[2] = "weapon";
52
itemtype[3] = "armor";
53
itemtype[4] = "item";
54
itemtype[5] = "item";
55
itemtype[6] = "item";
56
shopdesc[0] = 
ITEM#Fragrant#sauce#heals 50HP
scr_84_get_lang_string_ch1
scr_84_get_lang_string_ch1

function scr_84_get_lang_string_ch1(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_shop2_slash_Create_0_gml_73_0")
;
57
shopdesc[1] = 
WEAPON#Heroic
#Cool
scr_84_get_lang_string_ch1
scr_84_get_lang_string_ch1

function scr_84_get_lang_string_ch1(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_shop2_slash_Create_0_gml_74_0")
;
58
shopdesc[2] = 
WEAPON#Homemade#Healing up
scr_84_get_lang_string_ch1
scr_84_get_lang_string_ch1

function scr_84_get_lang_string_ch1(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_shop2_slash_Create_0_gml_75_0")
;
59
shopdesc[3] = 
ARMOR#Defensive#charm
scr_84_get_lang_string_ch1
scr_84_get_lang_string_ch1

function scr_84_get_lang_string_ch1(arg0) { return ds_map_find_value(global.lang_map, arg0); }
("obj_shop2_slash_Create_0_gml_76_0")
;
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_ch1
scr_iteminfo_ch1

function scr_iteminfo_ch1(arg0) { usable = 0; value = 0; itemtarget = 0; itemnameb = " "; itemdescb = " "; switch (arg0) { case 0: itemnameb = " "; itemdescb = "---"; break; case 1: itemnameb =
Dark Candy
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_14_0")
; itemdescb =
Heals#40HP
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_15_0")
; itemtarget = 1; value = 25; usable = 1; break; case 2: itemnameb =
ReviveMint
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_21_0")
; itemdescb =
Heal#Downed#Ally
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_22_0")
; itemtarget = 1; value = 400; usable = 1; break; case 3: itemnameb =
Glowshard
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_28_0")
; itemdescb =
Sell#at#shops
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_29_0")
; itemtarget = 0; value = 200; usable = 0; break; case 4: itemnameb =
Manual
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_35_0")
; itemdescb =
Read#out of#battle
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_36_0")
; itemtarget = 2; value = 1; usable = 0; break; case 5: itemnameb =
BrokenCake
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_42_0")
; itemdescb =
Heals#20HP
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_43_0")
; itemtarget = 1; value = 5; usable = 1; break; case 6: itemnameb =
Top Cake
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_49_0")
; itemdescb =
Heals#team#160HP
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_50_0")
; itemtarget = 2; value = 150; usable = 1; break; case 7: itemnameb =
Spincake
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_56_0")
; itemdescb =
Heals#team#80HP
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_57_0")
; itemtarget = 2; value = 5; usable = 1; break; case 8: itemnameb =
Darkburger
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_63_0")
; itemdescb =
Heals#70HP
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_64_0")
; itemtarget = 1; value = 70; usable = 1; break; case 9: itemnameb =
LancerCookie
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_70_0")
; itemdescb =
Heals#50HP
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_71_0")
; itemtarget = 1; value = 10; usable = 1; break; case 10: itemnameb =
GigaSalad
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_77_0")
; itemdescb =
Heals#4HP
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_78_0")
; itemtarget = 1; value = 10; usable = 1; break; case 11: itemnameb =
ClubsSandwich
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_84_0")
; itemdescb =
Heals#team#30HP
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_85_0")
; itemtarget = 2; value = 70; usable = 1; break; case 12: itemnameb =
HeartsDonut
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_91_0")
; itemdescb =
Healing#varies
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_92_0")
; itemtarget = 1; value = 40; usable = 1; break; case 13: itemnameb =
ChocDiamond
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_98_0")
; itemdescb =
Healing#varies
scr_84_get_lang_string_ch1("scr_iteminfo_slash_scr_iteminfo_gml_99_0")
; itemtarget = 1; ...
(item[i]);
71
        shopitemname[i] = itemnameb;
72
        buyvalue[i] = value;
73
    }
74
    if (itemtype[i] == "armor")
75
    {
76
        scr_armorinfo_ch1
scr_armorinfo_ch1

function scr_armorinfo_ch1(arg0) { switch (arg0) { case 0: armornametemp = " "; armordesctemp = " "; amessage2temp =
Hey, hands off!
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_8_0")
; amessage3temp = " "; armorattemp = 0; armordftemp = 0; armormagtemp = 0; armorboltstemp = 0; armorgrazeamttemp = 0; armorgrazesizetemp = 0; armorchar1temp = 1; armorchar2temp = 0; armorchar3temp = 1; armorabilitytemp = " "; armorabilityicontemp = 0; armoricontemp = 0; value = 0; break; case 1: armornametemp =
Amber Card
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_26_0")
; armordesctemp =
A thin square charm that sticks#to you, increasing defense.
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_27_0")
; amessage2temp =
... better than nothing.
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_28_0")
; amessage3temp =
It's sticky, huh, Kris...
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_29_0")
; armorattemp = 0; armordftemp = 1; armormagtemp = 0; armorboltstemp = 0; armorgrazeamttemp = 0; armorgrazesizetemp = 0; armorchar1temp = 1; armorchar2temp = 1; armorchar3temp = 1; armorabilitytemp = " "; armorabilityicontemp = 0; armoricontemp = 4; value = 100; break; case 2: armornametemp =
Dice Brace
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_46_0")
; armordesctemp =
A bracelet made out of various#symbol-inscribed cubes.
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_47_0")
; amessage2temp =
... okay.
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_48_0")
; amessage3temp =
It says "Friendship!"
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_49_0")
; armorattemp = 0; armordftemp = 2; armormagtemp = 0; armorboltstemp = 0; armorgrazeamttemp = 0; armorgrazesizetemp = 0; armorchar1temp = 1; armorchar2temp = 1; armorchar3temp = 1; armorabilitytemp = " "; armorabilityicontemp = 0; armoricontemp = 4; value = 150; break; case 3: armornametemp =
Pink Ribbon
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_66_0")
; armordesctemp =
A cute hair ribbon that increases#the range bullets increase tension.
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_67_0")
; amessage2temp =
Nope. Not in 1st grade anymore.
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_68_0")
; amessage3temp =
Um... D-do I look cute...?
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_69_0")
; armorattemp = 0; armordftemp = 1; armormagtemp = 0; armorboltstemp = 0; armorgrazeamttemp = 0; armorgrazesizetemp = 20; armorchar1temp = 1; armorchar2temp = 0; armorchar3temp = 1; armorabilitytemp =
TP Range
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_79_0")
; armorabilityicontemp = 7; armoricontemp = 4; value = 100; break; case 4: armornametemp =
White Ribbon
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_87_0")
; armordesctemp =
A crinkly hair ribbon that slightly#increases your defense.
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_88_0")
; amessage2temp =
Nope. Not in 1st grade anymore.
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_89_0")
; amessage3temp =
Um... D-do I look cute...?
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_90_0")
; if (instance_exists(obj_hathyfightevent_ch1)) amessage3temp = " "; armorattemp = 0; armordftemp = 2; armormagtemp = 0; armorboltstemp = 0; armorgrazeamttemp = 0; armorgrazesizetemp = 0; armorchar1temp = 1; armorchar2temp = 0; armorchar3temp = 1; armorabilitytemp =
Cuteness
scr_84_get_lang_string_ch1("scr_armorinfo_slash_scr_armorinfo_gml_101_0")
; armorabilityicontemp = 7; armoricontemp = 4; value = 90; break; ...
(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_ch1
scr_weaponinfo_ch1

function scr_weaponinfo_ch1(arg0) { switch (arg0) { case 0: weaponnametemp = " "; weapondesctemp = " "; wmessage2temp = " "; wmessage3temp = " "; weaponattemp = 0; weapondftemp = 0; weaponmagtemp = 0; weaponboltstemp = 0; weaponstyletemp = " "; weapongrazeamttemp = 0; weapongrazesizetemp = 0; weaponchar1temp = 0; weaponchar2temp = 0; weaponchar3temp = 0; weaponabilitytemp = " "; weaponabilityicontemp = 0; weaponicontemp = 0; value = 0; break; case 1: weaponnametemp =
Wood Blade
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_29_0")
; weapondesctemp =
A wooden practice blade with a carbon-#reinforced core.
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_30_0")
; wmessage2temp =
What's this!? A CHOPSTICK?
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_31_0")
; if (global.plot < 30) wmessage2tempt =
... You have a SWORD!?
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_34_0")
; wmessage3temp =
That's yours, Kris...
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_36_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 =
Mane Ax
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_54_0")
; weapondesctemp =
Beginner's ax forged from the#mane of a dragon whelp.
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_55_0")
; wmessage2temp =
I'm too GOOD for that.
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_56_0")
; wmessage3temp =
Ummm... it's a bit big.
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_57_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 =
Red Scarf
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_75_0")
; weapondesctemp =
A basic scarf made of lightly#magical fiber.
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_76_0")
; wmessage2temp =
No. Just... no.
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_77_0")
; wmessage3temp =
Comfy! Touch it, Kris!
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_78_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 =
EverybodyWeapon
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_97_0")
; weapondesctemp =
It felt right for everyone.
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_98_0")
; wmessage2temp =
Uhhh... Ok.
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_99_0")
; wmessage3temp =
A perfect fit!
scr_84_get_lang_string_ch1("scr_weaponinfo_slash_scr_weaponinfo_gml_100_0")
; weaponattemp = 12; weapondftemp = 6; weaponmagtemp = 8; weaponboltstemp = 1; weaponstyletemp = "?"; weapongrazeamttemp = 0; weapongrazesizetemp = 0; weaponchar1temp = 1; weaponchar2temp = 1; weaponchar3temp = 1; ...
(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_ch1
scr_84_set_draw_font_ch1

function scr_84_set_draw_font_ch1(arg0) { global.chemg_font = arg0; draw_set_font(scr_84_get_font_ch1(arg0)); }
("mainbig");
102
sidemessage = 0;
103
selling = 0;
104
global.msc = 0;
105
glow = 0;
106
shx = 130;
107
soldo = 0;
108
global.faceemotion = 0;
109
an = 0;
110
global.fe = 0;
111
siner = 0;
112
friendly = 0;
113
if (global.plot >= 175)
114
    friendly = 1;
115
worm_max = 4;
116
for (i = 0; i < worm_max; i += 1)
117
{
118
    worm_siner[i] = random(999);
119
    worm_image[i] = floor(random(4));
120
    worm_y[i] = -4 + random(8);
121
}