summaryrefslogtreecommitdiff
path: root/world/map/npc/008-1/andra.txt
diff options
context:
space:
mode:
Diffstat (limited to 'world/map/npc/008-1/andra.txt')
-rw-r--r--world/map/npc/008-1/andra.txt6
1 files changed, 6 insertions, 0 deletions
diff --git a/world/map/npc/008-1/andra.txt b/world/map/npc/008-1/andra.txt
index 8e80d3c5..a6ba52f6 100644
--- a/world/map/npc/008-1/andra.txt
+++ b/world/map/npc/008-1/andra.txt
@@ -57,8 +57,11 @@ L_PreSummon:
OnTimer1000:
set $@plant_id, rand(1029,1032);
areamonster "008-1.gat",44,18,135,46,"plant",$@plant_id,$@PLANTS_PER_SEED, "Andra::OnPlantDeath";
+ if (isloggedin(getcharid(3,$@farmer$))==0) goto L_Spawn1000;
attachrid(getcharid(3,$@farmer$));
message strcharinfo(0), "Andra: I think some plants will grow almost instantly! Just Watch...";
+
+L_Spawn1000:
set $@spawned_plants, $@spawned_plants + $@PLANTS_PER_SEED;
end;
@@ -77,8 +80,11 @@ OnTimer5000:
OnTimer7000:
set $@plant_id, rand(1029,1032);
areamonster "008-1.gat",44,18,135,46,"plant",$@plant_id,$@PLANTS_PER_SEED, "Andra::OnPlantDeath";
+ if (isloggedin(getcharid(3,$@farmer$))==0) goto L_Spawn7000;
attachrid(getcharid(3,$@farmer$));
message strcharinfo(0), "Andra: Good... Just take a walk and you will be able to see how your seeds turned into some nice looking plants.";
+
+L_Spawn7000:
set $@spawned_plants, $@spawned_plants + $@PLANTS_PER_SEED;
set $@andra_status, 0;
set $@farmer$, "";