summaryrefslogtreecommitdiff
path: root/npc/re/quests/seals/god_global.txt
blob: c08ccb6f241cac3c9b7cfd5db2d3518c40bc5830 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
//===== rAthena Script ======================================= 
//= Variable Management NPC for the god item quest
//===== By: ================================================== 
//= MasterOfMuppets
//===== Current Version: ===================================== 
//= 1.1
//===== Compatible With: ===================================== 
//= rAthena
//===== Description: ========================================= 
//= Use this NPC if the seals quest variables get messed up.
//===== Additional Comments: =================================
//= 1.0 First version. [MasterOfMuppets]
//= 1.1 Updated several aspects of the script. [L0ne_W0lf]
//============================================================

sec_in02,15,170,0	script	Golbal var	817,{
	//mes "[Check]";
	//mes "Please enter the password.";
	//next;
	//set .@check,68392411;
	//dlgwrite 0 10000000
	//if (check == input){
	if (getgmlevel() > 98) {
		mes "[Check]";
		mes "Please choose a menu.";
		next;
		switch(select("Now:No.1:No.2:No.3:No.4:Reset")) {
		case 1:
			mes "^0000FF$God1^000000 = ^FF0000" + $God1 + "^000000.";
			mes "^0000FF$God2^000000 = ^FF0000" + $God2 + "^000000.";
			mes "^0000FF$God3^000000 = ^FF0000" + $God3 + "^000000.";
			mes "^0000FF$God4^000000 = ^FF0000" + $God4 + "^000000.";
			close;
		case 2:
			input .@input,0,100;
			mes "[Check]";
			mes "Would you like to change to "+.@input+"?";
			next;
			if (select("Yes:No") == 1) {
				mes "[Check]";
				mes "The command "+.@input+" has been confirmed.";
				next;
				set $God1,.@input;
				mes "$God1 "+.@input+"";
				close;
			}
			else {
				mes "[Check]";
				mes "The command has been canceled.";
				close;
			}
		case 3:
			input .@input,0,100;
			mes "[Check]";
			mes "Would you like to change to "+.@input+"?";
			next;
			if (select("Yes:No") == 1) {
				mes "[Check]";
				mes "The command "+.@input+" has been confirmed.";
				next;
				set $God2,.@input;
				mes "$God2 "+.@input+"";
				close;
			}
			else {
				mes "[Check]";
				mes "The command has been canceled.";
				close;
			}
		case 4:
			input .@input,0,100;
			mes "[Check]";
			mes "Would you like to change to "+.@input+"?";
			next;
			if (select("Yes:No") == 1) {
				mes "[Check]";
				mes "The command "+.@input+" has been confirmed.";
				next;
				set $God3,.@input;
				mes "$God3 "+.@input+"";
				close;
			}
			else {
				mes "[Check]";
				mes "The command has been canceled.";
				close;
			}
		case 5:
			input .@input,0,100;
			mes "[Check]";
			mes "Would you like to change to "+.@input+"?";
			next;
			if (select("Yes:No") == 1) {
				mes "[Check]";
				mes "The command "+.@input+" has been confirmed.";
				next;
				set $God4,.@input;
				mes "$God4 "+.@input+"";
				close;
			}
			else {
				mes "[Check]";
				mes "The command has been canceled.";
				close;
			}
		case 6:
			mes "[Check]";
			mes "Are you really sure that you want to reset the entire list of God Globalvar?";
			next;
			if (select("Yes:No") == 1) {
				mes "[Check]";
				mes "Now, the entire list of God Globalvar is being reset.";
				next;
				set $God1,0;
				set $God2,0;
				set $God3,0;
				set $God4,0;
				mes "^0000FF$God1^000000 = ^FF0000" + $God1 + "^000000.";
				mes "^0000FF$God2^000000 = ^FF0000" + $God2 + "^000000.";
				mes "^0000FF$God3^000000 = ^FF0000" + $God3 + "^000000.";
				mes "^0000FF$God4^000000 = ^FF0000" + $God4 + "^000000.";
				close;
			}
			else {
				mes "[Check]";
				mes "The command has been canceled.";
				close;
			}
		}
	}
	else {
		mes "[Check]";
		//mes "Incorrect password.";
		mes "You cannot access this NPC.";
		close;
	}
}