//===== 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;
}
}