prontera,95,157,5 script Mother 961,{ if(mother_tpos >=1) goto M_Hunter; set .@grandma$,"^0000FF[ Grandma ]^000000"; set .@map2$,"moc_fild13"; set .@little$,"^0000FF Red Riding Hood^000000"; set .@npcname$,"^0000FF[ Mother ]^000000"; set .@badwolf1$,"^0000FF Bad Wolf Minion^000000"; set .@hunter1$,"^0000FF Hunter^000000"; set .@map1$,"^FF0000pay_fild02^000000"; if(Class==0||BaseLevel<255){ mes "Hi there little Adventurer!"; close; } if(mother_tpos < 1) mes "Hi "+strcharinfo(0)+", Will you please help me find my precious daughter?"; disablenpc "Red Riding Hood"; next; switch(select("Investigate:Sorry:I have her belongings") { case 1: mes .@npcname$; mes "She's been missing since yesterday"; next; mes .@npcname$; mes "I ask her to bring some fruits to her sick grandmother in Payon but she's not back until now"; next; mes .@npcname$; mes "Please go, maybe you'll find some of my daughter's belongings in .@map1$, that's our way to my mother's house"; next; mes "Here's what she bring with her"; mes "1x --> Little Red's Apron^000000"; mes "1x --> Little Red's Scarf^000000"; mes "1x --> Little Red's Square Bag^000000"; next; mes .@npcname$; mes "Try too look for them"; mes "But, i hope you will not find them with her BODY!"; mes "Sob...Sob...Sob.."; goto T_M; emotion e_sob; close; T_M: monster .@map1$,0,0,"Wolf Scouts",1821,10,strnpcinfo(0)+"::OnMyMobDead"; OnMyMobDead: set $WolfKilled,$WolfKilled+1; if ($WolfKilled==10;) goto T_Wiped; T_Wiped: announce "[ Bonus ] : You Have Wiped out all the unnecessary wolves here in .@map1$",bc_blue|bc_self; getitem 607,15; end; } case 2: mes .@npcname$; mes "***Crying***, Ok."; close; case 3: mes .@npcname$; mes "Really?"; next; if (select("Give.:Don't Give") == 2) { mes .@npcname$ mes "Sob..Sob.."; mes "Please don't fool around"; mes "It's My Daughter that is missing here, not your brain."; close; } if( countitem(7047) < 1 || countitem(7216) < 1 || countitem(16001) < 1) goto kulang; if( countitem(7047) >= 1 || countitem(7216) >= 1 || countitem(16001) >= 1) goto complete; kulang: next; mes .@npcname$; mes "That's not it!"; mes "Please find traces of her!, I BEG of YOU!"; emotion e_sob; close; complete: next; mes .@npcname$; mes "These belong to my child!"; mes "Sob...Sob..Sob.."; delitem 7047,1; delitem 7216,1; delitem 16001,1; next; mes .@npcname$; mes "I think she's been attacked by the Big Bad Wolf!"; next; mex .@npcname$; mes "Please find the .@hunter1$"; mes "He is in the Left side of Prontera near West Gate."; set mother_tpos,1; close; M_Hunter: mex .@npcname$; mes "Please find the .@hunter1$"; mes "He is in the Left side of Prontera near West Gate."; close; } prontera,41,214,5 script Hunter 821,{ if(hunter_tpos >= 1) goto H_tpos; if(hunter_tpos < 1) mes .@hunter1$; mes "Hey Kid, What do you want huh?"; emotion e_omg; if(select("About the Big Bad Wolf:Nothing Sir" == 2) { mes .@hunter1$; mes "Get out of my Face!"; emotion e_omg; close; mes .@hunter1$; mes "About that Bad Ass Wolf huh?"; next; mes .@hunter1$; mes "Bring me 5 Pieces of this items and i shall guide you to their Hideout."; mes "5x --> Golden Apple^000000"; next; mes .@hunter1$; mes "Don't fool around!"; mes "time is running!"; next; mes .@hunter1$; mex "Do you have the apples?"; next; if (select("Give the Apples.:Eat the Apples.") == 2) { mes .@hunter1$; mes "Hey! Don't Eat that!"; delitem 7793,5; close; } if( countitem(7793) < 5) goto kinain; if( countitem(7793) >= 5) goto binigay; kinain: next; mes .@hunter$; mes "it's either you ate it"; mes "or you just dont wan't to give it"; close; binigay: next; mes .@hunter$; mes "Ohh...YeaHH! APPLES!"; mes "**Eating**"; delitem 7993,5; next; mes "I will warp you to their Hideout"; warp "moc_fild13",198,337; end; set hunter_tpos,1; close; H_tpos: mes .@hunter1$; emotion e_omg; mes "Why are you still here?" warp "moc_fild13",198,337; close; } moc_fild13,75,325,5 script Bad Wolf Minion 427,{ if(boss_tpos >= 1) goto Boss_tpos; if(boss_tpos < 1) mes .@badwolf1$; mes "Hey, What do you want kid?"; if(select("(Kick Hime):(Where is your Boss)" == 2) { mes .@badwolf1$; mes "Leave this place if you wan't to live!"; close; } mes .@badwolf1$; mes "You ask for it!!! GRRRR..."; monster .@map2$,76,216,"Big Bad Wolf",1785,1,strnpcinfo(0)+"::OnMyMobDead2"; close; } OnMyMobDead2: set $WolfKilled2,$WolfKilled2+1; if ($WolfKilled2==1;) goto T_Boss; } T_Boss: announce "[ Big Bad Wolf ] : Curse You!! I'll be Back!! .@map2$",bc_blue|bc_self; getitem 607,1; getitem 969,1; getitem 12404,1; getitem 14542,1; getitem 14544,1; set boss_tpos,1; end; } Boss_tpos: mes .@badwolf1$; mes "What else do you need?? You've already killed our boss!" next; mes "+strcharinfo(0)+"; mes "Where is Little Red Riding Hood!"; warp "moc_fild13",32,27; enablenpc "Red Riding Hood"; close; } moc_fild13,32,27,0 script Red Riding Hood 960,{ if(little_tpos >= 1) goto little_tpos; if(little_tpos < 1) mes .@little$; mes "Thanks for rescuing me and retrieving the fruits for my grandmother"; emotion e_thx; next; mes .@little$; mes "Can you accompany me to my granda's house so I can give these fruits to her?"; if(select("Okay, Lets Go!:Cancel" == 2) { mes .@little$; mes "What are we waiting for?"; close; } mes .@little$; mes "To My Grandma's House!"; warp "payon",264,154; disablenpc "Red Riding Hood"; end; set little_tpos,1; close; } little_tpos: next; mes .@little$; mes "To My Grandma's House!"; warp "payon",264,154; disablenpc "Red Riding Hood"; end; set little_tpos,1; close; } payon,101,35,0 script Grandma 863,{ if(little_tpos >= 1) goto grand_ma; if(little_tpos < 1) mes .@grandma$; mes "Ahhhh, it's a Beautiful Morning don't you think?"; close; } grand_ma: mes .@grandma$; mes "My grandchild told me about your adventures with her"; next; mes .@grandma$; mes "Thank you for bringing her back"; emotion e_thx; next; mes .@grandma$; mes "Accept this as a Gift"; getitem 12186,1; set little_tpos,0; set mother_tpos,0; set boss_tpos,0; set hunter_tpos,0; set close; }