diff options
Diffstat (limited to 'world/map/npc/042-1/valon.txt')
| -rw-r--r-- | world/map/npc/042-1/valon.txt | 168 |
1 files changed, 0 insertions, 168 deletions
diff --git a/world/map/npc/042-1/valon.txt b/world/map/npc/042-1/valon.txt deleted file mode 100644 index b50207a3..00000000 --- a/world/map/npc/042-1/valon.txt +++ /dev/null @@ -1,168 +0,0 @@ -// This file is part of the Tutorial -// Author: Jenalya, Wushin --|script|#ValonConfig|-1 -{ - end; - -OnInit: - setarray $@ValonMob, 1002,1050,1046,1003; - setarray $@ValonMobName$, "Maggots","House Maggots","Tame Scorpions","Scorpion"; - setarray $@ValonMobCnt, 10,5,3,1; - end; -} -function|script|ValonState -{ - set @valon_state, ((STARTAREA & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT); - set @valon_mob, 0; - if (@valon_state >= 2) - set @valon_mob, (@valon_state - 2); - set @valon_count, ((STARTAREA & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); - return; -} -function|script|setValonMask -{ - set STARTAREA, (STARTAREA & ~(NIBBLE_1_MASK) | (@valon_tmp << NIBBLE_1_SHIFT)); - set @valon_tmp, 0; - return; -} -function|script|ResetValonCntMask -{ - set STARTAREA, (STARTAREA & ~(NIBBLE_2_MASK) | (0 << NIBBLE_2_SHIFT)); - return; -} -function|script|AddValonCntMask -{ - set @valon_tmp, (@valon_count + 1); - if (@valon_tmp > $@ValonMobCnt[@valon_mob]) - set @valon_tmp, $@ValonMobCnt[@valon_mob]; - set STARTAREA, (STARTAREA & ~(NIBBLE_2_MASK) | (@valon_tmp << NIBBLE_2_SHIFT)); - set @valon_tmp, 0; - callfunc "ValonProgress"; - return; -} -function|script|ValonProgress -{ - callfunc "ValonState"; - if ((@valon_state > 1) && (@valon_state < 6)) - message strcharinfo(0), $@ValonMobName$[@valon_mob] + ": " + @valon_count + "/" + $@ValonMobCnt[@valon_mob]; - return; -} -042-1.gat,51,111,0|script|ValonDebug|156 -{ - mes "[Valon Debug]"; - mes "Reset?"; - menu - "Yes.", L_Reset, - "No.", L_End; - -L_Reset: - set STARTAREA, (STARTAREA & ~(NIBBLE_1_MASK) | (0 << NIBBLE_1_SHIFT)); - set STARTAREA, (STARTAREA & ~(NIBBLE_2_MASK) | (0 << NIBBLE_2_SHIFT)); - mes "Reset!"; - goto L_End; - -L_End: - end; - -OnInit: - if (!debug) - disablenpc "ValonDebug"; - end; -} -042-1.gat,48,111,0|script|Valon|156 -{ - setarray @npc_loc, 48, 111, 4; - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_Close; - callfunc "ValonState"; - if (@valon_state >= 6) - goto L_QuestComplete; - if (@valon_start == 1) - goto L_QuestAskAgain; - if (@valon_count >= $@ValonMobCnt[@valon_mob]) - goto L_NextMob; - if ((@valon_state >= 2) && (@valon_state < 6)) - goto L_QuestStarted; - goto L_QuestAsk; - -L_QuestAskAgain: - mes "[Valon]"; - mes "\"Hello, Adventurer! Have you come back to help?\""; - menu - "Yes. I will help with the desert beasts.", L_Accept, - "Maybe some other time.", L_Close; - -L_QuestAsk: - mes "[Valon]"; - mes "\"Hello!"; - mes "You're looking for adventures, right?\""; - next; - mes "\"But you shouldn't underestimate this desert, it is dangerous.\""; - next; - mes "\"It's crawling with scorpions, and the heat has overcome adventurers tougher than you are.\""; - next; - mes "\"I should know I gaurd this gate from all manner of desert beasts.\""; - next; - mes "\"Maybe you would like help and earn your stripes?\""; - next; - mes "\"The Council of Wizard's does offer a reward for helping...\""; - set @valon_tmp, 1; - callfunc "setValonMask"; - callfunc "ResetValonCntMask"; - menu - "YES!!! let me at them!", L_Accept, - "Maybe some other time.", L_Close; - -L_Accept: - set @valon_tmp, 2; - callfunc "setValonMask"; - callfunc "ValonState"; - goto L_NewMob; - -L_NextMob: - getexp 40, 0; - mes "\"I see you killed all the " + $@ValonMobName$[@valon_mob] + " needed.\""; - next; - mes "\"The Wizard's thank thee as well.\""; - set Zeny, Zeny + 25; - set @valon_tmp, (@valon_state + 1); - callfunc "setValonMask"; - callfunc "ResetValonCntMask"; - callfunc "ValonState"; - next; - if (@valon_mob == getarraysize($@ValonMob)) - goto L_QuestOver; - goto L_NewMob; - -L_NewMob: - mes "\"Let's see whats on the list. Ah ok, I need you to kill me " + $@ValonMobCnt[@valon_mob] + " " + $@ValonMobName$[@valon_mob] + "\""; - next; - mes "\"I'll be waiting here, come back and see after you've killed those mobs.\""; - goto L_Close; - -L_QuestStarted: - mes "[Valon]"; - mes "Hail adventurer! You are well on your way to mastering the beasts of the desert.\""; - next; - mes "\"You need to kill " + $@ValonMobName$[@valon_mob] + ": " + @valon_count + "/" + $@ValonMobCnt[@valon_mob] + "\""; - next; - mes "\"Come back and see me when the job is done.\""; - goto L_Close; - -L_QuestOver: - mes "[Valon]"; - mes "\"Thanks once again for helping with the monsters in the desert.\""; - getexp 50, 0; - set @valon_tmp, (@valon_state + 1); - callfunc "setValonMask"; - goto L_Close; - -L_QuestComplete: - mes "[Valon]"; - mes "\"Thanks once again for helping with the monsters in the desert.\""; - goto L_Close; - -L_Close: - close; -} |