summaryrefslogtreecommitdiff
path: root/world/map/npc/033-1/kimarr.txt
diff options
context:
space:
mode:
authorBen Longbons <b.r.longbons@gmail.com>2014-04-02 11:06:32 -0700
committerBen Longbons <b.r.longbons@gmail.com>2014-04-02 22:21:29 -0700
commitc0ba38cd4b68491e28e467889804ebc09c9c002e (patch)
treeaf2890e6fe20990d2a9b7c94b991be58f25a5d52 /world/map/npc/033-1/kimarr.txt
parent514a2f05cb335c1e9210fea58bc9a9a58478283f (diff)
downloadserverdata-c0ba38cd4b68491e28e467889804ebc09c9c002e.tar.gz
serverdata-c0ba38cd4b68491e28e467889804ebc09c9c002e.tar.bz2
serverdata-c0ba38cd4b68491e28e467889804ebc09c9c002e.tar.xz
serverdata-c0ba38cd4b68491e28e467889804ebc09c9c002e.zip
Clean up main scripts
Diffstat (limited to 'world/map/npc/033-1/kimarr.txt')
-rw-r--r--world/map/npc/033-1/kimarr.txt23
1 files changed, 16 insertions, 7 deletions
diff --git a/world/map/npc/033-1/kimarr.txt b/world/map/npc/033-1/kimarr.txt
index 6614f273..183d3651 100644
--- a/world/map/npc/033-1/kimarr.txt
+++ b/world/map/npc/033-1/kimarr.txt
@@ -50,23 +50,26 @@
next;
mes "\"You are very small and must be careful in these snowy mountains. It is cold, and dangerous monsters are here.\"";
menu
- "Hello, my name is " + strcharinfo(0) + " and I'm not small. I'm a great warrior!",-,
- "I'm " + strcharinfo(0) + ", don't underestimate me. I'm an experienced adventurer!",-,
- "I'm the legendary " + strcharinfo(0) + ", I've fought countless battles.",-;
+ "Hello, my name is " + strcharinfo(0) + " and I'm not small. I'm a great warrior!",L_Next,
+ "I'm " + strcharinfo(0) + ", don't underestimate me. I'm an experienced adventurer!",L_Next,
+ "I'm the legendary " + strcharinfo(0) + ", I've fought countless battles.",L_Next;
+L_Next:
mes "Kimarr seems to be amused.";
mes "[Kimarr]";
mes "\"Really? Do you want to prove it?\"";
menu
- "Sure! What shall I do?",-,
+ "Sure! What shall I do?",L_Continue,
"No, I don't need to prove anything.",L_Close;
+L_Continue:
mes "\"Every young member of our tribe proves his or her worth by hunting monsters.\"";
next;
mes "\"The first monsters to hunt are Fluffies. Fluffies give a good meal for a young person and the fur can be used to make clothes and blankets.\"";
next;
set @state, 1;
callsub S_Update_Mask;
+ goto L_Explain_Game;
L_Explain_Game:
mes "[Kimarr]";
@@ -82,6 +85,7 @@ L_Explain_Game:
next;
mes "\"Drop more food when no Fluffies are left.\"";
next;
+ goto L_Ask;
// dialog starts here if you've asked about it but not done it (@state == 1)
L_Ask:
@@ -91,8 +95,7 @@ L_Ask:
"Yeah, let's start!",L_Game,
"Could you explain again?",L_Explain_Game,
"Can you tell me who were the most successful Fluffy hunters?",L_ShowRecord,
- "Maybe later.",-;
- goto L_Close;
+ "Maybe later.",L_Close;
L_AlreadyGotReward:
npctalk strcharinfo(0) + " killed " + $@Fluffy_Kills + " Fluffies and has once again proven to be a good hunter.";
@@ -256,6 +259,7 @@ L_BeginHunting:
set $@Fluffy_Spawn, 100 - $@Fluffy_Alive;
if ($@Fluffy_Spawn <= 0)
goto L_ContinueTimer;
+ goto L_SpawnFluffies;
L_SpawnFluffies:
areamonster "033-1.gat", 79, 29, 88, 42, "", 1089, $@Fluffy_Spawn, "Kimarr::OnFluffyDeath";
@@ -311,7 +315,6 @@ OnFluffyDeath:
if (attachrid($@Fluffy_FighterID) == 1)
goto L_Killedall;
goto L_GotOut;
- end;
L_Punish:
if (@MobID == 1089)
@@ -354,6 +357,8 @@ L_MaybeRecordScore:
if ($@Fluffy_Kills < $@Fluffy_Min)
goto L_NotGoodEnough;
set @rank, 0;
+ goto L_MaybeInsertNext;
+
L_MaybeInsertNext:
if ($@Fluffy_Kills > $Record_Fluffy_Kills[@rank])
goto L_InsertScore;
@@ -367,6 +372,8 @@ L_MaybeInsertNext:
L_InsertScore:
set @loop, @rank;
+ goto L_FindLastScore;
+
L_FindLastScore:
// comment this out to allow the player to be in the list more than once
// though actually, it might be better just to assume the list is full
@@ -405,6 +412,8 @@ L_NotGoodEnough:
L_ShowRecord:
set @rank, 0;
set @loop, 0;
+ goto L_ShowNextRecord;
+
L_ShowNextRecord:
if ($Record_Fluffy_Kills[@loop] == 0)
goto L_Close;