viewing paste Unknown #5901 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252
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!";
}
if(mother_tpos < 1)
mes "Hi "+strcharinfo(0)+", Will you please help me find my precious daughter?";
disablenpc "Red Riding Hood";
switch(select("Investigate:Sorry:I have her belongings") {
case 1:
mes .@npcname$;
mes "She's been missing since yesterday";
mes .@npcname$;
mes "I ask her to bring some fruits to her sick grandmother in Payon but she's not back until now";
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";
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";
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;
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;
}
case 2:
mes .@npcname$;
mes "***Crying***, Ok.";
case 3:
mes .@npcname$;
mes "Really?";
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.";
}
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:
mes .@npcname$;
mes "That's not it!";
mes "Please find traces of her!, I BEG of YOU!";
emotion e_sob;
complete:
mes .@npcname$;
mes "These belong to my child!";
mes "Sob...Sob..Sob..";
delitem 7047,1;
delitem 7216,1;
delitem 16001,1;
mes .@npcname$;
mes "I think she's been attacked by the Big Bad Wolf!";
mex .@npcname$;
mes "Please find the .@hunter1$";
mes "He is in the Left side of Prontera near West Gate.";
set mother_tpos,1;
M_Hunter:
mex .@npcname$;
mes "Please find the .@hunter1$";
mes "He is in the Left side of Prontera near West Gate.";
}
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;
mes .@hunter1$;
mes "About that Bad Ass Wolf huh?";
mes .@hunter1$;
mes "Bring me 5 Pieces of this items and i shall guide you to their Hideout.";
mes "5x --> Golden Apple^000000";
mes .@hunter1$;
mes "Don't fool around!";
mes "time is running!";
mes .@hunter1$;
mex "Do you have the apples?";
if (select("Give the Apples.:Eat the Apples.") == 2) {
mes .@hunter1$;
mes "Hey! Don't Eat that!";
delitem 7793,5;
}
if( countitem(7793) < 5) goto kinain;
if( countitem(7793) >= 5) goto binigay;
kinain:
mes .@hunter$;
mes "it's either you ate it";
mes "or you just dont wan't to give it";
binigay:
mes .@hunter$;
mes "Ohh...YeaHH! APPLES!";
mes "**Eating**";
delitem 7993,5;
mes "I will warp you to their Hideout";
warp "moc_fild13",198,337;
set hunter_tpos,1;
H_tpos:
mes .@hunter1$;
emotion e_omg;
mes "Why are you still here?"
warp "moc_fild13",198,337;
}
 
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!";
}
mes .@badwolf1$;
mes "You ask for it!!! GRRRR...";
monster .@map2$,76,216,"Big Bad Wolf",1785,1,strnpcinfo(0)+"::OnMyMobDead2";
}
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;
}
Boss_tpos:
mes .@badwolf1$;
mes "What else do you need?? You've already killed our boss!"
mes "+strcharinfo(0)+";
mes "Where is Little Red Riding Hood!";
warp "moc_fild13",32,27;
enablenpc "Red Riding Hood";
}
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;
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?";
}
mes .@little$;
mes "To My Grandma's House!";
warp "payon",264,154;
disablenpc "Red Riding Hood";
set little_tpos,1;
}
little_tpos:
mes .@little$;
mes "To My Grandma's House!";
warp "payon",264,154;
disablenpc "Red Riding Hood";
set little_tpos,1;
}
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?";
}
grand_ma:
mes .@grandma$;
mes "My grandchild told me about your adventures with her";
mes .@grandma$;
mes "Thank you for bringing her back";
emotion e_thx;
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;
}
Viewed 529 times, submitted by unknown.