diff options
Diffstat (limited to 'npc/quests/seals/god_global.txt')
| -rw-r--r-- | npc/quests/seals/god_global.txt | 160 |
1 files changed, 67 insertions, 93 deletions
diff --git a/npc/quests/seals/god_global.txt b/npc/quests/seals/god_global.txt index 817255060..94f6ae0f2 100644 --- a/npc/quests/seals/god_global.txt +++ b/npc/quests/seals/god_global.txt @@ -1,113 +1,44 @@ //===== Hercules Script ====================================== -//= Variable Management NPC for the god item quest -//===== By: ================================================== +//= God Item Quest - Variable Management +//===== By: ================================================== //= MasterOfMuppets -//===== Current Version: ===================================== -//= 1.1 -//===== Compatible With: ===================================== -//= Hercules -//===== Description: ========================================= +//===== Current Version: ===================================== +//= 1.2 +//===== 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] +//= 1.2 Renewal script update. [Euphy] +//= Added GM management function. //============================================================ 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) { + callfunc "F_GM_NPC"; + mes "[Check]"; + mes "Please enter the password."; + next; + if (callfunc("F_GM_NPC",68392411,0) == 1) { mes "[Check]"; mes "Please choose a menu."; next; - switch(select("Now:No.1:No.2:No.3:No.4:Reset")) { + switch(select("Now:No.1:No.2:No.3:No.4:Reset:god_sl_1:god_eremes:god_brising:god_mjo_0:god_mjo_1:god_mjo_2:god_mjo_3:god_mjo_4")) { 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 2: callsub L_Number,"$God1"; break; + case 3: callsub L_Number,"$God2"; break; + case 4: callsub L_Number,"$God3"; break; + case 5: callsub L_Number,"$God4"; break; case 6: mes "[Check]"; mes "Are you really sure that you want to reset the entire list of God Globalvar?"; + mes "Please enter the password."; next; - if (select("Yes:No") == 1) { + if (callfunc("F_GM_NPC",68392411,0) == 1) { mes "[Check]"; mes "Now, the entire list of God Globalvar is being reset."; next; @@ -120,18 +51,61 @@ sec_in02,15,170,0 script Golbal var 817,{ mes "^0000FF$God3^000000 = ^FF0000" + $God3 + "^000000."; mes "^0000FF$God4^000000 = ^FF0000" + $God4 + "^000000."; close; - } - else { + } else { mes "[Check]"; mes "The command has been canceled."; close; } + case 7: callsub L_Var,"god_sl_1"; break; + case 8: callsub L_Var,"god_eremes"; break; + case 9: callsub L_Var,"god_brising"; break; + case 10: callsub L_Var,"god_mjo_0"; break; + case 11: callsub L_Var,"god_mjo_1"; break; + case 12: callsub L_Var,"god_mjo_2"; break; + case 13: callsub L_Var,"god_mjo_3"; break; + case 14: callsub L_Var,"god_mjo_4"; break; } + } else { + mes "[Check]"; + mes "Incorrect password."; + close; } - else { + +L_Number: + input .@input,0,$@god_check2; + mes "[Check]"; + mes "Would you like to change to "+.@input+"?"; + mes "Please enter the password."; + next; + if (callfunc("F_GM_NPC",68392411,0) == 1) { mes "[Check]"; - //mes "Incorrect password."; - mes "You cannot access this NPC."; + mes "The command "+.@input+" has been confirmed."; + next; + setd getarg(0),.@input; + mes getarg(0)+" "+.@input; + close; + } else { + mes "[Check]"; + mes "The command has been canceled."; close; } + +L_Var: + input .@input; + setd getarg(0),.@input; + next; + mes "[Check]"; + mes "Done."; + close; + +OnInit: + // Seals roll at 25/50 in Renewal and 50/100 in Pre-Renewal. + if (checkre(0)) { + set $@god_check1,25; + set $@god_check2,50; + } else { + set $@god_check1,50; + set $@god_check2,100; + } + end; } |