|
1
|
siner += 1;
|
|
2
|
draw_sprite_ext(spr_shop_rurusbg, 0, 0, 0, 2, 2, 0, c_white, 1);
|
|
3
|
draw_sprite_ext(spr_shop_rurussparkle, 0, 148 + (sin(siner / 6) * 4), 52 + (cos(siner / 6) * 4), 2, (sin(siner / 8) * 3) - 1, 0, c_white, (sin(siner / 8) * 2) - 1);
|
|
4
|
draw_sprite_ext(spr_shop_rurussparkle, 0, 48 + (sin(siner / 6) * 4), 42 + (cos(siner / 6) * 4), 2, (cos(siner / 8) * 3) - 1, 0, c_white, (cos(siner / 8) * 2) - 1);
|
|
5
|
draw_sprite_ext(spr_shop_rurusface, global.fe, 72, 62, 2, 2, 0, c_white, 1);
|
|
6
|
draw_sprite_ext(spr_shop_rurushand, siner / 3.73, 200, 56, 2, 2, 0, c_white, 1);
|
|
7
|
draw_sprite_ext(spr_shop_rurusfoot, siner / 3.73, 340, 150, 2, 2, 0, c_white, 1);
|
|
8
|
draw_sprite_ext(spr_shop_rurussteam, siner / 20, 422, 168 + (sin(siner / 8) * 2), 2, 2, 0, c_white, 1);
|
|
9
|
for (i = 0; i < worm_max; i += 1)
|
|
10
|
{
|
|
11
|
worm_image[i] += 0.2;
|
|
12
|
if (worm_image[i] >= 3)
|
|
13
|
worm_siner[i] += worm_image[i] / 3;
|
|
14
|
if (worm_image[i] >= 6)
|
|
15
|
worm_image[i] -= 6;
|
|
16
|
complexwormx = (sin(worm_siner[i] / 50) * 20) + (sin(worm_siner[i] / 3) * 2);
|
|
17
|
complexwormy = cos(worm_siner[i] / 8);
|
|
18
|
draw_sprite_ext(spr_shop_rurusworm, worm_image[i], 530 + complexwormx, 204 + complexwormy + worm_y[i], 2, 2, 0, c_white, 1);
|
|
19
|
}
|
|
20
|
draw_set_color(c_black);
|
|
21
|
draw_rectangle(0, 240, 640, 480, false);
|
|
22
|
scr_shopmenuscr_shopmenu
function scr_shopmenu(arg0)
{
if (arg0 == 0)
{
if (menu == 1 || menu == 2)
{
scr_darkbox_black(400, minimenuy, 640, 255);
draw_set_color(c_white);
scr_84_set_draw_font("mainbig");
if (menuc[1] == 0)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[0]));
if (menuc[1] == 1)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[1]));
if (menuc[1] == 2)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[2]));
if (menuc[1] == 3)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[3]));
scr_84_set_draw_font("dotumche");
if (itemtype[menuc[1]] == "weapon" || itemtype[menuc[1]] == "armor")
{
for (i = 0; i < 3; i += 1)
{
can_index = 0;
facetype = spr_headkris;
which = global.char[i];
if (global.char[i] == 1)
facetype = spr_headkris;
if (global.char[i] == 2)
facetype = spr_headsusie;
if (global.char[i] == 3)
facetype = spr_headralsei;
if (which != 0)
{
if (i == 0)
{
locx = 0;
locy = 0;
}
if (i == 1)
{
locx = 100;
locy = 0;
}
if (i == 2)
{
locx = 0;
locy = 45;
}
if (canequip[menuc[1]][which] == 0)
can_index = 8;
draw_sprite(facetype, can_index, 426 + locx, minimenuy + 140 + locy);
if (itemtype[menuc[1]] == "weapon" && can_index != 8)
{
draw_set_color(c_white);
sum[0] = itematk[menuc[1]] - global.itemat[which][0];
sum[1] = itemmagic[menuc[1]] - global.itemmag[which][0];
for (j = 0; j < 2; j += 1)
{
dcolor = c_white;
addt = "";
draw_set_color(c_white);
if (sum[j] > 0)
{
draw_set_color(c_yellow);
addt = "+";
}
if (sum[j] < 0)
draw_set_color(c_aqua);
draw_sprite_ext(spr_shopicon, j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
draw_text(490 + locx, minimenuy + locy + 135 + (20 * j), string_hash_to_newline(addt + string(sum[j])));
}
}
if (itemtype[menuc[1]] == "armor" && can_index != 8)
{
sum[0] = itemdef[menuc[1]] - global.itemdf[which][1];
sum[1] = itemdef[menuc[1]] - global.itemdf[which][2];
for (j = 0; j < 2; j += 1)
{
dcolor = c_white;
addt = "";
draw_set_color(c_white);
if (sum[j] > 0)
{
draw_set_color(c_yellow);
addt = "+";
}
if (sum[j] < 0)
draw_set_color(c_aqua);
draw_sprite_ext(spr_shopicon, 2 + j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
draw_text(490 + locx, minimenuy + 135 + (20 * j) + locy, string_hash_to_newline(addt + string(sum[j])));
}
}
}
}
}
}
}
if (arg0 == 4)
{
if (menu == 11 || menu == 15)
{
... (0);
|
|
23
|
if (menu <= 3 || menu >= 10)
|
|
24
|
{
|
|
25
|
scr_darkbox_blackscr_darkbox_black
function scr_darkbox_black(arg0, arg1, arg2, arg3)
{
draw_set_color(c_black);
draw_rectangle(arg0 + 20, arg1 + 20, arg2 - 20, arg3 - 20, false);
scr_darkbox(arg0, arg1, arg2, arg3);
} (0, 240, 415, 480);
|
|
26
|
scr_darkbox_blackscr_darkbox_black
function scr_darkbox_black(arg0, arg1, arg2, arg3)
{
draw_set_color(c_black);
draw_rectangle(arg0 + 20, arg1 + 20, arg2 - 20, arg3 - 20, false);
scr_darkbox(arg0, arg1, arg2, arg3);
} (400, 240, 640, 480);
|
|
27
|
}
|
|
28
|
if (menu == 4)
|
|
29
|
scr_darkbox_blackscr_darkbox_black
function scr_darkbox_black(arg0, arg1, arg2, arg3)
{
draw_set_color(c_black);
draw_rectangle(arg0 + 20, arg1 + 20, arg2 - 20, arg3 - 20, false);
scr_darkbox(arg0, arg1, arg2, arg3);
} (0, 240, 640, 480);
|
|
30
|
if (menu == 0)
|
|
31
|
{
|
|
32
|
sell = 0;
|
|
33
|
selling = 0;
|
|
34
|
sidemessage = 0;
|
|
35
|
menuc[1] = 0;
|
|
36
|
menuc[2] = 0;
|
|
37
|
menuc[3] = 0;
|
|
38
|
menuc[4] = 0;
|
|
39
|
if (instance_exists(obj_writer) == false)
|
|
40
|
{
|
|
41
|
global.typer = 6;
|
|
42
|
global.msg[0] = stringsetloc(Face 0* Anything else?"\\E0* Anything else?", "obj_shop2_slash_Draw_0_gml_70_0" );
|
|
43
|
if (mainmessage == 0)
|
|
44
|
{
|
|
45
|
global.msg[0] = stringsetloc(Face 0* Welcome to my
shop,Delay 11 you
ungrateful worms."\\E0* Welcome to my&shop^1, you&ungrateful worms.", "obj_shop2_slash_Draw_0_gml_73_0" );
|
|
46
|
if (friendly == 1)
|
|
47
|
global.msg[0] = stringsetloc(Face 0* Welcome,Delay 11 welcome,Delay 11
my Heroick Comrades!"\\E0* Welcome^1, welcome^1,&my Heroick Comrades!", "obj_shop2_slash_Draw_0_gml_74_0" );
|
|
48
|
}
|
|
49
|
instance_create(30, 270, obj_writer);
|
|
50
|
}
|
|
51
|
menumax = 3;
|
|
52
|
draw_set_color(c_white);
|
|
53
|
scr_84_set_draw_fontscr_84_set_draw_font
function scr_84_set_draw_font(arg0)
{
global.chemg_font = arg0;
draw_set_font(scr_84_get_font(arg0));
} ("mainbig");
|
|
54
|
draw_text(480, 260, string_hash_to_newline(stringsetloc(Buy"Buy", "obj_shop2_slash_Draw_0_gml_82_0" )));
|
|
55
|
draw_text(480, 300, string_hash_to_newline(stringsetloc(Sell"Sell", "obj_shop2_slash_Draw_0_gml_83_0" )));
|
|
56
|
draw_text(480, 340, string_hash_to_newline(stringsetloc(Talk"Talk", "obj_shop2_slash_Draw_0_gml_84_0" )));
|
|
57
|
draw_text(480, 380, string_hash_to_newline(stringsetloc(Exit"Exit", "obj_shop2_slash_Draw_0_gml_85_0" )));
|
|
58
|
draw_sprite(spr_heart, 0, 450, (135 + (menuc[0] * 20)) * 2);
|
|
59
|
if (button1_p())
|
|
60
|
{
|
|
61
|
onebuffer = 2;
|
|
62
|
mainmessage = 1;
|
|
63
|
with (obj_writer)
|
|
64
|
instance_destroy();
|
|
65
|
if (menuc[0] == 0)
|
|
66
|
menu = 1;
|
|
67
|
if (menuc[0] == 1)
|
|
68
|
{
|
|
69
|
menu = 10;
|
|
70
|
sidemessage = 0;
|
|
71
|
}
|
|
72
|
if (menuc[0] == 2)
|
|
73
|
menu = 3;
|
|
74
|
if (menuc[0] == 3)
|
|
75
|
{
|
|
76
|
sell = 2;
|
|
77
|
menu = 4;
|
|
78
|
}
|
|
79
|
}
|
|
80
|
}
|
|
81
|
if (menu == 1 || menu == 2)
|
|
82
|
{
|
|
83
|
draw_set_color(c_white);
|
|
84
|
scr_84_set_draw_fontscr_84_set_draw_font
function scr_84_set_draw_font(arg0)
{
global.chemg_font = arg0;
draw_set_font(scr_84_get_font(arg0));
} ("mainbig");
|
|
85
|
for (i = 0; i < itemtotal; i += 1)
|
|
86
|
{
|
|
87
|
draw_text(60, 260 + (i * 40), string_hash_to_newline(shopitemname[i]));
|
|
88
|
draw_text(300, 260 + (i * 40), string_hash_to_newline(stringsetsubloc("$~1", string(buyvalue[i]), "obj_shop2_slash_Draw_0_gml_113_0")));
|
|
89
|
}
|
|
90
|
draw_text(60, 260 + (itemtotal * 40), string_hash_to_newline(stringsetloc(Exit"Exit", "obj_shop2_slash_Draw_0_gml_115_0" )));
|
|
91
|
if (menu == 1)
|
|
92
|
{
|
|
93
|
menumax = 4;
|
|
94
|
if (instance_exists(obj_writer) == false)
|
|
95
|
{
|
|
96
|
if (sidemessage == 0)
|
|
97
|
global.msg[0] = stringsetloc(Face 0What
shalt
thou buy?"\\E0What&shalt&thou buy?", "obj_shop2_slash_Draw_0_gml_124_0" );
|
|
98
|
if (sidemessage == 1)
|
|
99
|
{
|
|
100
|
global.msg[0] = stringsetloc(Face 2Thanks,
worm."\\E2Thanks,&worm.", "obj_shop2_slash_Draw_0_gml_125_0" );
|
|
101
|
if (friendly == 1)
|
|
102
|
global.msg[0] = stringsetloc(Face 2Thanks,
hero!"\\E2Thanks,&hero!", "obj_shop2_slash_Draw_0_gml_126_0" );
|
|
103
|
}
|
|
104
|
if (sidemessage == 2)
|
|
105
|
global.msg[0] = stringsetloc(Face 3Perhaps
another
ware?"\\E3Perhaps&another&ware?", "obj_shop2_slash_Draw_0_gml_127_0" );
|
|
106
|
if (sidemessage == 3)
|
|
107
|
global.msg[0] = stringsetloc(Face 6Your
funds are
lacking."\\E6Your&funds are&lacking.", "obj_shop2_slash_Draw_0_gml_128_0" );
|
|
108
|
if (sidemessage == 4)
|
|
109
|
global.msg[0] = stringsetloc(Face 3Thou doth
carry
too much!"\\E3Thou doth&carry&too much!", "obj_shop2_slash_Draw_0_gml_129_0" );
|
|
110
|
if (murder == 1)
|
|
111
|
global.msg[0] = stringsetloc(Wait for input*"/*", "obj_shop2_slash_Draw_0_gml_130_0" );
|
|
112
|
instance_create(450, 260, obj_writer);
|
|
113
|
}
|
|
114
|
draw_sprite(spr_heart, 0, 30, 270 + (menuc[1] * 40));
|
|
115
|
if (button1_p() && onebuffer < 0)
|
|
116
|
{
|
|
117
|
menu = 2;
|
|
118
|
onebuffer = 2;
|
|
119
|
with (obj_writer)
|
|
120
|
instance_destroy();
|
|
121
|
if (menuc[1] == menumax)
|
|
122
|
menu = 0;
|
|
123
|
}
|
|
124
|
if (button2_p() && twobuffer < 0 && onebuffer < 2)
|
|
125
|
{
|
|
126
|
menu = 0;
|
|
127
|
twobuffer = 2;
|
|
128
|
minimenuy = 220;
|
|
129
|
with (obj_writer)
|
|
130
|
instance_destroy();
|
|
131
|
}
|
|
132
|
menuc[2] = 0;
|
|
133
|
}
|
|
134
|
if (menu == 2)
|
|
135
|
{
|
|
136
|
menumax = 1;
|
|
137
|
draw_set_color(c_white);
|
|
138
|
scr_84_set_draw_fontscr_84_set_draw_font
function scr_84_set_draw_font(arg0)
{
global.chemg_font = arg0;
draw_set_font(scr_84_get_font(arg0));
} ("mainbig");
|
|
139
|
var y1_off = langopt(260, 290);
|
|
140
|
var y2_off = langopt(290, 260);
|
|
141
|
draw_text(460, y1_off, string_hash_to_newline(stringsetloc(Buyeth for"Buyeth for", "obj_shop2_slash_Draw_0_gml_144_0" )));
|
|
142
|
draw_text(460, y2_off, string_hash_to_newline(stringsetsubloc("$~1 ?", string(buyvalue[menuc[1]]), "obj_shop2_slash_Draw_0_gml_147_0_b")));
|
|
143
|
draw_text(480, 340, string_hash_to_newline(stringsetloc(Yes"Yes", "obj_shop2_slash_Draw_0_gml_146_0" )));
|
|
144
|
draw_text(480, 370, string_hash_to_newline(stringsetloc(No"No", "obj_shop2_slash_Draw_0_gml_147_0" )));
|
|
145
|
draw_sprite(spr_heart, 0, 450, 350 + (menuc[2] * 30));
|
|
146
|
if (button2_p() && twobuffer < 0)
|
|
147
|
{
|
|
148
|
menu = 1;
|
|
149
|
sidemessage = 2;
|
|
150
|
twobuffer = 2;
|
|
151
|
onebuffer = 2;
|
|
152
|
}
|
|
153
|
if (button1_p() && onebuffer < 0 && twobuffer < 0)
|
|
154
|
{
|
|
155
|
if (menuc[2] == 0)
|
|
156
|
{
|
|
157
|
afford = 0;
|
|
158
|
if (global.gold >= buyvalue[menuc[1]])
|
|
159
|
afford = 1;
|
|
160
|
if (afford == 1)
|
|
161
|
{
|
|
162
|
if (itemtype[menuc[1]] == "item")
|
|
163
|
scr_itemgetscr_itemget
function scr_itemget(arg0)
{
var __i = 0;
var loop = 1;
noroom = 0;
_pocketed = 0;
_noroominventory = 0;
global.item[12] = 999;
while (loop == 1)
{
if (global.item[__i] == 0)
{
global.item[__i] = arg0;
break;
}
if (__i == 12)
{
_noroominventory = 1;
noroom = 1;
for (var __j = 0; __j < global.flag[64 storage_size]; __j++)
{
if (global.pocketitem[__j] == 0)
{
global.pocketitem[__j] = arg0;
_pocketed = 1;
noroom = 0;
break;
}
}
break;
}
__i += 1;
}
script_execute(scr_iteminfo_all);
} (item[menuc[1]]);
|
|
164
|
if (itemtype[menuc[1]] == "weapon")
|
|
165
|
scr_weapongetscr_weaponget
function scr_weaponget(arg0)
{
noroom = 0;
var legacy = 0;
var __i = 0;
if (legacy == 0)
{
var __itemcount = 0;
__weapon[0] = arg0;
for (__i = 0; __i < 48; __i++)
{
if (global.weapon[__i] != 0)
{
__weapon[__itemcount + 1] = global.weapon[__i];
__itemcount++;
}
}
if (__itemcount >= 48)
{
noroom = 1;
}
else
{
for (__i = 0; __i < 48; __i++)
{
if (__i <= __itemcount)
global.weapon[__i] = __weapon[__i];
else
global.weapon[__i] = 0;
}
}
}
else if (legacy)
{
loop = 1;
global.weapon[48] = 999;
while (loop == 1)
{
if (global.weapon[__i] == 0)
{
global.weapon[__i] = arg0;
break;
}
if (__i == 48)
{
noroom = 1;
break;
}
__i += 1;
}
}
script_execute(scr_weaponinfo_all);
} (item[menuc[1]]);
|
|
166
|
if (itemtype[menuc[1]] == "armor")
|
|
167
|
scr_armorgetscr_armorget
function scr_armorget(arg0)
{
noroom = 0;
var legacy = 0;
var __i = 0;
if (legacy == 0)
{
var __itemcount = 0;
__armor[0] = arg0;
for (__i = 0; __i < 48; __i++)
{
if (global.armor[__i] != 0)
{
__armor[__itemcount + 1] = global.armor[__i];
__itemcount++;
}
}
if (__itemcount >= 48)
{
noroom = 1;
}
else
{
for (__i = 0; __i < 48; __i++)
{
if (__i <= __itemcount)
global.armor[__i] = __armor[__i];
else
global.armor[__i] = 0;
}
}
}
else if (legacy)
{
loop = 1;
global.armor[48] = 999;
while (loop == 1)
{
if (global.armor[__i] == 0)
{
global.armor[__i] = arg0;
break;
}
if (__i == 48)
{
noroom = 1;
break;
}
__i += 1;
}
}
script_execute(scr_armorinfo_all);
} (item[menuc[1]]);
|
|
168
|
if (noroom == 0)
|
|
169
|
{
|
|
170
|
global.gold -= buyvalue[menuc[1]];
|
|
171
|
sidemessage = 1;
|
|
172
|
snd_play(snd_locker);
|
|
173
|
}
|
|
174
|
if (noroom == 1)
|
|
175
|
sidemessage = 4;
|
|
176
|
}
|
|
177
|
else
|
|
178
|
{
|
|
179
|
sidemessage = 3;
|
|
180
|
}
|
|
181
|
}
|
|
182
|
if (menuc[2] == 1)
|
|
183
|
sidemessage = 2;
|
|
184
|
menu = 1;
|
|
185
|
}
|
|
186
|
}
|
|
187
|
if (menuc[1] != 4)
|
|
188
|
{
|
|
189
|
if (minimenuy <= 20)
|
|
190
|
minimenuy = 20;
|
|
191
|
if (minimenuy > 20)
|
|
192
|
minimenuy -= 5;
|
|
193
|
if (minimenuy > 50)
|
|
194
|
minimenuy -= 5;
|
|
195
|
if (minimenuy > 100)
|
|
196
|
minimenuy -= 8;
|
|
197
|
if (minimenuy > 150)
|
|
198
|
minimenuy -= 10;
|
|
199
|
}
|
|
200
|
else if (minimenuy < 200)
|
|
201
|
{
|
|
202
|
minimenuy += 40;
|
|
203
|
}
|
|
204
|
if (minimenuy >= 200)
|
|
205
|
minimenuy = 200;
|
|
206
|
}
|
|
207
|
if (menu == 3)
|
|
208
|
{
|
|
209
|
menumax = 4;
|
|
210
|
draw_set_color(c_white);
|
|
211
|
scr_84_set_draw_fontscr_84_set_draw_font
function scr_84_set_draw_font(arg0)
{
global.chemg_font = arg0;
draw_set_font(scr_84_get_font(arg0));
} ("mainbig");
|
|
212
|
draw_text(80, 260, string_hash_to_newline(stringsetloc(About yourself"About yourself", "obj_shop2_slash_Draw_0_gml_194_0" )));
|
|
213
|
draw_text(80, 300, string_hash_to_newline(stringsetloc(Why sell to us"Why sell to us", "obj_shop2_slash_Draw_0_gml_195_0" )));
|
|
214
|
draw_text(80, 340, string_hash_to_newline(stringsetloc(The King"The King", "obj_shop2_slash_Draw_0_gml_196_0" )));
|
|
215
|
draw_text(80, 380, string_hash_to_newline(stringsetloc(The King's Son"The King's Son", "obj_shop2_slash_Draw_0_gml_197_0" )));
|
|
216
|
draw_text(80, 420, string_hash_to_newline(stringsetloc(Exit"Exit", "obj_shop2_slash_Draw_0_gml_198_0" )));
|
|
217
|
if (instance_exists(obj_writer) == false)
|
|
218
|
{
|
|
219
|
global.msg[0] = stringsetloc(Face 5Ah,Delay 11 what is
thine
Intereste?"\\E5Ah^1, what is&thine&Intereste?", "obj_shop2_slash_Draw_0_gml_202_0" );
|
|
220
|
instance_create(440, 260, obj_writer);
|
|
221
|
}
|
|
222
|
draw_sprite(spr_heart, 0, 50, 270 + (menuc[3] * 40));
|
|
223
|
if (button1_p() && onebuffer < 0)
|
|
224
|
{
|
|
225
|
onebuffer = 2;
|
|
226
|
with (obj_writer)
|
|
227
|
instance_destroy();
|
|
228
|
if (menuc[3] < menumax)
|
|
229
|
{
|
|
230
|
sell = menuc[3] + 3;
|
|
231
|
menu = 4;
|
|
232
|
}
|
|
233
|
else
|
|
234
|
{
|
|
235
|
menu = 0;
|
|
236
|
}
|
|
237
|
}
|
|
238
|
else if (button2_p() && twobuffer < 0 && onebuffer < 0)
|
|
239
|
{
|
|
240
|
twobuffer = 2;
|
|
241
|
menu = 0;
|
|
242
|
with (obj_writer)
|
|
243
|
instance_destroy();
|
|
244
|
}
|
|
245
|
}
|
|
246
|
if (menu == 10)
|
|
247
|
{
|
|
248
|
menuc[11] = 0;
|
|
249
|
menuc[12] = 0;
|
|
250
|
menuc[13] = 0;
|
|
251
|
menumax = 3;
|
|
252
|
draw_set_color(c_white);
|
|
253
|
scr_84_set_draw_fontscr_84_set_draw_font
function scr_84_set_draw_font(arg0)
{
global.chemg_font = arg0;
draw_set_font(scr_84_get_font(arg0));
} ("mainbig");
|
|
254
|
draw_text(80, 260, string_hash_to_newline(stringsetloc(Selleth Items"Selleth Items", "obj_shop2_slash_Draw_0_gml_236_0" )));
|
|
255
|
draw_text(80, 300, string_hash_to_newline(stringsetloc(Selleth Weapons"Selleth Weapons", "obj_shop2_slash_Draw_0_gml_237_0" )));
|
|
256
|
draw_text(80, 340, string_hash_to_newline(stringsetloc(Selleth Armor"Selleth Armor", "obj_shop2_slash_Draw_0_gml_238_0" )));
|
|
257
|
draw_text(80, 380, string_hash_to_newline(stringsetloc(Returnst"Returnst", "obj_shop2_slash_Draw_0_gml_239_0" )));
|
|
258
|
if (instance_exists(obj_writer) == false)
|
|
259
|
{
|
|
260
|
if (sidemessage == 0)
|
|
261
|
global.msg[0] = stringsetloc(Face 0Showeth
me your
treasure!"\\E0Showeth&me your&treasure!", "obj_shop2_slash_Draw_0_gml_243_0" );
|
|
262
|
if (sidemessage == 1)
|
|
263
|
global.msg[0] = stringsetloc(Face 2That seems
to be all,
no?"\\E2That seems&to be all,&no?", "obj_shop2_slash_Draw_0_gml_244_0" );
|
|
264
|
if (sidemessage == 2)
|
|
265
|
global.msg[0] = stringsetloc(Face 6You have
none!"\\E6You have&none!", "obj_shop2_slash_Draw_0_gml_245_0" );
|
|
266
|
instance_create(460, 260, obj_writer);
|
|
267
|
}
|
|
268
|
draw_sprite(spr_heart, 0, 50, 270 + (menuc[10] * 40));
|
|
269
|
if (button1_p() && onebuffer < 0)
|
|
270
|
{
|
|
271
|
pagemax = 0;
|
|
272
|
sidemessage2 = 0;
|
|
273
|
onebuffer = 2;
|
|
274
|
with (obj_writer)
|
|
275
|
instance_destroy();
|
|
276
|
can = 1;
|
|
277
|
idealmenu = menuc[10] + 11;
|
|
278
|
if (idealmenu == 11)
|
|
279
|
{
|
|
280
|
scr_itemcheckscr_itemcheck
function scr_itemcheck(arg0)
{
haveit = 0;
itemcount = 0;
for (var __i = 0; __i < 12; __i += 1)
{
if (global.item[__i] == arg0)
haveit = 1;
if (global.item[__i] == arg0)
itemcount += 1;
}
return haveit;
} (0);
|
|
281
|
if (itemcount == 12)
|
|
282
|
{
|
|
283
|
sidemessage = 2;
|
|
284
|
can = 0;
|
|
285
|
}
|
|
286
|
scr_iteminfo_allscr_iteminfo_all
function scr_iteminfo_all()
{
for (i = 0; i < 12; i += 1)
{
itemid = global.item[i];
scr_iteminfo(itemid);
global.itemnameb[i] = itemnameb;
global.itemdescb[i] = itemdescb;
global.itemvalue[i] = value;
global.itemusable[i] = usable;
}
} ();
|
|
287
|
}
|
|
288
|
if (idealmenu == 12)
|
|
289
|
{
|
|
290
|
scr_weaponcheck_inventoryscr_weaponcheck_inventory
function scr_weaponcheck_inventory(arg0)
{
haveit = 0;
itemcount = 0;
for (i = 0; i < 48; i += 1)
{
if (global.weapon[i] == arg0)
haveit = 1;
if (global.weapon[i] == arg0)
itemcount += 1;
}
return haveit;
} (0);
|
|
291
|
if (itemcount == 12)
|
|
292
|
{
|
|
293
|
sidemessage = 2;
|
|
294
|
can = 0;
|
|
295
|
}
|
|
296
|
scr_weaponinfo_allscr_weaponinfo_all
function scr_weaponinfo_all()
{
for (i = 0; i < 48; i += 1)
{
scr_weaponinfo(global.weapon[i]);
weaponname[i] = weaponnametemp;
weapondesc[i] = weapondesctemp;
wmessage2[i] = wmessage2temp;
wmessage3[i] = wmessage3temp;
wmessage4[i] = wmessage4temp;
weaponat[i] = weaponattemp;
weapondf[i] = weapondftemp;
weaponmag[i] = weaponmagtemp;
weaponbolts[i] = weaponboltstemp;
weaponstyle[i] = weaponstyletemp;
weapongrazeamt[i] = weapongrazeamttemp;
weapongrazesize[i] = weapongrazesizetemp;
weaponchar1[i] = weaponchar1temp;
weaponchar2[i] = weaponchar2temp;
weaponchar3[i] = weaponchar3temp;
weaponchar4[i] = weaponchar4temp;
weaponvalue[i] = value;
weaponability[i] = weaponabilitytemp;
weaponabilityicon[i] = weaponabilityicontemp;
weaponicon[i] = weaponicontemp;
}
} ();
|
|
297
|
}
|
|
298
|
if (idealmenu == 13)
|
|
299
|
{
|
|
300
|
scr_armorcheck_inventoryscr_armorcheck_inventory
function scr_armorcheck_inventory(arg0)
{
haveit = 0;
itemcount = 0;
for (i = 0; i < 48; i += 1)
{
if (global.armor[i] == arg0)
haveit = 1;
if (global.armor[i] == arg0)
itemcount += 1;
}
return haveit;
} (0);
|
|
301
|
if (itemcount == 12)
|
|
302
|
{
|
|
303
|
sidemessage = 2;
|
|
304
|
can = 0;
|
|
305
|
}
|
|
306
|
scr_armorinfo_allscr_armorinfo_all
function scr_armorinfo_all()
{
for (i = 0; i < 48; i += 1)
{
scr_armorinfo(global.armor[i]);
armorname[i] = armornametemp;
armordesc[i] = armordesctemp;
amessage2[i] = amessage2temp;
amessage3[i] = amessage3temp;
amessage4[i] = amessage4temp;
armorat[i] = armorattemp;
armordf[i] = armordftemp;
armormag[i] = armormagtemp;
armorbolts[i] = armorboltstemp;
armorgrazeamt[i] = armorgrazeamttemp;
armorgrazesize[i] = armorgrazesizetemp;
armorchar1[i] = armorchar1temp;
armorchar2[i] = armorchar2temp;
armorchar3[i] = armorchar3temp;
armorchar4[i] = armorchar4temp;
armorvalue[i] = value;
armorability[i] = armorabilitytemp;
armorabilityicon[i] = armorabilityicontemp;
armoricon[i] = armoricontemp;
armorelement[i] = armorelementtemp;
armorelementamount[i] = armorelementamounttemp;
}
} ();
|
|
307
|
}
|
|
308
|
if (menuc[10] < menumax)
|
|
309
|
{
|
|
310
|
if (can == 1)
|
|
311
|
menu = menuc[10] + 11;
|
|
312
|
sidemessage1 = 0;
|
|
313
|
}
|
|
314
|
else
|
|
315
|
{
|
|
316
|
menu = 0;
|
|
317
|
}
|
|
318
|
submenu = 0;
|
|
319
|
submenuc[1] = 0;
|
|
320
|
}
|
|
321
|
if (button2_p() && twobuffer < 0 && onebuffer < 0)
|
|
322
|
{
|
|
323
|
twobuffer = 2;
|
|
324
|
menu = 0;
|
|
325
|
with (obj_writer)
|
|
326
|
instance_destroy();
|
|
327
|
}
|
|
328
|
}
|
|
329
|
if (menu == 11 || menu == 12 || menu == 13)
|
|
330
|
{
|
|
331
|
if (instance_exists(obj_writer) == false)
|
|
332
|
{
|
|
333
|
if (sidemessage2 == 0 && menu == 11)
|
|
334
|
global.msg[0] = stringsetloc(Face 0What ITEM
shalt thou
proffer?"\\E0What ITEM&shalt thou&proffer?", "obj_shop2_slash_Draw_0_gml_305_0" );
|
|
335
|
if (sidemessage2 == 0 && menu == 12)
|
|
336
|
global.msg[0] = stringsetloc(Face 0What WEAPON
shalt thou
proffer?"\\E0What WEAPON&shalt thou&proffer?", "obj_shop2_slash_Draw_0_gml_306_0" );
|
|
337
|
if (sidemessage2 == 0 && menu == 13)
|
|
338
|
global.msg[0] = stringsetloc(Face 0What ARMOR
shalt thou
proffer?"\\E0What ARMOR&shalt thou&proffer?", "obj_shop2_slash_Draw_0_gml_307_0" );
|
|
339
|
if (sidemessage2 == 1)
|
|
340
|
global.msg[0] = stringsetloc(Face 5I shall
make use
of this!"\\E5I shall&make use&of this!", "obj_shop2_slash_Draw_0_gml_308_0" );
|
|
341
|
if (sidemessage2 == 2)
|
|
342
|
global.msg[0] = stringsetloc(Face 6What?"\\E6What?", "obj_shop2_slash_Draw_0_gml_309_0" );
|
|
343
|
if (sidemessage2 == 3)
|
|
344
|
global.msg[0] = stringsetloc(Face 6Er, NO
thank you."\\E6Er, NO&thank you.", "obj_shop2_slash_Draw_0_gml_310_0" );
|
|
345
|
if (sidemessage2 == 4)
|
|
346
|
global.msg[0] = stringsetloc(Face 6What?"\\E6What?", "obj_shop2_slash_Draw_0_gml_311_0" );
|
|
347
|
instance_create(450, 260, obj_writer);
|
|
348
|
}
|
|
349
|
}
|
|
350
|
scr_shopmenuscr_shopmenu
function scr_shopmenu(arg0)
{
if (arg0 == 0)
{
if (menu == 1 || menu == 2)
{
scr_darkbox_black(400, minimenuy, 640, 255);
draw_set_color(c_white);
scr_84_set_draw_font("mainbig");
if (menuc[1] == 0)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[0]));
if (menuc[1] == 1)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[1]));
if (menuc[1] == 2)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[2]));
if (menuc[1] == 3)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[3]));
scr_84_set_draw_font("dotumche");
if (itemtype[menuc[1]] == "weapon" || itemtype[menuc[1]] == "armor")
{
for (i = 0; i < 3; i += 1)
{
can_index = 0;
facetype = spr_headkris;
which = global.char[i];
if (global.char[i] == 1)
facetype = spr_headkris;
if (global.char[i] == 2)
facetype = spr_headsusie;
if (global.char[i] == 3)
facetype = spr_headralsei;
if (which != 0)
{
if (i == 0)
{
locx = 0;
locy = 0;
}
if (i == 1)
{
locx = 100;
locy = 0;
}
if (i == 2)
{
locx = 0;
locy = 45;
}
if (canequip[menuc[1]][which] == 0)
can_index = 8;
draw_sprite(facetype, can_index, 426 + locx, minimenuy + 140 + locy);
if (itemtype[menuc[1]] == "weapon" && can_index != 8)
{
draw_set_color(c_white);
sum[0] = itematk[menuc[1]] - global.itemat[which][0];
sum[1] = itemmagic[menuc[1]] - global.itemmag[which][0];
for (j = 0; j < 2; j += 1)
{
dcolor = c_white;
addt = "";
draw_set_color(c_white);
if (sum[j] > 0)
{
draw_set_color(c_yellow);
addt = "+";
}
if (sum[j] < 0)
draw_set_color(c_aqua);
draw_sprite_ext(spr_shopicon, j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
draw_text(490 + locx, minimenuy + locy + 135 + (20 * j), string_hash_to_newline(addt + string(sum[j])));
}
}
if (itemtype[menuc[1]] == "armor" && can_index != 8)
{
sum[0] = itemdef[menuc[1]] - global.itemdf[which][1];
sum[1] = itemdef[menuc[1]] - global.itemdf[which][2];
for (j = 0; j < 2; j += 1)
{
dcolor = c_white;
addt = "";
draw_set_color(c_white);
if (sum[j] > 0)
{
draw_set_color(c_yellow);
addt = "+";
}
if (sum[j] < 0)
draw_set_color(c_aqua);
draw_sprite_ext(spr_shopicon, 2 + j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
draw_text(490 + locx, minimenuy + 135 + (20 * j) + locy, string_hash_to_newline(addt + string(sum[j])));
}
}
}
}
}
}
}
if (arg0 == 4)
{
if (menu == 11 || menu == 15)
{
... (4);
|
|
351
|
if (menu == 15 || menu == 16 || menu == 17)
|
|
352
|
{
|
|
353
|
menumax = 1;
|
|
354
|
draw_set_color(c_white);
|
|
355
|
scr_84_set_draw_fontscr_84_set_draw_font
function scr_84_set_draw_font(arg0)
{
global.chemg_font = arg0;
draw_set_font(scr_84_get_font(arg0));
} ("mainbig");
|
|
356
|
var y1_off = langopt(260, 290);
|
|
357
|
var y2_off = langopt(290, 260);
|
|
358
|
draw_text(460, y1_off, string_hash_to_newline(stringsetloc(Sell it for"Sell it for", "obj_shop2_slash_Draw_0_gml_323_0" )));
|
|
359
|
draw_text(460, y2_off, string_hash_to_newline(stringsetsubloc("$~1 ?", string(sellvalue), "obj_shop2_slash_Draw_0_gml_328_0")));
|
|
360
|
draw_text(480, 340, string_hash_to_newline(stringsetloc(Yes"Yes", "obj_shop2_slash_Draw_0_gml_325_0" )));
|
|
361
|
draw_text(480, 370, string_hash_to_newline(stringsetloc(No"No", "obj_shop2_slash_Draw_0_gml_326_0" )));
|
|
362
|
draw_sprite(spr_heart, 0, 450, 350 + (menuc[menu] * 30));
|
|
363
|
}
|
|
364
|
scr_shopmenuscr_shopmenu
function scr_shopmenu(arg0)
{
if (arg0 == 0)
{
if (menu == 1 || menu == 2)
{
scr_darkbox_black(400, minimenuy, 640, 255);
draw_set_color(c_white);
scr_84_set_draw_font("mainbig");
if (menuc[1] == 0)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[0]));
if (menuc[1] == 1)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[1]));
if (menuc[1] == 2)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[2]));
if (menuc[1] == 3)
draw_text(440, minimenuy + 28, string_hash_to_newline(shopdesc[3]));
scr_84_set_draw_font("dotumche");
if (itemtype[menuc[1]] == "weapon" || itemtype[menuc[1]] == "armor")
{
for (i = 0; i < 3; i += 1)
{
can_index = 0;
facetype = spr_headkris;
which = global.char[i];
if (global.char[i] == 1)
facetype = spr_headkris;
if (global.char[i] == 2)
facetype = spr_headsusie;
if (global.char[i] == 3)
facetype = spr_headralsei;
if (which != 0)
{
if (i == 0)
{
locx = 0;
locy = 0;
}
if (i == 1)
{
locx = 100;
locy = 0;
}
if (i == 2)
{
locx = 0;
locy = 45;
}
if (canequip[menuc[1]][which] == 0)
can_index = 8;
draw_sprite(facetype, can_index, 426 + locx, minimenuy + 140 + locy);
if (itemtype[menuc[1]] == "weapon" && can_index != 8)
{
draw_set_color(c_white);
sum[0] = itematk[menuc[1]] - global.itemat[which][0];
sum[1] = itemmagic[menuc[1]] - global.itemmag[which][0];
for (j = 0; j < 2; j += 1)
{
dcolor = c_white;
addt = "";
draw_set_color(c_white);
if (sum[j] > 0)
{
draw_set_color(c_yellow);
addt = "+";
}
if (sum[j] < 0)
draw_set_color(c_aqua);
draw_sprite_ext(spr_shopicon, j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
draw_text(490 + locx, minimenuy + locy + 135 + (20 * j), string_hash_to_newline(addt + string(sum[j])));
}
}
if (itemtype[menuc[1]] == "armor" && can_index != 8)
{
sum[0] = itemdef[menuc[1]] - global.itemdf[which][1];
sum[1] = itemdef[menuc[1]] - global.itemdf[which][2];
for (j = 0; j < 2; j += 1)
{
dcolor = c_white;
addt = "";
draw_set_color(c_white);
if (sum[j] > 0)
{
draw_set_color(c_yellow);
addt = "+";
}
if (sum[j] < 0)
draw_set_color(c_aqua);
draw_sprite_ext(spr_shopicon, 2 + j, 470 + locx, minimenuy + locy + 135 + (20 * j), 1, 1, 0, dcolor, 1);
draw_text(490 + locx, minimenuy + 135 + (20 * j) + locy, string_hash_to_newline(addt + string(sum[j])));
}
}
}
}
}
}
}
if (arg0 == 4)
{
if (menu == 11 || menu == 15)
{
... (5);
|
|
365
|
if (menu == 4)
|
|
366
|
{
|
|
367
|
if (sell == 0)
|
|
368
|
menu = 0;
|
|
369
|
if (instance_exists(obj_writer) == false && selling == 0)
|
|
370
|
{
|
|
371
|
if (sell == 1)
|
|
372
|
{
|
|
373
|
}
|
|
374
|
if (sell == 2)
|
|
375
|
{
|
|
376
|
global.msg[0] = stringsetloc(Face 5* See thou in the Dungeon,Delay 11 Worms!Wait for inputClose Message"\\E5* See thou in the Dungeon^1, Worms!/%", "obj_shop2_slash_Draw_0_gml_353_0" );
|
|
377
|
if (friendly == 1)
|
|
378
|
global.msg[0] = stringsetloc(Face 5* Come by any time,Delay 11 my good Worms!Wait for inputClose Message"\\E5* Come by any time^1, my good Worms!/%", "obj_shop2_slash_Draw_0_gml_354_0" );
|
|
379
|
}
|
|
380
|
if (sell == 3)
|
|
381
|
{
|
|
382
|
global.msg[0] = stringsetloc(Face 0* I amst the Duke of Puzzles,Delay 11 Rouxls Kaard.Wait for input"\\E0* I amst the Duke of Puzzles^1, Rouxls Kaard./", "obj_shop2_slash_Draw_0_gml_358_0" );
|
|
383
|
global.msg[1] = stringsetloc(Face 4* My hobbies includest calligraphy,Delay 11 lawkeeping,Delay 11 bugkeeping,Delay 11 cages...Wait for input"\\E4* My hobbies includest calligraphy^1, lawkeeping^1, bugkeeping^1, cages.../", "obj_shop2_slash_Draw_0_gml_359_0" );
|
|
384
|
global.msg[2] = stringsetloc(Face 1* ... and long walks in the dungeon.Wait for input"\\E1* ... and long walks in the dungeon./", "obj_shop2_slash_Draw_0_gml_360_0" );
|
|
385
|
global.msg[3] = stringsetloc(Face 5* Artest thou one of my admirers,Delay 11 worm?Wait for inputClose Message"\\E5* Artest thou one of my admirers^1, worm?/%", "obj_shop2_slash_Draw_0_gml_361_0" );
|
|
386
|
if (friendly == 1)
|
|
387
|
global.msg[3] = stringsetloc(Face 5* By the way,Delay 11 no hard feelingst about earlier,Delay 11 right?Wait for inputClose Message"\\E5* By the way^1, no hard feelingst about earlier^1, right?/%", "obj_shop2_slash_Draw_0_gml_364_0" );
|
|
388
|
}
|
|
389
|
if (sell == 4)
|
|
390
|
{
|
|
391
|
global.msg[0] = stringsetloc(Face 4* Hahaha!!Delay 11 So I might amasseth funds,Delay 11 Worms!Delay 11 An army of funds...Wait for input"\\E4* Hahaha!^1! So I might amasseth funds^1, Worms^1! An army of funds.../", "obj_shop2_slash_Draw_0_gml_371_0" );
|
|
392
|
global.msg[1] = stringsetloc(Face 1* So that I may crushest thou like Fermented Grapes,Delay 11 into a most delicious and adult beverage -Wait for input"\\E1* So that I may crushest thou like Fermented Grapes^1, into a most delicious and adult beverage -/", "obj_shop2_slash_Draw_0_gml_372_0" );
|
|
393
|
global.msg[2] = stringsetloc(Face 6* Vengeance!!Delay 11 Ahahaha!!!Wait for input"\\E6* Vengeance!^1! Ahahaha!!!/", "obj_shop2_slash_Draw_0_gml_373_0" );
|
|
394
|
global.msg[3] = stringsetloc(Face 5* Oh,Delay 11 how I amuse myself!!!Wait for inputClose Message"\\E5* Oh^1, how I amuse myself!!!/%", "obj_shop2_slash_Draw_0_gml_374_0" );
|
|
395
|
if (friendly == 1)
|
|
396
|
{
|
|
397
|
global.msg[0] = stringsetloc(Face 2* Haha,Delay 11 why of course I wouldst sell to my compatriarts,Delay 11 the Heroes Of Legend!Wait for input"\\E2* Haha^1, why of course I wouldst sell to my compatriarts^1, the Heroes Of Legend!/", "obj_shop2_slash_Draw_0_gml_378_0" );
|
|
398
|
global.msg[1] = stringsetloc(Face 5* Earlier art but a Test of your Heroick Resolve!Wait for input"\\E5* Earlier art but a Test of your Heroick Resolve!/", "obj_shop2_slash_Draw_0_gml_379_0" );
|
|
399
|
global.msg[2] = stringsetloc(Face 6* Rouxls is ALWAYS on the winning side!!Delay 11 Thou can bet on that!!!Wait for inputClose Message"\\E6* Rouxls is ALWAYS on the winning side!^1! Thou can bet on that!!!/%", "obj_shop2_slash_Draw_0_gml_380_0" );
|
|
400
|
}
|
|
401
|
}
|
|
402
|
if (sell == 5)
|
|
403
|
{
|
|
404
|
global.msg[0] = stringsetloc(Face 6* Our Lorde King art a cruel and terrifying Monarcke!Wait for input"\\E6* Our Lorde King art a cruel and terrifying Monarcke!/", "obj_shop2_slash_Draw_0_gml_386_0" );
|
|
405
|
global.msg[1] = stringsetloc(Face 2* However,Delay 11 he is also Brilliant,Delay 11 for he decidedesteth to appoinst ME,Delay 11 as Duke of Puzzles,Wait for input"\\E2* However^1, he is also Brilliant^1, for he decidedesteth to appoinst ME^1, as Duke of Puzzles,/", "obj_shop2_slash_Draw_0_gml_387_0" );
|
|
406
|
global.msg[2] = stringsetloc(Face 6* After pretty mucheth everyone else was firedst or placed inside a cage.Wait for input"\\E6* After pretty mucheth everyone else was firedst or placed inside a cage./", "obj_shop2_slash_Draw_0_gml_388_0" );
|
|
407
|
global.msg[3] = stringsetloc(Face 4* Truly, a benevolent ruler!Wait for inputClose Message"\\E4* Truly, a benevolent ruler!/%", "obj_shop2_slash_Draw_0_gml_389_0" );
|
|
408
|
if (friendly == 1)
|
|
409
|
{
|
|
410
|
global.msg[0] = stringsetloc(Face 6* Yes, the King!Delay 11 A terrible Man!Delay 11 An awful Monarcke!Delay 11Wait for input"\\E6* Yes, the King^1! A terrible Man^1! An awful Monarcke^1!/", "obj_shop2_slash_Draw_0_gml_392_0" );
|
|
411
|
global.msg[1] = stringsetloc(Face 2* Never likedeth that Guye,Delay 11 really!Wait for input"\\E2* Never likedeth that Guye^1, really!/", "obj_shop2_slash_Draw_0_gml_393_0" );
|
|
412
|
global.msg[2] = stringsetloc(Face 3* I just envisionethed,Delay 11 perhaps...Delay 11 If I acceptedst this High Ranking Positione...Wait for input"\\E3* I just envisionethed^1, perhaps..^1. If I acceptedst this High Ranking Positione.../", "obj_shop2_slash_Draw_0_gml_394_0" );
|
|
413
|
global.msg[3] = stringsetloc(Face 5* I could assist to overthroweth him from the Inside!Wait for input"\\E5* I could assist to overthroweth him from the Inside!/", "obj_shop2_slash_Draw_0_gml_395_0" );
|
|
414
|
global.msg[4] = stringsetloc(Face 6* ... What!?Delay 11 Cannot thou conceiveth of my plan?!?Wait for inputClose Message"\\E6* ... What!^1? Cannot thou conceiveth of my plan?!?/%", "obj_shop2_slash_Draw_0_gml_396_0" );
|
|
415
|
}
|
|
416
|
}
|
|
417
|
if (sell == 6)
|
|
418
|
{
|
|
419
|
global.msg[0] = stringsetloc(Face 0* His Son,Delay 11 on the other hand,Delay 11 is more troublesome than a fistful of fleas!Wait for input"\\E0* His Son^1, on the other hand^1, is more troublesome than a fistful of fleas!/", "obj_shop2_slash_Draw_0_gml_402_0" );
|
|
420
|
global.msg[1] = stringsetloc(Face 1* He alwayst asks me the Worste Queries,Wait for input"\\E1* He alwayst asks me the Worste Queries,/", "obj_shop2_slash_Draw_0_gml_403_0" );
|
|
421
|
global.msg[2] = stringsetloc(Face 3* And calleth me his "Lesser Dad."Wait for input"\\E3* And calleth me his \"Lesser Dad.\"/", "obj_shop2_slash_Draw_0_gml_404_0" );
|
|
422
|
global.msg[3] = stringsetloc(Face 6* Our relation is NONE,Delay 11 you little water-beetle!Delay 11 I placate you for your Father's sake!Wait for input"\\E6* Our relation is NONE^1, you little water-beetle^1! I placate you for your Father's sake!/", "obj_shop2_slash_Draw_0_gml_405_0" );
|
|
423
|
global.msg[4] = stringsetloc(Face 6* I do not Wisheth to hear your MP3's!Delay 11 I would rather listen to the sweet song of Death!Wait for input"\\E6* I do not Wisheth to hear your MP3's^1! I would rather listen to the sweet song of Death!/", "obj_shop2_slash_Draw_0_gml_406_0" );
|
|
424
|
global.msg[5] = stringsetloc(Face 3* ...Wait for input"\\E3* .../", "obj_shop2_slash_Draw_0_gml_407_0" );
|
|
425
|
global.msg[6] = stringsetloc(Face 2* How is he,Delay 11 anyhow?Wait for inputClose Message"\\E2* How is he^1, anyhow?/%", "obj_shop2_slash_Draw_0_gml_408_0" );
|
|
426
|
if (friendly == 1)
|
|
427
|
{
|
|
428
|
global.msg[0] = stringsetloc(Face 3* Perhaps my wording art a bit Harshe earlier... The King's offspring is a Darling!Wait for input"\\E3* Perhaps my wording art a bit Harshe earlier... The King's offspring is a Darling!/", "obj_shop2_slash_Draw_0_gml_413_0" );
|
|
429
|
global.msg[1] = stringsetloc(Face 6* A strange and irritating darling!Wait for input"\\E6* A strange and irritating darling!/", "obj_shop2_slash_Draw_0_gml_414_0" );
|
|
430
|
global.msg[2] = stringsetloc(Face 3* When his Father does not cook,Delay 11 his Son yells like a baby bird,Delay 11 until I feed him worms!Wait for input"\\E3* When his Father does not cook^1, his Son yells like a baby bird^1, until I feed him worms!/", "obj_shop2_slash_Draw_0_gml_415_0" );
|
|
431
|
global.msg[3] = stringsetloc(Face 6* Is this what it means to be High Ranking!?Wait for inputClose Message"\\E6* Is this what it means to be High Ranking!?/%", "obj_shop2_slash_Draw_0_gml_416_0" );
|
|
432
|
}
|
|
433
|
}
|
|
434
|
instance_create(30, 270, obj_writer);
|
|
435
|
selling = 1;
|
|
436
|
}
|
|
437
|
if (selling == 1 && instance_exists(obj_writer) == false)
|
|
438
|
{
|
|
439
|
if (sell == 2)
|
|
440
|
{
|
|
441
|
selling = 2;
|
|
442
|
event_user(1);
|
|
443
|
}
|
|
444
|
else
|
|
445
|
{
|
|
446
|
if (sell == 1 || sell == 7)
|
|
447
|
menu = 0;
|
|
448
|
else
|
|
449
|
menu = 3;
|
|
450
|
sell = 0;
|
|
451
|
selling = 0;
|
|
452
|
}
|
|
453
|
}
|
|
454
|
}
|
|
455
|
if (down_p())
|
|
456
|
{
|
|
457
|
if (menu != 11 && menu != 12 && menu != 13)
|
|
458
|
{
|
|
459
|
menuc[menu] += 1;
|
|
460
|
if (menuc[menu] > menumax)
|
|
461
|
menuc[menu] = 0;
|
|
462
|
}
|
|
463
|
}
|
|
464
|
if (up_p())
|
|
465
|
{
|
|
466
|
if (menu != 11 && menu != 12 && menu != 13)
|
|
467
|
{
|
|
468
|
menuc[menu] -= 1;
|
|
469
|
if (menuc[menu] < 0)
|
|
470
|
menuc[menu] = menumax;
|
|
471
|
}
|
|
472
|
}
|
|
473
|
if (menu < 4 || menu >= 10)
|
|
474
|
{
|
|
475
|
draw_text(440, 420, "$" + string_hash_to_newline(string(global.gold)));
|
|
476
|
if (menu == 1 || menu == 2)
|
|
477
|
{
|
|
478
|
if (menuc[1] < 4)
|
|
479
|
{
|
|
480
|
if (itemtype[menuc[1]] == "item")
|
|
481
|
scr_itemcheckscr_itemcheck
function scr_itemcheck(arg0)
{
haveit = 0;
itemcount = 0;
for (var __i = 0; __i < 12; __i += 1)
{
if (global.item[__i] == arg0)
haveit = 1;
if (global.item[__i] == arg0)
itemcount += 1;
}
return haveit;
} (0);
|
|
482
|
if (itemtype[menuc[1]] == "armor")
|
|
483
|
scr_armorcheck_inventoryscr_armorcheck_inventory
function scr_armorcheck_inventory(arg0)
{
haveit = 0;
itemcount = 0;
for (i = 0; i < 48; i += 1)
{
if (global.armor[i] == arg0)
haveit = 1;
if (global.armor[i] == arg0)
itemcount += 1;
}
return haveit;
} (0);
|
|
484
|
if (itemtype[menuc[1]] == "weapon")
|
|
485
|
scr_weaponcheck_inventoryscr_weaponcheck_inventory
function scr_weaponcheck_inventory(arg0)
{
haveit = 0;
itemcount = 0;
for (i = 0; i < 48; i += 1)
{
if (global.weapon[i] == arg0)
haveit = 1;
if (global.weapon[i] == arg0)
itemcount += 1;
}
return haveit;
} (0);
|
|
486
|
scr_84_set_draw_fontscr_84_set_draw_font
function scr_84_set_draw_font(arg0)
{
global.chemg_font = arg0;
draw_set_font(scr_84_get_font(arg0));
} ("dotumche");
|
|
487
|
if (itemcount < 10)
|
|
488
|
roomstring = "0" + string(itemcount);
|
|
489
|
else
|
|
490
|
roomstring = string(itemcount);
|
|
491
|
if (itemcount > 0)
|
|
492
|
draw_text(520, 430, string_hash_to_newline(stringsetsubloc("Space:~1", roomstring, "obj_shop2_slash_Draw_0_gml_482_0")));
|
|
493
|
if (itemcount == 0)
|
|
494
|
draw_text(520, 430, string_hash_to_newline(stringsetloc(NO SPACE"NO SPACE", "obj_shop2_slash_Draw_0_gml_481_0" )));
|
|
495
|
}
|
|
496
|
}
|
|
497
|
}
|
|
498
|
onebuffer -= 1;
|
|
499
|
twobuffer -= 1;
|