| 1 |
gg = floor(random(3)); |
| 2 |
mycommand = round(random(100)); |
| 3 |
global.msg[0] = But
nobody
came.scr_gettextscr_gettextvar text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_lemonbread_175") ; |
| 4 |
if (mycommand < 75) |
| 5 |
global.msg[0] = Do you
think
I'm
pretty?scr_gettextscr_gettextvar text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_lemonbread_176") ; |
| 6 |
if (mycommand < 50) |
| 7 |
global.msg[0] = That's
what
they all
say.scr_gettextscr_gettextvar text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_lemonbread_177") ; |
| 8 |
if (mycommand < 25) |
| 9 |
global.msg[0] = Stay
here
with
me...scr_gettextscr_gettextvar text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_lemonbread_178") ; |
| 10 |
if (turns == 0) |
| 11 |
{ |
| 12 |
global.msg[0] = Welcome
to my
special
hell.scr_gettextscr_gettextvar text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_lemonbread_196") ; |
| 13 |
turns = 1; |
| 14 |
mycommand = 20; |
| 15 |
} |
| 16 |
if (turns == 2) |
| 17 |
global.msg[0] = ...scr_gettextscr_gettextvar text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_lemonbread_200") ; |
| 18 |
if (mercymod > 50000 && turns == 1) |
| 19 |
{ |
| 20 |
global.msg[0] = Life's
flashing
before
my teethscr_gettextscr_gettextvar text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_lemonbread_202") ; |
| 21 |
global.msg[0] = I've
felt
this
before.scr_gettextscr_gettextvar text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_lemonbread_203") ; |
| 22 |
turns = 2; |
| 23 |
} |
| 24 |
global.msg[1] = Close MessageClose MessageClose Messagescr_gettextscr_gettextvar text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
text = "";
if (global.language == "ja")
{
var loc_text = ds_map_find_value(global.text_data_ja, text_id);
if (!is_undefined(loc_text))
text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
{
var sel = string_char_at(text, i + 2);
var replace;
if (sel == "C")
replace = global.charname;
else if (sel == "G")
replace = string(global.gold);
else if (sel == "I")
replace = global.itemname[global.menucoord[1]];
else if (sel == "1" && argument_count > 1)
replace = argument[1];
else if (sel == "2" && argument_count > 2)
replace = argument[2];
else if (sel == "3" && argument_count > 3)
replace = argument[3];
else if (sel == "4" && argument_count > 4)
replace = argument[4];
else if (sel == "5" && argument_count > 5)
replace = argument[5];
else if (sel == "6" && argument_count > 6)
replace = argument[6];
else if (sel == "7" && argument_count > 7)
replace = argument[7];
else if (sel == "8" && argument_count > 8)
replace = argument[8];
else if (sel == "9" && argument_count > 9)
replace = argument[9];
else
replace = "";
var before = string_copy(text, 1, i - 1);
var after = string_copy(text, i + 4, string_length(text));
text = before + replace + after;
i += (string_length(replace) - 1);
}
}
return text; ("obj_lemonbread_207") ; |
| 25 |
global.typer = 2; |
| 26 |
var bxcount = 6; |
| 27 |
var bycount = 2; |
| 28 |
var bxstart = 0; |
| 29 |
var bystart = 0; |
| 30 |
var bxspace = 101; |
| 31 |
var byspace = 119; |
| 32 |
var by = bystart; |
| 33 |
repeat (bycount) |
| 34 |
{ |
| 35 |
var bx = bxstart; |
| 36 |
repeat (bxcount) |
| 37 |
{ |
| 38 |
blcon = instance_create(10 + bx, 10 + by, obj_blconsm); |
| 39 |
blcon.depth = 20; |
| 40 |
blconwd = instance_create(blcon.x + 15, blcon.y + 10, OBJ_NOMSCWRITER); |
| 41 |
blconwd.depth = 10; |
| 42 |
bx += bxspace; |
| 43 |
} |
| 44 |
by += byspace; |
| 45 |
} |
| 46 |
global.border = 5; |
| 47 |
obj_heart.x = round((global.idealborder[0] + global.idealborder[1]) / 2) - 8; |
| 48 |
obj_heart.y = round((global.idealborder[2] + global.idealborder[3]) / 2) - 8; |