Can you guys help me fix this script?
I'm trying to make a monthly quest headgear that every month the quest headgear that can be made changes but when I tried this script all npc appears even if I put some to disabled please help me to fix this script thanks
- script QH#disable -1,{
OnInit:
disablenpc "January Quest Headgear";
disablenpc "February Quest Headgear";
disablenpc "October Quest Headgear";
end;
}
- script QH -1,{
OnClock0001:
goto startmonthlyqh;
startmonthlyqh:
enablenpc $Quest$;
initnpctimer;
end;
}
//---------------------------------------------------------------------------------------
//--------------------------------------- January ---------------------------------------
//---------------------------------------------------------------------------------------
prontera,140,180,7 script January Quest Headgear 408,{
mes "[January Quest Headgear]";
mes "Choose which headgear do you want to make.";
next;
goto H_top;
H_top:
menu "*Flower Lily",h_flowerlily,"No Thanks",h_no;
h_flowerlily:
mes "[January Quest Headgear]";
mes "To make a ^FF0000Flower Lily^000000 headgear you will need the following items";
mes "^3355FF1 White Dyestuff^000000";
mes "^3355FF2 Valhalla's Flower^000000";
mes "^3355FF5 Fancy Flower^000000";
mes "^3355FF100 Flower^000000";
mes "^3355FF200 Illusion Flower^000000";
next;
menu "Yes",m_flowerlily,"No thanks",h_no;
m_flowerlily:
if ((countitem(982)<1) && (countitem(7510)<2) && (countitem(2207)<5) && (countitem(712)<100) && (countitem(710)<200)) {
goto m_noitem;}
else if (checkweight(5302,1)) {
mes "[January Quest Headgear]";
mes "Here's your item";
delitem 982,1; //White Dyestuff
delitem 7510,2; //Valhalla's Flower
delitem 2207,5; //Fancy Flower
delitem 712,100; //Flower
delitem 710,200; //Illusion Flower
getitem 5302,1; // Flower Lily
} else {goto m_nospace;}
emotion e_thx;
close;
h_no:
next;
mes "[January Quest Headgear]";
mes "Ah, alright. Just tell me when you want it.";
mes "See you soon~";
emotion e_heh;
close;
m_noitem:
next;
mes "[January Quest Headgear]";
mes "Don't Make me laugh !";
mes "You don't all the required items to the the headgear";
emotion e_e4;
//atcommand "@die";
close;
m_nospace:
next;
mes "[January Quest Headgear]";
mes "You are overweight.";
mes "Can't carry the headgear.";
emotion e_heh;
close;
timer:
initnpctimer;
end;
m_none:
disablenpc "Banker";
pvpoff "guild_vs1";
end;
}
//---------------------------------------------------------------------------------------
//-------------------------------------- February ---------------------------------------
//---------------------------------------------------------------------------------------
prontera,140,180,7 script February Quest Headgear 408,{
mes "[February Quest Headgear]";
mes "This month available headgears are.";
mes "^FF0000Romantic White Flower^000000";
mes "--";
mes "--";
next;
mes "Which headgear do you want to make?";
next;
goto H_top;
H_top:
menu "*Romantic White Flower",h_rwhiteflower,"No Thanks",h_no;
h_flowerlily:
mes "[February Quest Headgear]";
mes "To make a ^FF0000Romantic White Flower^000000 headgear you will need the following items";
mes "^3355FF5 Romantic Flower^000000";
mes "^3355FF5 Vital Flower^000000";
mes "^3355FF300 Flower^000000";
next;
menu "Yes",m_rwhiteflower,"No thanks",h_no;
m_flowerlily:
if ((countitem(2269)<5) && (countitem(6110)<5) && (countitem(712)<300)) {
goto m_noitem;}
else if (checkweight(5206,1)) {
mes "[February Quest Headgear]";
mes "Here's your item";
delitem 2269,5; //Romantic Flower
delitem 6110,5; //Vital Flower
delitem 712,300; //Flower
getitem 5206,1; //Romantic White Flower
} else {goto m_nospace;}
emotion e_thx;
close;
h_no:
next;
mes "[February Quest Headgear]";
mes "Ah, alright. Just tell me when you want it.";
mes "See you soon~";
emotion e_heh;
close;
m_noitem:
next;
mes "[February Quest Headgear]";
mes "Don't Make me laugh !";
mes "You don't all the required items to the the headgear";
emotion e_e4;
//atcommand "@die";
close;
m_nospace:
next;
mes "[February Quest Headgear]";
mes "You are overweight.";
mes "Can't carry the headgear.";
emotion e_heh;
close;
timer:
initnpctimer;
end;
m_none:
disablenpc "Banker";
pvpoff "guild_vs1";
end;
}
//---------------------------------------------------------------------------------------
//--------------------------------------- October ---------------------------------------
//---------------------------------------------------------------------------------------
prontera,140,180,7 script October Quest Headgear 408,{
mes "[January Quest Headgear]";
mes "Choose which headgear do you want to make.";
next;
goto H_top;
H_top:
menu "*Dokebi's Wig",a_dokebiwig,"No Thanks",h_no;
h_dokebiwig:
mes "[October Quest Headgear]";
mes "To make a ^FF0000Dokebi's Wig^000000 headgear you will need the following items";
mes "^3355FF1 Scarlet Dyestuff^000000";
mes "^3355FF1 Lemon Dyestuff^000000";
mes "^3355FF1 Cobaltblue Dyestuff^000000";
mes "^3355FF5 Wig^000000";
mes "^3355FF300 Glossy Hair^000000";
next;
menu "Yes",m_dokebiwig,"No thanks",a_no;
m_dokebiwig:
if ((countitem(975)<1) && (countitem(976)<1) && (countitem(978)<1) && (countitem(10005)<5) && (countitem(7152)<300)) {
goto m_noitem;}
else if (checkweight(5258,1)) {
mes "[January Quest Headgear]";
mes "Here's your item";
delitem 975,1; // Scarlet Dyestuff
delitem 976,1; // Lemon Dyestuff
delitem 978,1; // Cobaltblue Dyestuff
delitem 10005,5; // Wig
delitem 7152,300; // Glossy Hair
getitem 5258,1; // Dokebi's Wig
} else {goto m_nospace;}
emotion e_thx;
close;
h_no:
next;
mes "[October Quest Headgear]";
mes "Ah, alright. Just tell me when you want it.";
mes "See you soon~";
emotion e_heh;
close;
m_noitem:
next;
mes "[October Quest Headgear]";
mes "Don't Make me laugh !";
mes "You don't all the required items to the the headgear";
emotion e_e4;
//atcommand "@die";
close;
m_nospace:
next;
mes "[October Quest Headgear]";
mes "You are overweight.";
mes "Can't carry the headgear.";
emotion e_heh;
close;
}
//---------------------------------------------------------------------------------------
//------------------------------------ Month Setting ------------------------------------
//---------------------------------------------------------------------------------------
- script Setting -1,{
if ($Quest$=="") donpcevent "Setting::OnClock0001";
OnInit:
OnClock0001:
switch(gettime(6)) {
Case 0:// January
set $Quest$, "January Quest Headgear";
break;
Case 1:// February
set $Quest$, "February Quest Headgear";
break;
Case 2:// March
Case 3:// April
Case 4:// May
Case 5:// June
Case 6:// July
Case 7:// August
Case 8:// September
Case 9:// October
set $Quest$, "October Quest Headgear";
break;
Case 10:// November
Case 11:// December
}
end;
}
