diff options
| -rw-r--r-- | db/const.txt | 1 | ||||
| -rw-r--r-- | npc/000-2-1/peter.txt | 18 |
2 files changed, 10 insertions, 9 deletions
diff --git a/db/const.txt b/db/const.txt index f7c375d2..b6ea3481 100644 --- a/db/const.txt +++ b/db/const.txt @@ -204,3 +204,4 @@ NoobQuests_Demon 0 NoobQuests_OldWitch 1 ShipQuests_Julia 0 +ShipQuests_Peter 1 diff --git a/npc/000-2-1/peter.txt b/npc/000-2-1/peter.txt index ecc71534..9671536b 100644 --- a/npc/000-2-1/peter.txt +++ b/npc/000-2-1/peter.txt @@ -61,7 +61,7 @@ mesq g(l("Hey, girl!"), l("Hey, man!")); next; - set @q, geta4(ShipQuests, 1); + set @q, geta4(ShipQuests, ShipQuests_Peter); //If player wasn't warped and player is helper if (@q < 5 && $@RAT_SAILOR_HELPER$ == strcharinfo(0)) goto l_TaskWasGiven; @@ -89,7 +89,7 @@ OnGiveTask: mesn; mesq l("I need somebody who can clean the bottom of the ship of these Ratto, can you help me?"); - set @q, geta4(ShipQuests, 1); + set @q, geta4(ShipQuests, ShipQuests_Peter); menu rif(@q == 0, l("Yeah, but what reward will I get?")), l_BonusTask, l("Why not, I need to train anyway."), l_Task, @@ -123,7 +123,7 @@ mesq l("Let me see your work..."); next; - set @q, geta4(ShipQuests, 1); + set @q, geta4(ShipQuests, ShipQuests_Peter); if (getmapmobs("000-2-2.gat") || $@RAT_SAILOR_HELPER$ != strcharinfo(0)) goto l_Fail; set $@RAT_SAILOR_HELPER$, ""; @@ -131,7 +131,7 @@ set @q, @q - 4; if (@q > 1) set @q, @q - 2; - seta4 ShipQuests, 1, @q; + seta4 ShipQuests, ShipQuests_Peter, @q; mesn; mesq l("Good job!"); close; @@ -144,12 +144,12 @@ g(l("Okay, I'm ready to work!#0"), l("Okay, I'm ready to work!#1")), -, l("What? This reward is too small!"), l_Close; if ($@RAT_SAILOR_HELPER != "") goto OnDontNeedHelp; - seta4 ShipQuests, 1, 2; + seta4 ShipQuests, ShipQuests_Peter, 2; goto l_Start; l_Task: if ($@RAT_SAILOR_HELPER != "") goto OnDontNeedHelp; - seta4 ShipQuests, 1, geta4(ShipQuests, 1) + 3; + seta4 ShipQuests, ShipQuests_Peter, geta4(ShipQuests, ShipQuests_Peter) + 3; goto l_Start; l_Start: @@ -173,11 +173,11 @@ mesn; mesq g(l("You failed the task!#0"), l("You failed the task!#1")); set $@RAT_SAILOR_HELPER$, ""; - set @q, geta4(ShipQuests, 1); + set @q, geta4(ShipQuests, ShipQuests_Peter); if (@q == 5 || @q == 2) goto l_FailBonusTask; if (@q > 5) set @q, @q - 6; if (@q > 2) set @q, @q - 3; - seta4 ShipQuests, 1, @q; + seta4 ShipQuests, ShipQuests_Peter, @q; close; l_KillHelper: @@ -185,7 +185,7 @@ close; l_FailBonusTask: - seta4 ShipQuests, 1, 0; + seta4 ShipQuests, ShipQuests_Peter, 0; close; l_Reward: |