From 647db0a9a8100f9e9716b1399521d8b999ec146c Mon Sep 17 00:00:00 2001
From: Reid <reidyaro@gmail.com>
Date: Wed, 26 Dec 2012 04:16:36 +0100
Subject: Corrected no-reward from peter.

---
 npc/000-2-1/peter.txt | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'npc/000-2-1')

diff --git a/npc/000-2-1/peter.txt b/npc/000-2-1/peter.txt
index 696045cf..bd0ffa6a 100644
--- a/npc/000-2-1/peter.txt
+++ b/npc/000-2-1/peter.txt
@@ -79,9 +79,9 @@ l_Rwin:
     set @q, getq(ShipQuests_Peter);
     if (@q == 1 || @q == 2) goto OnReturnFail;
     if (@q == 3 || @q == 4 || @q == 5)  goto OnReturnWin;
-    setq ShipQuests_Peter, 6;
 
 OnGiveTask:
+    setq ShipQuests_Peter, 6;
     mesn;
     mesq g(l("Hey, girl!"),
            l("Hey, man!"));
@@ -168,7 +168,7 @@ l_BonusTask:
     if ($@RAT_SAILOR_HELPER$ != "") goto OnDontneedHelp;
     if (@q == 6) setq ShipQuests_Peter, 2;
     if (@q == 3) setq ShipQuests_Peter, 4;
-
+    mes @q;
     goto l_Start;
 
 l_Task:
@@ -277,6 +277,7 @@ l_CleaningClose:
     close;
 
 l_Reward:
+    warp "000-2-1.gat", 72, 36;
     mesn;
     mesq l("Good job!") + " " + l("Here's your reward!");
     getexp 100, 0;
-- 
cgit v1.2.3-60-g2f50