geass,106,112,3 script Faction Manager 540,{
set .@n$,"[^DC143C Faction Manager ^000000]";
mes .@n$;
mes "Hello.";
next;
goto L_Topmenu;
L_Topmenu:
mes .@n$;
mes "What would you like to do?";
switch(select("» Learn about faction:» Faction Requirements:» Available Factions:» Set my faction:» Exit")) {
case 1:
next;
mes .@n$;
mes "When you are in a faction.";
mes "You will recieve a bonus power effects.";
mes "and There are currently 3 Faction type Registered in the server.";
next;
mes .@n$;
mes "Every faction type has a corresponding bonus power effects.";
mes "and As long as you are in the faction you chose the effect will not expire/gone";
mes "not unless you decided to reset your faction type.";
next;
menu "I'd like to see the benefits.",L_ChooseEffect,"Back to MainMenu",L_Topmenu;
next;
mes .@n$;
mes "Choose one Below";
mes "to see the effect of each faction...";
L_ChooseEffect:
switch(select("» Argonian:» Guardian:» Slayer:» Back to MainMenu")){
case 1:
next;
mes "[^DC143C Argonians ^000000] :";
mes "Strength + 10";
mes "Walking Speed + 30%";
mes "Reduced to Demi-Humans + 5%";
goto L_ChooseEffect;
case 2:
next;
mes "[^DC143C Guardians ^000000] :";
mes "Vitality + 10";
mes "Walking Speed + 20%";
mes "Reduced to Demi-Humans + 5%";
goto L_ChooseEffect;
case 3:
next;
mes "[^DC143C Slayers ^000000] :";
mes "Dexterity + 10";
mes "Walking Speed + 10%";
mes "Reduced to Demi-Humans + 5%";
goto L_ChooseEffect;
case 4:
next;
goto L_Topmenu;
}
next;
case 2:
next;
mes .@n$;
mes "The requirements for registering a faction type is..";
mes " ";
mes "(^DC143C 1 ^000000) - [^DC143C Faction Ticket ^000000]";
mes " ";
next;
goto L_Topmenu;
case 3:
next;
mes "Available factions are : ";
mes "[====================]";
mes "» ^FF0000Argonian^000000";
mes "[====================]";
mes "» ^009900Guardian^000000";
mes "[====================]";
mes "» ^0000FFSlayer^000000";
next;
goto L_Topmenu;
case 4:
next;
if(#factionhave) {
mes .@n$;
mes "Seems like you already have a faction";
next;
mes .@n$;
mes "However you may reset them by visiting our Faction Reset NPC.";
next;
mes .@n$;
mes "But please take note that resetting a faction is not free so expect an unexpected.";
close;
}else{
if(countitem(25475) > 0){
mes .@n$;
mes "Choose your faction";
mes "you want to be in";
menu "» Argonians",L_Argonians,"» Guardians",L_Guardians,"» Slayers",L_Slayers;
}else{
mes "You dont have a [^DC143C Faction Ticket ^000000]";
mes "to perform the registration.";
close;
}
}
case 5:
close;
}
L_Argonians:
next;
mes "As you selected the [ ^FF0000Argonian^000000 ] faction.";
mes "You will recieve the following effects";
mes " ";
mes " - ";
mes " - ";
menu "Proceed",L_Tuloy,"Cancel",L_Wag;
L_Tuloy:
progressbar "green",3;
next;
specialeffect2 380;
next;
specialeffect2 91;
next;
specialeffect2 72;
setfaction 1;
setlook 7,165;
delitem 25475,1;
getitem 25374,1;
equip 25374;
specialeffect2 338;
set #factionhave,1;
mes "Congratulations !";
mes "You are now a [ ^FF0000Argonian^000000 ] Member";
announce "[ "+strcharinfo(0)+" ] Has registered as [ Argonian ] Member.",bc_all,0xFFFF00;
end;
L_Guardians:
next;
mes "As you selected the [ ^009900Guardian^000000 ] faction.";
mes "You will recieve the following effects";
mes " ";
mes " - ";
mes " - ";
menu "Proceed",L_Tuloy2,"Cancel",L_Wag;
L_Tuloy2:
progressbar "green",3;
next;
specialeffect2 380;
next;
specialeffect2 91;
next;
specialeffect2 72;
setfaction 2;
setlook 7,389;
delitem 25475,1;
getitem 25377,1;
equip 25377;
specialeffect2 338;
set #factionhave,1;
mes "Congratulations !";
mes "You are now a [ ^009900Guardian^000000 ] Member";
announce "[ "+strcharinfo(0)+" ] Has registered as [ Guardian ] Member.",bc_all,0xFFFF00;
end;
L_Slayers:
next;
mes "As you selected the [ ^0000FFSlayer^000000 ] faction.";
mes "You will recieve the following effects";
mes " ";
mes " - ";
mes " - ";
menu "Proceed",L_Tuloy3,"Cancel",L_Wag;
L_Tuloy3:
progressbar "green",3;
next;
specialeffect2 380;
next;
specialeffect2 91;
next;
specialeffect2 72;
setfaction 3;
setlook 7,366;
delitem 25475,1;
getitem 25369,1;
equip 25369;
set #factionhave,1;
mes "Congratulations !";
mes "You are now a [ ^0000FFSlayer^000000 ] Member";
announce "[ "+strcharinfo(0)+" ] Has registered as [ Slayer ] Member.",bc_all,0xFFFF00;
end;
L_Wag:
next;
goto L_Topmenu;
}
// Resetting Faction
geass,110,112,3 script Faction Reset Manager 541,{
set .@np$,"[^DC143C Reset Faction ^000000]";
mes .@np$;
mes "Do you like to reset your faction?";
next;
menu "» Yes",L_Yes,"» How to Reset ?",L_ReqItems;
L_Yes:
next;
mes .@np$;
mes "Please Choose your current faction";
next;
menu "» Argonians",L_ArgoRes,"» Guardians",L_GuardRes,"» Slayers",L_SlayRes;
// == Require Items Information Message ==
L_ReqItems:
next;
mes .@np$;
mes "You need to bring the following items :";
mes " ";
mes "(^DC143C 1 ^000000) - ^DC143C"+getitemname(25476)+"^000000";
next;
mes .@np$;
mes "Lastly before i forgot";
mes "Please wear the Costume Headgear that [^DC143C Faction Manager ^000000] gave to you after the faction registration..";
mes "So we can procceed to the Resetting.";
close;
// == End Require Items Information Message ==
L_ArgoRes:
mes .@np$;
mes "I see, so you are [ ^FF0000Argonians^000000 ]";
next;
mes .@np$;
mes "Do you really want to reset your faction?";
menu "Reset now.",L_ArgoDel;
L_GuardRes:
mes .@np$;
mes "I see, so you are [ ^009900Guardians^000000 ]";
next;
mes .@np$;
mes "Do you really want to reset your faction?";
menu "Reset now.",L_GuardDel;
L_SlayRes:
mes .@np$;
mes "I see, so you are [ ^0000FFSlayers^000000 ]";
next;
mes .@np$;
mes "Do you really want to reset your faction?";
menu "Reset now.",L_SlayDel;
// == Argonians Deletion ==
// ========================
L_ArgoDel:
next;
mes " ";
mes " ";
mes "^008800Cheking Headgear^000000....";
next;
mes " ";
mes " ";
if(getequipid(EQI_COSTUME_HEAD_TOP) == 25374) {
mes "^0000FF"+getitemname(25374)+"^000000 : ^FF00001/1^000000";
}else{
mes "^0000FF"+getitemname(25374)+"^000000 : ^FF00000/1^000000";
goto L_Pleasewear;
}
next;
mes " ";
mes " ";
mes "^008800Cheking Requirements^000000....";
next;
mes " ";
mes " ";
if(countitem(25476) > 0 ) {
mes "^0000FF"+getitemname(25476)+"^000000 : ^FF0000"+countitem(25476)+"/1^000000";
}else{
mes "^0000FF"+getitemname(501)+"^000000 : ^FF0000"+countitem(501)+"/1^000000";
goto L_NotEnuf;
}
next;
mes "Procceed to reset?";
menu "Yes",L_ArgoFinish,"Cancel",L_Cancel;
L_ArgoFinish:
progressbar "green",3;
setfaction 10;
setlook 7,1;
set #factionhave,0;
delitem 25374,1;
delitem 25476,1;
announce "[ "+strcharinfo(0)+" ] Resets his Faction Type.",bc_all,0xFFFF00;
end;
// == Guardians Deletion ==
// ========================
L_GuardDel:
next;
mes " ";
mes " ";
mes "^008800Cheking Headgear^000000....";
next;
mes " ";
mes " ";
if(getequipid(EQI_COSTUME_HEAD_TOP) == 25377) {
mes "^0000FF"+getitemname(25377)+"^000000 : ^FF00001/1^000000";
}else{
mes "^0000FF"+getitemname(25377)+"^000000 : ^FF00000/1^000000";
goto L_Pleasewear;
}
next;
mes " ";
mes " ";
mes "^008800Cheking Requirements^000000....";
next;
mes " ";
mes " ";
if(countitem(25476) > 0 ) {
mes "^0000FF"+getitemname(25476)+"^000000 : ^FF0000"+countitem(25476)+"/1^000000";
}else{
mes "^0000FF"+getitemname(25476)+"^000000 : ^FF0000"+countitem(25476)+"/1^000000";
goto L_NotEnuf;
}
next;
mes "Procceed to reset?";
menu "Yes",L_GuardFinish,"Cancel",L_Cancel;
L_GuardFinish:
progressbar "green",3;
setfaction 10;
setlook 7,1;
set #factionhave,0;
delitem 25377,1;
delitem 25476,1;
announce "[ "+strcharinfo(0)+" ] Resets his Faction Type.",bc_all,0xFFFF00;
end;
// == Slayers Deletion ==
// ========================
L_SlayDel:
next;
mes " ";
mes " ";
mes "^008800Cheking Headgear^000000....";
next;
mes " ";
mes " ";
if(getequipid(EQI_COSTUME_HEAD_TOP) == 25369) {
mes "^0000FF"+getitemname(25369)+"^000000 : ^FF00001/1^000000";
}else{
mes "^0000FF"+getitemname(25369)+"^000000 : ^FF00000/1^000000";
goto L_Pleasewear;
}
next;
mes " ";
mes " ";
mes "^008800Cheking Requirements^000000....";
next;
mes " ";
mes " ";
if(countitem(25476) > 0 ) {
mes "^0000FF"+getitemname(25476)+"^000000 : ^FF0000"+countitem(25476)+"/1^000000";
}else{
mes "^0000FF"+getitemname(25476)+"^000000 : ^FF0000"+countitem(25476)+"/1^000000";
goto L_NotEnuf;
}
next;
mes "Procceed to reset?";
menu "Yes",L_SlayFinish,"Cancel",L_Cancel;
L_SlayFinish:
progressbar "green",3;
setfaction 10;
setlook 7,1;
set #factionhave,0;
delitem 25369,1;
delitem 25476,1;
announce "[ "+strcharinfo(0)+" ] Resets his Faction Type.",bc_all,0xFFFF00;
end;
L_NotEnuf:
next;
mes "[^FF0000 WARNING ^000000] :";
mes " ";
mes "You are lack of Items Required for Performing the Reset.";
mes "Come back to me, When you completed them..";
close;
L_Pleasewear:
next;
mes "[^FF0000 WARNING ^000000] :";
mes "";
mes "Please wear your";
mes "( Faction Type )Headgear 1st Before we proceed.";
close;
L_Cancel:
mes .@np$;
mes "Lol, we're almost there..";
mes "Anyways.. come back when you already decided..";
close;
}