summaryrefslogtreecommitdiff
path: root/npc/016-1/marine.txt
diff options
context:
space:
mode:
authorJesusaves <cpntb1@ymail.com>2018-06-22 18:11:10 -0300
committerJesusaves <cpntb1@ymail.com>2018-06-22 18:11:10 -0300
commitf6aa539309218be5cfbc2cf5cae4e6e5cb94de4c (patch)
tree699db5786239f83ad395fb14aaefb503d1746c36 /npc/016-1/marine.txt
parent8a93d1ecdf1cd88e53bd8345b354b76c1dd6566f (diff)
downloadserverdata-f6aa539309218be5cfbc2cf5cae4e6e5cb94de4c.tar.gz
serverdata-f6aa539309218be5cfbc2cf5cae4e6e5cb94de4c.tar.bz2
serverdata-f6aa539309218be5cfbc2cf5cae4e6e5cb94de4c.tar.xz
serverdata-f6aa539309218be5cfbc2cf5cae4e6e5cb94de4c.zip
Adjust travel prices Tulim<->Hurns. Move file.
Diffstat (limited to 'npc/016-1/marine.txt')
-rw-r--r--npc/016-1/marine.txt153
1 files changed, 0 insertions, 153 deletions
diff --git a/npc/016-1/marine.txt b/npc/016-1/marine.txt
deleted file mode 100644
index 3772d88be..000000000
--- a/npc/016-1/marine.txt
+++ /dev/null
@@ -1,153 +0,0 @@
-// TMW2 scripts.
-// Authors:
-// Jesusalva
-// Description:
-// Temporary, placeholder.
-
-016-1,19,29,0 script Captain NPC_NARD,{
- if (BaseLevel < 20)
- goto L_TooWeak;
-
- mesn;
- mesq l("Hi @@.", strcharinfo(0));
- next;
- mesq l("You are currently at @@.", LOCATION$);
- mes "";
-
- menu
- rif(LOCATION$ != "Tulim", l("To Tulimshar.")), L_TTulim,
- rif(LOCATION$ != "Hurns", l("To Hurnscald.")), L_THurns,
- l("No, I'll save my money."), -;
-
- close;
-
-L_THurns:
- .@price=2000;
- .@x=marine_reputation("Hurns");
-
- if (.@x >= 3)
- .@price-=1500;
- else if (.@x >= 2)
- .@price-=1000;
- else if (.@x >= 1)
- .@price-=500;
-
- mes "";
- mesn;
- mesq l("It'll cost you @@ GP.", .@price);
- mes "";
-
- if (Zeny < .@price) {
- mes l("You still need @@ GP to afford it.", (.@price-Zeny));
- close;
- }
-
- if (askyesno() != ASK_YES)
- close;
-
- Zeny=Zeny-.@price;
- PC_DEST$="Hurns";
-
- mes "";
- mesn;
- mesq l("Hurnscald? Small farming towns are always nice to visit.");
- next;
- mesq l("I was planning to go there soon, anyway. All aboard!");
- close2;
- addtimer nard_time(PC_DEST$), "#MarineShip::OnEvent";
- @timer_navio_running = 1;
- warp "016-6", 40, 32;
-
- // 10% base chance of Pirate Attack!
- // Each level INCREASES this in 0.1%.
- // So for a level 40 player, chances are 14%.
- if (rand(1, 10000) < 1000+(BaseLevel*10))
- addtimer rand(3000,6000), "#MarineShipAttack::OnEvent";
- end;
-
-
-
-
-
-
-
-
-L_TTulim:
- .@price=2000;
- .@x=marine_reputation("Tulim");
-
- if (.@x >= 10)
- .@price-=1500;
- else if (.@x >= 8)
- .@price-=1000;
- else if (.@x >= 6)
- .@price-=750;
- else if (.@x >= 4)
- .@price-=500;
- else if (.@x >= 2)
- .@price-=250;
-
- mes "";
- mesn;
- mesq l("It'll cost you @@ GP.", .@price);
- mes "";
-
- if (Zeny < .@price) {
- mes l("You still need @@ GP to afford it.", (.@price-Zeny));
- close;
- }
-
- if (askyesno() != ASK_YES)
- close;
-
- Zeny=Zeny-.@price;
- PC_DEST$="Tulim";
- @timer_navio_running = 1;
-
- mes "";
- mesn;
- mesq l("Tulimshar, right? The oldest human city-state!");
- next;
- mesq l("I was planning to go there soon, anyway. All aboard!");
- close2;
- addtimer nard_time(PC_DEST$), "#MarineShip::OnEvent";
- @timer_navio_running = 1;
- warp "016-6", 40, 32;
-
- // 10% base chance of Pirate Attack!
- // Each level INCREASES this in 0.1%.
- // So for a level 40 player, chances are 14%.
- if (rand(1, 10000) < 1000+(BaseLevel*10))
- addtimer rand(3000,6000), "#MarineShipAttack::OnEvent";
- end;
-
-L_TooWeak:
- mesn;
- mesq l("The sea route I take is very dangerous, and full of pirates. You're too weak to travel with me.");
- close;
-
-L_Close:
- close;
-
-OnInit:
- .sex = G_MALE;
- .distance = 5;
- end;
-
-
-OnInterIfInit:
- // Tulim Instance
- .TULIM_INSTID = instance_create("016-1@TulimInst", 0, IOT_NONE);
- instance_attachmap("016-1", .TULIM_INSTID, 0, "016-1@Tulim");
- instance_set_timeout(1000000, 1000000, .TULIM_INSTID);
- instance_init(.TULIM_INSTID);
- end;
-
- // Hurns Instance
- .HURNS_INSTID = instance_create("016-1@HurnsInst", 0, IOT_NONE);
- instance_attachmap("016-1", .HURNS_INSTID, 0, "016-1@Hurns");
- instance_set_timeout(1000000, 1000000, .HURNS_INSTID);
- instance_init(.HURNS_INSTID);
- end;
-
-}