summaryrefslogtreecommitdiff
path: root/world/map/npc/042-1/valon.txt
diff options
context:
space:
mode:
Diffstat (limited to 'world/map/npc/042-1/valon.txt')
-rw-r--r--world/map/npc/042-1/valon.txt168
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;
-}