|
1
|
if (up_p())
|
|
2
|
{
|
|
3
|
choice_index--;
|
|
4
|
snd_play_x(snd_menumove, 1, 1.2);
|
|
5
|
}
|
|
6
|
if (down_p())
|
|
7
|
{
|
|
8
|
choice_index++;
|
|
9
|
snd_play_x(snd_menumove, 1, 1);
|
|
10
|
}
|
|
11
|
choice_index = scr_wrap_newscr_wrap_new
function scr_wrap_new()
{
var _val = argument[0];
var _max = argument[2];
var _min = argument[1];
if ((_val % 1) == 0)
{
while (_val > _max || _val < _min)
{
if (_val > _max)
{
_val = (_min + _val) - _max - 1;
}
else if (_val < _min)
{
_val = ((_max + _val) - _min) + 1;
}
else
{
}
}
return _val;
}
else
{
var _old = argument[0] + 1;
while (_val != _old)
{
_old = _val;
if (_val < _min)
{
_val = _max - (_min - _val);
}
else if (_val > _max)
{
_val = _min + (_val - _max);
}
else
{
}
}
return _val;
}
} (choice_index, 0, array_length(choice) - 1);
|
|
12
|
if (button1_p())
|
|
13
|
{
|
|
14
|
if (choice_index == 0)
|
|
15
|
{
|
|
16
|
var menu_go = 0;
|
|
17
|
var roomchoice = room_intro;
|
|
18
|
var CH = string(global.chapter);
|
|
19
|
if (ossafe_file_exists("filech" + CH + "_0"))
|
|
20
|
menu_go = 1;
|
|
21
|
if (ossafe_file_exists("filech" + CH + "_1"))
|
|
22
|
menu_go = 1;
|
|
23
|
if (ossafe_file_exists("filech" + CH + "_2"))
|
|
24
|
menu_go = 1;
|
|
25
|
if (ossafe_file_exists("filech" + CH + "_3"))
|
|
26
|
menu_go = 1;
|
|
27
|
if (ossafe_file_exists("dr.ini"))
|
|
28
|
menu_go = 1;
|
|
29
|
if (ossafe_file_exists("filech" + CH + "_3"))
|
|
30
|
menu_go = 2;
|
|
31
|
if (ossafe_file_exists("filech" + CH + "_4"))
|
|
32
|
menu_go = 2;
|
|
33
|
if (ossafe_file_exists("filech" + CH + "_5"))
|
|
34
|
menu_go = 2;
|
|
35
|
if (menu_go == 0 || menu_go == 1)
|
|
36
|
roomchoice = room_intro;
|
|
37
|
if (menu_go == 2)
|
|
38
|
{
|
|
39
|
scr_windowcaptionscr_windowcaption
function scr_windowcaption(arg0)
{
if (global.tempflag[10] != 1 && global.chapter == 1)
window_set_caption(arg0);
else
window_set_caption("DELTARUNE Chapter " + string(global.chapter));
} ("DELTARUNE");
|
|
40
|
global.tempflag[10] = 1;
|
|
41
|
roomchoice = room_legend;
|
|
42
|
global.plot = 0;
|
|
43
|
}
|
|
44
|
global.darkzone = 0;
|
|
45
|
room_goto(roomchoice);
|
|
46
|
}
|
|
47
|
else if (choice_index == 1)
|
|
48
|
{
|
|
49
|
room_goto_next();
|
|
50
|
}
|
|
51
|
else if (choice_index == 2)
|
|
52
|
{
|
|
53
|
scr_loadscr_load
function scr_load()
{
snd_free_all();
filechoicebk = global.filechoice;
scr_gamestart();
global.filechoice = filechoicebk;
file = "filech" + string(global.chapter) + "_" + string(global.filechoice);
myfileid = ossafe_file_text_open_read(file);
global.truename = ossafe_file_text_read_string(myfileid);
ossafe_file_text_readln(myfileid);
if (global.is_console)
{
var othername_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(othername_list); i += 1)
global.othername[i] = ds_list_find_value(othername_list, i);
ds_list_destroy(othername_list);
ossafe_file_text_readln(myfileid);
}
else
{
for (i = 0; i < 6; i += 1)
{
global.othername[i] = ossafe_file_text_read_string(myfileid);
ossafe_file_text_readln(myfileid);
}
}
global.char[0] = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.char[1] = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.char[2] = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.gold = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.xp = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.lv = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.inv = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.invc = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.darkzone = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
if (global.is_console)
{
var hp_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(hp_list); i += 1)
global.hp[i] = ds_list_find_value(hp_list, i);
ds_list_destroy(hp_list);
ossafe_file_text_readln(myfileid);
var maxhp_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(maxhp_list); i += 1)
global.maxhp[i] = ds_list_find_value(maxhp_list, i);
ds_list_destroy(maxhp_list);
ossafe_file_text_readln(myfileid);
var at_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(at_list); i += 1)
global.at[i] = ds_list_find_value(at_list, i);
ds_list_destroy(at_list);
ossafe_file_text_readln(myfileid);
var df_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(df_list); i += 1)
global.df[i] = ds_list_find_value(df_list, i);
ds_list_destroy(df_list);
ossafe_file_text_readln(myfileid);
var mag_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(mag_list); i += 1)
global.mag[i] = ds_list_find_value(mag_list, i);
ds_list_destroy(mag_list);
ossafe_file_text_readln(myfileid);
var guts_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(guts_list); i += 1)
global.guts[i] = ds_list_find_value(guts_list, i);
ds_list_destroy(guts_list);
ossafe_file_text_readln(myfileid);
var charweapon_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(charweapon_list); i += 1)
global.charweapon[i] = ds_list_find_value(charweapon_list, i);
ds_list_destroy(charweapon_list);
ossafe_file_text_readln(myfileid);
var chararmor1_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(chararmor1_list); i += 1)
global.chararmor1[i] = ds_list_find_value(chararmor1_list, i);
ds_list_destroy(chararmor1_list);
ossafe_file_text_readln(myfileid);
var chararmor2_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(chararmor2_list); i += 1)
global.chararmor2[i] = ds_list_find_value(chararmor2_list, i);
ds_list_destroy(chararmor2_list);
ossafe_file_text_readln(myfileid);
var weaponstyle_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(weaponstyle_list); i += 1)
global.weaponstyle[i] = ds_list_find_value(weaponstyle_list, i);
ds_list_destroy(weaponstyle_list);
ossafe_file_text_readln(myfileid);
}
for (i = 0; i < 5; i += 1)
{
if (!global.is_console)
{
... ();
|
|
54
|
}
|
|
55
|
else if (choice_index == 3)
|
|
56
|
{
|
|
57
|
room_goto(PLACE_MENU );
|
|
58
|
}
|
|
59
|
else if (choice_index == 4)
|
|
60
|
{
|
|
61
|
global.darkzone = 0;
|
|
62
|
room_goto(room_ed );
|
|
63
|
global.chemg_menu_depth = 0;
|
|
64
|
}
|
|
65
|
}
|
|
66
|
if (scr_debugscr_debug
function scr_debug()
{
if (global.debug == 1)
return 1;
} ())
|
|
67
|
{
|
|
68
|
if (keyboard_check_pressed(ord("L")))
|
|
69
|
scr_loadscr_load
function scr_load()
{
snd_free_all();
filechoicebk = global.filechoice;
scr_gamestart();
global.filechoice = filechoicebk;
file = "filech" + string(global.chapter) + "_" + string(global.filechoice);
myfileid = ossafe_file_text_open_read(file);
global.truename = ossafe_file_text_read_string(myfileid);
ossafe_file_text_readln(myfileid);
if (global.is_console)
{
var othername_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(othername_list); i += 1)
global.othername[i] = ds_list_find_value(othername_list, i);
ds_list_destroy(othername_list);
ossafe_file_text_readln(myfileid);
}
else
{
for (i = 0; i < 6; i += 1)
{
global.othername[i] = ossafe_file_text_read_string(myfileid);
ossafe_file_text_readln(myfileid);
}
}
global.char[0] = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.char[1] = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.char[2] = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.gold = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.xp = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.lv = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.inv = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.invc = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
global.darkzone = ossafe_file_text_read_real(myfileid);
ossafe_file_text_readln(myfileid);
if (global.is_console)
{
var hp_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(hp_list); i += 1)
global.hp[i] = ds_list_find_value(hp_list, i);
ds_list_destroy(hp_list);
ossafe_file_text_readln(myfileid);
var maxhp_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(maxhp_list); i += 1)
global.maxhp[i] = ds_list_find_value(maxhp_list, i);
ds_list_destroy(maxhp_list);
ossafe_file_text_readln(myfileid);
var at_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(at_list); i += 1)
global.at[i] = ds_list_find_value(at_list, i);
ds_list_destroy(at_list);
ossafe_file_text_readln(myfileid);
var df_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(df_list); i += 1)
global.df[i] = ds_list_find_value(df_list, i);
ds_list_destroy(df_list);
ossafe_file_text_readln(myfileid);
var mag_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(mag_list); i += 1)
global.mag[i] = ds_list_find_value(mag_list, i);
ds_list_destroy(mag_list);
ossafe_file_text_readln(myfileid);
var guts_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(guts_list); i += 1)
global.guts[i] = ds_list_find_value(guts_list, i);
ds_list_destroy(guts_list);
ossafe_file_text_readln(myfileid);
var charweapon_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(charweapon_list); i += 1)
global.charweapon[i] = ds_list_find_value(charweapon_list, i);
ds_list_destroy(charweapon_list);
ossafe_file_text_readln(myfileid);
var chararmor1_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(chararmor1_list); i += 1)
global.chararmor1[i] = ds_list_find_value(chararmor1_list, i);
ds_list_destroy(chararmor1_list);
ossafe_file_text_readln(myfileid);
var chararmor2_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(chararmor2_list); i += 1)
global.chararmor2[i] = ds_list_find_value(chararmor2_list, i);
ds_list_destroy(chararmor2_list);
ossafe_file_text_readln(myfileid);
var weaponstyle_list = scr_ds_list_read(myfileid);
for (i = 0; i < ds_list_size(weaponstyle_list); i += 1)
global.weaponstyle[i] = ds_list_find_value(weaponstyle_list, i);
ds_list_destroy(weaponstyle_list);
ossafe_file_text_readln(myfileid);
}
for (i = 0; i < 5; i += 1)
{
if (!global.is_console)
{
... ();
|
|
70
|
}
|