From 9500711870718f5b683ea5a9f76bce61527b08a7 Mon Sep 17 00:00:00 2001 From: wushin Date: Wed, 7 Jan 2015 20:40:06 -0600 Subject: Add new wlk files --- world/map/data/001-1.wlk | Bin 19042 -> 19604 bytes world/map/data/001-2.wlk | Bin 16004 -> 17224 bytes world/map/data/002-1.wlk | Bin 17412 -> 19604 bytes world/map/data/002-2.wlk | Bin 10004 -> 23844 bytes world/map/data/005-3.wlk | Bin 13924 -> 13924 bytes world/map/data/006-1.wlk | Bin 22504 -> 19604 bytes world/map/data/006-3.wlk | Bin 22504 -> 22504 bytes world/map/data/008-1.wlk | Bin 19444 -> 19444 bytes world/map/data/021-2.wlk | Bin 40004 -> 40004 bytes world/map/data/021-3.wlk | Bin 29908 -> 29908 bytes world/map/data/029-1.wlk | Bin 10004 -> 19604 bytes world/map/data/029-2.wlk | Bin 0 -> 15404 bytes world/map/data/029-3.wlk | Bin 10004 -> 10004 bytes world/map/data/042-1.wlk | Bin 22564 -> 22564 bytes world/map/data/042-2.wlk | Bin 15404 -> 7704 bytes world/map/data/043-3.wlk | Bin 22504 -> 22504 bytes world/map/data/resnametable.txt | 27 +-------------------------- 17 files changed, 1 insertion(+), 26 deletions(-) create mode 100644 world/map/data/029-2.wlk diff --git a/world/map/data/001-1.wlk b/world/map/data/001-1.wlk index 05f949c1..843bc5a7 100644 Binary files a/world/map/data/001-1.wlk and b/world/map/data/001-1.wlk differ diff --git a/world/map/data/001-2.wlk b/world/map/data/001-2.wlk index 5cab113f..1db402b4 100644 Binary files a/world/map/data/001-2.wlk and b/world/map/data/001-2.wlk differ diff --git a/world/map/data/002-1.wlk b/world/map/data/002-1.wlk index 3c97c8e6..abfb1e64 100644 Binary files a/world/map/data/002-1.wlk and b/world/map/data/002-1.wlk differ diff --git a/world/map/data/002-2.wlk b/world/map/data/002-2.wlk index 1de69a2b..6528a49d 100644 Binary files a/world/map/data/002-2.wlk and b/world/map/data/002-2.wlk differ diff --git a/world/map/data/005-3.wlk b/world/map/data/005-3.wlk index 818b5cd4..a1dcecee 100644 Binary files a/world/map/data/005-3.wlk and b/world/map/data/005-3.wlk differ diff --git a/world/map/data/006-1.wlk b/world/map/data/006-1.wlk index 0edb7f0a..f2de1da0 100644 Binary files a/world/map/data/006-1.wlk and b/world/map/data/006-1.wlk differ diff --git a/world/map/data/006-3.wlk b/world/map/data/006-3.wlk index 7b269208..da68fedc 100644 Binary files a/world/map/data/006-3.wlk and b/world/map/data/006-3.wlk differ diff --git a/world/map/data/008-1.wlk b/world/map/data/008-1.wlk index 04a4808e..c02a9ab9 100644 Binary files a/world/map/data/008-1.wlk and b/world/map/data/008-1.wlk differ diff --git a/world/map/data/021-2.wlk b/world/map/data/021-2.wlk index dabae3e3..61e4456f 100644 Binary files a/world/map/data/021-2.wlk and b/world/map/data/021-2.wlk differ diff --git a/world/map/data/021-3.wlk b/world/map/data/021-3.wlk index 663cfbd4..38eb0ee4 100644 Binary files a/world/map/data/021-3.wlk and b/world/map/data/021-3.wlk differ diff --git a/world/map/data/029-1.wlk b/world/map/data/029-1.wlk index 9dbbe403..bebe118d 100644 Binary files a/world/map/data/029-1.wlk and b/world/map/data/029-1.wlk differ diff --git a/world/map/data/029-2.wlk b/world/map/data/029-2.wlk new file mode 100644 index 00000000..7cd78d7b Binary files /dev/null and b/world/map/data/029-2.wlk differ diff --git a/world/map/data/029-3.wlk b/world/map/data/029-3.wlk index 8a81c360..235b703d 100644 Binary files a/world/map/data/029-3.wlk and b/world/map/data/029-3.wlk differ diff --git a/world/map/data/042-1.wlk b/world/map/data/042-1.wlk index bd22d8db..f41ebe48 100644 Binary files a/world/map/data/042-1.wlk and b/world/map/data/042-1.wlk differ diff --git a/world/map/data/042-2.wlk b/world/map/data/042-2.wlk index 77f96ce9..c3f7a3fa 100644 Binary files a/world/map/data/042-2.wlk and b/world/map/data/042-2.wlk differ diff --git a/world/map/data/043-3.wlk b/world/map/data/043-3.wlk index c03892d6..6cee3d76 100644 Binary files a/world/map/data/043-3.wlk and b/world/map/data/043-3.wlk differ diff --git a/world/map/data/resnametable.txt b/world/map/data/resnametable.txt index 645cce18..f4ce577a 100644 --- a/world/map/data/resnametable.txt +++ b/world/map/data/resnametable.txt @@ -6,16 +6,10 @@ 002-3.gat#002-3.wlk# 002-4.gat#002-4.wlk# 002-5.gat#002-5.wlk# -003-1.gat#003-1.wlk# -003-2.gat#003-2.wlk# -004-1.gat#004-1.wlk# -004-2.gat#004-2.wlk# 004-3.gat#004-3.wlk# 004-4.gat#004-4.wlk# 004-5.gat#004-5.wlk# -005-1.gat#005-1.wlk# 005-3.gat#005-3.wlk# -005-4.gat#005-4.wlk# 006-1.gat#006-1.wlk# 006-2.gat#006-2.wlk# 006-3.gat#006-3.wlk# @@ -59,17 +53,7 @@ 020-1.gat#020-1.wlk# 020-2.gat#020-2.wlk# 020-3.gat#020-3.wlk# -021-1.gat#021-1.wlk# -021-2.gat#021-2.wlk# 021-3.gat#021-3.wlk# -022-1.gat#022-1.wlk# -023-1.gat#023-1.wlk# -023-2.gat#023-2.wlk# -023-3.gat#023-3.wlk# -024-1.gat#024-1.wlk# -024-2.gat#024-2.wlk# -024-3.gat#024-3.wlk# -024-4.gat#024-4.wlk# 025-1.gat#025-1.wlk# 025-3.gat#025-3.wlk# 025-4.gat#025-4.wlk# @@ -85,6 +69,7 @@ 028-1.gat#028-1.wlk# 028-3.gat#028-3.wlk# 029-1.gat#029-1.wlk# +029-2.gat#029-2.wlk# 029-3.gat#029-3.wlk# 030-1.gat#030-1.wlk# 030-2.gat#030-2.wlk# @@ -94,18 +79,12 @@ 031-2.gat#031-2.wlk# 031-3.gat#031-3.wlk# 031-4.gat#031-4.wlk# -032-1.gat#032-1.wlk# 032-3.gat#032-3.wlk# 033-1.gat#033-1.wlk# 034-1.gat#034-1.wlk# 034-2.gat#034-2.wlk# 035-2.gat#035-2.wlk# 036-2.gat#036-2.wlk# -041-1.gat#041-1.wlk# -042-1.gat#042-1.wlk# -042-2.gat#042-2.wlk# -042-3.gat#042-3.wlk# -043-1.gat#043-1.wlk# 043-3.gat#043-3.wlk# 043-4.gat#043-4.wlk# 044-1.gat#044-1.wlk# @@ -125,8 +104,4 @@ 056-1.gat#056-1.wlk# 056-2.gat#056-2.wlk# 057-1.gat#057-1.wlk# -068-1.gat#068-1.wlk# -068-2.gat#068-2.wlk# -069-1.gat#069-1.wlk# -069-2.gat#069-2.wlk# botcheck.gat#botcheck.wlk# -- cgit v1.2.3-60-g2f50 From a367a6f05dc17755c313b2f2adda30d3083ad86d Mon Sep 17 00:00:00 2001 From: wushin Date: Wed, 7 Jan 2015 20:41:58 -0600 Subject: Conf Changes --- world/conf/char_athena.conf | 2 +- world/map/conf/magic-misc.sex | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/world/conf/char_athena.conf b/world/conf/char_athena.conf index d71f90f4..73aab23c 100644 --- a/world/conf/char_athena.conf +++ b/world/conf/char_athena.conf @@ -18,7 +18,7 @@ char_txt: save/athena.txt // Location where new characters first appear // Format: mapname,x,y. There must be no spaces. -start_point: 042-2.gat,26,26 +start_point: 029-2.gat,22,24 // Log Filename char_log_filename: log/char.log diff --git a/world/map/conf/magic-misc.sex b/world/map/conf/magic-misc.sex index a1cd0dbc..faec0acb 100644 --- a/world/map/conf/magic-misc.sex +++ b/world/map/conf/magic-misc.sex @@ -78,7 +78,7 @@ (is_in (location caster) (@+ - (@ "021-2.gat" 20 25) + (@ "001-2.gat" 21 27) 4 4))))) (EFFECT -- cgit v1.2.3-60-g2f50 From a8db9aab074c8e33cba2971e994fe43262e52424 Mon Sep 17 00:00:00 2001 From: wushin Date: Wed, 7 Jan 2015 20:43:53 -0600 Subject: Add Mob Changes --- world/map/db/20_39_mob_db.txt | 3 ++- world/map/db/40_59_mob_db.txt | 1 - world/map/db/leg_item_db.txt | 2 +- world/map/db/use_item_db.txt | 2 +- world/map/db/weapon_item_db.txt | 2 +- 5 files changed, 5 insertions(+), 5 deletions(-) diff --git a/world/map/db/20_39_mob_db.txt b/world/map/db/20_39_mob_db.txt index 0be39fda..b0d1d096 100644 --- a/world/map/db/20_39_mob_db.txt +++ b/world/map/db/20_39_mob_db.txt @@ -1,7 +1,8 @@ //ID, Name, Jname, LV, HP, SP, EXP, JEXP, Range1, ATK1, ATK2, DEF, MDEF, STR, AGI, VIT, INT, DEX, LUK, Range2, Range3, Scale, Race, Element,Mode, Speed, Adelay, Amotion,Dmotion,Drop1id,Drop1per,Drop2id,Drop2%, Drop3id,Drop3%, Drop4id,Drop4%, Drop5id,Drop5%, Drop6id,Drop6%, Drop7id,Drop7%, Drop8id,Drop8%, Item1, Item2, MEXP, ExpPer, MVP1id, MVP1per,MVP2id, MVP2per,MVP3id, MVP3per,mutationcount,mutationstrength 1011, FireGoblin, FireGoblin, 20, 220, 0, 0, 4, 1, 15, 20, 0, 5, 1, 1, 1, 0, 6, 30, 1, 1, 1, 3, 23, 129, 800, 1872, 672, 480, 505, 800, 501, 150, 518, 800, 502, 150, 521, 70, 522, 10, 701, 500, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 30 1017, Bat, Bat, 20, 150, 0, 0, 3, 1, 5, 25, 0, 5, 1, 1, 1, 0, 20, 25, 1, 1, 1, 3, 24, 129, 800, 1872, 672, 480, 505, 800, 501, 150, 518, 400, 533, 150, 521, 70, 522, 1, 753, 3000, 754, 2000, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 40 -1018, Pinkie, Pinkie, 30, 500, 0, 0, 7, 2, 7, 15, 0, 5, 1, 1, 1, 0, 20, 25, 2, 2, 1, 3, 20, 129, 800, 1872, 672, 480, 614, 1000, 751, 40, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 50 +1131, ManaBug, ManaBug, 25, 300, 0, 0, 5, 2, 8, 15, 4, 6, 1, 4, 1, 4, 5, 4, 2, 1, 1, 3, 24, 137, 800, 1800, 672, 480, 505, 1000, 518, 800, 533, 400, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 40 +1018, Pinkie, Pinkie, 30, 300, 0, 0, 7, 2, 7, 15, 0, 5, 1, 1, 1, 0, 20, 25, 2, 2, 1, 3, 20, 129, 800, 1872, 672, 480, 614, 1000, 751, 40, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 50 1019, SpikyMushroom, SpikyMushroom, 30, 300, 0, 0, 5, 1, 10, 13, 0, 5, 1, 1, 1, 0, 10, 10, 1, 1, 1, 3, 20, 129, 800, 1872, 672, 480, 567, 800, 501, 150, 518, 50, 613, 400, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 40 1020, Fluffy, Fluffy, 30, 500, 0, 0, 7, 1, 6, 10, 1, 5, 1, 2, 1, 0, 20, 25, 1, 1, 1, 3, 20, 129, 800, 1600, 672, 480, 611, 800, 527, 150, 535, 400, 752, 20, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 40 1021, CaveSnake, CaveSnake, 30, 800, 0, 0, 13, 1, 20, 15, 1, 5, 10, 1, 1, 0, 5, 20, 1, 1, 1, 3, 20, 129, 800, 1872, 672, 480, 612, 1000, 610, 40, 713, 500, 717, 400, 717, 400, 641, 20, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 50 diff --git a/world/map/db/40_59_mob_db.txt b/world/map/db/40_59_mob_db.txt index 7e44e845..a27c015c 100644 --- a/world/map/db/40_59_mob_db.txt +++ b/world/map/db/40_59_mob_db.txt @@ -11,4 +11,3 @@ 1098, CopperSlime, CopperSlime, 40, 600, 0, 0, 18, 1, 60, 90, 20, 30, 20, 30, 10, 10, 30, 30, 1, 1, 1, 0, 21, 131, 1200, 1872, 672, 480, 640, 1500, 537, 1000, 4001, 300, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 20 1111, CandiedSlime, CandiedSlime, 50, 800, 0, 800, 66, 3, 50, 50, 20, 30, 20, 30, 10, 10, 30, 30, 1, 1, 1, 0, 21, 175, 1200, 1872, 672, 480, 510, 1000, 509, 1000, 515, 200, 516, 200, 538, 200, 512, 200, 508, 500, 514, 750, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 20 1112, Santaboo, Santaboo, 50, 2200, 0, 0, 59, 2, 80, 125, 50, 10, 25, 10, 25, 0, 60, 30, 2, 2, 1, 3, 20, 129, 600, 1872, 672, 480, 512, 1000, 736, 1200, 737, 1200, 738, 1200, 739, 1200, 511, 50, 4042, 10, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 30 -1131, ManaBug, ManaBug, 50, 650, 0, 0, 35, 2, 65, 80, 4, 6, 16, 40, 10, 40, 50, 40, 1, 1, 1, 3, 22, 137, 800, 1800, 672, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 60 diff --git a/world/map/db/leg_item_db.txt b/world/map/db/leg_item_db.txt index caa37385..317d9d63 100644 --- a/world/map/db/leg_item_db.txt +++ b/world/map/db/leg_item_db.txt @@ -11,7 +11,7 @@ 796, BromenalLegs, Bromenal Legs, 5, 2000, 1000, 150, 0, 6, 0, -12, 0, 2, 1, 0, 0, 0, {}, {} 857, LeatherTrousers, Leather Trousers, 5, 1000, 500, 25, 0, 5, 0, -4, 0, 2, 1, 0, 0, 0, {}, {bonus bHit, 2;} 881, RaggedShorts, Ragged Shorts, 5, 60, 1, 7, 0, 0, 0, -2, 0, 2, 1, 0, 1, 0, {}, {} -1172, SilkPants, Silk Pants, 5, 1500, 750, 10, 0, 2, 0, 0, 0, 2, 1, 0, 1, 0, {}, {} +1172, SilkPants, Silk Pants, 5, 5000, 750, 10, 0, 2, 0, 0, 0, 2, 1, 0, 1, 0, {}, {} //ID, Name___________________, Label__________________, Type, Price, Sell, Weight, ATK, DEF, Range, Mbonus, Slot, Gender, Loc, wLV, eLV, View, {UseScript}, {EquipScript} 2100, RedCottonSkirt, Red Cotton Skirt, 5, 1000, 500, 20, 0, 4, 0, -8, 0, 2, 1, 0, 1, 0, {}, {} 2101, GreenCottonSkirt, Green Cotton Skirt, 5, 1000, 500, 20, 0, 4, 0, -8, 0, 2, 1, 0, 1, 0, {}, {} diff --git a/world/map/db/use_item_db.txt b/world/map/db/use_item_db.txt index 0e5f3bde..b2b13008 100644 --- a/world/map/db/use_item_db.txt +++ b/world/map/db/use_item_db.txt @@ -86,7 +86,7 @@ 1280, Scissors, Scissors, 0, 1000, 500, 120, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {callfunc "useScissors";}, {} 1281, ShockSweet, Shock Sweet, 0, 1000, 500, 5, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {callfunc "useShockSweet";}, {} 3001, RubberBat, Rubber Bat, 0, 200, 100, 30, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {misceffect 403;getitem 3001,1;}, {} -3006, TonoriDelight, Tonori Delight, 0, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 10, 0;}, {} +3006, TonoriDelight, Tonori Delight, 0, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 10, 2;}, {} 3007, Marshmallow, Marshmallow, 0, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 10, 0;}, {} 3009, JellySkull, Jelly Skull, 0, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 10, 0;}, {} 3010, CandyPumpkin, Candy Pumpkin, 0, 5, 1, 2, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, {itemheal 10, 0;}, {} diff --git a/world/map/db/weapon_item_db.txt b/world/map/db/weapon_item_db.txt index ba3111f1..a16425f8 100644 --- a/world/map/db/weapon_item_db.txt +++ b/world/map/db/weapon_item_db.txt @@ -54,7 +54,7 @@ 867, IceGladius, Ice Gladius, 4, 2000, 1000, 1000, 110, 0, 1, 0, 0, 2, 2, 1, 1, 1, {}, {bonus bLuk, 1;} 878, BansheeBow, Banshee Bow, 4, 101000, 40000, 900, 90, 0, 6, 0, 0, 2, 34, 1, 90, 11, {}, {set @bStat, bDex;set @minbStatVal, 80;callfunc "RequireStat"; bonus2 bHPDrainRate, 100, -4; bonus bAspdRate, 20; bonus bCritical, 70; bonus bMaxHP, -150; bonus bDefRate, -40; bonus bDef2Rate, -35;set @LauncherType, AMMO_BOW; callfunc "CheckLauncher";} 903, SlingShot, Sling Shot, 4, 500, 50, 10, 5, 0, 3, 0, 0, 2, 34, 1, 1, 11, {}, {set @LauncherType, AMMO_SLING; callfunc "CheckLauncher";} -904, SlingBullet, Sling Bullet, 10, 1, 0, 1, 5, 0, 0, 0, 0, 2, 32768, 0, 0, 0, {}, {set @AmmoType, AMMO_SLING; callfunc "CheckAmmo";} +904, SlingBullet, Sling Bullet, 10, 1, 0, 1, 3, 0, 0, 0, 0, 2, 32768, 0, 0, 0, {}, {set @AmmoType, AMMO_SLING; callfunc "CheckAmmo";} 906, KidBook, Kid Book, 4, 10000, 5000, 100, 1, 0, 3, 0, 0, 2, 34, 1, 1, 1, {}, {} 1199, Arrow, Arrow, 10, 2, 1, 1, 20, 0, 0, 0, 0, 2, 32768, 0, 0, 0, {}, {set @AmmoType, AMMO_BOW; callfunc "CheckAmmo";} 1200, Bow, Bow, 4, 1000, 500, 20, 20, 0, 5, 0, 0, 2, 34, 1, 4, 11, {}, {set @LauncherType, AMMO_BOW; callfunc "CheckLauncher";} -- cgit v1.2.3-60-g2f50 From 7987a556ec3030bf136fb16559960dba5dfd789f Mon Sep 17 00:00:00 2001 From: wushin Date: Wed, 7 Jan 2015 20:44:06 -0600 Subject: Add Function Changes --- world/map/npc/functions/debug.txt | 4 +-- world/map/npc/functions/ferry.txt | 31 +++++++++++-------- world/map/npc/functions/game_rules.txt | 25 ++------------- world/map/npc/functions/soul_menhir.txt | 11 ------- world/map/npc/functions/stat_reset.txt | 55 +++++++++++++++++++++++++++++++++ world/map/npc/functions/travelers.txt | 32 +++++-------------- 6 files changed, 85 insertions(+), 73 deletions(-) create mode 100644 world/map/npc/functions/stat_reset.txt diff --git a/world/map/npc/functions/debug.txt b/world/map/npc/functions/debug.txt index af7fcee0..384805b1 100755 --- a/world/map/npc/functions/debug.txt +++ b/world/map/npc/functions/debug.txt @@ -916,7 +916,7 @@ L_Close: } -042-2.gat,30,26,0|script|Debug#0|154 +029-2.gat,30,26,0|script|Debug#0|154 { callfunc "Debug"; end; @@ -926,7 +926,7 @@ OnInit: end; } -001-1.gat,41,29,0|script|Debug#1|154 +001-1.gat,53,47,0|script|Debug#1|154 { callfunc "Debug"; end; diff --git a/world/map/npc/functions/ferry.txt b/world/map/npc/functions/ferry.txt index cc5bfa14..cca5d3a0 100644 --- a/world/map/npc/functions/ferry.txt +++ b/world/map/npc/functions/ferry.txt @@ -5,17 +5,17 @@ end; OnInit: - disablenpc "Hurnscald Koga"; + disablenpc "Hurnscald South Koga"; disablenpc "Candor Koga"; disablenpc "Nivalis Koga"; - disablenpc "Tulimshar North Koga"; - disablenpc "Tulimshar South Koga"; + disablenpc "Hurnscald North Koga"; + disablenpc "Tulimshar Koga"; set $@MainCurrentDock, 0; set $@CandorCurrentDock, 0; set $@DockTickCount, 0; set $@DockLeaveCount, 1; - setarray $@MainDocks$, "Hurnscald", "Nivalis", "Tulimshar South"; - setarray $@CandorDocks$, "Candor", "Tulimshar North"; + setarray $@MainDocks$, "Hurnscald North", "Nivalis", "Tulimshar"; + setarray $@CandorDocks$, "Candor", "Hurnscald South"; cmdothernpc "#"+$@MainDocks$[$@MainCurrentDock]+"Dock", "Arrive"; cmdothernpc "#"+$@CandorDocks$[$@CandorCurrentDock]+"Dock", "Arrive"; if (debug >= 2) end; @@ -49,7 +49,7 @@ L_NextDock: if($@MainCurrentDock == 1) goto L_k1city3; end; -OnTimer10000: +OnTimer8000: if ($@DockTickCount > $@DockLeaveCount) goto L_NextDock; //mapannounce "035-2.tmx", "Koga - Main:* Now docked in "+$@MainDocks$[$@MainCurrentDock]+", Departing soon", 0; @@ -91,6 +91,18 @@ L_k2city2: end; } +function|script|FerryHelp +{ + mes "\"You wait on the dock for the ship to come in. You'll be given a chance to board the boat when it comes into port.\""; + mes "\"It lingers in port to allow you some time to board in case you are running behind.\""; + mes "\"Once on the ship, it will sail to different ports and annouce where it is docking.\""; + mes "\"There are 2 Ferrys, both ferrys are free to ride.\""; + mes "\"The Main ferry travels from Argeas, Kaizei and Tonori. It docks in the major ports Hurnscald North, Nivalis and the Tulimshar Dock.\""; + mes "\"The Candor Ferry only travels betwen Candor and the Hurnscald South Dock.\""; + mes "\"Refreshments and supplies are offered aboard both ships during the voyage.\""; + mes "\"We also have some slot machines in case you get bored.\""; + return; +} function|script|FerryManifest { mes "Which Ferry do you want to check the schedule for?"; @@ -100,7 +112,6 @@ function|script|FerryManifest L_CandorFerry: mes "The ferry is currently at "+$@CandorDocks$[$@CandorCurrentDock]; - next; set @NextDock, ($@CandorCurrentDock + 1); if(@NextDock == getarraysize($@CandorDocks$)) set @NextDock, 0; @@ -109,7 +120,6 @@ L_CandorFerry: L_WorldFerry: mes "The ferry is currently at "+$@MainDocks$[$@MainCurrentDock]; - next; set @NextDock, ($@MainCurrentDock + 1); if(@NextDock == getarraysize($@MainDocks$)) set @NextDock, 0; @@ -143,14 +153,9 @@ function|script|BoardCandorFerry "No.", L_Return; L_Board: - if (BaseLevel < 40) goto L_TooYoung; warp "036-2.tmx",39,29; goto L_Return; -L_TooYoung: - mes "This area is too dangerous for your low level."; - goto L_Return; - L_Return: return; } diff --git a/world/map/npc/functions/game_rules.txt b/world/map/npc/functions/game_rules.txt index 9799b11d..cbd4b8fb 100644 --- a/world/map/npc/functions/game_rules.txt +++ b/world/map/npc/functions/game_rules.txt @@ -2,7 +2,9 @@ function|script|GameRules { - set @read, 0; + + mes "[Server Game Rules]"; + mes "Please Select Language."; menu "English", L_English, "Deutsch (German)", L_German, @@ -23,10 +25,8 @@ L_English: mes "4. No begging"; mes "5. Speak English on public chat"; mes "6. Treat others the same way you would like to be treated"; - next; mes "AFK botting will be determined by talking to players who are moving and/or attacking."; mes "Automated following will be determined by observation."; - next; goto L_End; L_German: @@ -38,9 +38,7 @@ L_German: mes "5. Englisch ist die einzig zulässige Sprache im öffentlichen Raum."; mes "6. Behandele andere so, wie du selbst behandelt werden willst."; mes "Jegliche Regelverstöße können bestraft werden, entweder durch ein Zurücksetzen der Charaktereigenschaften und -besitztümer auf den Ausgangszustand, oder durch einen temporären oder permanenten Ausschluss aus dem Spiel."; - next; mes "Automatisiertes Spielverhalten liegt vor, wenn ein sich bewegender/kämpfender Spieler nicht intelligent auf Gesprächsaufforderungen reagiert."; - next; goto L_End; L_Dutch: @@ -52,9 +50,7 @@ L_Dutch: mes "4. Verboden te bedelen"; mes "5. Spreek Engels op de publieke chat"; mes "6. Behandel andere zoals ook jij behandeld wilt worden"; - next; mes "Botten word bepaald door te praten tegen spelers die aan het bewegen en/of aanvallen zijn."; - next; goto L_End; L_Danish: @@ -66,9 +62,7 @@ L_Danish: mes "4. Det er forbudt at tigge (for eksempel: Maa jeg ikke nok faa dit svaerd, kom nu, vaer nu soed... og saa videre)"; mes "5. Det er forbudt at snakke andre sprog end Engelsk, i den aabne chat. (Dog er det lovligt ved at bruge foelgende kommandoen /whisper)"; mes "6. Husk at goere mod andre, som du vil have de skal goere imod dig (opfoer dig ordenligt!)"; - next; mes "Botting bliver fastlagt paa grundlag af, at man snakker til andre spillere, der gaar rundt og/eller der angriber og de ikke svare igen."; - next; goto L_End; L_French: @@ -80,9 +74,7 @@ L_French: mes "4. Ne demandez pas d'items ou d'argent (les echanges doivent se faire de preference sur forums.themanaworld.org)"; mes "5. Parlez anglais dans les salons de discussions publics (principalement en ville)"; mes "6. Traitez les autres de la meme maniere que vous voudriez etre traite(e)"; - next; mes "L'utilisation de \"bot\" sera determinee en parlant aux joueurs(ses) en train de bouger et/ou d'attaquer."; - next; goto L_End; L_Spanish: @@ -93,10 +85,8 @@ L_Spanish: mes "4. No mendigar."; mes "5. Escriba únicamente en Inglés en el chat público"; mes "6. Trate a los demás de la misma forma que le gustaría ser tratado"; - next; mes "El uso de programas automáticos para jugar sin estar frente al teclado se determinará hablando con los jugadores que estén moviéndose y/o atacando."; mes "El seguimiento automático será determinado por observación."; - next; goto L_End; L_Swedish: @@ -107,9 +97,7 @@ L_Swedish: mes "4. Tigg inte"; mes "5. Prata bara engelska i den offentliga chatten"; mes "6. Behandla andra som du vill bli behandlad"; - next; mes "Vid misstankar om bottande kontrolleras detta genom att prata med spelaren under dess kringvandrande eller attackerande."; - next; goto L_End; L_Portuguese: @@ -121,9 +109,7 @@ L_Portuguese: mes "4. Pedintes serao ignorados, ou banidos."; mes "5. Fale ingles em lugares publicos."; mes "6. Trate os outros da mesma maneira que quer ser tratado(a)."; - next; mes "O \"botting\" sera determinado, falando com os jogadores que se movem e/ou atacam."; - next; goto L_End; L_Polish: @@ -135,9 +121,7 @@ L_Polish: mes "4. Zabrania sie zebrania"; mes "5. Na publicznym kanale rozmawiamy po angielsku"; mes "6. Traktuj innych tak jak sam chcesz byc traktowany"; - next; mes "Uzywanie botow zostanie okreslone na podstawie rozmow z innymi graczami podczas aktywnosci gracza."; - next; goto L_End; L_Italian: @@ -149,13 +133,10 @@ L_Italian: mes "4. Vietato implorare"; mes "5. Parlare solo inglese nella chat pubblica"; mes "6. Tratta gli altri giocatori come vuoi che gli altri trattino te."; - next; mes "I bot saranno determinati in base alle risposte e ai movimenti dei giocatori esaminati."; - next; goto L_End; L_End: - set @read, 1; if (TUT_var == 0) set TUT_var, gettimetick(2); goto L_Return; diff --git a/world/map/npc/functions/soul_menhir.txt b/world/map/npc/functions/soul_menhir.txt index e047e928..6c2c1c17 100644 --- a/world/map/npc/functions/soul_menhir.txt +++ b/world/map/npc/functions/soul_menhir.txt @@ -2,7 +2,6 @@ function|script|SoulMenhir { mes "[Soul Menhir]"; mes "(A mystical aura surrounds this stone. You feel mysteriously attracted to it. Something tells you to touch it. What do you do?)"; - next; menu "Touch it.", L_Bind, @@ -16,7 +15,6 @@ L_Towel: set TowelLastUsed, gettimetick(2); mes "[Soul Menhir]"; mes "(You touch the mysterious stone. Somehow it feels hard and soft at the same time.)"; - next; getitem "HitchhikersTowel", 1; goto L_Return; @@ -26,23 +24,14 @@ L_Bind: mes "[Soul Menhir]"; mes "(You touch the mysterious stone. Somehow it feels warm and cold at the same time.)"; - next; - - mes "[Soul Menhir]"; mes "(Suddenly a strange sensation flows through you. It feels like your soul leaves your body and becomes one with the stone.)"; - next; - - mes "[Soul Menhir]"; mes "(As suddenly as the feeling started it stops. The strange attraction is away from one moment to the next and the menhir feels like just an ordinary stone.)"; - next; - set Menhir_Activated, 1; goto L_Save; L_Shortversion: mes "[Soul Menhir]"; mes "(A strange sensation flows through you. It feels like your soul leaves your body and becomes one with the stone. As suddenly as the feeling started it stops.)"; - next; goto L_Save; L_Save: diff --git a/world/map/npc/functions/stat_reset.txt b/world/map/npc/functions/stat_reset.txt new file mode 100644 index 00000000..d8f484ff --- /dev/null +++ b/world/map/npc/functions/stat_reset.txt @@ -0,0 +1,55 @@ +// + +function|script|StatReset +{ +// if (ResetA_charstate == 1) goto L_Multiple; + +// set @cost, 10000000 / ($ResetA_uses + 1); + + set @cost, BaseLevel * 100; + + mes "[" + @NpcName$ + "]"; + mes "\"I have come across a spell that will"; + mes "reset your status points."; + mes "Normally this spell is expensive, but"; + mes "due to an unusual constellation of the"; + mes "stars I can cast it very cheaply!"; + mes "For you it will cost only "+@cost+" gp.\""; + next; + menu + "Reset my stats",L_Next, + "Forget about it",L_Pass; + +L_Next: + if (Zeny<@cost) goto L_NoMoney; + goto L_Reset; + +// set $ResetA_uses, $ResetA_uses + 1; +// set ResetA_charstate, 1; + +L_Reset: + set Zeny, Zeny-@cost; + resetstatus; + + mes "[" + @NpcName$ + "]"; + mes "\"There you are."; + mes ""; + mes "Good as new!\""; + goto L_Return; + +L_Pass: + mes "[" + @NpcName$ + "]"; + mes "\"Very well then, see you.\""; + goto L_Return; + +L_NoMoney: + mes "[" + @NpcName$ + "]"; + mes "\"Oh dear, the price cannot be bargained."; + mes ""; + mes "Perhaps you can borrow from a friend?\""; + goto L_Return; + +L_Return: + set @cost, 0; + return; +} diff --git a/world/map/npc/functions/travelers.txt b/world/map/npc/functions/travelers.txt index 6827aece..cfbbb9a3 100644 --- a/world/map/npc/functions/travelers.txt +++ b/world/map/npc/functions/travelers.txt @@ -13,7 +13,7 @@ OnInit: // TravelFound set $@tut_bit, (1 << 2); - set $@druid_tree_bit, (1 << 3); + //set $@druid_tree_bit, (1 << 3); set $@graveyard_bit, (1 << 4); set $@magic_house_bit, (1 << 5); set $@terranite_cave_bit, (1 << 6); @@ -21,7 +21,7 @@ OnInit: set $@blue_sage_bit, (1 << 8); set $@hurnscald_bit, (1 << 9); set $@nivalis_bit, (1 << 10); - set $@tul_mine_bit, (1 << 11); + //set $@tul_mine_bit, (1 << 11); set $@pachua_bit, (1 << 12); set $@nivalis_snow_hills_bit, (1 << 13); set $@barbarians_bit, (1 << 14); @@ -31,8 +31,8 @@ OnInit: set $@tulimshar_cost, 100; set $@hurnscald_cost, 100; set $@nivalis_cost, 100; - set $@druid_tree_cost, 150; - set $@tul_mine_cost, 150; + //set $@druid_tree_cost, 150; + //set $@tul_mine_cost, 150; set $@pachua_cost, 200; set $@graveyard_cost, 200; set $@magic_house_cost, 150; @@ -101,8 +101,6 @@ L_Start: "Tonori - Tulimshar (" + (@Cost * $@tulimshar_cost) + " GP)", L_TravelTulimshar, "Argeas - Hurnscald (" + (@Cost * $@hurnscald_cost) + " GP)", L_TravelHurnscald, "Kaizei - Nivalis (" + (@Cost * $@nivalis_cost) + " GP)", L_TravelNivalis, - "Tonori - Druid Tree (" + (@Cost * $@druid_tree_cost) + " GP)", L_TravelDruidTree, - "Tonori - Tulimshar Mines (" + (@Cost * $@tul_mine_cost) + " GP)", L_TravelTulMine, "Tonori - Pachua's Village (" + (@Cost * $@pachua_cost) + " GP)", L_TravelPachua, "Argeas - Candor (" + (@Cost * $@candor_cost) + " GP)", L_TravelCandor, "Argeas - Magic House (" + (@Cost * $@magic_house_cost) + " GP)", L_TravelMagicHouse, @@ -132,14 +130,6 @@ L_TravelPlayer: warp @NextLocationMap$,@NextLocationX,@NextLocationY; goto L_Clearvars; -L_TravelDruidTree: - set @NextLocationBit, $@druid_tree_bit; - set @NextLocationCost, (@Cost * $@druid_tree_cost); - set @NextLocationMap$, "005-1.gat"; - set @NextLocationX, 76; - set @NextLocationY, 36; - goto L_TravelChecks; - L_TravelGraveyard: set @NextLocationBit, $@graveyard_bit; set @NextLocationCost, (@Cost * $@graveyard_cost); @@ -167,9 +157,9 @@ L_TravelTerranite: L_TravelTulimshar: set @NextLocationBit, $@tulimshar_bit; set @NextLocationCost, (@Cost * $@tulimshar_cost); - set @NextLocationMap$, "001-1.gat"; - set @NextLocationX, 44; - set @NextLocationY, 70; + set @NextLocationMap$, "002-1.gat"; + set @NextLocationX, 60; + set @NextLocationY, 42; goto L_TravelChecks; L_TravelBlueSage: @@ -196,14 +186,6 @@ L_TravelNivalis: set @NextLocationY, 122; goto L_TravelChecks; -L_TravelTulMine: - set @NextLocationBit, $@tul_mine_bit; - set @NextLocationCost, (@Cost * $@tul_mine_cost); - set @NextLocationMap$, "002-2.gat"; - set @NextLocationX, 27; - set @NextLocationY, 28; - goto L_TravelChecks; - L_TravelPachua: set @NextLocationBit, $@pachua_bit; set @NextLocationCost, (@Cost * $@pachua_cost); -- cgit v1.2.3-60-g2f50 From db86987bfc74b19d1c77c321aa16773fa3ed57d7 Mon Sep 17 00:00:00 2001 From: wushin Date: Wed, 7 Jan 2015 20:44:52 -0600 Subject: Add Item Changes (script) --- world/map/npc/items/check_wand.txt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/world/map/npc/items/check_wand.txt b/world/map/npc/items/check_wand.txt index 8c81f94e..8e0107b1 100644 --- a/world/map/npc/items/check_wand.txt +++ b/world/map/npc/items/check_wand.txt @@ -5,7 +5,7 @@ function|script|WandMana if(isin("009-7.gat", $@fightclub_x1, $@fightclub_y1, $@fightclub_x2, $@fightclub_y2) && ((@Duel_Fighter != 1) || ($@Duel_NoMagic == 1))) goto L_Return; callfunc "CheckWand"; - set @WandCost, (@Wand * ((MaxSp / 10) + 2)); + set @WandCost, (@Wand * (BaseLevel / 15) + 2); set @WandAttack, 0; if (!(@Wand)) goto L_NoWand; -- cgit v1.2.3-60-g2f50 From fb7caf2cb0e768cf4b9c7f83df644edc97250a78 Mon Sep 17 00:00:00 2001 From: wushin Date: Wed, 7 Jan 2015 20:45:06 -0600 Subject: Add Annual Changes --- world/map/npc/annuals/halloween/config.txt | 2 +- world/map/npc/annuals/halloween/debug.txt | 39 ------------------------------ world/map/npc/annuals/tree_beard.txt | 8 +++--- 3 files changed, 5 insertions(+), 44 deletions(-) diff --git a/world/map/npc/annuals/halloween/config.txt b/world/map/npc/annuals/halloween/config.txt index 20fba752..8e9169e8 100644 --- a/world/map/npc/annuals/halloween/config.txt +++ b/world/map/npc/annuals/halloween/config.txt @@ -244,7 +244,7 @@ L_Main: set $@n, $@n + 1; - set $@halloween_npc_tathin, $@n; + set $@halloween_npc_yanis, $@n; set $@halloween_npc_names$[$@n], "[Tathin]"; set $@halloween_greetings$[$@n], "\"I am employed by the Tonori Government, make sure you abide the regulations we wrote down for Trick-or-Treaters this year...\""; set $@halloween_trick_notscary$[$@n], "Of course I will... not!"; diff --git a/world/map/npc/annuals/halloween/debug.txt b/world/map/npc/annuals/halloween/debug.txt index 64da1d38..38bed87f 100644 --- a/world/map/npc/annuals/halloween/debug.txt +++ b/world/map/npc/annuals/halloween/debug.txt @@ -139,42 +139,3 @@ L_Close: set @halloween_npc_id, 0; close; } -009-1.gat,51,38,0|script|HalloweenDebug#1|409 -{ - callfunc "HalloweenDebug"; - goto L_End; - -OnInit: - if(!debug) - disablenpc "HalloweenDebug#1"; - goto L_End; - -L_End: - end; -} -001-1.gat,38,26,0|script|HalloweenDebug#2|409 -{ - callfunc "HalloweenDebug"; - goto L_End; - -OnInit: - if(!debug) - disablenpc "HalloweenDebug#2"; - goto L_End; - -L_End: - end; -} -026-1.gat,23,37,0|script|HalloweenDebug#3|409 -{ - callfunc "HalloweenDebug"; - goto L_End; - -OnInit: - if(!debug) - disablenpc "HalloweenDebug#3"; - goto L_End; - -L_End: - end; -} diff --git a/world/map/npc/annuals/tree_beard.txt b/world/map/npc/annuals/tree_beard.txt index 27cf930e..dc49e865 100644 --- a/world/map/npc/annuals/tree_beard.txt +++ b/world/map/npc/annuals/tree_beard.txt @@ -45,25 +45,25 @@ close; } -001-1.gat,41,45,0|script|#GhostTreeThree|133 +001-1.gat,58,75,0|script|#GhostTreeThree|133 { callfunc "HalloweenTree"; close; } -001-1.gat,41,45,0|script|#PalmTree|384 +001-1.gat,58,75,0|script|#PalmTree|384 { end; } -001-1.gat,41,46,0|script|Present#3|386 +001-1.gat,58,76,0|script|Present#3|386 { callfunc "XmasStates"; callfunc "XmasMainItemReward"; close; } -001-1.gat,41,45,0|script|#XmasPalmTree|383 +001-1.gat,58,75,0|script|#XmasPalmTree|383 { end; } -- cgit v1.2.3-60-g2f50 From 2901ba177dea5867cbd52eb2b02a0ef8e1816e15 Mon Sep 17 00:00:00 2001 From: wushin Date: Wed, 7 Jan 2015 21:00:16 -0600 Subject: Moving Tutorial from Tulimshar to Candor --- world/map/npc/001-1/_import.txt | 34 +- world/map/npc/001-1/_mobs.txt | 40 +- world/map/npc/001-1/_warps.txt | 21 +- world/map/npc/001-1/adrian.txt | 52 +++ world/map/npc/001-1/banker.txt | 10 - world/map/npc/001-1/barber.txt | 12 - world/map/npc/001-1/bard.txt | 135 ------- world/map/npc/001-1/bernard.txt | 132 ------- world/map/npc/001-1/bleacher.txt | 293 -------------- world/map/npc/001-1/ched.txt | 25 ++ world/map/npc/001-1/children.txt | 2 +- world/map/npc/001-1/constable.txt | 6 +- world/map/npc/001-1/dock.txt | 23 +- world/map/npc/001-1/elanore.txt | 619 ------------------------------ world/map/npc/001-1/entertainer.txt | 38 -- world/map/npc/001-1/eomie.txt | 143 +++++++ world/map/npc/001-1/ferry_master.txt | 21 + world/map/npc/001-1/gate_guards.txt | 26 ++ world/map/npc/001-1/gossip.txt | 69 +--- world/map/npc/001-1/guards.txt | 4 +- world/map/npc/001-1/guide.txt | 184 --------- world/map/npc/001-1/inac.txt | 17 + world/map/npc/001-1/luca.txt | 451 ---------------------- world/map/npc/001-1/mapflags.txt | 2 +- world/map/npc/001-1/merchant.txt | 3 - world/map/npc/001-1/mikhail.txt | 74 ---- world/map/npc/001-1/monster_guide.txt | 48 --- world/map/npc/001-1/north_shops.txt | 8 + world/map/npc/001-1/npcs.txt | 71 +++- world/map/npc/001-1/rewards_master.txt | 151 -------- world/map/npc/001-1/sandra.txt | 118 ------ world/map/npc/001-1/sarah.txt | 88 ----- world/map/npc/001-1/sewer_east.txt | 17 + world/map/npc/001-1/sewer_north.txt | 17 + world/map/npc/001-1/soul-menhir.txt | 18 - world/map/npc/001-1/stat_reset.txt | 8 + world/map/npc/001-1/tinris.txt | 219 +++++++++++ world/map/npc/001-1/tombstones.txt | 76 ++++ world/map/npc/001-1/trader.txt | 155 -------- world/map/npc/001-1/traveler.txt | 11 - world/map/npc/001-1/vincent.txt | 128 ------ world/map/npc/001-1/weellos.txt | 40 ++ world/map/npc/002-1/_import.txt | 14 +- world/map/npc/002-1/_mobs.txt | 40 +- world/map/npc/002-1/_warps.txt | 25 +- world/map/npc/002-1/anwar.txt | 204 ++++++++++ world/map/npc/002-1/bard.txt | 135 +++++++ world/map/npc/002-1/dock.txt | 5 + world/map/npc/002-1/elanore.txt | 619 ++++++++++++++++++++++++++++++ world/map/npc/002-1/gaurds.txt | 19 + world/map/npc/002-1/itka.txt | 21 + world/map/npc/002-1/lieutenant_dausen.txt | 22 +- world/map/npc/002-1/luca.txt | 451 ++++++++++++++++++++++ world/map/npc/002-1/mapflags.txt | 2 +- world/map/npc/002-1/mine_debug.txt | 81 ++++ world/map/npc/002-1/nickos.txt | 2 +- world/map/npc/002-1/nomads.txt | 4 +- world/map/npc/002-1/npcs.txt | 24 ++ world/map/npc/002-1/sarah.txt | 88 +++++ world/map/npc/002-1/soul-menhir.txt | 18 + world/map/npc/002-1/stewen.txt | 2 +- world/map/npc/002-1/traveler.txt | 11 + world/map/npc/003-1/_import.txt | 7 - world/map/npc/003-1/_mobs.txt | 40 -- world/map/npc/003-1/_warps.txt | 8 - world/map/npc/003-1/mapflags.txt | 1 - world/map/npc/003-1/stranger.txt | 464 ---------------------- world/map/npc/004-1/_import.txt | 6 - world/map/npc/004-1/_mobs.txt | 36 -- world/map/npc/004-1/_warps.txt | 9 - world/map/npc/004-1/mapflags.txt | 1 - world/map/npc/008-1/_import.txt | 2 + world/map/npc/008-1/_mobs.txt | 22 +- world/map/npc/008-1/banu.txt | 112 ++++++ world/map/npc/008-1/dock.txt | 28 +- world/map/npc/008-1/george.txt | 25 +- world/map/npc/008-1/mikhail.txt | 76 ++++ world/map/npc/009-1/_import.txt | 1 + world/map/npc/009-1/guide.txt | 186 +++++++++ world/map/npc/009-2/_import.txt | 4 + world/map/npc/009-2/bernard.txt | 141 +++++++ world/map/npc/009-2/entertainer.txt | 38 ++ world/map/npc/009-2/peter.txt | 6 + world/map/npc/009-2/shops.txt | 2 +- world/map/npc/009-2/trader.txt | 155 ++++++++ world/map/npc/009-2/wyara.txt | 7 + world/map/npc/009-2/yalina.txt | 11 + world/map/npc/021-1/_import.txt | 20 - world/map/npc/021-1/_mobs.txt | 24 -- world/map/npc/021-1/_warps.txt | 25 -- world/map/npc/021-1/bakery.txt | 20 - world/map/npc/021-1/banu.txt | 112 ------ world/map/npc/021-1/eurni.txt | 45 --- world/map/npc/021-1/gate_guards.txt | 53 --- world/map/npc/021-1/hideandseek.txt | 385 ------------------- world/map/npc/021-1/imec.txt | 111 ------ world/map/npc/021-1/inac.txt | 17 - world/map/npc/021-1/mapflags.txt | 2 - world/map/npc/021-1/north_shops.txt | 20 - world/map/npc/021-1/npcs.txt | 39 -- world/map/npc/021-1/pauline.txt | 307 --------------- world/map/npc/021-1/sewer_east.txt | 17 - world/map/npc/021-1/sewer_north.txt | 17 - world/map/npc/021-1/sewer_west.txt | 17 - world/map/npc/021-1/weellos.txt | 34 -- world/map/npc/022-1/_import.txt | 11 - world/map/npc/022-1/_mobs.txt | 9 - world/map/npc/022-1/_warps.txt | 8 - world/map/npc/022-1/adrian.txt | 52 --- world/map/npc/022-1/anwar.txt | 203 ---------- world/map/npc/022-1/dock.txt | 51 --- world/map/npc/022-1/ferry_master.txt | 30 -- world/map/npc/022-1/mapflags.txt | 2 - world/map/npc/022-1/npcs.txt | 57 --- world/map/npc/023-1/_import.txt | 6 - world/map/npc/023-1/_mobs.txt | 42 -- world/map/npc/023-1/_warps.txt | 17 - world/map/npc/023-1/mapflags.txt | 1 - world/map/npc/024-1/_import.txt | 11 - world/map/npc/024-1/_mobs.txt | 36 -- world/map/npc/024-1/_warps.txt | 7 - world/map/npc/024-1/ched.txt | 48 --- world/map/npc/024-1/david.txt | 53 --- world/map/npc/024-1/eomie.txt | 145 ------- world/map/npc/024-1/mapflags.txt | 2 - world/map/npc/024-1/tinris.txt | 219 ----------- world/map/npc/024-1/tondar.txt | 56 --- world/map/npc/029-1/_import.txt | 13 + world/map/npc/029-1/_mobs.txt | 35 +- world/map/npc/029-1/_warps.txt | 4 + world/map/npc/029-1/aahna.txt | 23 ++ world/map/npc/029-1/barrier.txt | 5 +- world/map/npc/029-1/dock.txt | 6 +- world/map/npc/029-1/ferry_master.txt | 21 + world/map/npc/029-1/hasan.txt | 212 ++++++++++ world/map/npc/029-1/hideandseek.txt | 403 +++++++++++++++++++ world/map/npc/029-1/kaan.txt | 125 ++++++ world/map/npc/029-1/liana.txt | 47 +++ world/map/npc/029-1/mapflags.txt | 2 +- world/map/npc/029-1/monster_guide.txt | 48 +++ world/map/npc/029-1/rewards_master.txt | 151 ++++++++ world/map/npc/029-1/soul-menhir.txt | 18 + world/map/npc/029-1/traveler.txt | 2 +- world/map/npc/029-1/tutorial.txt | 75 ++++ world/map/npc/029-1/valon.txt | 158 ++++++++ world/map/npc/029-1/vincent.txt | 150 ++++++++ world/map/npc/029-1/zegas.txt | 108 ++++++ world/map/npc/029-2/_import.txt | 13 + world/map/npc/029-2/_mobs.txt | 15 + world/map/npc/029-2/_warps.txt | 8 + world/map/npc/029-2/barrels.txt | 63 +++ world/map/npc/029-2/barrels_config.txt | 105 +++++ world/map/npc/029-2/mapflags.txt | 2 + world/map/npc/029-2/morgan.txt | 132 +++++++ world/map/npc/029-2/sorfina.txt | 388 +++++++++++++++++++ world/map/npc/029-2/stat_reset.txt | 44 +++ world/map/npc/029-2/tanisha.txt | 299 +++++++++++++++ world/map/npc/029-2/two_arms.txt | 4 + world/map/npc/041-1/_import.txt | 6 - world/map/npc/041-1/_mobs.txt | 40 -- world/map/npc/041-1/_warps.txt | 5 - world/map/npc/041-1/mapflags.txt | 1 - world/map/npc/042-1/_import.txt | 12 - world/map/npc/042-1/_mobs.txt | 39 -- world/map/npc/042-1/_warps.txt | 15 - world/map/npc/042-1/hasan.txt | 228 ----------- world/map/npc/042-1/kaan.txt | 144 ------- world/map/npc/042-1/liana.txt | 24 -- world/map/npc/042-1/mapflags.txt | 1 - world/map/npc/042-1/tutorial.txt | 67 ---- world/map/npc/042-1/valon.txt | 168 -------- world/map/npc/042-1/zegas.txt | 109 ------ world/map/npc/042-2/_import.txt | 13 - world/map/npc/042-2/_mobs.txt | 15 - world/map/npc/042-2/_warps.txt | 10 - world/map/npc/042-2/barrels.txt | 63 --- world/map/npc/042-2/barrels_config.txt | 104 ----- world/map/npc/042-2/magic_basement.txt | 21 - world/map/npc/042-2/mapflags.txt | 2 - world/map/npc/042-2/morgan.txt | 146 ------- world/map/npc/042-2/sorfina.txt | 346 ----------------- world/map/npc/042-2/stat_reset.txt | 46 --- world/map/npc/042-2/tanisha.txt | 347 ----------------- world/map/npc/042-3/_import.txt | 5 - world/map/npc/042-3/_mobs.txt | 9 - world/map/npc/042-3/_warps.txt | 5 - world/map/npc/043-1/_import.txt | 7 - world/map/npc/043-1/_mobs.txt | 27 -- world/map/npc/043-1/_warps.txt | 6 - world/map/npc/043-1/mapflags.txt | 1 - world/map/npc/043-1/ryger.txt | 11 - world/map/npc/068-1/_import.txt | 8 - world/map/npc/068-1/_mobs.txt | 24 -- world/map/npc/068-1/_warps.txt | 15 - world/map/npc/068-1/mapflags.txt | 2 - world/map/npc/068-1/stat_reset.txt | 55 --- world/map/npc/068-1/tombstones.txt | 41 -- world/map/npc/069-1/_import.txt | 6 - world/map/npc/069-1/_mobs.txt | 9 - world/map/npc/069-1/_warps.txt | 20 - world/map/npc/069-1/mapflags.txt | 2 - 201 files changed, 5991 insertions(+), 8028 deletions(-) create mode 100644 world/map/npc/001-1/adrian.txt delete mode 100644 world/map/npc/001-1/banker.txt delete mode 100644 world/map/npc/001-1/barber.txt delete mode 100644 world/map/npc/001-1/bard.txt delete mode 100644 world/map/npc/001-1/bernard.txt delete mode 100644 world/map/npc/001-1/bleacher.txt create mode 100644 world/map/npc/001-1/ched.txt delete mode 100644 world/map/npc/001-1/elanore.txt delete mode 100644 world/map/npc/001-1/entertainer.txt create mode 100644 world/map/npc/001-1/eomie.txt create mode 100644 world/map/npc/001-1/ferry_master.txt create mode 100644 world/map/npc/001-1/gate_guards.txt delete mode 100644 world/map/npc/001-1/guide.txt create mode 100644 world/map/npc/001-1/inac.txt delete mode 100644 world/map/npc/001-1/luca.txt delete mode 100644 world/map/npc/001-1/merchant.txt delete mode 100644 world/map/npc/001-1/mikhail.txt delete mode 100644 world/map/npc/001-1/monster_guide.txt create mode 100644 world/map/npc/001-1/north_shops.txt delete mode 100644 world/map/npc/001-1/rewards_master.txt delete mode 100644 world/map/npc/001-1/sandra.txt delete mode 100644 world/map/npc/001-1/sarah.txt create mode 100644 world/map/npc/001-1/sewer_east.txt create mode 100644 world/map/npc/001-1/sewer_north.txt delete mode 100644 world/map/npc/001-1/soul-menhir.txt create mode 100644 world/map/npc/001-1/stat_reset.txt create mode 100644 world/map/npc/001-1/tinris.txt create mode 100644 world/map/npc/001-1/tombstones.txt delete mode 100644 world/map/npc/001-1/trader.txt delete mode 100644 world/map/npc/001-1/traveler.txt delete mode 100644 world/map/npc/001-1/vincent.txt create mode 100644 world/map/npc/001-1/weellos.txt create mode 100644 world/map/npc/002-1/anwar.txt create mode 100644 world/map/npc/002-1/bard.txt create mode 100644 world/map/npc/002-1/dock.txt create mode 100644 world/map/npc/002-1/elanore.txt create mode 100644 world/map/npc/002-1/gaurds.txt create mode 100644 world/map/npc/002-1/itka.txt create mode 100644 world/map/npc/002-1/luca.txt create mode 100644 world/map/npc/002-1/mine_debug.txt create mode 100644 world/map/npc/002-1/npcs.txt create mode 100644 world/map/npc/002-1/sarah.txt create mode 100644 world/map/npc/002-1/soul-menhir.txt create mode 100644 world/map/npc/002-1/traveler.txt delete mode 100644 world/map/npc/003-1/_import.txt delete mode 100644 world/map/npc/003-1/_mobs.txt delete mode 100644 world/map/npc/003-1/_warps.txt delete mode 100644 world/map/npc/003-1/mapflags.txt delete mode 100644 world/map/npc/003-1/stranger.txt delete mode 100644 world/map/npc/004-1/_import.txt delete mode 100644 world/map/npc/004-1/_mobs.txt delete mode 100644 world/map/npc/004-1/_warps.txt delete mode 100644 world/map/npc/004-1/mapflags.txt create mode 100644 world/map/npc/008-1/banu.txt create mode 100644 world/map/npc/008-1/mikhail.txt create mode 100644 world/map/npc/009-1/guide.txt create mode 100644 world/map/npc/009-2/bernard.txt create mode 100644 world/map/npc/009-2/entertainer.txt create mode 100644 world/map/npc/009-2/trader.txt create mode 100644 world/map/npc/009-2/yalina.txt delete mode 100644 world/map/npc/021-1/_import.txt delete mode 100644 world/map/npc/021-1/_mobs.txt delete mode 100644 world/map/npc/021-1/_warps.txt delete mode 100644 world/map/npc/021-1/bakery.txt delete mode 100644 world/map/npc/021-1/banu.txt delete mode 100644 world/map/npc/021-1/eurni.txt delete mode 100644 world/map/npc/021-1/gate_guards.txt delete mode 100644 world/map/npc/021-1/hideandseek.txt delete mode 100644 world/map/npc/021-1/imec.txt delete mode 100644 world/map/npc/021-1/inac.txt delete mode 100644 world/map/npc/021-1/mapflags.txt delete mode 100644 world/map/npc/021-1/north_shops.txt delete mode 100644 world/map/npc/021-1/npcs.txt delete mode 100644 world/map/npc/021-1/pauline.txt delete mode 100644 world/map/npc/021-1/sewer_east.txt delete mode 100644 world/map/npc/021-1/sewer_north.txt delete mode 100644 world/map/npc/021-1/sewer_west.txt delete mode 100644 world/map/npc/021-1/weellos.txt delete mode 100644 world/map/npc/022-1/_import.txt delete mode 100644 world/map/npc/022-1/_mobs.txt delete mode 100644 world/map/npc/022-1/_warps.txt delete mode 100644 world/map/npc/022-1/adrian.txt delete mode 100644 world/map/npc/022-1/anwar.txt delete mode 100644 world/map/npc/022-1/dock.txt delete mode 100644 world/map/npc/022-1/ferry_master.txt delete mode 100644 world/map/npc/022-1/mapflags.txt delete mode 100644 world/map/npc/022-1/npcs.txt delete mode 100644 world/map/npc/023-1/_import.txt delete mode 100644 world/map/npc/023-1/_mobs.txt delete mode 100644 world/map/npc/023-1/_warps.txt delete mode 100644 world/map/npc/023-1/mapflags.txt delete mode 100644 world/map/npc/024-1/_import.txt delete mode 100644 world/map/npc/024-1/_mobs.txt delete mode 100644 world/map/npc/024-1/_warps.txt delete mode 100644 world/map/npc/024-1/ched.txt delete mode 100644 world/map/npc/024-1/david.txt delete mode 100644 world/map/npc/024-1/eomie.txt delete mode 100644 world/map/npc/024-1/mapflags.txt delete mode 100644 world/map/npc/024-1/tinris.txt delete mode 100644 world/map/npc/024-1/tondar.txt create mode 100644 world/map/npc/029-1/aahna.txt create mode 100644 world/map/npc/029-1/ferry_master.txt create mode 100644 world/map/npc/029-1/hasan.txt create mode 100644 world/map/npc/029-1/hideandseek.txt create mode 100644 world/map/npc/029-1/kaan.txt create mode 100644 world/map/npc/029-1/liana.txt create mode 100644 world/map/npc/029-1/monster_guide.txt create mode 100644 world/map/npc/029-1/rewards_master.txt create mode 100644 world/map/npc/029-1/soul-menhir.txt create mode 100644 world/map/npc/029-1/tutorial.txt create mode 100644 world/map/npc/029-1/valon.txt create mode 100644 world/map/npc/029-1/vincent.txt create mode 100644 world/map/npc/029-1/zegas.txt create mode 100644 world/map/npc/029-2/_import.txt create mode 100644 world/map/npc/029-2/_mobs.txt create mode 100644 world/map/npc/029-2/_warps.txt create mode 100644 world/map/npc/029-2/barrels.txt create mode 100644 world/map/npc/029-2/barrels_config.txt create mode 100644 world/map/npc/029-2/mapflags.txt create mode 100644 world/map/npc/029-2/morgan.txt create mode 100644 world/map/npc/029-2/sorfina.txt create mode 100644 world/map/npc/029-2/stat_reset.txt create mode 100644 world/map/npc/029-2/tanisha.txt create mode 100644 world/map/npc/029-2/two_arms.txt delete mode 100644 world/map/npc/041-1/_import.txt delete mode 100644 world/map/npc/041-1/_mobs.txt delete mode 100644 world/map/npc/041-1/_warps.txt delete mode 100644 world/map/npc/041-1/mapflags.txt delete mode 100644 world/map/npc/042-1/_import.txt delete mode 100644 world/map/npc/042-1/_mobs.txt delete mode 100644 world/map/npc/042-1/_warps.txt delete mode 100644 world/map/npc/042-1/hasan.txt delete mode 100644 world/map/npc/042-1/kaan.txt delete mode 100644 world/map/npc/042-1/liana.txt delete mode 100644 world/map/npc/042-1/mapflags.txt delete mode 100644 world/map/npc/042-1/tutorial.txt delete mode 100644 world/map/npc/042-1/valon.txt delete mode 100644 world/map/npc/042-1/zegas.txt delete mode 100644 world/map/npc/042-2/_import.txt delete mode 100644 world/map/npc/042-2/_mobs.txt delete mode 100644 world/map/npc/042-2/_warps.txt delete mode 100644 world/map/npc/042-2/barrels.txt delete mode 100644 world/map/npc/042-2/barrels_config.txt delete mode 100644 world/map/npc/042-2/magic_basement.txt delete mode 100644 world/map/npc/042-2/mapflags.txt delete mode 100644 world/map/npc/042-2/morgan.txt delete mode 100644 world/map/npc/042-2/sorfina.txt delete mode 100644 world/map/npc/042-2/stat_reset.txt delete mode 100644 world/map/npc/042-2/tanisha.txt delete mode 100644 world/map/npc/042-3/_import.txt delete mode 100644 world/map/npc/042-3/_mobs.txt delete mode 100644 world/map/npc/042-3/_warps.txt delete mode 100644 world/map/npc/043-1/_import.txt delete mode 100644 world/map/npc/043-1/_mobs.txt delete mode 100644 world/map/npc/043-1/_warps.txt delete mode 100644 world/map/npc/043-1/mapflags.txt delete mode 100644 world/map/npc/043-1/ryger.txt delete mode 100644 world/map/npc/068-1/_import.txt delete mode 100644 world/map/npc/068-1/_mobs.txt delete mode 100644 world/map/npc/068-1/_warps.txt delete mode 100644 world/map/npc/068-1/mapflags.txt delete mode 100644 world/map/npc/068-1/stat_reset.txt delete mode 100644 world/map/npc/068-1/tombstones.txt delete mode 100644 world/map/npc/069-1/_import.txt delete mode 100644 world/map/npc/069-1/_mobs.txt delete mode 100644 world/map/npc/069-1/_warps.txt delete mode 100644 world/map/npc/069-1/mapflags.txt diff --git a/world/map/npc/001-1/_import.txt b/world/map/npc/001-1/_import.txt index de0b02ab..de158a13 100644 --- a/world/map/npc/001-1/_import.txt +++ b/world/map/npc/001-1/_import.txt @@ -1,31 +1,25 @@ -// Map 001-1: South Tulimshar +// Map 001-1: Tulimshar Port // This file is generated automatically. All manually changes will be removed when running the Converter. map: 001-1.gat npc: npc/001-1/_mobs.txt npc: npc/001-1/_warps.txt -npc: npc/001-1/banker.txt -npc: npc/001-1/barber.txt -npc: npc/001-1/bard.txt -npc: npc/001-1/bernard.txt -npc: npc/001-1/bleacher.txt +npc: npc/001-1/adrian.txt +npc: npc/001-1/ched.txt npc: npc/001-1/children.txt npc: npc/001-1/constable.txt npc: npc/001-1/dock.txt -npc: npc/001-1/elanore.txt -npc: npc/001-1/entertainer.txt +npc: npc/001-1/eomie.txt +npc: npc/001-1/ferry_master.txt +npc: npc/001-1/gate_guards.txt npc: npc/001-1/gossip.txt npc: npc/001-1/guards.txt -npc: npc/001-1/guide.txt -npc: npc/001-1/luca.txt +npc: npc/001-1/inac.txt npc: npc/001-1/mapflags.txt -npc: npc/001-1/merchant.txt -npc: npc/001-1/mikhail.txt -npc: npc/001-1/monster_guide.txt +npc: npc/001-1/north_shops.txt npc: npc/001-1/npcs.txt -npc: npc/001-1/rewards_master.txt -npc: npc/001-1/sandra.txt -npc: npc/001-1/sarah.txt -npc: npc/001-1/soul-menhir.txt -npc: npc/001-1/trader.txt -npc: npc/001-1/traveler.txt -npc: npc/001-1/vincent.txt +npc: npc/001-1/sewer_east.txt +npc: npc/001-1/sewer_north.txt +npc: npc/001-1/stat_reset.txt +npc: npc/001-1/tinris.txt +npc: npc/001-1/tombstones.txt +npc: npc/001-1/weellos.txt diff --git a/world/map/npc/001-1/_mobs.txt b/world/map/npc/001-1/_mobs.txt index 3b2cd620..4c4e54b5 100644 --- a/world/map/npc/001-1/_mobs.txt +++ b/world/map/npc/001-1/_mobs.txt @@ -1,26 +1,11 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. -// South Tulimshar mobs +// Tulimshar Port mobs -001-1.gat,45,86,2,1|monster|Scorpion|1003,1,30000ms,30000ms,Mob001-1::On1003 -001-1.gat,43,85,2,1|monster|Scorpion|1003,1,60000ms,30000ms,Mob001-1::On1003 -001-1.gat,45,87,1,1|monster|Scorpion|1003,1,90000ms,30000ms,Mob001-1::On1003 -001-1.gat,45,85,1,1|monster|Scorpion|1003,1,180000ms,30000ms,Mob001-1::On1003 -001-1.gat,42,86,1,1|monster|Scorpion|1003,1,270000ms,30000ms,Mob001-1::On1003 -001-1.gat,43,87,2,1|monster|Scorpion|1003,1,360000ms,30000ms,Mob001-1::On1003 -001-1.gat,83,28,11,12|monster|Maggot|1002,5,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,115,26,13,9|monster|Maggot|1002,3,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,124,53,15,13|monster|Maggot|1002,10,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,120,64,15,13|monster|Maggot|1002,11,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,53,23,26,4|monster|Maggot|1002,2,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,68,67,9,10|monster|Maggot|1002,2,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,99,81,24,4|monster|Maggot|1002,2,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,139,65,12,23|monster|Maggot|1002,2,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,113,47,8,11|monster|Maggot|1002,2,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,132,38,11,12|monster|Maggot|1002,2,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,77,49,17,13|monster|Maggot|1002,2,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,21,74,6,18|monster|Maggot|1002,2,100000ms,30000ms,Mob001-1::On1002 -001-1.gat,122,59,17,22|monster|GiantMaggot|1006,1,100000ms,30000ms,Mob001-1::On1006 -001-1.gat,137,25,15,7|monster|FireGoblin|1011,1,61000ms,60000ms,Mob001-1::On1011 +001-1.gat,32,59,10,11|monster|GreenSlime|1005,8,100000ms,30000ms,Mob001-1::On1005 +001-1.gat,45,100,10,11|monster|GreenSlime|1005,8,100000ms,30000ms,Mob001-1::On1005 +001-1.gat,37,75,8,34|monster|SeaSlime|1033,8,100000ms,30000ms,Mob001-1::On1033 +001-1.gat,86,84,65,55|monster|Maggot|1002,11,100000ms,30000ms,Mob001-1::On1002 +001-1.gat,86,84,65,55|monster|SeaSlime|1033,8,100000ms,30000ms,Mob001-1::On1033 001-1.gat,0,0,0|script|Mob001-1|-1 @@ -32,18 +17,13 @@ On1002: callfunc "MobPoints"; end; -On1003: - set @mobID, 1003; +On1005: + set @mobID, 1005; callfunc "MobPoints"; end; -On1006: - set @mobID, 1006; - callfunc "MobPoints"; - end; - -On1011: - set @mobID, 1011; +On1033: + set @mobID, 1033; callfunc "MobPoints"; end; } diff --git a/world/map/npc/001-1/_warps.txt b/world/map/npc/001-1/_warps.txt index d113ba85..7d8ef0d6 100644 --- a/world/map/npc/001-1/_warps.txt +++ b/world/map/npc/001-1/_warps.txt @@ -1,8 +1,17 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. -// South Tulimshar warps +// Tulimshar Port warps -001-1.gat,44,87|warp|To Sandstorm Desert|3,-1,002-1.gat,58,14 -001-1.gat,44,20|warp|To North Tulimshar|3,-1,021-1.gat,55,145 -001-1.gat,125,21|warp|To North Tulimshar|0,-1,021-1.gat,136,146 -001-1.gat,32,70|warp|To Tulimshar Indoor|-1,-1,001-2.gat,25,34 -001-1.gat,75,40|warp|To Tulimshar Indoor|-1,-1,001-2.gat,71,72 +001-1.gat,63,119|warp|South Tulimshar|3,-1,002-1.gat,63,21 +001-1.gat,103,119|warp|South Tulimshar|3,-1,002-1.gat,103,21 +001-1.gat,55,71|warp|To Government Building|-1,-1,001-2.gat,31,27 +001-1.gat,52,71|warp|To Government Building|-1,-1,001-2.gat,28,27 +001-1.gat,49,71|warp|To Government Building|-1,-1,001-2.gat,25,27 +001-1.gat,114,99|warp|To Tulimshar Forge|-1,-1,001-2.gat,25,64 +001-1.gat,27,32|warp|To MIT|-1,-1,001-2.gat,28,101 +001-1.gat,37,32|warp|To MIT|-1,-1,001-2.gat,71,101 +001-1.gat,55,34|warp|To Tulimshar Castle|0,-1,001-2.gat,104,101 +001-1.gat,52,22|warp|Council Chambers|-1,-1,001-2.gat,95,52 +001-1.gat,57,22|warp|Council Chambers|-1,-1,001-2.gat,114,52 +001-1.gat,28,23|warp|To MIT|-1,-1,001-2.gat,28,87 +001-1.gat,28,44|warp|Sewers|-1,-1,021-3.gat,29,61 +001-1.gat,59,98|warp|To Bank|-1,-1,001-2.gat,65,25 diff --git a/world/map/npc/001-1/adrian.txt b/world/map/npc/001-1/adrian.txt new file mode 100644 index 00000000..4f9722d0 --- /dev/null +++ b/world/map/npc/001-1/adrian.txt @@ -0,0 +1,52 @@ +// part of quest given by 021-2/kylian.txt +// Author: Jenalya + +// state 1: player has the task to get the luggage from the harbor +// state 2: Adrian gave the luggage to the player +// state 3: player gave luggage to Kylian and Kylian asks who to talk to for the shop license + +001-1.gat,113,64,0|script|Adrian|213 +{ + set @state, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); + + mes "[Adrian]"; + mes "\"Hello. Are you here to get the luggage for some of our passengers?\""; + if (@state == 1) + menu + "Yes, Kylian sent me to get his luggage.",L_Get, + "No.",L_No; + menu + "No.",L_No; +L_No: + mes "[Adrian]"; + mes "\"Too bad. I want to go and drink a beer, but I have to wait here until all the luggage is picked up.\""; + mes "He sighs."; + goto L_Close; + +L_Get: + mes "[Adrian]"; + mes "\"Wonderful! Show me the ticket.\""; + mes "He checks the paper Kylian gave you and then takes a critical look at you."; + next; + getinventorylist; + if ((checkweight("LeatherSuitcase", 1) == 0) || (@inventorylist_count == 100)) + goto L_Inventory; + mes "[Adrian]"; + mes "\"Alright, here it is.\""; + mes "Adrain hands you a very heavy suitcase."; + getitem "LeatherSuitcase", 1; + set @state, 2; + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_5_MASK)) | (@state << NIBBLE_5_SHIFT); + goto L_Close; + +L_Inventory: + mes "[Adrian]"; + mes "\"The suitcase is rather heavy. You doesn't look as if you can handle that."; + mes "Maybe if you get rid of some of the other stuff you're carrying.\""; + goto L_Close; + +L_Close: + set @state, 0; + set @inventorylist_count, 0; + close; +} diff --git a/world/map/npc/001-1/banker.txt b/world/map/npc/001-1/banker.txt deleted file mode 100644 index cd5e84df..00000000 --- a/world/map/npc/001-1/banker.txt +++ /dev/null @@ -1,10 +0,0 @@ -// - -001-1.gat,58,50,0|script|Tybalt|107 -{ - callfunc "ClearVariables"; - set @npcname$, "Tybalt"; - callfunc "Banker"; - set @npcname$, ""; - close; -} diff --git a/world/map/npc/001-1/barber.txt b/world/map/npc/001-1/barber.txt deleted file mode 100644 index f1e0262a..00000000 --- a/world/map/npc/001-1/barber.txt +++ /dev/null @@ -1,12 +0,0 @@ -// - -001-1.gat,52,36,0|script|Nicolas|100 -{ - mes "[Nicolas the Barber]"; - mes "\"Do you need a barber?\""; - next; - callfunc "Barber"; - mes "[Nicolas the Barber]"; - mes "\"Come again!\""; - close; -} diff --git a/world/map/npc/001-1/bard.txt b/world/map/npc/001-1/bard.txt deleted file mode 100644 index 6b0d7d77..00000000 --- a/world/map/npc/001-1/bard.txt +++ /dev/null @@ -1,135 +0,0 @@ -// - -001-1.gat,40,73,0|script|Bard|152 -{ - setarray @songs$, "\"There once was a bard, who had it hard, because a man in dark green, was very mean.\"", - "\"At Hurnscald inn, there was a person of fairest skin, declining wedding bands from quite a many hands.\"", - "\"As the Sun sets down in the forest's brown, she whom the fragrance holds counts her gold.\""; - set @name$, "Bill Ballshaker the Bard"; - mes "[" + @name$ + "]"; - if (Sex) - mes "\"Greetings, traveler! Have you come to listen to my stories?\""; - if (!Sex) - mes "\"Greetings, fair lady! Well met, on such a lovely day! Might I entertain you with a tale or two?\""; - next; - goto L_Main; - -L_Main: - menu - "Sing me a song, lute man!", L_Song, - "Have you heard any news?", L_News, - "What do you know about...", L_Question, - "Farewell!", L_Close; - -L_News: -// mes "[" + @name$ + "]"; -// mes "\"Quite, quite! Rumour has it that Luca the Hunter, from this very town of Tulimshar, has returned from a long journey.\""; -// next; -// mes "[" + @name$ + "]"; -// mes "\"Many perilous battles he fought, or so his tales go... I am still working on a sonnet that I wish to dedicate to his exploits.\""; -// next; -// mes "[" + @name$ + "]"; -// mes "\"He says that he learned some new skills along the way and wishes to pass them on to others like him, who do not fear the fire of battle!\""; -// next; -// mes "[" + @name$ + "]"; -// mes "\"If you are experienced enough, perhaps he will teach you?\""; -// next; -// goto L_Main; - - mes "[" + @name$ + "]"; - mes "\"News I have for you indeed, lest you have already overheard (for then it would no longer be news to you!)\""; - next; - mes "[" + @name$ + "]"; - mes "\"Rumor has it that an ancient source of magic, a Mana Seed, has been sighted in the west, beyond the fair town of Hurnscald.\""; - next; - set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_MANASEED_RUMOUR; - mes "[" + @name$ + "]"; - mes "\"Whence it came, nobody knows... but they say that sometimes such Mana Seeds may choose a powerful individual to impart some of its mystic power to!\""; - next; - mes "[" + @name$ + "]"; - mes "\"I wonder who might be qualified?\""; - next; - goto L_Main; - -L_Question: - callfunc "MagicTalkOptionsSetup"; - set @ignore, @QQ_ASTRALSOUL; - callfunc "MagicTalkMenu"; - - if (@c == 0) goto L_Main; - if (@c == @QQ_ELANORE) goto L_Q_elanore; - if (@c == @QQ_MANASEED) goto L_Q_manaseed; - if (@c == @QQ_WYARA) goto L_Q_wyara; - if (@c == @QQ_SAGATHA) goto L_Q_sagatha; - if (@c == @QQ_AULDSBEL) goto L_Q_auldsbel; - if (@c == @QQ_OLDWIZ) goto L_Q_oldwiz; - - mes "[" + @name$ + "]"; - mes "\"Alas, I know very little about this matter.\""; - next; - goto L_Main; - -L_Q_oldwiz: - mes "[" + @name$ + "]"; - mes "\"The old wizard has been an old man for as long as I remember, living near the mountains in his magic hut – a hut that is bigger on the inside, just like in the old tales of Gyer Filla the Wise....\""; - next; - mes "[" + @name$ + "]"; - mes "\"I doubt that they are the same person, though. For one, I have never seen his hut fly. For another, Gyer never took apprentices.\""; - next; - goto L_Main; - -L_Q_elanore: - mes "[" + @name$ + "]"; - mes "\"Elanore is this town's healer. Rumor has it that she traveled far and wide when she was younger, to learn the deepest secrets of healing magic, after her brother caught a mysterious illness.\""; - next; - goto L_Main; - -L_Q_manaseed: - mes "[" + @name$ + "]"; - mes "\"The Mana Seed is said to be a source of great magic. Perhaps some witch or wizard might know more about it?\""; - next; - goto L_Main; - -L_Q_wyara: - mes "[" + @name$ + "]"; - mes "\"Wyara is not actually from Hurnscald. As a young witch, she decided to settle down there to help the people of Hurnscald. She is kind and gentle, except towards the Doctor, who seems to have little respect for her potions.\""; - next; - goto L_Main; - -L_Q_sagatha: - mes "[" + @name$ + "]"; - mes "\"Sagatha! Ah, such a wonderful and mysterious being; the center of many a tale...\""; - next; - mes "[" + @name$ + "]"; - mes "\"Some say that she is the most powerful witch in all of Argaes. I don't know whether that is true or not, but I am quite certain that she is the most beautiful witch of all! Alas, she will let no man touch her...\""; - mes "He sighs."; - next; - mes "[" + @name$ + "]"; - mes "\"I met her only twice, back in my traveling days, but there are two pieces of advice I can give you:\""; - next; - mes "[" + @name$ + "]"; - mes "\"First, she will suffer no fool easily, particularly no man.\""; - next; - mes "[" + @name$ + "]"; - mes "\"Second, the creatures of the forest mean everything to her. Harm them, and you may find her an enemy – and a powerful one at that...\""; - next; - goto L_Main; - -L_Q_auldsbel: - mes "[" + @name$ + "]"; - mes "\"Auldsbel is a wizard further north. From what I have gathered he bought a hut near Hurnscald some years back and often comes here to experiment on things. This is probably because he is not allowed to do these experiments where he comes from.\""; - next; - goto L_Main; - -L_Song: - mes "[" + @name$ + "]"; - set @id, rand(3); - mes @songs$[@id]; - goto L_Close; - -L_Close: - set @name$, ""; - set @id, 0; - cleararray @songs$[0], "", 2; - close; -} diff --git a/world/map/npc/001-1/bernard.txt b/world/map/npc/001-1/bernard.txt deleted file mode 100644 index 9084f020..00000000 --- a/world/map/npc/001-1/bernard.txt +++ /dev/null @@ -1,132 +0,0 @@ -// Variables used: nibble 0 of QUEST_SouthTulimshar - -001-1.gat,35,43,0|script|Bernard|117 -{ - // This NPC previously used the variable TMW_Quest - callfunc "ClearVarTMW_Quest"; - - set @state, ((QUEST_SouthTulimshar & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); - - if(@state >= 4) goto L_Done2; - if(@state == 3) goto L_Progress2; - if(@state == 2) goto L_Done1; - if(@state == 1) goto L_Progress; - - set @TEMP, rand(2); - if(@TEMP == 1) goto L_Opening1; - goto L_Opening0; - -L_Opening0: - mes "[Bernard]"; - mes "\"Tulimshar is crawling with maggots. Hey, I need a favor, could you help me a bit?\""; - next; - goto L_Ask; - -L_Opening1: - mes "[Bernard]"; - mes "\"The taste of maggots in soup is... unforgettable, they taste simply divine! Would you help me kill some?\""; - next; - goto L_Ask; - -L_Ask: - menu - "Yes.", L_Yes, - "No.", L_Close; - -L_Yes: - set @TEMP, rand(2); - if(@TEMP == 1) goto L_Req1; - goto L_Req0; - -L_Req0: - mes "[Bernard]"; - mes "\"Great! I need a Roasted Maggot for my soup.\""; - next; - goto L_Set; - -L_Req1: - mes "[Bernard]"; - mes "\"Bring me a Roasted Maggot. I'll give you something if you do.\""; - next; - goto L_Set; - -L_Set: - set @state, 1; - callsub S_Update_Var; - mes "[Bernard]"; - mes "\"Please bring it to me!\""; - goto L_Close; - -L_Progress: - if (countitem("RoastedMaggot") < 1) goto L_NotEnough; - mes "[Bernard]"; - mes "\"Oooh, perfect! It's perfect!"; - mes "You brought me my Roasted Maggot! Here, have some cake for your troubles.\""; - getinventorylist; - if (@inventorylist_count - (countitem("RoastedMaggot") == 1) > 99 - (countitem("CherryCake") == 0) ) goto L_TooMany; - delitem "RoastedMaggot", 1; - getexp 100, 0; - getitem "CherryCake", 5; - set @state, 2; - callsub S_Update_Var; - next; - mes "\"Now let's see...\""; - goto L_Close; - -L_Progress2: - if (countitem("MaggotSlime") < 3) goto L_NotEnough1; - mes "[Bernard]"; - mes "\"Nice! They're perfect, just perfect!"; - mes "You brought me the 3 Maggot Slimes! Here, have some beer as reward.\""; - getinventorylist; - if ((@inventorylist_count - (countitem("MaggotSlime") == 3) > 99 - (countitem("Beer") == 0) )) goto L_TooMany; - delitem "MaggotSlime", 3; - getexp 100, 0; - getitem "Beer", 3; - set @state, 4; - callsub S_Update_Var; - goto L_Close; - -L_NotEnough: - mes "[Bernard]"; - mes "\"Oh, please hurry and bring me a Roasted Maggot. I'm yearning for maggot soup!\""; - goto L_Close; - -L_NotEnough1: - mes "[Bernard]"; - mes "\"Please do hurry and bring me 3 Maggot Slimes, so I can finish my soup!\""; - goto L_Close; - -L_Done1: - mes "[Bernard]"; - mes "\"Thank you so much!\""; - mes "\"But... something is missing to make the soup creamy.\""; - next; - mes "\"I need 3 Maggot Slimes for that.\""; - mes "\"Bring them to me, and I'll give you something nice.\""; - set @state, 3; - callsub S_Update_Var; - goto L_Close; - -L_Done2: - mes "[Bernard]"; - mes "\"I didn't mention it before, but I also put beer in my soup. I hope you like beer as much as I do, because, you see...\""; - next; - mes "\"Beer is life!\""; - goto L_Close; - -L_Close: - set @TEMP, 0; - set @state, 0; - close; - -L_TooMany: - next; - mes "[Bernard]"; - mes "\"You don't have room for my reward. I'll wait until you do.\""; - goto L_Close; - -S_Update_Var: - set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_0_MASK) | (@state << NIBBLE_0_SHIFT)); - return; -} diff --git a/world/map/npc/001-1/bleacher.txt b/world/map/npc/001-1/bleacher.txt deleted file mode 100644 index f6fd399c..00000000 --- a/world/map/npc/001-1/bleacher.txt +++ /dev/null @@ -1,293 +0,0 @@ -// - -001-1.gat,29,50,0|script|Candide|156 -{ - mes "[Candide]"; - mes "\"I've figured out how that volcanic ash bleaches cloth."; - mes "I could do it for you, but I'll need three piles of ash and 5,000 GP for supplies per item.\""; - next; - - if (countitem("PileOfAsh") < 3) goto L_no_ash; - - if (Zeny < 5000) goto L_no_money; - - menu - "I'd like to bleach something.", L_bleach_menu, - "No thanks.", L_Close; - -L_bleach_menu: - mes "[Candide]"; - mes "\"What would you like to bleach?\""; - next; - - menu - "Cotton shirt.", L_cottonshirt, - "Contributor shirt.", L_contributor, - "V-Neck sweater.", L_vneck, - "Turtleneck sweater.", L_tneck, - "Cotton shorts.", L_shorts, - "Cotton trousers.", L_trousers, - "Cotton skirt.", L_skirt, - "Miniskirt.", L_miniskirt, - "Tank top .", L_tanktop, - "Short tank top.", L_tanktop_short, - "Silk robe.", L_robe, - "Cotton headband.", L_cotton_headband, - "Desert hat.", L_desert_hat, - "Cotton boots.", L_cotton_boots, - "Cotton gloves.", L_cotton_gloves, - "Rabbit ears.", L_rabbit_ears, - "Wizard hat.", L_wizard_hat, - "Bowler hat.", L_bowler_hat, - "Sorcerer robe.", L_sorcerer_robe, - "Bowler hat (brown).", L_bowler_hat_brown, - "Fine dress.", L_fine_dress, - "Cotton cloth.", L_cotton_cloth, - "Nevermind.", L_Close; - -L_contributor: - set @normal, 1178; - set @dyeBase, 5131; - goto L_choose_color; - -L_cottonshirt: - set @normal, 1202; - set @dyeBase, 2050; - goto L_choose_color; - -L_vneck: - set @normal, 624; - set @dyeBase, 2060; - goto L_choose_color; - -L_tneck: - set @normal, 564; - set @dyeBase, 2070; - goto L_choose_color; - -L_shorts: - set @normal, 586; - set @dyeBase, 2110; - goto L_choose_color; - -L_trousers: - set @normal, 648; - set @dyeBase, 2180; - goto L_choose_color; - -L_skirt: - set @normal, 632; - set @dyeBase, 2100; - goto L_choose_color; - -L_miniskirt: - set @normal, 771; - set @dyeBase, 2170; - goto L_choose_color; - -L_tanktop: - set @normal, 688; - set @dyeBase, 2090; - goto L_choose_color; - -L_tanktop_short: - set @normal, 689; - set @dyeBase, 2120; - goto L_choose_color; - -L_robe: - set @normal, 720; - set @dyeBase, 2080; - goto L_choose_color; - -L_cotton_headband: - set @normal, 724; - set @dyeBase, 2140; - goto L_choose_color; - -L_desert_hat: - set @normal, 723; - set @dyeBase, 2130; - goto L_choose_color; - -L_cotton_boots: - set @normal, 735; - set @dyeBase, 2150; - goto L_choose_color; - -L_cotton_gloves: - set @normal, 741; - set @dyeBase, 2160; - goto L_choose_color; - -L_rabbit_ears: - set @normal, 1255; - set @dyeBase, 2190; - goto L_choose_color; - -L_wizard_hat: - set @normal, 4028; - set @dyeBase, 2200; - goto L_choose_color; - -L_bowler_hat: - set @normal, 4030; - set @dyeBase, 2210; - goto L_choose_color; - -L_sorcerer_robe: - mes "[Candide]"; - mes "\"Which one?\""; - next; - menu - "A red lined one.", L_red_lined_sorcerer_robe, - "A green lined one.", L_green_lined_sorcerer_robe, - "A dark blue lined one.", L_dark_blue_lined_sorcerer_robe, - "A yellow lined one.", L_yellow_lined_sorcerer_robe, - "A light blue lined one.", L_light_blue_lined_sorcerer_robe, - "A pink lined one.", L_pink_lined_sorcerer_robe, - "A black lined one.", L_black_lined_sorcerer_robe, - "An orange lined one.", L_orange_lined_sorcerer_robe, - "A purple lined one.", L_purple_lined_sorcerer_robe, - "A dark green lined one.", L_dark_green_lined_sorcerer_robe, - "A white lined one.", L_white_lined_sorcerer_robe, - "Nevermind.", L_Close; - -L_red_lined_sorcerer_robe: - set @normal, 798; - set @dyeBase, 2220; - goto L_choose_color; - -L_green_lined_sorcerer_robe: - set @normal, 5010; - set @dyeBase, 5000; - goto L_choose_color; - -L_dark_blue_lined_sorcerer_robe: - set @normal, 5021; - set @dyeBase, 5011; - goto L_choose_color; - -L_yellow_lined_sorcerer_robe: - set @normal, 5032; - set @dyeBase, 5022; - goto L_choose_color; - -L_light_blue_lined_sorcerer_robe: - set @normal, 5043; - set @dyeBase, 5033; - goto L_choose_color; - -L_pink_lined_sorcerer_robe: - set @normal, 5054; - set @dyeBase, 5044; - goto L_choose_color; - -L_black_lined_sorcerer_robe: - set @normal, 5065; - set @dyeBase, 5055; - goto L_choose_color; - -L_orange_lined_sorcerer_robe: - set @normal, 5076; - set @dyeBase, 5066; - goto L_choose_color; - -L_purple_lined_sorcerer_robe: - set @normal, 5087; - set @dyeBase, 5077; - goto L_choose_color; - -L_dark_green_lined_sorcerer_robe: - set @normal, 5098; - set @dyeBase, 5088; - goto L_choose_color; - -L_white_lined_sorcerer_robe: - set @normal, 5109; - set @dyeBase, 5099; - goto L_choose_color; - -L_bowler_hat_brown: - set @normal, 800; - set @dyeBase, 2230; - goto L_choose_color; - -L_fine_dress: - set @normal, 870; - set @dyeBase, 2240; - goto L_choose_color; - -L_cotton_cloth: - set @normal, 660; - set @dyeBase, 2250; - goto L_choose_color; - -L_choose_color: - mes "[Candide]"; - mes "\"And the color?\""; - next; - - menu - "Red.", L_MenuItems, - "Green.", L_MenuItems, - "Dark Blue.", L_MenuItems, - "Yellow.", L_MenuItems, - "Light Blue.", L_MenuItems, - "Pink.", L_MenuItems, - "Black.", L_MenuItems, - "Orange.", L_MenuItems, - "Purple.", L_MenuItems, - "Dark Green.", L_MenuItems; - -L_MenuItems: - set @del, @dyeBase + @menu - 1; - - if (countitem(@del) == 0) goto L_no_item; - - if (countitem("PileOfAsh") < 3) goto L_no_ash; - - if (Zeny < 5000) goto L_no_money; - - delitem @del, 1; - getitem @normal, 1; - delitem "PileOfAsh", 3; - set Zeny, Zeny - 5000; - goto L_again; - -L_again: - mes "[Candide]"; - mes "\"Would you like to bleach something else?\""; - next; - - menu - "Yes.", L_bleach_menu, - "No.", L_Close; - -L_no_item: - mes "[Candide]"; - mes "\"You don't have one of those.\""; - next; - - goto L_again; - -L_no_ash: - mes "[Candide]"; - mes "\"You don't have enough ash for me to bleach anything."; - mes "I need three piles.\""; - goto L_Close; - -L_no_money: - mes "[Candide]"; - mes "\"You don't have enough gold for me to bleach anything."; - mes "I need 5,000 GP for supplies.\""; - goto L_Close; - -L_Close: - mes "[Candide]"; - mes "\"Come again.\""; - set @normal, 0; - set @dyeBase, 0; - set @del, 0; - close; -} diff --git a/world/map/npc/001-1/ched.txt b/world/map/npc/001-1/ched.txt new file mode 100644 index 00000000..7dfc4ed7 --- /dev/null +++ b/world/map/npc/001-1/ched.txt @@ -0,0 +1,25 @@ +// Student at Tulimshar's magic academy + +001-1.gat,43,48,0|script|Ched|113 +{ + mes "[Ched]"; + mes "\"I'm trying to get a spell to work. It's supposed to combine two potions, but I can't seem to figure out which two those are...\""; + next; + menu + "Well, good luck with that!", L_Done, + "What spell is that?", L_Next; + +L_Next: + mes "[Ched]"; + mes "\"Well, I don't know what it's called... I took it out of `Timbleweed's Advanced Transmutations.' It seems awfully hard to cast, somehow.\""; + next; + mes "[Ched]"; + mes "\"Well, the invocation is `" + getspellinvocation("merge-concentration-potions") + "'. You're supposed to just hold up the potions and cast it, and then they're supposed to merge.\""; + next; + mes "[Ched]"; + mes "\"Maybe I should go back to `detect magic' until I can cast that one properly.\""; + goto L_Done; + +L_Done: + close; +} diff --git a/world/map/npc/001-1/children.txt b/world/map/npc/001-1/children.txt index 7213370c..3ce987c1 100644 --- a/world/map/npc/001-1/children.txt +++ b/world/map/npc/001-1/children.txt @@ -1,6 +1,6 @@ // Aisha -001-1.gat,95,29,0|script|Aisha|108 +001-1.gat,102,27,0|script|Aisha|108 { set @TEMP,rand(10); if(@TEMP == 1) goto L_1; diff --git a/world/map/npc/001-1/constable.txt b/world/map/npc/001-1/constable.txt index 0b167873..0d8bc06c 100644 --- a/world/map/npc/001-1/constable.txt +++ b/world/map/npc/001-1/constable.txt @@ -1,9 +1,9 @@ // -001-1.gat,37,35,0|script|Constable Perry Graf|150 +001-1.gat,50,74,0|script|Constable Perry Graf|150 { -// set @npcname$, "Constable Perry Graf"; - set @canSkip, 1; + mes "[Constable Perry Graf]"; + mes "\"Hello, make sure the rules are followed.\""; callfunc "GameRules"; close; } diff --git a/world/map/npc/001-1/dock.txt b/world/map/npc/001-1/dock.txt index 4677097d..941e222a 100644 --- a/world/map/npc/001-1/dock.txt +++ b/world/map/npc/001-1/dock.txt @@ -1,8 +1,27 @@ -// Ferry Sign +// The ferry dock // Author: Wushin -001-1.gat,48,71,0|script|Ferry Schedule#1|396 + +// Ferry Sign +001-1.gat,61,71,0|script|Ferry Schedule#2|396 { callfunc "FerryManifest"; end; } +001-1.gat,75,70,0|script|Tulimshar Koga|395,8,3 +{ + callfunc "BoardFerry"; + close; +} + +001-1.gat,70,70,0|script|#TulimsharDock|127 +{ + end; +OnCommandArrive: + enablenpc "Tulimshar Koga"; + end; + +OnCommandWarp: + disablenpc "Tulimshar Koga"; + end; +} diff --git a/world/map/npc/001-1/elanore.txt b/world/map/npc/001-1/elanore.txt deleted file mode 100644 index ce330f8a..00000000 --- a/world/map/npc/001-1/elanore.txt +++ /dev/null @@ -1,619 +0,0 @@ -// - -function|script|ElanoreFix -{ - set @Q_MASK, NIBBLE_1_MASK; - set @Q_SHIFT, NIBBLE_1_SHIFT; - - set @Q_STATUS_MAX, 3; // FIXME once level 3 magic was released - - set @Q_status, (QUEST_MAGIC2 & @Q_MASK) >> @Q_SHIFT; - if (@Q_status > @Q_STATUS_MAX) - set @Q_status, @STATUS_INITIAL; - if (@Q_status > 1 && (getskilllv(SKILL_MAGIC_LIFE) < 2)) - set @Q_status, @STATUS_INITIAL; - - set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Q_MASK) | (@Q_status << @Q_SHIFT)); - return; -} - -001-1.gat,58,68,0|script|Elanore#_M|108 -{ - set @has_magic, getskilllv(SKILL_MAGIC); - - set @Q_MASK, NIBBLE_1_MASK; - set @Q_SHIFT, NIBBLE_1_SHIFT; - - set @Q_status, (QUEST_MAGIC2 & @Q_MASK) >> @Q_SHIFT; - set @Q_heal_exp, MAGIC_EXPERIENCE >> 24; - - // Set up SkillUp function - set @SUP_id, SKILL_MAGIC_LIFE; - set @SUP_name$, "Life Magic"; - - set @STATUS_INITIAL, 0; - set @STATUS_LEARNED_LIGHT_HEAL, 1; - set @STATUS_MASTERED_LIGHT_HEAL, 2; - set @STATUS_LEARNED_LAY_ON_HANDS, 3; - set @STATUS_WAITING_FOR_KADIYA, 4; - set @STATUS_READY_TO_LEARN_CURE_POISON, 5; - set @STATUS_LEARNED_CURE_POISON, 6; - - callfunc "ElanoreFix"; - - // This operation works around an earlier possible corruption of this state - if (@Q_status > @Q_STATUS_MAX) - set @Q_status, @STATUS_INITIAL; - callsub S_update_var; - if (sc_check(sc_poison)) goto L_CurePoison; - if (BaseLevel > 10) goto L_NoHeal; - set @TEMP,rand(4); - if(@TEMP == 1) goto L_Heal2; - if(@TEMP == 2) goto L_Heal3; - if(@TEMP == 3) goto L_Heal4; - goto L_Heal1; - -L_Heal1: - - mes "[Elanore the Healer]"; - mes "\"You don't look too well; let me treat your wounds.\""; - next; - goto L_Heal_L; - -L_Heal2: - - mes "[Elanore the Healer]"; - mes "\"I will make quick work of your wounds.\""; - next; - goto L_Heal_L; - -L_Heal3: - - mes "[Elanore the Healer]"; - mes "\"Need a healing?\""; - next; - goto L_Heal_L; - -L_Heal4: - - mes "[Elanore the Healer]"; - mes "\"Sometimes you just need to run from battle.\""; - next; - goto L_Heal_L; - -L_Heal_L: - set @TEMP,rand(3); - if(@TEMP == 1) goto L_Heal_2; - if(@TEMP == 2) goto L_Heal_3; - if(@TEMP == 3) goto L_Heal_4; - goto L_Heal_1; - -L_Heal_1: - - mes "[Elanore the Healer]"; - mes "\"Here you go!\""; - heal 10000,10000; - goto L_Close; - -L_Heal_2: - - mes "[Elanore the Healer]"; - mes "\"Painless, wasn't it?"; - heal 10000,10000; - goto L_Close; - -L_Heal_3: - - mes "[Elanore the Healer]"; - mes "\"You should be more careful.\""; - heal 10000,10000; - goto L_Close; - -L_Heal_4: - - mes "[Elanore the Healer]"; - mes "\"Much better, right?!\""; - heal 10000,10000; - goto L_Close; - -L_NoHeal: - if (MAGIC_FLAGS) - goto L_Chat; - goto L_NoHealMessage; - -L_NoHealMessage: - mes "[Elanore the Healer]"; - mes "\"I'm sorry but unless you are young and in need, I can't help you, and your level is already higher than ten."; - mes "With so many people still injured from the earthquake, I really have no time to help."; - mes "You can get some rest in the inn near here.\""; - goto L_Close; - -L_Chat: - mes "[Elanore the Healer]"; - mes "\"Hello! Can I help you?\""; - next; - goto L_Main; - -L_Main: - if (@has_magic && (@Q_status == @STATUS_INITIAL)) - menu - "Can you heal me?", L_NoHealMessage, - "Can you teach me magic?", L_Teach, - "What do you know about...", L_Question, - "Goodbye!", L_bye; - if (@has_magic && (@Q_status > @STATUS_INITIAL)) - menu - "Can you heal me?", L_NoHealMessage, - "Can you teach me more?", L_Teach, - "Where can I get more lifestones?", L_Lifestones, - "What do you know about...", L_Question, - "Goodbye!", L_bye; - if (!@has_magic) - menu - "Can you heal me?", L_NoHealMessage, - "What do you know about...", L_Question, - "Goodbye!", L_bye; - goto L_Close; - -OnPCKillEvent: - if (attachrid(@killerrid) == 0) - end; - set @Q_heal_exp, MAGIC_EXPERIENCE >> 24; - if (@Q_heal_exp < 8) goto L_OnPcKillWipe; - set @Q_heal_exp, @Q_heal_exp - 8; - goto L_OnPcKillFinish; - -L_OnPcKillWipe: - set @Q_heal_exp, 0; - goto L_OnPcKillFinish; - -L_OnPcKillFinish: - set MAGIC_EXPERIENCE, (MAGIC_EXPERIENCE & ~(255 << 24)) | (@Q_heal_exp << 24); - goto L_Close; - -L_Lifestones: - mes "[Elanore the Healer]"; - mes "\"I always need components for my own healing spells. If you bring me ten gamboge leaves, ten alizarin leaves, ten mauve leaves and ten cobalt leaves, I can make ten lifestones; I will give you half of them.\""; - next; - menu - "OK, I will get them.", L_Close, - "No way!", L_Close, - "Here you are!", L_Lifestones_Trade, - "Can I make them myself?", L_Lifestones_MakeSelf; - -L_Lifestones_Trade: - if (countitem("MauveHerb") < 10) goto L_Lifestones_Trade_Missing; - if (countitem("GambogeHerb") < 10) goto L_Lifestones_Trade_Missing; - if (countitem("AlizarinHerb") < 10) goto L_Lifestones_Trade_Missing; - if (countitem("CobaltHerb") < 10) goto L_Lifestones_Trade_Missing; - getinventorylist; - if (@inventorylist_count == 100 && countitem("Lifestone") == 0 - && countitem("MauveHerb") > 10 - && countitem("GambogeHerb") > 10 - && countitem("AlizarinHerb") > 10 - && countitem("CobaltHerb") > 10) goto L_Lifestones_NoRoom; - - delitem "MauveHerb", 10; - delitem "GambogeHerb", 10; - delitem "AlizarinHerb", 10; - delitem "CobaltHerb", 10; - getitem "Lifestone", 5; - getexp 200, 1; - mes "[Elanore the Healer]"; - mes "Elanore carefully goes over your leaves, then smiles."; - mes "\"These will do just fine.\""; - mes "She picks up all fourty and presses them together in her hands, then whispers something."; - next; - mes "[Elanore the Healer]"; - mes "As she opens her hands again, the leaves have turned into ten golden crystals."; - mes "\"Five for you and five for me.\""; - mes "She smiles."; - mes "[200 experience points]"; - goto L_Close; - -L_Lifestones_NoRoom: - mes "[Elanore the Healer]"; - mes "\"Oh... it seems that you have no room for the lifestones. But please do come back later when you have made a little space.\""; - goto L_Close; - -L_Lifestones_Trade_Missing: - mes "[Elanore the Healer]"; - mes "Elanore counts the leaves you show her."; - mes "\"No, I am sorry. Please bring me ten leaves each of gamboge, alizarin, mauve, and cobalt.\""; - goto L_Close; - -L_Lifestones_MakeSelf: - mes "[Elanore the Healer]"; - if (@has_magic < 2) goto L_Lifestones_MakeSelf_no; - goto L_Lifestones_MakeSelf_yes; - -L_Lifestones_MakeSelf_yes: - mes "\"Oh, but of course! You are powerful enough to make your own lifestones, using the enchantment '" + getspellinvocation("enchant-lifestone") + "'. This will consume a bug leg or a maggot slime or one of each of the four healing herbs, though.\""; - goto L_Close; - -L_Lifestones_MakeSelf_no: - mes "\"No, you are not powerful enough yet. Please come back and ask me again when you have learned to control more powerful magic, though!\""; - goto L_Close; - -L_Teach: - if (@Q_status == @STATUS_INITIAL) goto L_Teach_Initial; - if (@Q_status == @STATUS_LEARNED_LIGHT_HEAL) goto L_Teach_CheckAdvanceTo2; - if (@Q_status == @STATUS_MASTERED_LIGHT_HEAL) goto L_Teach_CheckAdvanceToLOH; - if (@Q_status == @STATUS_LEARNED_LAY_ON_HANDS) goto L_Teach_Explain3; - if (@Q_status == @STATUS_WAITING_FOR_KADIYA) goto L_Teach_CheckAdvanceTo3; - if (@Q_status == @STATUS_READY_TO_LEARN_CURE_POISON) goto L_Teach_CurePosion; - if (@Q_status == @STATUS_LEARNED_CURE_POISON) goto L_Teach_dunno; - - mes "[Elanore the Healer]"; - mes "\"You have made good progress, but you lack the magical power to advance further. Also, I would like to observe you some more to be certain that you will make a good healer.\""; - goto L_Close; - -L_Teach_Initial: - mes "[Elanore the Healer]"; - mes "\"I will only teach you magic of the school of Life, and that only if you prove yourself to be a good healer – that is, if you use your powers to help others.\""; - mes "She hesistates."; - next; - mes "[Elanore the Healer]"; - mes "\"I don't know you very well, but I don't think that there is any harm in teaching you a simple spell.\""; - mes "She reaches inside her satchel and pulls out a piece of crystal, glittering in the sun."; - mes "\"This here is a lifestone, life energy encased in a crystal shell. You will need it for most healing magic.\""; - next; - mes "[Elanore the Healer]"; - mes "\"To heal someone, first locate the injury. As a beginner, you have to touch the wound; with practice, it will be enough to think about it. Hold the lifestone in one hand, touching the wound with the other.\""; - mes "\"Then say, '" + getspellinvocation("lesser-heal") + "', followed by the name of the one you wish to heal.\""; - next; - mes "[Elanore the Healer]"; - mes "\"You might want to write that down, actually. In fact, you might want to make sure to keep notes of all spells you hear, for you never know if you will hear them again!\""; - mes "\"The invocation was '" + getspellinvocation("lesser-heal") + "'.\""; - next; - mes "[Elanore the Healer]"; - mes "\"This will only cure cuts and bruises, though, and it will take some time to take effect. It will be useless to mend broken bones or more severe injuries!\""; - mes "\"To heal yourself, it's enough to just say '" + getspellinvocation("lesser-heal") + "' by itself.\""; - next; - mes "[Elanore the Healer]"; - mes "\"Let me give you a lifestone to get started with.\""; - next; - getinventorylist; - if ((@inventorylist_count == 100) && (countitem("Lifestone") == 0)) goto L_Teach_Initial_Noroom; - getitem "Lifestone", 1; - set @Q_status, @STATUS_LEARNED_LIGHT_HEAL; - callsub S_update_var; - - mes "[Elanore the Healer]"; - mes "Elanore hands you the crystal."; - mes "\"Here you are. I hope that it will allow you to do good!\""; - goto L_Close; - -L_Teach_Initial_Noroom: - mes "[Elanore the Healer]"; - mes "\"Oh... you managed to put things into every little nook and pocket, haven't you? Well, come back later, I will give it to you then.\""; - goto L_Close; - -L_Teach_CheckAdvanceTo2: - mes "[Elanore the Healer]"; - if (@Q_heal_exp < 20) goto L_Teach_CheckAdvanceTo2_fail; - mes "Elanore smiles at you."; - mes "\"From what I have been hearing, you seem to be doing well on your way to becoming a healer. I have decided to accept you as a student of the School of Life Magic.\""; - next; - if (getskilllv(SKILL_MAGIC) < 2) goto L_Teach_AdvanceTo2_warn; - goto L_Teach_AdvanceTo2_skip; - -L_Teach_AdvanceTo2_warn: - mes "[Elanore the Healer]"; - mes "\"But be warned: you won't be able to use advanced healing magic until you are more capable in your regular magic usage.\""; - next; - goto L_Teach_AdvanceTo2_skip; - -L_Teach_AdvanceTo2_skip: - mes "[Elanore the Healer]"; - mes "\"Please stand still.\""; - mes "She walks up to you, holds your shoulders, and smiles at you."; - next; - mes "[Elanore the Healer]"; - mes "Then, she rises up on her tiptoes and kisses you on your forehead."; - next; - mes "[Elanore the Healer]"; - mes "You feel a strange, tingling kind of warmth spread through your body."; - set @Q_status, @STATUS_MASTERED_LIGHT_HEAL; - callsub S_update_var; - set @SUP_xp, 5000; - set @SUP_lvl, 2; - callfunc "SkillUp"; - goto L_Close; - -L_Teach_CheckAdvanceTo2_fail: - mes "\"I think I would like to observe you for a little longer to see if you would make a good healer.\""; - if (@Q_heal_exp < 5) - mes "\"You are still at the beginning of your path, but do keep practicing.\""; - if ((@Q_heal_exp >= 5) && (@Q_heal_exp < 15)) - mes "\"You are making progress, but you still need more practice.\""; - if (@Q_heal_exp >= 15) - mes "\"You have made good progress, but please do continue in your efforts.\""; - goto L_Close; - -L_Teach_CheckAdvanceToLOH: - if (getskilllv(SKILL_MAGIC) < 2) goto L_Teach_LOH_advance_abort0; - if (@Q_heal_exp < 30) goto L_Teach_LOH_advance_abort1; - - mes "[Elanore the Healer]"; - mes "\"I will now teach you how to heal by laying on your hands. The technique is similar to the spell I taught you at the beginning, but this time you transfer your own health instead of drawing health from a lifestone.\""; - next; - mes "[Elanore the Healer]"; - mes "\"First, lay your hand on the person you wish to heal. You needn't touch the injury itself, though you have to touch the skin until you are a little more experienced. Then, medidate on the word '" + getspellinvocation("lay-on-hands") + "'\""; - next; - mes "[Elanore the Healer]"; - mes "\"This will let your own life force flow into the person you are healing. If you are badly injured yourself, you will not be able to do this.\""; - mes "[1000 experience points]"; - getexp 1000, 0; - set @Q_status, @STATUS_LEARNED_LAY_ON_HANDS; - callsub S_update_var; - goto L_Close; - -L_Teach_LOH_advance_abort0: - mes "[Elanore the Healer]"; - mes "\"You don't have enough magical power to learn the next healing spell yet.\""; - goto L_Close; - -L_Teach_LOH_advance_abort1: - mes "[Elanore the Healer]"; - mes "\"I'm sorry, but I am not yet convinced that you are a good enough healer. Please continue in your endeavours.\""; - goto L_Close; - -L_Teach_Explain3: - if (getskilllv(SKILL_MAGIC) < 3) goto L_Teach_Explain3_abort; - if (@Q_heal_exp < 50) goto L_Teach_Explain3_fail; - - mes "[Elanore the Healer]"; - mes "Elanore smiles."; - mes "\"You seem to be ready to advance as a healer. There is one favour I must ask of you first, though.\""; - set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(NIBBLE_3_MASK)); // Initialise Kadiya quest - set @Q_status, @STATUS_WAITING_FOR_KADIYA; - callsub S_update_var; - next; - - mes "[Elanore the Healer]"; - mes "\"There is a man here in Tulimshar with a beautiful young daughter; his name is Omar, and his daughter's name is Kadiya.\""; - mes "\"Once, when I was a young apprentice, I made a mistake treating Omar. Ever since, he no longer trusts me.\""; - next; - - mes "[Elanore the Healer]"; - mes "\"But his daugher has contracted Mopox, so she needs help. He doesn't trust me, but perhaps he will trust you; you have been helping quite a few people, after all.\""; - next; - goto L_3_menu; - -L_3_menu: - menu - "What should I do?", L_3_what_to_do, - "Where can I find the sick girl?", L_3_where, - "How did you mess up?", L_3_messup, - "I will get started right away.", L_Main, - "Maybe later.", L_Main; - -L_3_what_to_do: - mes "[Elanore the Healer]"; - mes "\"You will have to brew a Mopox cure potion and give it to her. You should ask Caul to help you, he knows the recipe.\""; - next; - mes "[Elanore the Healer]"; - mes "\"First, you will need a concentration potion and an iron potion – together, they will give her her strength back. You also need a lifestone, and a gamboge leaf against the toxins in her body.\""; - next; - mes "[Elanore the Healer]"; - mes "\"You then have to add in roots, water, mauve leaves and sulphur powder until the brew is gooey and neither light nor dark. Caul will explain the details to you.\""; - next; - mes "[Elanore the Healer]"; - mes "\"There is a transmutation spell to make sulphur powder. If you don't know the magic, perhaps you can ask a transmutation mage to help you with this part.\""; - next; - goto L_3_menu; - -L_3_messup: - mes "[Elanore the Healer]"; - mes "\"Ah... well, Omar is a trader, and a frequent traveler. One day he came back from a journey with fleas in his beard and asked me to get rid of them.\""; - next; - mes "[Elanore the Healer]"; - mes "\"Unfortunately I used the wrong lotion on the fleas, so instead of being scared away, they grew to enormous proportions and ate up all of his beard.\""; - next; - mes "[Elanore the Healer]"; - mes "Elanore blushes."; - mes "\"Ever since then he hasn't been very trusting towards my skills, and I suppose that I can't blame him. But I don't want poor Kadiya to suffer because of that.\""; - next; - goto L_3_menu; - -L_3_where: - mes "[Elanore the Healer]"; - mes "\"Kadiya and Omar live relatively close by. See this corner in the inner city wall east of here? Turn past it, then go north. It's the second house.\""; - next; - goto L_3_menu; - -L_Teach_Explain3_abort: - mes "[Elanore the Healer]"; - mes "\"I'm sorry, but you lack the magical power to advance.\""; - goto L_Close; - -L_Teach_Explain3_fail: - mes "[Elanore the Healer]"; - if (@Q_heal_exp < 30) - mes "\"You seem to have regressed as a healer. This is worrisome; please mend your ways or I will not teach you any further.\""; - if ((@Q_heal_exp >= 30) && (@Q_heal_exp < 40)) - mes "\"You still need more practice in the art of healing.\""; - if ((@Q_heal_exp >= 40)) - mes "\"You are doing well, but you need some more practice as a healer first.\""; - goto L_Close; - -L_Teach_CheckAdvanceTo3: - callfunc "KadiyaSubquestConsts"; - - if (@Q_kadiya_status >= @Q_STATUS_COMPLETED) goto L_Teach_AdvanceTo3Ready; - - mes "[Elanore the Healer]"; - mes "\"Please help Kadiya.\""; - next; - goto L_3_menu; - -L_Teach_AdvanceTo3Ready: - mes "[Elanore the Healer]"; - mes "\"I have heard of what you did. Hiding the potion in her favorite food – that was clever.\""; - mes "She smiles at you."; - mes "\"Omar let me have a look at her earlier, and she seems to be recovering. You did very well."; - next; - mes "[Elanore the Healer]"; - mes "Elanor turns towards you, rises up on her toes and kisses you on the forehead."; - next; - set @xp, 30000; - if (@Q_kadiya_status == @Q_STATUS_COMPLETED_ELANORE) - set @xp, 50000; - mes "[Elanore the Healer]"; - mes "You feel a strange, tingling kind of warmth spread through your body."; - mes "[" + @xp + " experience points]"; - mes "[Level 3 in Life Magic]"; - - set @Q_status, @STATUS_READY_TO_LEARN_CURE_POISON; - callsub S_update_var; - getexp @xp, 0; - if (getskilllv(SKILL_MAGIC_LIFE) < 3) - setskill SKILL_MAGIC_LIFE, 3; - next; - - if (@Q_kadiya_status != @Q_STATUS_COMPLETED_ELANORE) goto L_Main; - - mes "[Elanore the Healer]"; - mes "\"Overall I am impressed by your progress. If you continue as you are doing now, you might become a great healer.\""; - mes "She hands you a handful of lifestones."; - mes "\"Please come back soon; there is more that I would like to teach you.\""; - next; - set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_ELANORE_OMAR; - getitem "Lifestone", 20; - - goto L_Main; - -L_Teach_CurePosion: - mes "[Elanore the Healer]"; - mes "\"Thank you again for your help with Kadiya!\""; - mes "\"Curing sicknesses is often quite difficult; most of them require complicated potions to be brewed.\""; - next; - mes "[Elanore the Healer]"; - mes "\"Fortunately, things are much easier with most poisons. For those we have a simple spell that only requires a Gamboge leaf.\""; - mes "\"This is the next spell that I would like to teach you.\""; - next; - mes "[Elanore the Healer]"; - mes "\"If you would like to cure someone who is poisoned, first rub a Gamboge leaf between your hands. Your hands must be covered in Gamboge liquid for this to work.\""; - mes "\"Speak the invocation, `" + getspellinvocation("cure-poison") + "'.\""; - mes "\"Next, you either touch the poisoned person with your hands, or speak their name. You have to be close for this to work, though.\""; - next; - mes "[Elanore the Healer]"; - mes "\"Once again, the invocation is `" + getspellinvocation("cure-poison") + "'.\""; - mes "\"Come back again soon; there is another spell I would like to teach you.\""; - next; - set @Q_status, @STATUS_LEARNED_CURE_POISON; - callsub S_update_var; - goto L_Main; - -L_Teach_dunno: - mes "[Elanore the Healer]"; - mes "\"Hmm. I wanted to teach you something, but I've forgotten what it was... please come back later.\""; - next; - goto L_Main; - -L_Question: - callfunc "MagicTalkOptionsSetup"; - set @ignore, @QQ_ELANORE; - callfunc "MagicTalkMenu"; - - if (@c == 0) goto L_Main; - if (@c == @QQ_MANASEED) goto L_Q_manaseed; - if (@c == @QQ_MANAPOTION) goto L_Q_manapotion; - if (@c == @QQ_WYARA) goto L_Q_wyara; - if (@c == @QQ_SAGATHA) goto L_Q_sagatha; - if (@c == @QQ_AULDSBEL) goto L_Q_auldsbel; - if (@c == @QQ_OLDWIZ) goto L_Q_oldwiz; - if (@c == @QQ_ASTRALSOUL) goto L_Q_astralsoul; - - mes "[Elanore the Healer]"; - mes "Elanore shakes her head."; - mes "\"I am sorry, but I don't think that I know anything that would help you.\""; - next; - goto L_Main; - -L_Q_astralsoul: - mes "[Elanore the Healer]"; - mes "\"The astral soul skill is one of the most important skills for mages. I learned this focus long time ago. Without that skill your magic is quite useless, isn't it? If the rumors are really true, there is an experienced mage in the Woodlands around Hurnscald.\""; - next; - goto L_Main; - -L_Q_oldwiz: - mes "[Elanore the Healer]"; - mes "\"He is a kind old man. He stays mostly with his books and his apprentice, though we have chatted a few times.\""; - next; - goto L_Main; - -L_Q_manaseed: - mes "[Elanore the Healer]"; - mes "She smiles."; - mes "\"If the rumors are true and there really is a Mana Seed, then that would be wonderful news – perhaps we will have a few more healers soon!\""; - next; - goto L_Main; - -L_Q_manapotion: - mes "[Elanore the Healer]"; - mes "\"I'm sorry, but I can't help you with that.\""; - next; - goto L_Main; - -L_Q_wyara: - mes "[Elanore the Healer]"; - mes "\"Wyara is the Hurnscald town witch. She was also the town healer before the Doctor moved there.\""; - next; - goto L_Main; - -L_Q_sagatha: - mes "[Elanore the Healer]"; - mes "\"Oh, I have only met Sagatha once or twice, while collecting herbs. She is a warm and gentle person, but she tries to hide it.\""; - next; - goto L_Main; - -L_Q_auldsbel: - mes "[Elanore the Healer]"; - mes "\"Oh, sorry – I don't really know him very well.\""; - next; - goto L_Main; - -L_CurePoison: - mes "[Elanore the Healer]"; - mes "\"Oh dear! That looks like poison; hang on...\""; - mes "She performs a complicated gesture."; - sc_end(sc_poison); - sc_end(sc_slowpoison); - misceffect sfx_magic_life, strcharinfo(0); - misceffect sfx_magic_life; - next; - mes "[Elanore the Healer]"; - mes "\"There you are, right as rain! Now you take care, all right?\""; - goto L_Close; - -L_bye: - mes "[Elanore the Healer]"; - mes "\"Goodbye!\""; - goto L_Close; - -L_Close: - set @Q_MASK, 0; - set @Q_SHIFT, 0; - set @has_magic, 0; - set @Q_STATUS_MAX, 0; - set @Q_heal_exp, 0; - set @Q_status, 0; - set @SUP_id, 0; - set @SUP_name$, ""; - set @ignore, 0; - set @STATUS_LEARNED_LIGHT_HEAL, 0; - set @STATUS_MASTERED_LIGHT_HEAL, 0; - set @STATUS_LEARNED_LAY_ON_HANDS, 0; - set @STATUS_WAITING_FOR_KADIYA, 0; - set @STATUS_READY_TO_LEARN_CURE_POISON, 0; - set @STATUS_LEARNED_CURE_POISON, 0; - set @TEMP,0; - set @xp, 0; - close; - -S_update_var: - set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Q_MASK) | (@Q_status << @Q_SHIFT)); - return; -} diff --git a/world/map/npc/001-1/entertainer.txt b/world/map/npc/001-1/entertainer.txt deleted file mode 100644 index 3bc2e141..00000000 --- a/world/map/npc/001-1/entertainer.txt +++ /dev/null @@ -1,38 +0,0 @@ -// Emote NPC allows for players to learn the emote skill - -001-1.gat,30,43,0|script|Entertainer|165 -{ - mes "[Entertainer]"; - mes "\"Yes how can I help you?\""; - menu - "How are you showing emotions above your head?", L_Learn, - "Never mind", L_Close; - -L_Learn: - mes "[Entertainer]"; - mes "\"They are called emotes, I use them to express how I am feeling."; - mes "I can teach you if you'd like?\""; - menu - "Yes please.", L_Learn2, - "I don't see the point right now.", L_Close; - -L_Learn2: - mes "[Entertainer]"; - mes "\"All you have to do is press alt and a number."; - mes "The number determines what emotion will be shown."; - mes "Some clients will also show an emote shortcut-bar with the F12 button\""; - goto L_Close; - -L_Close: - close; - -OnTimer3000: - emotion rand(EMOTE_DISGUST, EMOTE_TEARS); - setnpctimer 0; - end; - -OnInit: - if (debug >= 2) end; - initnpctimer; - end; -} diff --git a/world/map/npc/001-1/eomie.txt b/world/map/npc/001-1/eomie.txt new file mode 100644 index 00000000..ab6a72bc --- /dev/null +++ b/world/map/npc/001-1/eomie.txt @@ -0,0 +1,143 @@ +// A professor at Tulimshar's magic academy, involved in quest: +// Anwar needs a magic fertilizer for his field +// Quest uses Nibble 3 of QUEST_NorthTulimshar +// Author: Jenalya +// state 1: Anwar sent to Tinris for help to get a magic fertilizer +// state 2: Tinris asked for chocolate cake as present for his girlfriend +// state 3: Tinris asked for ingredients for the fertilizer +// state 4: Tinris gave you the fertilizer +// state 5: Anwar tried it out and it doesn't work well, sent you back to Tinris +// state 6: Tinris asked for more ingredients for a new try +// state 7: Tinris says it's really hard, gives you the fertilizer and tells you to ask Eomie to cast a spell on it +// state 8: Eomie sends you to get some stuff so she can interrupt her spell on the spot of grass +// state 9: Eomie casted a spell on the fertilizer +// state 10: Anwar used it and it worked. he asks you to help him preparing a thank-you-gift for each Tinris and Eomis +// state 11: Anwar asked to bring present to Tinris +// state 12: gave present to Tinris +// state 13: Anwar asked to bring present to Eomie +// state 14: gave present to Eomie +// state 15: reported back to Anwar and done + +001-1.gat,71,23,0|script|Eomie|164 +{ + set @state, ((QUEST_NorthTulimshar & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); + + set @grass_amount, 5; + set @water_amount, 2; + set @ice_amount, 2; + + set @silk_exp, 600; + + if (@state >= 14) goto L_Done; + if (@state >= 9) goto L_CastedSpell; + if (@state == 8) goto L_GetStuff; + + mes "[Eomie]"; + mes "\"I maintain this little spot of grass in the desert.\""; + if (@state != 7) + goto L_Close; + menu + "I have this magic fertilizer from Tinris and need a spell cast on it.",L_Next; + +L_Next: + mes "[Eomie]"; + mes "\"Oh? I see, that's a difficult task."; + mes "I'd be glad to help you, but unfortunately I can't interrupt the magic I use to keep this spot of grass alive.\""; + next; + mes "\"It's unusually hot at the moment, even for this desert area. It might have something to do with the aftereffects of the earthquake.\""; + menu + "Isn't there any possibility?",L_Continue; + +L_Continue: + mes "She hesitates."; + set @state, 8; + callsub S_Update_Mask; + goto L_GetStuff; + +L_GetStuff: + // @state == 8 + mes "[Eomie]"; + mes "\"I could try to interrupt my spells to be able to cast the spell on the fertilizer, but then I need to prepare the grass for this."; + mes "Bring me " + @grass_amount + " Grass Seeds, " + @water_amount + " Bottles of Water and " + @ice_amount + " Ice Cubes.\""; + menu + "I have it.",L_More, + "Where can I get Grass Seeds?",L_Hurnscald, + "How can I get Ice Cubes? We're in the desert!",L_Mine, + "Ok, I'll go and get it.",L_Close; +L_More: + if ((countitem("GrassSeed") < @grass_amount) || (countitem("BottleOfWater") < @water_amount) || (countitem("IceCube") < @ice_amount)) + goto L_NoItem; + + delitem "GrassSeed", @grass_amount; + delitem "BottleOfWater", @water_amount; + delitem "IceCube", @ice_amount; + set @state, 9; + callsub S_Update_Mask; + mes "[Eomie]"; + mes "\"Very good.\""; + mes "She takes the things you brought her and uses them to create a bubble of coolness around the spot of grass."; + misceffect sfx_magic_nature; + next; + mes "[Eomie]"; + mes "\"This should last long enough to keep the spot of grass alive until I cast the spell on the fertilizer. And if some of it shrivels I still have the seeds you brought me which I can use to recover it.\""; + next; + mes "She takes the fertilizer and casts some invocations. After a while she's done and gives it back to you with a smile."; + misceffect sfx_magic_nature; + mes "[Eomie]"; + mes "\"This should help you. I'm glad you're taking care of the plants. Not enough people do that nowadays.\""; + goto L_Close; + +L_Hurnscald: // player asked how to get Grass Seeds + mes "[Eomie]"; + mes "\"Squirrels tend to pick up Grass Seeds as they gather food. You can find them around Hurnscald. To get there you will have to take the ferry in the harbor district.\""; + goto L_Close; + +L_Mine: // player asked how to get Ice Cubes + mes "[Eomie]"; + mes "\"Hm, that's a difficult task, indeed. Naturally you will find them on the continent of Kaizei, which is high up in the north and covered with snow most time of the year. But it might be difficult to get there.\""; + next; + mes "\"I heard that Ice Goblins were seen in the caves that are around Nivalis. Maybe you can find Ice Cubes in there.\""; + goto L_Close; + +L_CastedSpell: // @state >= 9 but below 14 + mes "[Eomie]"; + mes "\"The grass wasn't damaged due to the interruption. I hope the magic fertilizer is useful for Anwar.\""; + if (@state != 13) + goto L_Close; + menu + "It was and he created this Silk Headband as a present for you.",L_Present, + "(Mumble something and leave)",L_Close; + +L_Present: + if (countitem("SilkHeadband") < 1) + goto L_NoItem; + delitem "SilkHeadband", 1; + getexp @silk_exp, 0; + set @state, 14; + callsub S_Update_Mask; + mes "[Eomie]"; + mes "\"Oh, this is very friendly! Please tell him I'm very happy about it.\""; + mes "She smiles."; + goto L_Close; + +L_Done: // @state >= 14 + mes "[Eomie]"; + mes "\"Hello. I'm happy to see someone like you being dedicated to the needs of plants and people.\""; + goto L_Close; + +L_NoItem: + mes "[Eomie]"; + mes "\"Where is it?\""; + goto L_Close; + +L_Close: + set @state, 0; + set @grass_amount, 0; + set @water_amount, 0; + set @ice_amount, 0; + close; + +S_Update_Mask: + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_3_MASK)) | (@state << NIBBLE_3_SHIFT); + return; +} diff --git a/world/map/npc/001-1/ferry_master.txt b/world/map/npc/001-1/ferry_master.txt new file mode 100644 index 00000000..6454d310 --- /dev/null +++ b/world/map/npc/001-1/ferry_master.txt @@ -0,0 +1,21 @@ +// + +001-1.gat,64,75,0|script|Ferry Master#tulimshar|138 +{ + mes "[Ferry Master]"; + mes "\"Hello! Do you need something?\""; + goto L_Main; + +L_Main: + menu + "How do I use the ferry?", L_Explain, + "Nothing I guess", L_Close; + +L_Explain: + mes "[Ferry Master]"; + callfunc "FerryHelp"; + goto L_Main; + +L_Close: + close; +} diff --git a/world/map/npc/001-1/gate_guards.txt b/world/map/npc/001-1/gate_guards.txt new file mode 100644 index 00000000..5eb44e36 --- /dev/null +++ b/world/map/npc/001-1/gate_guards.txt @@ -0,0 +1,26 @@ +// Guard near the magic school +001-1.gat,39,33,0|script|Guard#school|104 +{ + mes "[Guard]"; + mes "\"I'm just here to provide a presence for the guards at this gate. The mages here can defend themselves without problem.\""; + close; +} +001-1.gat,56,47,0|script|Guard#castle|104 +{ + mes "[Guard]"; + mes "\"The volcano and earthquake did a lot of damage, but the citizens of Tulimshar sure did a good job of cleaning up.\""; + close; +} + +001-1.gat,61,99,0|script|Guard#east3|104 +{ + mes "[Guard]"; + mes "\"The Palace is North of here. That is where you will find the Council of Wizards.\""; + close; +} +001-1.gat,53,72,0|script|Guard#govt_out|123 +{ + mes "[Guard]"; + mes "\"This is a government building. They have some clerical and tax offices in here. There is also a jail in the subbasement.\""; + close; +} diff --git a/world/map/npc/001-1/gossip.txt b/world/map/npc/001-1/gossip.txt index 28d4455d..5d3bb671 100644 --- a/world/map/npc/001-1/gossip.txt +++ b/world/map/npc/001-1/gossip.txt @@ -1,32 +1,19 @@ // NPC to provide hints on progression of linear quest chain in Tulimshar -001-1.gat,49,31,0|script|Gladys|154 +001-1.gat,66,104,0|script|Gladys|154 { - // This NPC previously used the variable TMW_Quest - callfunc "ClearVarTMW_Quest"; - - set @guards, ((QUEST_SouthTulimshar & BYTE_2_MASK) >> BYTE_2_SHIFT); - set @bermik, ((QUEST_SouthTulimshar & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); - set @sarah, ((QUEST_SouthTulimshar & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT); - set @vincent, ((QUEST_SouthTulimshar & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); - set @sandra, ((QUEST_SouthTulimshar & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); - mes "[Gladys, Town Gossip]"; mes "\"Hello deary! I hear some of the most fascinating rumors and bits of news. I just heard a bit more today!\""; mes "\"Would you like me to let you in on the good stuff?\""; menu - "Sure!", L_Yes, + "Lt. Dausen", L_Intro, + "Fieri", L_Cook, + "Sarah", L_Sarah, + "Sandra", L_Sandra, + "Desert Mine", L_Desert, + "Ferry", L_Ferry, "No thanks.", L_No; -L_Yes: - if (@bermik < 4) goto L_Intro; - if (@bermik < 6) goto L_Mik; - if (@sarah < 2) goto L_Sarah; - if (@vincent < 2) goto L_Vinc; - if (@sandra < 2) goto L_Sandra; - if (@guards < 28) goto L_Desert; - goto L_Ferry; - L_No: mes "[Gladys, Town Gossip]"; mes "\"Very well. Come back whenever you like. I am always getting juicy bits of news!\""; @@ -35,65 +22,35 @@ L_No: L_Intro: mes "[Gladys, Town Gossip]"; mes "\"Have you met our lovely guard captain yet? He usually keeps a post just outside the gates where he can keep an eye on things. He likes to talk to new adventurers too.\""; - next; - mes "[Gladys, Town Gossip]"; - mes "\"I also overheard some of the children in the square talking today. I think they are having trouble with some of their chores. Kids these days...\""; - next; - mes "The old lady trails off and starts muttering to herself about hills and snow. Perhaps it's best to leave her alone for now."; goto L_Close; -L_Mik: +L_Cook: mes "[Gladys, Town Gossip]"; - mes "\"That nice young boy Bernard gave me some of the soup you helped him make. It was lovely!\""; + mes "\"I hear the kitchen at the Magic Insitute of Tulimshar needs help.\""; next; - mes "[Gladys, Town Gossip]"; - mes "\"One of the ladies in my quilting club mentioned giving a task to her grandson. I have my doubts about whether he ever finished it...\""; + mes "\"The only thing bigger then a wizard's ego is their waistline. Hehe.\""; goto L_Close; L_Sarah: mes "[Gladys, Town Gossip]"; - mes "\"Ethel, the lady in my quilting club, told me you helped her grandson with his chore. That was awfully nice of you!\""; - next; - mes "[Gladys, Town Gossip]"; - mes "\"Do you believe what parents will let their kids do these days?! I heard about this girl at the far side of town who does nothing but eat sweets all day! Honestly, what is the world coming to?\""; - goto L_Close; - -L_Vinc: - mes "[Gladys, Town Gossip]"; - mes "\"I just got news of an exciting new business opportunity! There's supposed to be a new entrepreneur in town somewhere making toys. You should get in on the ground floor!\""; + mes "\"Do you believe what parents will let their kids do these days?! I heard about this girl in the south east side of town who does nothing but eat sweets all day! Honestly, what is the world coming to?\""; goto L_Close; L_Sandra: mes "[Gladys, Town Gossip]"; - mes "\"How's that toy business working out? Pretty good tip, huh?\""; - next; - mes "[Gladys, Town Gossip]"; - mes "\"I've been hearing reports of you all over town! I think there's only one little girl you haven't assisted, but she's a strange one...always messing about with bugs. Yuck!\""; + mes "\"The students and wizards at the Magic Institute of Tulimshar are always looking for people to gather reagents for spells as they are far too busy studing.\""; goto L_Close; L_Desert: - if (Sex == 0) set @person$, "gal"; - if (Sex == 1) set @person$, "guy"; - - mes "[Gladys, Town Gossip]"; - mes "\"Well, if it isn't " + strcharinfo(0) + "! Our local hero and supernice " + @person$ + ".\""; - mes "\"The whole town is buzzing about you now!\""; - next; mes "[Gladys, Town Gossip]"; mes "\"If you're still looking for adventure, I would suggest talking to some of the guards. I hear there is a monster threat outside the city walls!\""; goto L_Close; L_Ferry: mes "[Gladys, Town Gossip]"; - mes "I heard that there is a handsome sailor in the north of town who will take people to exotic new places! I'm saving my pennies!\""; + mes "I heard that there is a ferry in the north of town that will take people to exotic new places!\""; goto L_Close; L_Close: - set @person$, ""; - set @guards, 0; - set @bermik, 0; - set @sarah, 0; - set @vincent, 0; - set @sandra, 0; close; } diff --git a/world/map/npc/001-1/guards.txt b/world/map/npc/001-1/guards.txt index c481e098..358604eb 100644 --- a/world/map/npc/001-1/guards.txt +++ b/world/map/npc/001-1/guards.txt @@ -1,6 +1,6 @@ // -001-1.gat,48,79,0|script|Ekinu|104 +001-1.gat,103,99,0|script|Ekinu|104 { mes "[Ekinu the Town Guard]"; mes "\"What a disaster... I can't believe that we managed to rebuild the town so quickly.\""; @@ -75,7 +75,7 @@ L_Close: close; } -001-1.gat,40,79,0|script|Ryan|104 +001-1.gat,107,42,0|script|Ryan|104 { if (getskilllv(SKILL_MAGIC)) goto L_message; diff --git a/world/map/npc/001-1/guide.txt b/world/map/npc/001-1/guide.txt deleted file mode 100644 index 69a0231d..00000000 --- a/world/map/npc/001-1/guide.txt +++ /dev/null @@ -1,184 +0,0 @@ -// - -001-1.gat,32,27,0|script|Ian|102 -{ - // This line is only relevant for players, who started before the timestamp was introduced. - // Set the graduation cap flag at the right position. - // It is a bugfix - if ((TUT_var < 4) && (TUT_var & 2)) - set FLAGS, FLAGS|FLAG_GOT_GRADUATIONCAP; - - if ((TUT_var != 0) && !(FLAGS & FLAG_GOT_GRADUATIONCAP) && BaseLevel >= 10) - goto L_Grad; - goto L_DoneGrad; - -L_DoneGrad: - mes "[Ian the Guide]"; - mes "\"Would you like to know about something?\""; - next; - goto L_Menu_A; - -L_Menu_A: - menu - "Fighting", L_Fight, - "Items", L_Items, - "Monsters", L_Monster, - "Stylist", L_Style, - "Quests", L_Quests, - "NPCs", L_NPC, - "Commands", L_Comm, - "Attributes", L_Stats, - "Magic", L_Magic, - "Quick Keys", L_Key, - "Laws", L_Laws, - "I know everything!", L_Know; - -L_Fight: - mes "[Ian the Guide]"; - mes "\"People live in this world by living off of monsters."; - mes "You can fight monsters and even players by hitting the [CTRL] key, or left mouse click.\""; - next; - mes "[Ian the Guide]"; - mes "\"If you get tired of pressing the key too much, you can also type [SHIFT]+[CTRL]."; - mes "This will make your character attack continuously for the time you are inactive.\""; - next; - goto L_Menu_A; - -L_Items: - mes "[Ian the Guide]"; - mes "\"There are three types of items."; - mes "They can be Consumables, Equipment or Miscellaneous\""; - next; - mes "[Ian the Guide]"; - mes "\"Consumable items such as Potions, can be used only once."; - mes "After use, they will disappear from your inventory.\""; - next; - mes "[Ian the Guide]"; - mes "\"Equipment items like Armors, Weapons, Accessories"; - mes "can be equipped for fashionable purposes or to raise your status.\""; - next; - mes "[Ian the Guide]"; - mes "\"Miscellaneous items such as maggot slime, are used"; - mes "in creating other items, or just to trade and sell.\""; - next; - goto L_Menu_A; - -L_Monster: - mes "[Ian the Guide]"; - mes "\"In every world, there are beasts. Monsters can be found almost anywhere!~"; - mes "To fight them, please read [Fighting] if you do not know how.\""; - next; - mes "\"There a several types of monsters, Aggressive, Neutral, and Assistants.\""; - next; - mes "[Ian the Guide]"; - mes "\"Aggressive monsters know that they are always in danger"; - mes "so therefore they always keep their guard up,"; - mes "making them attack anybody in sight.\""; - next; - mes "[Ian the Guide]"; - mes "\"Neutral monsters tend to just lounge around until attacked."; - mes "They will leave everything alone unless they are threatened.\""; - next; - mes "[Ian the Guide]"; - mes "\"Assistants are monsters who help each other."; - mes "You should always check how many are around you before attacking a single one!\""; - next; - goto L_Menu_A; - -L_Style: - mes "[Ian the Guide]"; - mes "\"The stylist NPCs will cut and perm your hair!"; - mes "They are known for their hair growth formula\""; - next; - goto L_Menu_A; - -L_Quests: - mes "[Ian the Guide]"; - mes "\"There are people in the world in need of help!"; - mes "Most of these people aren't afraid to give rewards to those who help them."; - mes "So be nice and help people along the way!\""; - next; - mes "[Ian the Guide]"; - mes "\"If you are looking for a place to get started, I heard that the guard captain just outside the gates is looking for help.\""; - next; - goto L_Menu_A; - -L_NPC: - mes "[Ian the Guide]"; - mes "\"NPCs [Non Playable Characters] are people who are always in the game,"; - mes "tending to many varieties of services from just chatting to helping others.\""; - next; - goto L_Menu_A; - -L_Comm: - mes "[Ian the Guide]"; - mes "\"/clear clears the text box.\""; - mes "\"/help displays the client commands (ones starting with a /) in the chat box.\""; - mes "\"/whisper [name] allows you to message someone privately.\""; - mes "\"/who displays the current number of online users.\""; - mes "\"/where displays the current map's name.\""; - next; - goto L_Menu_A; - -L_Stats: - mes "[Ian the Guide]"; - mes "\"People vary greatly by how much strength, agility, dexterity, intelligence, vitality, and luck they have.\""; - next; - mes "[Ian the Guide]"; - mes "\"Strength helps you carry items, and it also allows you to hit harder – but it is not too helpful if you focus on missile weapons."; - mes "More agility allows you to attack faster, and to dodge attacks more easily."; - mes "Your dexterity determines how likely you are to hit a monster, and how effective you are with missile weapons.\""; - next; - mes "[Ian the Guide]"; - mes "\"Vitality determines how resistant to injuries you are, and how much damage you can take before you die."; - mes "Intelligence is useful for alchemy and magic, but there are few opportunities for either at the moment."; - mes "Luck determines many small things, including the likelihood of both recieving and dealing critical hits\""; - next; - mes "[Ian the Guide]"; - mes "\"I recommend that you practice your dexterity, since some of the more dangerous monsters are very hard to hit otherwise."; - mes "Don't bother trying to work on your luck, and your intelligence is probably not something anyone cares about either.\""; - next; - goto L_Menu_A; - -L_Magic: - mes "[Ian the Guide]"; - mes "\"In decades past, there was a Mana Seed south of Tulimshar, from which people could draw magical energies. Unfortunately, the seed is gone."; - mes "However, I've overheard the bard mentioning something about this recently... if you are interested in magic, try talking to him!\""; - next; - goto L_Menu_A; - -L_Key: - mes "[Ian the Guide]"; - mes "\"There are many key combinations, press F1 for a short list of them!\""; - next; - goto L_Menu_A; - -L_Laws: - mes "[Ian the Guide]"; - mes "\"The constable can help you with them.\""; - next; - goto L_Menu_A; - -L_Know: - mes "[Ian the Guide]"; - mes "\"Lost? Confused? Want to know why you can't get past a quest, overcome an NPC or find an item? Check http://wiki.themanaworld.org for player hints, walkthroughs, item lists and more!\""; - next; - mes "\"But remember, the game isn't fun when you already know what to do. Use it well or you will lose interest in playing The Mana World! Please help by reporting anything that is unclear, outdated or that needs to be seen on our forums at http://forums.themanaworld.org.\""; - close; - -L_Grad: - getinventorylist; - if (@inventorylist_count == 100) goto L_TooMany; - mes "[Ian the Guide]"; - mes "\"Hey, you've been doing good, let me give you this.\""; - getitem "GraduationCap", 1; - set FLAGS, FLAGS | FLAG_GOT_GRADUATIONCAP; - next; - goto L_DoneGrad; - -L_TooMany: - mes "[Ian the Guide]"; - mes "\"I wanted to give you something, but you don't have room for it.\""; - next; - goto L_DoneGrad; -} diff --git a/world/map/npc/001-1/inac.txt b/world/map/npc/001-1/inac.txt new file mode 100644 index 00000000..7d5f6e4d --- /dev/null +++ b/world/map/npc/001-1/inac.txt @@ -0,0 +1,17 @@ +// + +001-1.gat,58,81,0|script|Inac|156 +{ + set @halloween_npc_id, $@halloween_npc_inac; + callfunc "TrickOrTreat"; + + mes "[Inac]"; + mes "\"This cities water system is amazing. It was built centuries ago after the cataclysm that turned Tonori into this desert.\""; + next; + mes "[Inac]"; + mes "\"They say that not much maintenance is needed, even though it's so old.\""; + next; + mes "[Inac]"; + mes "\"They also say monsters have moved into the underground tunnels that bring and distribute water.\""; + close; +} diff --git a/world/map/npc/001-1/luca.txt b/world/map/npc/001-1/luca.txt deleted file mode 100644 index af1b1487..00000000 --- a/world/map/npc/001-1/luca.txt +++ /dev/null @@ -1,451 +0,0 @@ -// - -001-1.gat,108,55,0|script|Luca|102 -{ - set @EXP_BRAWLING, 2000; - - if (BaseLevel >= 35) goto L_teach; - - if (BaseLevel >= 25) goto L_teach_soon; - - mes "[Luca the Hunter]"; - mes "\"Ouch! It hurts, this wound I got from battle.\""; - next; - menu "Tell me about it",L_Exp,"Nevermind",L_Nev; - -L_Exp: - mes "[Luca the Hunter]"; - mes "\"I was just coming back from a long journey. I ran into a group of scorpions and started fighting them for experience.\""; - next; - mes "[Luca the Hunter]"; - mes "\"Then, out of a cave came a BLACK one! I had NEVER seen it before!\""; - next; - mes "[Luca the Hunter]"; - mes "\"Luckily I had a camera with me! Here's a picture of it... Let me find it, I put it in my pocket somewhere...\""; - next; - mes "[Luca the Hunter]"; - mes "\"Oh man! My pockets have been ripped clean off!\""; - goto L_Close; - -L_Nev: - mes "[Luca the Hunter]"; - mes "\"Hmpf!\""; - goto L_Close; - -L_teach_soon: - mes "[Luca the Hunter]"; - mes "\"You've grown quite a bit stronger since I first saw you, strolling around town like that! You know, if you train a little more, maybe we can help each other out a little?\""; - goto L_Close; - -L_teach: - if (getskilllv(SKILL_POOL)) goto L_teachmore; - - mes "[Luca the Hunter]"; - mes "\"Hey there! You've become quite the adventurer, haven't you? I think it's time that someone taught you some basic skills.\""; - next; - mes "[Luca the Hunter]"; - mes "\"If you want, I can help with that!\""; - next; - menu - "Sure, that sounds fun!", L_Next, - "I'm not interested.", L_Nev; - -L_Next: - mes "[Luca the Hunter]"; - mes "\"All right! It's not all that easy, though. First you have to learn how to focus. That's because you can learn many skills, but you can't focus on all of them all the time.\""; - next; - mes "[Luca the Hunter]"; - mes "\"When you can do that, you can learn some real skills, and when you know them, you can come back to me to tell me which ones you want to focus on. Deal?\""; - next; - menu - "Yeah!", L_teach0_follow, - "Certainly!", L_teach0_follow, - "Wait... what do you mean?", L_Explain, - "Please explain some more.", L_Explain, - "No.", L_Nev; - -L_teach0_follow: - if (getskilllv(SKILL_POOL)) goto L_teachmore; - - mes "[Luca the Hunter]"; - mes "\"Great! Now, before I can give you that skill, I have to make sure that those stories about you are all true and that you really are experienced enough.\""; - next; - mes "[Luca the Hunter]"; - mes "\"So I'm going to ask you some easy questions.\""; - next; - mes "[Luca the Hunter]"; - mes "\"First, who is the man who guards the entrance to the old Tulimshar underground arena?\""; - next; - input @answer$; - if (@answer$ != "Phaet" && @answer$ != "phaet") goto L_wronganswer; - mes "[Luca the Hunter]"; - mes "\"Good. Next, what's the name of the pipe-smoker who lives on top of Lore Mountain and makes leathery goods there?\""; - next; - input @answer$; - if (@answer$ != "Pachua" && @answer$ != "pachua") goto L_wronganswer; - mes "[Luca the Hunter]"; - mes "\"Great! One more: Who was the adventurer who built Dimond's Cove for Dimond?\""; - next; - input @answer$; - if (@answer$ != "Merlin" && @answer$ != "merlin") goto L_wronganswer; - mes "[Luca the Hunter]"; - mes "Luca laughs in excitement."; - mes "\"All right! You're the real thing, my friend!\""; - next; - mes "[Luca the Hunter]"; - mes "\"Now stand over there. This should only take a second...\""; - mes "He takes off a pendant he is wearing and holds it up."; - next; - mes "[Luca the Hunter]"; - mes "\"See that fang at the end of the chain? Keep staring at it.\""; - next; - mes "[Luca the Hunter]"; - mes "He starts swinging the pendant back and forth."; - mes "\"And whatever you do, don't blink. Don't look away, and don't blink.\""; - next; - mes "[Luca the Hunter]"; - mes "The world slows down around you as you focus on the pendant going back..."; - next; - mes "and forth..."; - next; - mes "and back..."; - next; - mes "and forth..."; - next; - mes "and back..."; - next; - mes "and..."; - next; - mes "You feel relaxed."; - next; - mes "[Luca the Hunter]"; - mes "\"... still there?\""; - mes "You hear the sound of fingers snapping. Why would someone do that on such a calm day?"; - next; - mes "[Luca the Hunter]"; - mes "\"Oh, good... I think it worked. Nice job!\""; - mes "He grins."; - mes "[You gain 10,000 experience points]"; - mes "[You learned Skill Focus]"; - setskill SKILL_POOL, 1; - getexp 10000, 0; - next; - goto L_teachmore2; - -L_wronganswer: - mes "[Luca the Hunter]"; - mes "\"No, that was wrong. I suppose you're not as experienced as I thought you'd be.\""; - goto L_Close; - -L_Explain: - mes "[Luca the Hunter]"; - mes "\"Alright, what do you want to know?\""; - next; - goto L_Explain_loop; - -L_Explain_loop: - menu - "What's skill focus?", L_explain_focus, - "What skills are there?", L_explain_skills, - "How do skills work?", L_explain_work, - "Thanks, I think I got it!", L_Next; - -L_explain_focus: - mes "[Luca the Hunter]"; - mes "\"Well, you can learn many, many skills. But you can't really use all of them at once, not even old Auldsbels' head is big enough for that! So you have to focus.\""; - next; - mes "[Luca the Hunter]"; - mes "\"But you can change that focus whenever you want. It works like this: You come to me, you tell me what you want to focus on, and we do exercises until it's stuck in your head.\""; - next; - mes "[Luca the Hunter]"; - mes "\"If there's not enough space in your head, you'll first have to stop thinking about some other thing. There's an exercise I learned to do that, so when you talk to me you can just let me know what you want to forget.\""; - next; - mes "[Luca the Hunter]"; - if (getskilllv(SKILL_POOL) == 0) - mes "\"Right now you can't focus on anything yet, so I'll first have to teach you a simple skill to keep your focus.\""; - if (getskilllv(SKILL_POOL) == 1) - mes "\"Right now you can only focus on one thing at a time. So if you want to change what your focus is, you have to forget whatever else you've focused on.\""; - if (getskilllv(SKILL_POOL) > 1) - mes "\"You can focus on " + getskilllv(SKILL_POOL) + " skills right now.\""; - next; - mes "[Luca the Hunter]"; - mes "\"You can come back to me to focus or unfocus a skill whenever you want, I'm here all day.\""; - next; - mes "\"For unfocusing you need to bring a potion; a special potion. That potion is not the easiest to get, but I am sure you are able to.\""; - next; - goto L_Explain_loop; - -L_explain_skills: - mes "[Luca the Hunter]"; - mes "\"Well, I don't really know... lots, I think. I can teach you brawling, which is good when you've run out of arrows or don't have a weapon around.\""; - next; - mes "[Luca the Hunter]"; - mes "\"But there's other skills around. Some mages need special skills to concentrate, so ask around in that crowd, if that's your thing.\""; - next; - mes "[Luca the Hunter]"; - mes "\"I've also heard that there is someone in Hurnscald who can help you make your body more resistant against some things. But body and mind belong together, so you probably have to focus for that, too.\""; - next; - mes "[Luca the Hunter]"; - mes "\"Other than that, just ask around! There have to be some people who can teach you something...\""; - next; - goto L_Explain_loop; - -L_explain_work: - mes "[Luca the Hunter]"; - mes "\"Well, skills allow you to be better in some things, or allow to do what you couldn't do without them. When you've learned a skill and are focusing on it, then it affects what you do.\""; - next; - mes "[Luca the Hunter]"; - mes "\"Now, when you start out with a skill, you won't be very good at it yet. But if you keep practicing you'll learn how to get better.\""; - next; - mes "[Luca the Hunter]"; - mes "\"My old teacher always called that getting `skill points' and that you can see them with [F5], whoever that is.\""; - next; - //TODO: - //mes "[Luca the Hunter]"; - //mes "\"She also said that with this [F5] thing you can get better at those skills, and that it costs you as many skill points as the level you want to go to.\""; - //next; - mes "[Luca the Hunter]"; - mes "\"She always would have one cactus potion too many... but she was an amazing teacher.\""; - mes "He nods emphatically."; - next; - goto L_Explain_loop; - -L_teachmore: - mes "[Luca the Hunter]"; - mes "\"Good to see you again!\""; - next; - goto L_teachmore2; - -L_teachmore2: - setarray @choices, 0,0,0,0,0; - setarray @choice$, "", "", "", "", ""; - set @choice_nr, 0; - - set @C_focus, 1; - set @C_unfocus, 2; - set @C_teachbrawling, 3; - set @C_teachnothing, 4; - set @C_explainagain, 5; - set @C_nvm, 6; - set @C_focusoverview, 7; - - getactivatedpoolskilllist; - if (!((getskilllv(SKILL_POOL) - @skilllist_count) > 0)) goto L_teachmore2_nof; - getunactivatedpoolskilllist; - if (@skilllist_count == 0) goto L_teachmore2_nof; - set @choices[@choice_nr], @C_focus; - set @choice$[@choice_nr], "I would like to focus."; - set @choice_nr, @choice_nr + 1; - goto L_teachmore2_nof; - -L_teachmore2_nof: - getactivatedpoolskilllist; - if (@skilllist_count == 0) goto L_teachmore2_nounf; - set @choices[@choice_nr], @C_unfocus; - set @choice$[@choice_nr], "I would like to unfocus."; - set @choice_nr, @choice_nr + 1; - goto L_teachmore2_nounf; - -L_teachmore2_nounf: - if (!(getskilllv(SKILL_BRAWLING))) - set @choices[@choice_nr], @C_teachbrawling; - if (getskilllv(SKILL_BRAWLING)) - set @choices[@choice_nr], @C_teachnothing; - set @choice$[@choice_nr], "Can you teach me a skill?"; - set @choice_nr, @choice_nr + 1; - - set @choices[@choice_nr], @C_explainagain; - set @choice$[@choice_nr], "Can you explain skills again?"; - set @choice_nr, @choice_nr + 1; - - if (!(getskilllv(SKILL_POOL))) goto L_teachmore2_noovv; - set @choices[@choice_nr], @C_focusoverview; - set @choice$[@choice_nr], "Can you tell me what skills I'm currently focused on?"; - set @choice_nr, @choice_nr + 1; - goto L_teachmore2_noovv; - -L_teachmore2_noovv: - set @choices[@choice_nr], @C_nvm; - set @choice$[@choice_nr], "I'm done for now, thanks!"; - set @choice_nr, @choice_nr + 1; - - menu - @choice$[0],L_MenuItems, - @choice$[1],L_MenuItems, - @choice$[2],L_MenuItems, - @choice$[3],L_MenuItems, - @choice$[4],L_MenuItems; - -L_MenuItems: - set @menu, @menu - 1; - if (@choices[@menu] == 0) goto L_Close; - if (@choices[@menu] == @C_focus) goto L_focus; - if (@choices[@menu] == @C_unfocus) goto L_unfocus; - if (@choices[@menu] == @C_teachbrawling) goto L_teach_brawling; - if (@choices[@menu] == @C_teachnothing) goto L_teach_nothing; - if (@choices[@menu] == @C_explainagain) goto L_teachmore_explain; - if (@choices[@menu] == @C_focusoverview) goto L_focus_overview; - if (@choices[@menu] == @C_nvm) goto L_Close; - goto L_Close; - -L_teachmore_explain: - goto L_Explain; - -L_focus: - getunactivatedpoolskilllist; - set @skilllist_id[@skilllist_count], 0; - set @skilllist_name$[@skilllist_count], "Nevermind"; - set @skilllist_name$[@skilllist_count + 1], ""; - menu - @skilllist_name$[0], L_MenuItems1, - @skilllist_name$[1], L_MenuItems1, - @skilllist_name$[2], L_MenuItems1, - @skilllist_name$[3], L_MenuItems1, - @skilllist_name$[4], L_MenuItems1, - @skilllist_name$[5], L_MenuItems1, - @skilllist_name$[6], L_MenuItems1, - @skilllist_name$[7], L_MenuItems1; - -L_MenuItems1: - set @menu, @menu - 1; - if (@skilllist_id[@menu] == 0) goto L_teachmore2; - - poolskill @skilllist_id[@menu]; - goto L_teachmore2; - -L_unfocus: - if (countitem("GrimaceOfDementia") > 0) goto L_unfocus_menu; - - if (MAGIG_FLAGS & MFLAG_KNOWS_UNFOCUS_RECIPE) goto L_nopotion; - - mes "[Luca the Hunter]"; - mes "\"Unfocusing is one of the harder parts though, because it is sunk in. You see?\""; - next; - mes "\"So to remove that mental focus we will need a special potion.\""; - next; - mes "\"Maybe you should consult some very skilled alchemists.\""; - next; - mes "\"Ah yes, of course you will need a recipe. Although the alchemist usually knows it.\""; - next; - mes "\"The potion is called Grimace of Dementia. So the alchemist will know for sure.\""; - set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_KNOWS_UNFOCUS_RECIPE; - menu - "Ok, I will get a Grimace of Dementia potion", L_Close, - "Alright, be right back!", L_Close; - -L_nopotion: - mes "[Luca the Hunter]"; - mes "\"Hey, you really need that dementia potion for unfocusing.\""; - next; - mes "\"Come back when you've found a suitable alchemist who can mix such a potion.\""; - next; - goto L_teachmore2; - -L_unfocus_menu: - mes "[Luca the Hunter]"; - mes "\"Ahh, I see you have a dementia potion.\""; - next; - mes "\"What skill would you like to unfocus?\""; - - getactivatedpoolskilllist; - - set @skilllist_id[@skilllist_count], 0; - set @skilllist_name$[@skilllist_count], "Nevermind"; - set @skilllist_name$[@skilllist_count + 1], ""; - menu - @skilllist_name$[0], L_MenuItems2, - @skilllist_name$[1], L_MenuItems2, - @skilllist_name$[2], L_MenuItems2, - @skilllist_name$[3], L_MenuItems2, - @skilllist_name$[4], L_MenuItems2, - @skilllist_name$[5], L_MenuItems2, - @skilllist_name$[6], L_MenuItems2, - @skilllist_name$[7], L_MenuItems2; - -L_MenuItems2: - set @menu, @menu - 1; - if (@skilllist_id[@menu] == 0) goto L_teachmore2; - - if (countitem("GrimaceOfDementia") == 0) goto L_nopotion; - delitem "GrimaceOfDementia", 1; - - unpoolskill @skilllist_id[@menu]; - goto L_Close; - -L_focus_overview: - getactivatedpoolskilllist; - - if (@skilllist_count != 0) goto L_focus_overview1; - mes "[Luca the Hunter]"; - mes "\"You aren't focused on a skill at the moment.\""; - next; - goto L_teachmore2; - -L_focus_overview1: - mes "[Luca the Hunter]"; - set @message$, "\"At the moment you are focused on "; - goto L_focus_overview2; - -L_focus_overview2: - set @skilllist_count, @skilllist_count-1; - set @message$, @message$ + @skilllist_name$[@skilllist_count]; - if (@skilllist_count == 0) goto L_focus_overview3; - set @message$, @message$ + ", "; - goto L_focus_overview2; - -L_focus_overview3: - set @message$, @message$ + ".\""; - mes @message$; - next; - goto L_teachmore2; - -L_teach_brawling: - mes "[Luca the Hunter]"; - mes "\"Well, yes, I can teach you brawling. It's a nice thing, if you have nothing left but your hands to defend yourself.\""; - next; - mes "He is laughing."; - mes "\"And is handy, if some sapling starts getting naughty.\""; - next; - mes "He raises his hands in front of his face and clenches his fists."; - mes "\"Ok, let's go! Hold your hands like this.\""; - next; - mes "......."; - next; - mes "Some bruises later."; - mes "\"Great! I think, you got it.\""; - next; - set @SUP_id, SKILL_BRAWLING; - set @SUP_lvl, 1; - set @SUP_name$, "Brawling"; - set @SUP_xp, @EXP_BRAWLING; - callfunc "SkillUp"; - goto L_Close; - -L_teach_nothing: - mes "[Luca the Hunter]"; - mes "\"I was able to teach you brawling. For other professions you should visit someone else.\""; - next; - mes "\"You see, I am an adventurer. Everybody has his tricks. But you really should visit someone who is a teacher, not an adventurer, now.\""; - next; - goto L_teachmore2; - -L_Close: - set @SUP_id, 0; - set @SUP_lvl, 0; - set @SUP_name$, ""; - set @SUP_xp, 0; - set @EXP_BRAWLING, 0; - set @answer$, ""; - set @message$, ""; - cleararray @choices[0], 0, 4; - cleararray @choice$[0], "", 4; - set @choice_nr, 0; - set @C_focus, 0; - set @C_unfocus, 0; - set @C_teachbrawling, 0; - set @C_teachnothing, 0; - set @C_explainagain, 0; - set @C_nvm, 0; - set @C_focusoverview, 0; - close; -} diff --git a/world/map/npc/001-1/mapflags.txt b/world/map/npc/001-1/mapflags.txt index 08b77ab5..896cff6a 100644 --- a/world/map/npc/001-1/mapflags.txt +++ b/world/map/npc/001-1/mapflags.txt @@ -1,2 +1,2 @@ 001-1.gat|mapflag|town -001-1.gat|mapflag|resave|001-1,57,71 +001-1.gat|mapflag|resave|001-1,60,105 diff --git a/world/map/npc/001-1/merchant.txt b/world/map/npc/001-1/merchant.txt deleted file mode 100644 index 6205f79a..00000000 --- a/world/map/npc/001-1/merchant.txt +++ /dev/null @@ -1,3 +0,0 @@ -// - -001-1.gat,38,50,0|shop|Neko|101,CactusDrink:*50,CactusPotion:*70,Beer:*175,ChickenLeg:*500 diff --git a/world/map/npc/001-1/mikhail.txt b/world/map/npc/001-1/mikhail.txt deleted file mode 100644 index bc8406fc..00000000 --- a/world/map/npc/001-1/mikhail.txt +++ /dev/null @@ -1,74 +0,0 @@ -// Variables used: nibble 0 of QUEST_SouthTulimshar - -001-1.gat,54,43,0|script|Mikhail|120 -{ - // This NPC previously used the variable TMW_Quest - callfunc "ClearVarTMW_Quest"; - - set @state, ((QUEST_SouthTulimshar & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); - - if (@state >= 6) goto L_Done; - if (@state == 5) goto L_Progress; - if (@state == 4) goto L_Start; - goto L_Convince_Mikhail_First; - -L_Convince_Mikhail_First: - mes "[Mikhail]"; - mes "\"Hello...\""; - mes ""; - mes "It seems that the boy would like to say more, but does not dare to open up to you. Maybe you should help someone else first, so that he sees your intentions are good."; - goto L_Close; - -L_Start: - mes "[Mikhail]"; - mes "\"My grandma sent me to get five Maggot Slimes from the maggots in the desert, but they scare me so bad!\""; - next; - mes "\"You look like a nice person. Would you go get them for me?\""; - menu - "Of course, I'll go get them for you.", L_accept, - "I've got other things to do right now.", L_Close; - -L_accept: - mes "[Mikhail]"; - mes "\"Thank you so much! I'll wait for you here.\""; - set @state, 5; - callsub S_Update_Var; - close; - -L_Progress: - mes "[Mikhail]"; - mes "\"Did you bring me the five Maggot Slimes I need?\""; - next; - menu - "Yes, here they are, kiddo!", L_try, - "Not yet, but I'll be back soon.", L_Close; - -L_try: - if (countitem("MaggotSlime") >= 5) - goto L_get; - mes "[Mikhail]"; - mes "\"It doesn't look like you have them all...\""; - goto L_Close; - -L_get: - delitem "MaggotSlime", 5; - getexp 100, 0; - set @state, 6; - callsub S_Update_Var; - mes "[Mikhail]"; - mes "\"Ooh! Thank you so much! I can get back to my grandma now!\""; - goto L_Close; - -L_Done: - mes "[Mikhail]"; - mes "\"Thanks again for helping me get those Maggot Slimes!\""; - goto L_Close; - -L_Close: - set @state, 0; - close; - -S_Update_Var: - set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_0_MASK) | (@state << NIBBLE_0_SHIFT)); - return; -} diff --git a/world/map/npc/001-1/monster_guide.txt b/world/map/npc/001-1/monster_guide.txt deleted file mode 100644 index 6efa1bcb..00000000 --- a/world/map/npc/001-1/monster_guide.txt +++ /dev/null @@ -1,48 +0,0 @@ -// - -001-1.gat,49,51,0|script|Aidan|102 -{ - if (MPQUEST == 0) - goto L_Register; - mes "[Aidan the Monster Guide]"; - mes "You currently have " +Mobpt+ " Monster Points. These points are acquired while killing monsters"; - close; - -L_Register: - mes "[Aidan the Monster Guide]"; - mes "Oh my, you don't seem to be registered as a Quest Participant. Would you like to register?"; - next; - goto L_Choice; - -L_Choice: - menu - "Register",L_R, - "Not at the moment", - L_N,"Information",L_I; - -L_R: - mes "[Aidan the Monster Guide]"; - mes "Give me a second to look over your paperwork."; - next; - mes "[Monster Guide]"; - mes "Well, looks like you qualify!"; - mes "Welcome to the questing world!"; - set MPQUEST,1; - close; - -L_N: - mes "[Aidan the Monster Guide]"; - mes "Very well, you don't know what you're missing."; - close; - -L_I: - mes "[Aidan the Monster Guide]"; - mes "Here in The Mana World, there are certain rewards for your vanquishing of foes."; - mes "For example, there are Monster Points; every monster you kill has a certain amount of points that get added to your account."; - mes "The more points you have, the more expensive things you can buy using them."; - next; - mes "[Monster Guide]"; - mes "So whaddaya say, sign up won't you?"; - next; - goto L_Choice; -} diff --git a/world/map/npc/001-1/north_shops.txt b/world/map/npc/001-1/north_shops.txt new file mode 100644 index 00000000..a207ccaf --- /dev/null +++ b/world/map/npc/001-1/north_shops.txt @@ -0,0 +1,8 @@ +// Northern shopping plaza +001-1.gat,106,105,0|shop|Neko|101,TonoriDelight:*50,CactusDrink:*50,CactusPotion:*70,RoastedMaggot:*110,Beer:*175,ChickenLeg:*500 +001-1.gat,111,108,0|shop|Inar|108,CottonShirt:*300,SerfHat:*500,CottonShorts:*1000,CottonBoots:*2000,DesertShirt:*2000,CottonHeadband:*3000,DesertHat:*9600 +001-1.gat,48,79,0|script|Well|400 +{ + callfunc "WaterBottle"; + end; +} diff --git a/world/map/npc/001-1/npcs.txt b/world/map/npc/001-1/npcs.txt index 5d59ddd6..add8cd90 100644 --- a/world/map/npc/001-1/npcs.txt +++ b/world/map/npc/001-1/npcs.txt @@ -1,27 +1,76 @@ -// Talk NPCs to help make trek interesting around the Bazaar. +001-1.gat,49,82,0|script|Cyndala|210 +{ + set @npcname$, "Cyndala"; -001-1.gat,46,26,0|script|Yalina|209 + mes "[" + @npcname$ + "]"; + mes "\"I used to visit the beach, but then the green slimes went crazy. I heard they ate a bunch of pirates that robbed some of Tulimshar's gold ships.\""; + next; + mes "\"Good riddance!\""; + set @npcname$, ""; + close; +} +001-1.gat,100,79,0|script|Marikel|211 { - set @npcname$, "Yalina"; + set @npcname$, "Marikel"; mes "[" + @npcname$ + "]"; - mes "\"Ian knows a lot! I had so many questions he helped me with!\""; + mes "\"Working on the docks can be hard nowadays.\""; next; - mes "\"He rewards those that know what they are doing. When Elanore stops healing you, check in with Ian.\""; + mes "\"At least it pays well.\""; + menu + "Why does it pay well?",L_Marikel_1, + "Pfft! Working on the docks is for the birds.",L_Marikel_2; + +L_Marikel_1: + mes "[" + @npcname$ + "]"; + mes "\"Tulimshar is the wealthiest and most powerful city in the world!\""; + close; + +L_Marikel_2: + mes "[" + @npcname$ + "]"; + mes "\"Yeah, killing monsters may pay well, but I'd need more hazard pay than a tower mason to hunt monsters.\""; next; - mes "\"Oh, just one more thing, Gladys may gossip a lot, but when I'm confused, she tends to know something that might help me out.\""; - set @npcname$, ""; + mes "\"I'll just play safe and stick to putting our stock away. Be careful, the monsters outside the city can be dangerous.\""; + next; + mes "\"The Sandstorm mine, just South of Tulimshar, is blocked from most but miners, soldiers and seasoned monster slayers.\""; close; } -001-1.gat,84,72,0|script|Cyndala|210 +001-1.gat,105,53,0|script|Joelin|212 { - set @npcname$, "Cyndala"; + set @npcname$, "Joelin"; mes "[" + @npcname$ + "]"; - mes "\"I used to visit the beach, but then the green slimes went crazy. I heard they ate a bunch of pirates that robbed some of Tulimshar's gold ships.\""; + mes "\"My ship's to set sail soon. We'll tour around the Acean Isles, then back around to Argaes, then here in Tonori.\""; next; - mes "\"Good riddance!\""; + mes "\"Tulimshar's Fleets also are sending exploration teams to build a dock in Nivalis on Kaizei, which I'm not really hoping for. It's cold up there!\""; + close; +} + +001-1.gat,107,53,0|script|Harper|213 +{ + set @npcname$, "Harper"; + + mes "[" + @npcname$ + "]"; + mes "\"My captain knows an awlful lot about the world's continents.\""; + close; +} +001-1.gat,75,99,0|script|Swezanne|206 +{ + set @npcname$, "Swezanne"; + + mes "[" + @npcname$ + "]"; + mes "\"Just through over this bridge is the bazaar. I go to the Bazaar and shop at Neko's.\""; + close; +} +001-1.gat,92,107,0|script|Michel|215 +{ + set @npcname$, "Michel"; + + mes "[" + @npcname$ + "]"; + mes "\"Elanore is a magician in Southern Tulimshar that helps young adventurers by healing their battle wounds. When they are experienced enough, she stops healing them.\""; + next; + mes "\"You can find her by going out the south gate and to the east.\""; set @npcname$, ""; close; } diff --git a/world/map/npc/001-1/rewards_master.txt b/world/map/npc/001-1/rewards_master.txt deleted file mode 100644 index 995704b1..00000000 --- a/world/map/npc/001-1/rewards_master.txt +++ /dev/null @@ -1,151 +0,0 @@ -// - -001-1.gat,50,51,0|script|Ishi|106 -{ - if (MPQUEST == 0) goto L_Register; - if (tvis == 0) set tvis, 1; - if (Mobpt < tvis) goto L_NotEnough; - - setarray @Items$, "AppleCake", "Arrow", "Beer", "Boots", "BugLeg", "CactusDrink", "CactusPotion", "Cake", "Candy", "CasinoCoins", "CherryCake", "ChickenLeg", "ChocolateBar", "ChocolateCake", "CottonBoots", "CottonCloth", "CottonShirt", "CottonShorts", "FancyHat", "GreenApple", "HardSpike", "IronOre", "Lifestone", "LightBlueDye", "MaggotSlime", "Milk", "Orange", "OrangeCake", "OrangeCupcake", "PinkPetal", "PileOfAsh", "PinkAntenna", "PoltergeistPowder", "RawLog", "RedApple", "RedDye", "ScorpionStinger", "SerfHat", "SmallHealingPotion", "SmallMushroom", "SnakeSkin", "SpectrePowder", "Steak", "TinyHealingPotion", "WhiteCake", "WhiteFur", "WispPowder", "YellowDye", "Coal"; - - mes "[Ishi the Rewards Master]"; - mes "\"Welcome! I see you have " + Mobpt + " Monster Points. Would you like to exchange some of those for items?\""; - next; - - set @i, 0; - setarray @Menu$, "", "", "", "", "", "", "", "", "", "", "", ""; - callsub S_prep_menu; - - menu - @Menu$[0], L_MenuItems, - @Menu$[1], L_MenuItems, - @Menu$[2], L_MenuItems, - @Menu$[3], L_MenuItems, - @Menu$[4], L_MenuItems, - @Menu$[5], L_MenuItems, - @Menu$[6], L_MenuItems, - @Menu$[7], L_MenuItems, - @Menu$[8], L_MenuItems, - @Menu$[9], L_MenuItems, - @Menu$[10], L_MenuItems, - @Menu$[11], L_MenuItems; - -L_MenuItems: - // this is for the last entry "No thanks": - if (@menu > @i) goto L_Close; - // this is for the "Give all" entry: - if (@menu == 11) goto L_Give_all; - - set @req, @menu; - set @rec, 0; - goto L_Item_Loop; - -L_Item_Loop: - if (@rec == @req || Mobpt < tvis) goto L_Item_Done; - - callsub S_give_item; - set @rec, @rec + 1; - goto L_Item_Loop; - -L_Item_Done: - if (@rec < @req) mes "It looks like your Monster Points were over estimated."; - goto L_Close; - -L_Register: - mes "[Ishi the Rewards Master]"; - mes "\"Hey, it seems like you didn't register as a quest participant yet! You can sign up with Aidan.\""; - goto L_Close; - -L_NotEnough: - mes "[Ishi the Rewards Master]"; - mes "\"You don't have enough Monster Points for a reward. You'll need to kill some more monsters first.\""; - goto L_Close; - -L_Give_all: - // we need to count how many loop iterations are done there, - // since the server complains about more than 250 (70 according to Jaxad0127) - // gotos without interrupting next statement. - set @gotocounter, 50; - goto L_Give_all_loop; - -L_Give_all_loop: - set @gotocounter, @gotocounter - 1; - if (@gotocounter < 1) goto L_Give_all_next; - set @itemgiveerror, 0; - callsub S_give_item; - if (@itemgiveerror != 0) goto L_Close; - goto L_Give_all_loop; - -L_Give_all_next: - next; - mes "[Ishi the Rewards Master]"; - mes "\"You have received a lot of items. You still have " + Mobpt + " monster points. Shall we continue?\""; - menu - "Yes", L_Give_all, - "No", L_Close; - -L_Close: - set @gotocounter, 0; - set @itemgiveerror, 0; - set @pts, 0; - set @dif, 0; - set @i, 0; - cleararray @Menu$[0], "", 10; - cleararray @Items$[0], "", 10; - close; - -////////////////////////////////////////////////// -// Subroutines -////////////////////////////////////////////////// - -S_prep_menu: - set @pts, Mobpt; - set @dif, tvis; - goto L_Menu_Loop; - -L_Menu_Loop: - if (@pts < @dif || @i == 10) goto L_Menu_Check; - - set @Menu$[@i], @i + 1; - - set @i, @i + 1; - set @pts, @pts - @dif; - set @dif, @dif + 1; - - goto L_Menu_Loop; - -L_Menu_Check: - // if we are able to give 10, we can enable the option to give all we can have - if (@i != 10) goto L_Menu_Done; - set @Menu$[@i], "Please give me as many as I deserve!"; - set @i, @i + 1; - goto L_Menu_Done; - -L_Menu_Done: - set @Menu$[@i], "No thanks"; - return; - -S_give_item: - set @itemgiveerror, 0; - getinventorylist; - if (@inventorylist_count == 100) goto S_give_noinv; - if (Mobpt < tvis) goto S_give_nomobpts; - set Mobpt, Mobpt - tvis; - set tvis, tvis + 1; - set @item$, @Items$[rand(getarraysize(@Items$))]; - - getitem @item$, 1; - - mes "You received one " + getitemname(@item$) + "!"; - return; - -S_give_noinv: - mes "Your inventory is full!"; - set @itemgiveerror, 1; - return; - -S_give_nomobpts: - mes "It looks like your Monster Points were over estimated."; - set @itemgiveerror, 1; - return; -} diff --git a/world/map/npc/001-1/sandra.txt b/world/map/npc/001-1/sandra.txt deleted file mode 100644 index 13ae156b..00000000 --- a/world/map/npc/001-1/sandra.txt +++ /dev/null @@ -1,118 +0,0 @@ -// Variables used: nibble 3 of QUEST_SouthTulimshar - -001-1.gat,110,71,0|script|Sandra|114 -{ - // This NPC previously used the variable TMW_Quest - callfunc "ClearVarTMW_Quest"; - - set @state, ((QUEST_SouthTulimshar & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); - - if (@state >= 2) goto L_Done; - if (@state == 1) goto L_Progress; - - mes "[Sandra]"; - mes "\"Hunting monsters for potion ingredients can sometimes be a difficult task.\""; - next; - - set @TEMP, rand(4); - if(@TEMP == 1) goto L_Opening1; - if(@TEMP == 2) goto L_Opening2; - if(@TEMP == 3) goto L_Opening3; - goto L_Opening0; - -L_Opening0: - mes "\"In the outskirts of Tulimshar, there are some scorpions... I need help! Will you help?\""; - next; - goto L_Ask; - -L_Opening1: - mes "\"When you venture to the outskirts of Tulimshar, you can spot scorpions. Will you help me kill some?\""; - next; - goto L_Ask; - -L_Opening2: - mes "\"The Scorpion Stinger carries many properties used in potions. Would you get some for me?\""; - next; - goto L_Ask; - -L_Opening3: - mes "\"You look sturdy enough, will you help me get something?\""; - next; - goto L_Ask; - -L_Ask: - menu - "Yes.", L_Yes, - "No.", L_Close; - -L_Yes: - set @TEMP, rand(3); - if(@TEMP == 1) goto L_Req1; - if(@TEMP == 2) goto L_Req2; - goto L_Req0; - -L_Req0: - mes "[Sandra]"; - mes "\"I need 5 Scorpion Stingers.\""; - next; - goto L_Set; - -L_Req1: - mes "[Sandra]"; - mes "\"I heard a while ago that stingers from scorpions can be used for medical purposes. I need you to help me get 5 Scorpion Stingers.\""; - next; - goto L_Set; - -L_Req2: - mes "[Sandra]"; - mes "\"Bring me 5 Scorpion Stingers. I'll give you something if you do!\""; - next; - goto L_Set; - -L_Set: - set @state, 1; - callsub S_Update_Var; - mes "\"Please get them for me!\""; - goto L_Close; - -L_Progress: - if (countitem("ScorpionStinger") < 5) - goto L_NotEnough; - mes "[Sandra]"; - mes "\"Excellent! You brought me 5 Scorpion Stingers!"; - mes "Here's something for you.\""; - getinventorylist; - if (@inventorylist_count + (countitem("ScorpionStinger") == 5) - (countitem("Arrow") == 0) > 99) - goto L_TooMany; - delitem "ScorpionStinger", 5; - getitem "Bow", 1; - getitem "Arrow", 100; - set @state, 2; - callsub S_Update_Var; - goto L_Close; - -L_NotEnough: - mes "[Sandra]"; - mes "\"Please hurry and bring me 5 Scorpion Stingers.\""; - goto L_Close; - -L_Done: - mes "[Sandra]"; - mes "\"Thank you for all your help!\""; - goto L_Close; - -L_Close: - set @TEMP, 0; - set @state, 0; - close; - -L_TooMany: - next; - mes "[Sandra]"; - mes "\"You don't have room for my reward. I'll wait until you do.\""; - goto L_Close; - -S_Update_Var: - set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_3_MASK) | (@state << NIBBLE_3_SHIFT)); - return; -} diff --git a/world/map/npc/001-1/sarah.txt b/world/map/npc/001-1/sarah.txt deleted file mode 100644 index a355684a..00000000 --- a/world/map/npc/001-1/sarah.txt +++ /dev/null @@ -1,88 +0,0 @@ -// Variables used: nibble 1 of QUEST_SouthTulimshar - -001-1.gat,137,78,0|script|Sarah|106 -{ - // This NPC previously used the variable TMW_Quest - callfunc "ClearVarTMW_Quest"; - - set @state, ((QUEST_SouthTulimshar & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT); - - if (@state >= 2) goto L_Done; - if (@state == 1) goto L_Progress; - - mes "[Sarah]"; - mes "\"Boy, am I hungry or what!\""; - next; - - set @TEMP, rand(2); - if(@TEMP == 1) goto L_Opening1; - goto L_Opening0; - -L_Opening0: - mes "\"Cherry Cake is the best!\""; - next; - goto L_Ask; - -L_Opening1: - mes "\"Mmm, Cherry Cake... I love it!\""; - next; - goto L_Ask; - -L_Ask: - mes "\"Can you bring me a piece of Cherry Cake? Pretty please?\""; - menu - "Yes.", L_Req0, - "No.", L_Close; - -L_Req0: - mes "[Sarah]"; - mes "\"Yippee! Bring me a piece of Cherry Cake, and I'll give you a nice hat!\""; - next; - set @state, 1; - callsub S_Update_Var; - mes "[Sarah]"; - mes "\"Please bring it to me!\""; - goto L_Close; - -L_Progress: - if (countitem("CherryCake") < 1) - goto L_NotEnough; - mes "[Sarah]"; - mes "\"Whee!\""; - next; - mes "You brought me Cherry Cake! Here is your new hat, as promised.\""; - emotion EMOTE_TONGUE; - getinventorylist; - if ((@inventorylist_count - (countitem("CherryCake") == 1)) > 99) goto L_TooMany; - delitem "CherryCake", 1; - getitem "SerfHat", 1; - set @state, 2; - callsub S_Update_Var; - goto L_Close; - -L_NotEnough: - mes "[Sarah]"; - mes "\"Oh, I'm starving! Please bring me Cherry Cake!\""; - goto L_Close; - -L_Done: - mes "[Sarah]"; - mes "\"It was so tasty, I can't eat anything more... Thank you!\""; - emotion EMOTE_TONGUE; - goto L_Close; - -L_Close: - set @TEMP, 0; - set @state, 0; - close; - -L_TooMany: - next; - mes "[Sarah]"; - mes "\"You don't have room for my reward. I'll wait until you do.\""; - goto L_Close; - -S_Update_Var: - set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_1_MASK) | (@state << NIBBLE_1_SHIFT)); - return; -} diff --git a/world/map/npc/001-1/sewer_east.txt b/world/map/npc/001-1/sewer_east.txt new file mode 100644 index 00000000..2b1e7bc4 --- /dev/null +++ b/world/map/npc/001-1/sewer_east.txt @@ -0,0 +1,17 @@ +// The Sewer Grate + +001-1.gat,117,110,0|script|#tulimsharsewer2|45,0,0 +{ + mes "Descend into the sewers?"; + next; + menu + "Yes.", L_Sewer, + "Nevermind.", L_Close; + +L_Sewer: + warp "021-3",143,129; + goto L_Close; + +L_Close: + close; +} diff --git a/world/map/npc/001-1/sewer_north.txt b/world/map/npc/001-1/sewer_north.txt new file mode 100644 index 00000000..ce33cca3 --- /dev/null +++ b/world/map/npc/001-1/sewer_north.txt @@ -0,0 +1,17 @@ +// The Sewer Grate + +001-1.gat,58,83,0|script|#tulimsharsewer1|45,0,0 +{ + mes "Descend into the sewers?"; + next; + menu + "Yes.", L_Sewer, + "Nevermind.", L_Close; + +L_Sewer: + warp "021-3",57,100; + goto L_Close; + +L_Close: + close; +} diff --git a/world/map/npc/001-1/soul-menhir.txt b/world/map/npc/001-1/soul-menhir.txt deleted file mode 100644 index 792f256e..00000000 --- a/world/map/npc/001-1/soul-menhir.txt +++ /dev/null @@ -1,18 +0,0 @@ -// - -001-1.gat,38,69,0|script|Soul Menhir#tulimshar|345 -{ - callfunc "ClearVariables"; - set @map$, "001-1.gat"; - setarray @Xs, 37, 38, 39, 37, 39, 37, 39; - setarray @Ys, 68, 68, 68, 69, 69, 70, 70; - set @x, 0; - set @y, 0; - callfunc "SoulMenhir"; - set @map$, ""; - cleararray @Xs[0], 0, 7; - cleararray @Ys[0], 0, 7; - set @x, 0; - set @y, 0; - close; -} diff --git a/world/map/npc/001-1/stat_reset.txt b/world/map/npc/001-1/stat_reset.txt new file mode 100644 index 00000000..61d1328b --- /dev/null +++ b/world/map/npc/001-1/stat_reset.txt @@ -0,0 +1,8 @@ +// + +001-1.gat,117,105,0|script|Malivox|103 +{ + set @NpcName$, "Malivox"; + callfunc "StatReset"; + close; +} diff --git a/world/map/npc/001-1/tinris.txt b/world/map/npc/001-1/tinris.txt new file mode 100644 index 00000000..c2b52d85 --- /dev/null +++ b/world/map/npc/001-1/tinris.txt @@ -0,0 +1,219 @@ +// Anwar needs a magic fertilizer for his field +// Quest uses Nibble 3 of QUEST_NorthTulimshar +// Author: Jenalya +// state 1: Anwar sent to Tinris for help to get a magic fertilizer +// state 2: Tinris asked for chocolate cake as present for his girlfriend +// state 3: Tinris asked for ingredients for the fertilizer +// state 4: Tinris gave you the fertilizer +// state 5: Anwar tried it out and it doesn't work well, sent you back to Tinris +// state 6: Tinris asked for more ingredients for a new try +// state 7: Tinris says it's really hard, gives you the fertilizer and tells you to ask Eomie to cast a spell on it +// state 8: Eomie sends you to get some stuff so she can interrupt her spell on the spot of grass +// state 9: Eomie casted a spell on the fertilizer +// state 10: Anwar used it and it worked. he asks you to help him preparing a thank-you-gift for each Tinris and Eomis +// state 11: Anwar asked to bring present to Tinris +// state 12: gave present to Tinris +// state 13: Anwar asked to bring present to Eomie +// state 14: gave present to Eomie +// state 15: reported back to Anwar and done + +001-1.gat,69,29,0|script|Tinris|160 +{ + set @state, ((QUEST_NorthTulimshar & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); + + set @cake_exp, 50; + set @sweater_exp, 400; + + set @slime_amount1, 6; + set @slime_amount2, 4; + set @bugleg_amount1, 4; + set @bugleg_amount2, 5; + set @stinger_amount1, 3; + set @stinger_amount2, 2; + set @ash_amount1, 1; + set @ash_amount2, 2; + set @cactusp_amount, 1; + + if (@state >= 12) goto L_Done; + if (@state == 11) goto L_GiveGift; + if (@state == 9) goto L_FertilizerDone; + if (@state >= 7) goto L_Eomie; + if (@state == 6) goto L_SecondTry; + if (@state >= 4) goto L_FirstTryDone; + if (@state == 3) goto L_FirstTry; + if (@state == 2) goto L_Annual; + + mes "[Tinris]"; + mes "\"This is a magic school. I'm a student here and focus on ways to magically enhance growth of plants."; + mes "That topic is very important in a desert area.\""; + if (@state != 1) + goto L_Close; + menu + "The farmer Anwar sent me to ask for exactly that! Can you give me something for his field?",L_Next; + +L_Next: + mes "[Tinris]"; + mes "\"Well... in principle yes. I can try to prepare something for him. But...\""; + next; + mes "\"The thing is, my girlfriend and I have our anniversary today. And the teachers won't let me leave the campus to get something for her!"; + mes "Please go to the bakery and buy a Chocolate Cake for me. She loves Chocolate Cakes.\""; + next; + mes "\"When I have a present for her I can focus on creating some magic fertilizer.\""; + set @state, 2; + callsub S_Update_Mask; + goto L_Close; + +L_Annual: // @state == 2 + mes "[Tinris]"; + mes "\"Hello, did you get the Chocolate Cake for my girlfriend? After that I can focus on creating some magic fertilizer for you.\""; + menu + "Fresh from the bakery!",L_FreshFrom, + "I didn't get it yet.",L_Close; + +L_FreshFrom: + if (countitem("ChocolateCake") < 1) + goto L_NoItem; + delitem "ChocolateCake", 1; + getexp @cake_exp, 0; + set @state, 3; + callsub S_Update_Mask; + mes "[Tinris]"; + mes "\"Oh, thank you! You saved me!"; + mes "All right, now we can start with the magic fertilizer.\""; + next; + goto L_FirstTry; + +L_FirstTry: + // @state == 3 + mes "[Tinris]"; + mes "\"You need to bring me some ingredients."; + mes "The ingredients are " + @slime_amount1 + " Maggot Slimes, " + @bugleg_amount1 + " Bug Legs, " + @stinger_amount1 + " Scorpion Stingers and " + @ash_amount1 + " Piles of Ash.\""; + menu + "I have it.",L_Continue, + "Ok, I'll go and get it.",L_Close; + +L_Continue: + if ((countitem("MaggotSlime") < @slime_amount1) || (countitem("BugLeg") < @bugleg_amount1) || (countitem("ScorpionStinger") < @stinger_amount1) || (countitem("PileOfAsh") < @ash_amount1)) + goto L_NoItem; + delitem "MaggotSlime", @slime_amount1; + delitem "BugLeg", @bugleg_amount1; + delitem "ScorpionStinger", @stinger_amount1; + delitem "PileOfAsh", @ash_amount1; + set @state, 4; + callsub S_Update_Mask; + mes "Tinris takes the things and starts to mix them together while mumbling some invocations."; + misceffect sfx_magic_nature; + next; + mes "[Tinris]"; + mes "\"Ok. This should do it. But I'm not sure. I'm still researching this topic."; + mes "Here, bring this to Anwar.\""; + mes "He gives you a bottle with the magic fertilizer. You put it away in a separate pocket, so it doesn't get mixed with your inventory."; + goto L_Close; + +L_FirstTryDone: // @state >= 4 but below 6 + mes "[Tinris]"; + mes "\"Bring the fertilizer to Anwar and let me know if it worked.\""; + if (@state != 5) + goto L_Close; + menu + "I did, the plants went brown and shriveled.",L_More; + +L_More: + set @state, 6; + callsub S_Update_Mask; + goto L_SecondTry; + +L_SecondTry: + // @state == 6 + mes "[Tinris]"; + mes "\"Oh no! All right, we need to do another try."; + mes "Bring me " + @slime_amount2 + " Maggot Slimes, " + @bugleg_amount2 + " Bug Legs, " + @stinger_amount2 + " Scorpion Stingers, " + @ash_amount2 + " Piles of Ash and " + @cactusp_amount + " Cactus Potion.\""; + menu + "Here it is.",L_HereItIs, + "Ok, I'll go and get it.",L_Close; + +L_HereItIs: + if ((countitem("MaggotSlime") < @slime_amount2) || (countitem("BugLeg") < @bugleg_amount2) || (countitem("ScorpionStinger") < @stinger_amount2) || (countitem("PileOfAsh") < @ash_amount2) || (countitem("CactusPotion") < @cactusp_amount)) + goto L_NoItem; + delitem "MaggotSlime", @slime_amount2; + delitem "BugLeg", @bugleg_amount2; + delitem "ScorpionStinger", @stinger_amount2; + delitem "PileOfAsh", @ash_amount2; + delitem "CactusPotion", @cactusp_amount; + set @state, 7; + callsub S_Update_Mask; + mes "Tinris takes the things and starts to mix and mumble again."; + misceffect sfx_magic_nature; + next; + mes "It takes quite a while."; + next; + mes "He looks rather stressed while working on the mixture."; + next; + mes "He sighs."; + mes "[Tinris]"; + mes "\"Mh, I think the mixture itself is good. But I can't get the spells right. Maybe you should ask Professor Eomie to cast it; she's a genius with nature magic.\""; + mes "He gives you the bottle with the magic fertilizer."; + goto L_Close; + +L_Eomie: + // @state >= 7 but below 9 + mes "[Tinris]"; + mes "\"I did the best I could, but it seems I'm not experienced enough to cast the spells correctly. Better ask Professor Eomie for help.\""; + goto L_Close; + +L_FertilizerDone: + // @state == 9 + mes "[Tinris]"; + mes "\"I heard Eomie cast the spell? I really hope it'll work this time. Bring the magic fertilizer to Anwar now.\""; + goto L_Close; + +L_GiveGift: + // @state == 11 + mes "[Tinris]"; + mes "\"Ah, did Anwar try the new fertilizer?\""; + menu + "Yes, it works great and he asked me to give you this Green V-Neck Sweater he made.",L_ItWorksGreat, + "Not yet.",L_Close; + +L_ItWorksGreat: + if (countitem("GreenVNeckSweater") < 1) + goto L_NoItem; + delitem "GreenVNeckSweater", 1; + getexp @sweater_exp, 0; + set @state, 12; + callsub S_Update_Mask; + mes "[Tinris]"; + mes "\"Hey, that's really nice. Tell him my thanks.\""; + goto L_Close; + +L_Done: + // @state >= 12 + mes "[Tinris]"; + mes "\"My girlfriend was delighted with the Chocolate Cake and Professor Eomie was happy with my work on the magic fertilizer.\""; + mes "He twinkles."; + mes "[Tinris]"; + mes "\"We're a good team.\""; + goto L_Close; + +L_NoItem: + mes "[Tinris]"; + mes "\"You don't have it!\""; + goto L_Close; + +L_Close: + set @state, 0; + set @slime_amount1, 0; + set @slime_amount2, 0; + set @bugleg_amount1, 0; + set @bugleg_amount2, 0; + set @stinger_amount1, 0; + set @stinger_amount2, 0; + set @ash_amount1, 0; + set @ash_amount2, 0; + set @cactusp_amount, 0; + close; + +S_Update_Mask: + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_3_MASK)) | (@state << NIBBLE_3_SHIFT); + return; +} diff --git a/world/map/npc/001-1/tombstones.txt b/world/map/npc/001-1/tombstones.txt new file mode 100644 index 00000000..2dfd3178 --- /dev/null +++ b/world/map/npc/001-1/tombstones.txt @@ -0,0 +1,76 @@ +// RIPs in Noble memorial + +001-1.gat,56,103,0|script|RIP#1|400 +{ + + mes "~ wushin ~"; + mes "Tonori swallowed him whole."; + close; +} + +001-1.gat,57,103,0|script|RIP#2|400 +{ + + mes "~ Nard ~"; + mes "Crushed by a loom."; + close; +} + +001-1.gat,58,103,0|script|RIP#3|400 +{ + + mes "~ tux9th ~"; + mes "Eaten by bugs."; + close; +} + +001-1.gat,59,103,0|script|RIP#4|400 +{ + + mes "~ o11c ~"; + mes "He asked for it. So they gave it to him."; + close; +} + +001-1.gat,60,103,0|script|RIP#5|400 +{ + + mes "~ " + strcharinfo(0) + " ~"; + mes "The tombstone is blank and the grave freshly dug."; + close; +} +001-1.gat,56,106,0|script|RIP#6|400 +{ + + mes "~ Cassy ~"; + mes "Eaten by trolls."; + close; +} + +001-1.gat,57,106,0|script|RIP#7|400 +{ + mes "~ George ~"; + mes "Eaten by Snakes."; + close; +} + +001-1.gat,58,106,0|script|RIP#8|400 +{ + mes "~ Kieron ~"; + mes "He was right, monsters were in the cave."; + close; +} + +001-1.gat,59,106,0|script|RIP#9|400 +{ + mes "~ William ~"; + mes "Kieron was definitely right."; + close; +} + +001-1.gat,60,106,0|script|RIP#10|400 +{ + mes "~ Tyer ~"; + mes "An experiement went wrong."; + close; +} diff --git a/world/map/npc/001-1/trader.txt b/world/map/npc/001-1/trader.txt deleted file mode 100644 index c4c9fd12..00000000 --- a/world/map/npc/001-1/trader.txt +++ /dev/null @@ -1,155 +0,0 @@ -// Teaches Trading skill -// Offers item conversion for non-magic users -// Updated by: TheKandiman -// Reviewed by: Wombat - -001-1.gat,57,31,0|script|Trader|115 -{ - set @Ironprice, 1000; - set @Sulphurprice, 1200; - set @Potionprice, 500; - if (BaseLevel >= 25) goto L_Trade; - - mes "[Trader]"; - mes "\"Hello. I came here to trade wares with the people of Tulimshar. Unfortunately for you, I've traded everything I had.\""; - next; - menu - "Oh. I'll go then.", L_Close, - "You don't have anything?", L_More; - -L_More: - mes "[Trader]"; - mes "\"No. I have nothing for you. Except...\""; - next; - menu - "Yes?", L_Except, - "Ok then.", L_Close; - -L_Except: - mes "[Trader]"; - mes "\"I could teach you how to trade. It'll cost you 2GP.\""; - next; - menu - "Sure.", L_Teach, - "No thank you.", L_Close; - -L_Teach: - if (Zeny < 5) goto L_NotEnoughMoney; - set Zeny, Zeny - 2; - mes "[Trader]"; - mes "\"You can initiate trade with someone by right-clicking on them and choosing trade."; - mes "You'll both add the items and set the GP you're putting up then press propose trade."; - mes "After both parties have proposed their side, you can both review the trade, and then accept or reject by closing the window.\""; - next; - mes "[Trader]"; - mes "\"Items added to the trade cannot be removed, and so mistakes have to be dealt with by canceling the trade."; - mes "You need to press the change button to let the other person know about GP changes.\""; - next; - goto L_Later; - -L_Later: - mes "[Trader]"; - mes "\"Please feel free to check back later. I'm expecting a large shipment of goods to trade.\""; - goto L_Close; - -L_Trade: - mes "[Trader]"; - mes "\"Welcome back! My shipment came in and I have a bunch of things that I can trade now. What would you like?\""; - goto L_Trademenu; - -L_Trademenu: - menu - "Do you have Iron Powder?", L_Iron, - "How about Sulphur Powder?", L_Sulphur, - "I need Medium Healing Potions.", L_Healpots, - "I think I have everything I need, thanks.", L_Close; - -L_Iron: - mes "[Trader]"; - mes "\"I do have a few of those. I will give you 4 Iron Powders for 1 Iron Ore and " + @Ironprice + "gp.\""; - menu - "Sure.", L_Ipowder, - "What a ripoff! No way!", L_Close; - -L_Sulphur: - mes "[Trader]"; - mes "\"I can trade you 5 Sulphur Powders for 1 Pile of Ash and " + @Sulphurprice + "gp.\""; - menu - "Here you go.", L_Spowder, - "Are you nuts?! Forget it!", L_Close; - -L_Healpots: - mes "[Trader]"; - mes "\"Healing potions are always useful, but I rarely need anything larger than the small ones. I will happily trade you 1 Medium Healing Potion for 3 Small Healing Potions and " + @Potionprice + "gp.\""; - menu - "Alright.", L_Pots, - "Whoa, that's way too much.", L_Close; - -L_Ipowder: - if (countitem("IronOre") < 1) goto L_Missing; - if (Zeny < @Ironprice) goto L_NotEnoughMoney; - getinventorylist; - if (@inventorylist_count == 100 && countitem("IronOre") > 1 && countitem("IronPowder") < 1) goto L_Full; - delitem "IronOre", 1; - set Zeny, Zeny - @Ironprice; - getitem "IronPowder", 4; - mes "[Trader]"; - mes "\"There you go. Would you like to trade anything else?\""; - menu - "Yes.", L_Trademenu, - "No.", L_No; - -L_Spowder: - if (countitem("PileOfAsh") < 1) goto L_Missing; - if (Zeny < @Sulphurprice) goto L_NotEnoughMoney; - getinventorylist; - if (@inventorylist_count == 100 && countitem("PileOfAsh") > 1 && countitem("SulphurPowder") < 1) goto L_Full; - delitem "PileOfAsh", 1; - set Zeny, Zeny - @Sulphurprice; - getitem "SulphurPowder", 5; - mes "[Trader]"; - mes "\"There you go. Would you like to trade anything else?\""; - menu - "Yes.", L_Trademenu, - "No.", L_No; - -L_Pots: - if (countitem("SmallHealingPotion") < 3) goto L_Missing; - if (Zeny < @Potionprice) goto L_NotEnoughMoney; - getinventorylist; - if (@inventorylist_count == 100 && countitem("SmallHealingPotion") > 3 && countitem("MediumHealingPotion") < 1) goto L_Full; - delitem "SmallHealingPotion", 3; - set Zeny, Zeny - @Potionprice; - getitem "MediumHealingPotion", 1; - mes "[Trader]"; - mes "\"There you go. Would you like to trade anything else?\""; - menu - "Yes.", L_Trademenu, - "No.", L_No; - -L_Full: - mes "[Trader]"; - mes "\"You must have been making a lot of trades...your bag is completely full! Come back after you've made some room.\""; - goto L_Close; - -L_Missing: - mes "[Trader]"; - mes "\"It looks like you're missing some items. Please come back when you have enough to trade.\""; - goto L_Close; - -L_NotEnoughMoney: - mes "[Trader]"; - mes "\"You don't have enough money.\""; - goto L_Close; - -L_No: - mes "[Trader]"; - mes "\"Have a great day!\""; - goto L_Close; - -L_Close: - set @Ironprice, 0; - set @Sulphurprice, 0; - set @Potionprice, 0; - close; -} diff --git a/world/map/npc/001-1/traveler.txt b/world/map/npc/001-1/traveler.txt deleted file mode 100644 index e91da7c0..00000000 --- a/world/map/npc/001-1/traveler.txt +++ /dev/null @@ -1,11 +0,0 @@ -// This is a teleportation (warp) NPC. Its purpose is to offer expensive, fast trips throughout the world. -// Author: Wombat, wushin -// cost depending on level and adapted to new scripting guidelines: Jenalya - -001-1.gat,39,67,0|script|Nina the Traveler|103 -{ - set @NpcName$, "Nina"; - set @NpcTravelBit, $@tulimshar_bit; - callfunc "Traveler"; - end; -} diff --git a/world/map/npc/001-1/vincent.txt b/world/map/npc/001-1/vincent.txt deleted file mode 100644 index 9f342d94..00000000 --- a/world/map/npc/001-1/vincent.txt +++ /dev/null @@ -1,128 +0,0 @@ -// Variables used: nibble 2 of QUEST_SouthTulimshar - -001-1.gat,135,42,0|script|Vincent|113 -{ - // This NPC previously used the variable TMW_Quest - callfunc "ClearVarTMW_Quest"; - set @halloween_npc_id, $@halloween_npc_vincent; - callfunc "TrickOrTreat"; - - set @state, ((QUEST_SouthTulimshar & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); - - if (@state >= 2) goto L_Done; - if (@state == 1) goto L_Progress; - goto L_Convince_Vincent_First; - -L_Convince_Vincent_First: - mes "[Vincent]"; - mes "\"I'm making an action figure. I'm almost done with it.\""; - next; - - set @TEMP, rand(4); - if(@TEMP == 1) goto L_Opening2; - if(@TEMP == 2) goto L_Opening3; - if(@TEMP == 3) goto L_Opening4; - goto L_Opening1; - -L_Opening1: - mes "\"I just need 10 more Bug Legs to finish my action figure!\""; - next; - goto L_Ask; - -L_Opening2: - mes "\"This maggot action figure is awesome! I just need to attach 10 Bug Legs.\""; - next; - goto L_Ask; - -L_Opening3: - mes "\"This is a great action figure! A must have! All I need is a few parts...\""; - next; - goto L_Ask; - -L_Opening4: - mes "\"Can you get me 10 Bug Legs? I need them to replace the action figure parts.\""; - next; - goto L_Ask; - -L_Ask: - mes "\"Will you help me find 10 Bug Legs?\""; - next; - menu - "Yes.", L_Sure, - "No.", L_Close; - -L_Sure: - set @state, 1; - callsub S_Update_Var; - set @TEMP, rand(4); - if(@TEMP == 1) goto L_Req2; - if(@TEMP == 2) goto L_Req3; - if(@TEMP == 3) goto L_Req4; - goto L_Req1; - -L_Req1: - mes "[Vincent]"; - mes "\"Thank you!\""; - next; - goto L_Wait; - -L_Req2: - mes "[Vincent]"; - mes "\"I don't know how to thank you enough!\""; - next; - goto L_Wait; - -L_Req3: - mes "[Vincent]"; - mes "\"I will thank you when I get them!\""; - next; - goto L_Wait; - -L_Req4: - mes "[Vincent]"; - mes "\"I'm sure I will give a small reward.\""; - next; - goto L_Wait; - -L_Wait: - mes "\"Now please go get me 10 Bug Legs.\""; - goto L_Close; - -L_Progress: - if(countitem("BugLeg") >= 10) - goto L_Have; - mes "[Vincent]"; - mes "\"Please help me collect 10 Bug Legs! I need them to complete my action figure.\""; - goto L_Close; - -L_Have: - mes "[Vincent]"; - mes "\"Excellent! Finally I can complete the model!!\""; - next; - if(countitem("BugLeg") < 10) - goto L_Progress; - delitem "BugLeg", 10; - set Zeny, Zeny + 1000; - set @state, 2; - callsub S_Update_Var; - - mes "[Vincent]"; - mes "\"Here you go, a little of my appreciation!\""; - mes ""; - mes "[1000 gold]"; - goto L_Close; - -L_Done: - mes "[Vincent]"; - mes "\"Thanks for your help!\""; - goto L_Close; - -L_Close: - set @TEMP, 0; - set @state, 0; - close; - -S_Update_Var: - set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_2_MASK) | (@state << NIBBLE_2_SHIFT)); - return; -} diff --git a/world/map/npc/001-1/weellos.txt b/world/map/npc/001-1/weellos.txt new file mode 100644 index 00000000..7400402a --- /dev/null +++ b/world/map/npc/001-1/weellos.txt @@ -0,0 +1,40 @@ +// A historian +// takes part in quest given by 021-2/kylian.txt + +001-1.gat,55,25,0|script|Weellos|103 +{ + set @halloween_npc_id, $@halloween_npc_weellos; + callfunc "TrickOrTreat"; + + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@knowWeellosNT; + set @kylian, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); + + if isin("001-1.gat", 48, 20, 61, 28) goto L_In; + + mes "[Weellos]"; + mes "\"This is a very historic building. One of the oldest in the area.\""; + next; + mes "\"It's the current seat of the council of wizards.\""; + next; + mes "\"It's also holds the Magic Institute of Tulimshar.\""; + next; + mes "\"Part of It's been turned into a museum as well\""; + goto L_BeforeClose; + +// If the player is inside the fence with Weellos +L_In: + mes "[Weellos]"; + mes "\"What did you think of the historic building?\""; + goto L_BeforeClose; + +L_BeforeClose: + if (@kylian != 4) + goto L_Close; + next; + mes "You wonder if Kylian would be interested to see this building."; + goto L_Close; + +L_Close: + set @kylian, 0; + close; +} diff --git a/world/map/npc/002-1/_import.txt b/world/map/npc/002-1/_import.txt index bb56994f..a3f95fc6 100644 --- a/world/map/npc/002-1/_import.txt +++ b/world/map/npc/002-1/_import.txt @@ -1,10 +1,22 @@ -// Map 002-1: Sandstorm Desert +// Map 002-1: Tulimshar South // This file is generated automatically. All manually changes will be removed when running the Converter. map: 002-1.gat npc: npc/002-1/_mobs.txt npc: npc/002-1/_warps.txt +npc: npc/002-1/anwar.txt +npc: npc/002-1/bard.txt +npc: npc/002-1/dock.txt +npc: npc/002-1/elanore.txt +npc: npc/002-1/gaurds.txt +npc: npc/002-1/itka.txt npc: npc/002-1/lieutenant_dausen.txt +npc: npc/002-1/luca.txt npc: npc/002-1/mapflags.txt +npc: npc/002-1/mine_debug.txt npc: npc/002-1/nickos.txt npc: npc/002-1/nomads.txt +npc: npc/002-1/npcs.txt +npc: npc/002-1/sarah.txt +npc: npc/002-1/soul-menhir.txt npc: npc/002-1/stewen.txt +npc: npc/002-1/traveler.txt diff --git a/world/map/npc/002-1/_mobs.txt b/world/map/npc/002-1/_mobs.txt index e795040e..02f897df 100644 --- a/world/map/npc/002-1/_mobs.txt +++ b/world/map/npc/002-1/_mobs.txt @@ -1,20 +1,19 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. -// Sandstorm Desert mobs - -002-1.gat,0,0,0,0|monster|Maggot|1002,20,1000ms,500ms,Mob002-1::On1002 -002-1.gat,95,97,16,9|monster|Maggot|1002,10,100000ms,30000ms,Mob002-1::On1002 -002-1.gat,94,35,11,4|monster|Maggot|1002,3,100000ms,30000ms,Mob002-1::On1002 -002-1.gat,68,59,7,6|monster|Maggot|1002,3,100000ms,30000ms,Mob002-1::On1002 -002-1.gat,57,86,15,8|monster|Maggot|1002,3,100000ms,30000ms,Mob002-1::On1002 -002-1.gat,27,85,7,8|monster|Maggot|1002,3,100000ms,30000ms,Mob002-1::On1002 -002-1.gat,44,35,3,2|monster|Maggot|1002,3,100000ms,30000ms,Mob002-1::On1002 -002-1.gat,38,29,3,2|monster|Maggot|1002,3,100000ms,30000ms,Mob002-1::On1002 -002-1.gat,62,91,24,6|monster|Maggot|1002,3,100000ms,30000ms,Mob002-1::On1002 -002-1.gat,60,73,38,40|monster|FireGoblin|1011,15,100000ms,30000ms,Mob002-1::On1011 -002-1.gat,82,24,34,15|monster|Scorpion|1003,8,100000ms,30000ms,Mob002-1::On1003 -002-1.gat,32,35,34,33|monster|Scorpion|1003,8,100000ms,30000ms,Mob002-1::On1003 -002-1.gat,26,73,20,24|monster|Scorpion|1003,8,100000ms,30000ms,Mob002-1::On1003 -002-1.gat,95,75,15,17|monster|BlackScorpion|1009,1,100000ms,1800000ms,Mob002-1::On1009 +// Tulimshar South mobs + +002-1.gat,93,62,24,9|monster|Maggot|1002,11,100000ms,30000ms,Mob002-1::On1002 +002-1.gat,112,62,11,9|monster|Maggot|1002,11,100000ms,30000ms,Mob002-1::On1002 +002-1.gat,108,73,11,9|monster|Maggot|1002,11,100000ms,30000ms,Mob002-1::On1002 +002-1.gat,62,28,3,15|monster|Maggot|1002,6,100000ms,30000ms,Mob002-1::On1002 +002-1.gat,74,96,24,33|monster|Scorpion|1003,12,100000ms,30000ms,Mob002-1::On1003 +002-1.gat,113,114,10,7|monster|Maggot|1002,11,100000ms,30000ms,Mob002-1::On1002 +002-1.gat,43,61,10,70|monster|Scorpion|1003,6,100000ms,30000ms,Mob002-1::On1003 +002-1.gat,70,92,49,19|monster|Scorpion|1003,10,100000ms,30000ms,Mob002-1::On1003 +002-1.gat,40,93,19,20|monster|RedScorpion|1004,10,100000ms,30000ms,Mob002-1::On1004 +002-1.gat,42,40,8,29|monster|SeaSlime|1033,8,100000ms,30000ms,Mob002-1::On1033 +002-1.gat,33,75,9,40|monster|SeaSlime|1033,8,100000ms,30000ms,Mob002-1::On1033 +002-1.gat,99,62,37,9|monster|Scorpion|1003,6,100000ms,30000ms,Mob002-1::On1003 +002-1.gat,73,105,20,21|monster|FireGoblin|1011,6,100000ms,30000ms,Mob002-1::On1011 002-1.gat,0,0,0|script|Mob002-1|-1 @@ -31,8 +30,8 @@ On1003: callfunc "MobPoints"; end; -On1009: - set @mobID, 1009; +On1004: + set @mobID, 1004; callfunc "MobPoints"; end; @@ -40,4 +39,9 @@ On1011: set @mobID, 1011; callfunc "MobPoints"; end; + +On1033: + set @mobID, 1033; + callfunc "MobPoints"; + end; } diff --git a/world/map/npc/002-1/_warps.txt b/world/map/npc/002-1/_warps.txt index f201c926..de28087f 100644 --- a/world/map/npc/002-1/_warps.txt +++ b/world/map/npc/002-1/_warps.txt @@ -1,10 +1,19 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. -// Sandstorm Desert warps +// Tulimshar South warps -002-1.gat,58,13|warp|To South Tulimshar|3,-1,001-1.gat,44,86 -002-1.gat,79,99|warp|To Desert Mine Camp|-1,-1,002-3.gat,85,49 -002-1.gat,20,94|warp|To Desert Mine Camp|-1,-1,002-3.gat,51,33 -002-1.gat,104,92|warp|To Mystics House|-1,-1,002-2.gat,28,29 -002-1.gat,108,79|warp|To Snake Desert|-1,1,005-1.gat,20,40 -002-1.gat,12,67|warp|To Beach|-1,3,003-1.gat,171,76 -002-1.gat,28,13|warp|To Beach|1,-1,004-1.gat,84,114 +002-1.gat,63,20|warp|North Tulimshar|3,-1,001-1.gat,63,118 +002-1.gat,103,20|warp|North Tulimshar|3,-1,001-1.gat,103,118 +002-1.gat,119,95|warp|To Snake Desert|-1,1,006-1.gat,21,47 +002-1.gat,92,114|warp|To Desert Mine Camp|-1,-1,002-3.gat,85,49 +002-1.gat,33,109|warp|To Desert Mine Camp|-1,-1,002-3.gat,51,35 +002-1.gat,109,45|warp|To Weavers Shop|-1,-1,002-2.gat,75,100 +002-1.gat,115,45|warp|To Weavers Shop|-1,-1,002-2.gat,83,100 +002-1.gat,99,43|warp|To Jeweler|-1,-1,002-2.gat,120,66 +002-1.gat,114,35|warp|To Trainer|-1,-1,002-2.gat,78,131 +002-1.gat,110,29|warp|To Trainer|-1,-1,002-2.gat,68,122 +002-1.gat,73,35|warp|To Tulimshar Indoor|-1,-1,002-2.gat,44,33 +002-1.gat,57,35|warp|To KPS|-1,-1,002-2.gat,120,94 +002-1.gat,67,29|warp|To Tulimshar Indoor|-1,-1,002-2.gat,23,109 +002-1.gat,113,107|warp|To Snake Cave|-1,-1,005-3.gat,52,35 +002-1.gat,49,20|warp|To Sea Cave|-1,-1,004-3.gat,24,94 +002-1.gat,57,26|warp|Omar's House|-1,-1,002-2.gat,119,131 diff --git a/world/map/npc/002-1/anwar.txt b/world/map/npc/002-1/anwar.txt new file mode 100644 index 00000000..707e577e --- /dev/null +++ b/world/map/npc/002-1/anwar.txt @@ -0,0 +1,204 @@ +// Anwar needs a magic fertilizer for his field +// Quest uses Nibble 3 of QUEST_NorthTulimshar +// Author: Jenalya +// state 1: Anwar sent to Tinris for help to get a magic fertilizer +// state 2: Tinris asked for chocolate cake as present for his girlfriend +// state 3: Tinris asked for ingredients for the fertilizer +// state 4: Tinris gave you the fertilizer +// state 5: Anwar tried it out and it doesn't work well, sent you back to Tinris +// state 6: Tinris asked for more ingredients for a new try +// state 7: Tinris says it's really hard, gives you the fertilizer and tells you to ask Eomie to cast a spell on it +// state 8: Eomie sends you to get some stuff so she can interrupt her spell on the spot of grass +// state 9: Eomie casted a spell on the fertilizer +// state 10: Anwar used it and it worked. he asks you to help him preparing a thank-you-gift for each Tinris and Eomis +// state 11: Anwar asked to bring present to Tinris +// state 12: gave present to Tinris +// state 13: Anwar asked to bring present to Eomie +// state 14: gave present to Eomie +// state 15: reported back to Anwar and done +002-1.gat,95,67,0|script|Anwar|156 +{ + set @state, ((QUEST_NorthTulimshar & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); + + set @cloth_amount, 3; + set @silk_amount, 30; + + set @firstTry_exp, 400; + set @secondTry_exp, 700; + set @material_exp, 1000; + set @final_exp, 2000; + + if (@state >= 15) goto L_Done; + if (@state >= 13) goto L_GiveEomie; + if (@state >= 11) goto L_GiveTinris; + if (@state == 10) goto L_GiftMaterial; + if (@state >= 5) goto L_SecondTry; + if (@state >= 1) goto L_FirstTry; + + mes "[Anwar]"; + mes "\"Hello. You look like one of those young people who come here to go on an adventure."; + mes "Would you be interested in doing some small errand for me?\""; + menu + "Sure!",L_Sure, + "I'm busy, sorry.",L_Close; + +L_Sure: + mes "[Anwar]"; + mes "\"That's the spirit! Ok, I'm tired of spending most of my time working on this field. I heard the magicians at the magic school are researching ways to enhance the growth of plants with magic.\""; + next; + mes "\"I can't go there myself, since this area of the city is full of sneaky ragtags and they will rob my field if I leave here. Could you go to the magic school and ask for some magic enhancement for my field?\""; + next; + mes "\"To find the school just follow the street north back into town. The school is the castle at the north end of town.\""; + set @state, 1; + callsub S_Update_Mask; + goto L_Close; + +L_FirstTry: // @state >= 1 but below 5 + mes "[Anwar]"; + mes "\"I hope the wizards at the magic school can help me with the field. I'd really like to have more free time. I want to make clothing, but I'm not experienced enough to make a living out of that.\""; + if (@state != 4) + goto L_Close; + menu + "Tinris gave me a magic fertilizer for your field, but he isn't sure if it works.",L_Next; + +L_Next: + mes "[Anwar]"; + mes "\"Really? Well, let's try it out!\""; + mes "He takes the fertilizer and starts to bespatter the field."; + next; + mes "But it doesn't seem to be good for the plants, they start to shrivel and get brown."; + mes "[Anwar]"; + mes "\"Oh no! What is this? It's damaging my plants! Go back to Tinris and tell him it doesn't work!\""; + getexp @firstTry_exp, 0; + set @state, 5; + callsub S_Update_Mask; + goto L_Close; + +L_SecondTry: // @state >= 5 but below 10 + mes "[Anwar]"; + mes "\"I hope Tinris can come up with a better fertilizer. My plants are suffering from the first try.\""; + if (@state != 9) + goto L_Close; + menu + "Here is another one. Eomie cast a spell on it.",L_Continue; + +L_Continue: + mes "[Anwar]"; + mes "\"Eomie? I heard she's amazingly skilled with nature magic. I'll try if this works better.\""; + mes "He takes the fertilizer and puts it on only a few plants, then waits a moment to see the result."; + next; + mes "The plants recover a bit and become green again."; + mes "[Anwar]"; + mes "\"Ah, this one is better. I'll put it on the entire field.\""; + getexp @secondTry_exp, 0; + set @state, 10; + callsub S_Update_Mask; + next; + goto L_GiftMaterial; + +L_GiftMaterial: // @state == 10 + mes "[Anwar]"; + mes "\"I want to show my gratitude to Tinris and Eomie. Can you help me once again? I would like to make some clothes for them and need " + @cloth_amount + " pieces of Cotton Cloth and " + @silk_amount + " Silk Cocoons.\""; + menu + "I have it.",L_GiveGiftStuff, + "Where can I get that?",L_Hint, + "I'll see what I can do.",L_Close; + +L_GiveGiftStuff: + getinventorylist; + if (@inventorylist_count == 100) + goto L_Full_Inv; + if ((countitem("CottonCloth") < @cloth_amount) || (countitem("SilkCocoon") < @silk_amount)) + goto L_NoItem; + delitem "CottonCloth", @cloth_amount; + delitem "SilkCocoon", @silk_amount; + getexp @material_exp, 0; + + getitem "GreenVNeckSweater", 1; + set @state, 11; + callsub S_Update_Mask; + mes "[Anwar]"; + mes "\"Great! I'll start right away with the present for Tinris. That shouldn't take long.\""; + mes "After a short while of cutting and sewing he holds a V-Neck Sweater in his hands. Then he dyes it green."; + next; + mes "[Anwar]"; + mes "\"Wonderful! Could you please bring this to Tinris to show him my gratitude?\""; + goto L_Close; + +L_Hint: + mes "[Anwar]"; + mes "\"As far as I know Cotton Cloth is given out as reward for hunting monsters. You should talk to Aidan in Candor.\""; + next; + mes "\"Otherwise Cotton Cloth can be sheared from Mouboo and silk cocoons come from Silkworms."; + mes "They live in the woodland area around Hurnscald. You can get there by taking the ferry.\""; + goto L_Close; + +L_GiveTinris: // @state >= 11 but below 13 + mes "[Anwar]"; + mes "\"Did you already bring the Green V-Neck Sweater to Tinris?\""; + if (@state != 12) + menu + "Not yet.",L_Close; + menu + "Yes, he was very happy.",L_Happy; + +L_Happy: + getinventorylist; + if (@inventorylist_count == 100) + goto L_Full_Inv; + mes "[Anwar]"; + mes "\"Wonderful! I also finished the present for Eomie. Can you bring it to her?\""; + getitem "SilkHeadband", 1; + set @state, 13; + callsub S_Update_Mask; + goto L_Close; + +L_GiveEomie: // @state >= 13 but below 15 + getinventorylist; + if (@inventorylist_count == 100) + goto L_Full_Inv; + mes "[Anwar]"; + mes "\"Did you give the Silk Headband to Eomie?\""; + if (@state != 14) + menu + "Not yet.",L_Close; + menu + "Yes. She asked me to thank you.",L_ThankYou; + +L_ThankYou: + mes "Anwar smiles."; + mes "[Anwar]"; + mes "\"I'm so happy. Thank you so much for your help. I made this for you while you went to see Eomie.\""; + getexp @final_exp, 0; + getitem "DarkGreenCottonTrousers", 1; + set @state, 15; + callsub S_Update_Mask; + goto L_Close; + +L_Done: // @state == 15 + mes "[Anwar]"; + mes "\"Thank you so much for your help. The plants are growing much better now. I don't have to spend all my time working in the field any more."; + mes "Finally I can do what I'm really interested in and work on getting better at sewing clothes.\""; + goto L_Close; + +L_NoItem: + mes "[Anwar]"; + mes "\"You don't have it!\""; + goto L_Close; + +L_Full_Inv: + mes "[Anwar]"; + mes "\"You carry a lot of stuff. Come back when you have more room.\""; + goto L_Close; + +L_Close: + set @state, 0; + set @cloth_amount, 0; + set @silk_amount, 0; + set @inventorylist_count, 0; + close; + +S_Update_Mask: + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_3_MASK)) | (@state << NIBBLE_3_SHIFT); + return; +} diff --git a/world/map/npc/002-1/bard.txt b/world/map/npc/002-1/bard.txt new file mode 100644 index 00000000..c977b136 --- /dev/null +++ b/world/map/npc/002-1/bard.txt @@ -0,0 +1,135 @@ +// + +002-1.gat,91,33,0|script|Bard|152 +{ + setarray @songs$, "\"There once was a bard, who had it hard, because a man in dark green, was very mean.\"", + "\"At Hurnscald inn, there was a person of fairest skin, declining wedding bands from quite a many hands.\"", + "\"As the Sun sets down in the forest's brown, she whom the fragrance holds counts her gold.\""; + set @name$, "Bill Ballshaker the Bard"; + mes "[" + @name$ + "]"; + if (Sex) + mes "\"Greetings, traveler! Have you come to listen to my stories?\""; + if (!Sex) + mes "\"Greetings, fair lady! Well met, on such a lovely day! Might I entertain you with a tale or two?\""; + next; + goto L_Main; + +L_Main: + menu + "Sing me a song, lute man!", L_Song, + "Have you heard any news?", L_News, + "What do you know about...", L_Question, + "Farewell!", L_Close; + +L_News: +// mes "[" + @name$ + "]"; +// mes "\"Quite, quite! Rumour has it that Luca the Hunter, from this very town of Tulimshar, has returned from a long journey.\""; +// next; +// mes "[" + @name$ + "]"; +// mes "\"Many perilous battles he fought, or so his tales go... I am still working on a sonnet that I wish to dedicate to his exploits.\""; +// next; +// mes "[" + @name$ + "]"; +// mes "\"He says that he learned some new skills along the way and wishes to pass them on to others like him, who do not fear the fire of battle!\""; +// next; +// mes "[" + @name$ + "]"; +// mes "\"If you are experienced enough, perhaps he will teach you?\""; +// next; +// goto L_Main; + + mes "[" + @name$ + "]"; + mes "\"News I have for you indeed, lest you have already overheard (for then it would no longer be news to you!)\""; + next; + mes "[" + @name$ + "]"; + mes "\"Rumor has it that an ancient source of magic, a Mana Seed, has been sighted in the west, beyond the fair town of Hurnscald.\""; + next; + set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_MANASEED_RUMOUR; + mes "[" + @name$ + "]"; + mes "\"Whence it came, nobody knows... but they say that sometimes such Mana Seeds may choose a powerful individual to impart some of its mystic power to!\""; + next; + mes "[" + @name$ + "]"; + mes "\"I wonder who might be qualified?\""; + next; + goto L_Main; + +L_Question: + callfunc "MagicTalkOptionsSetup"; + set @ignore, @QQ_ASTRALSOUL; + callfunc "MagicTalkMenu"; + + if (@c == 0) goto L_Main; + if (@c == @QQ_ELANORE) goto L_Q_elanore; + if (@c == @QQ_MANASEED) goto L_Q_manaseed; + if (@c == @QQ_WYARA) goto L_Q_wyara; + if (@c == @QQ_SAGATHA) goto L_Q_sagatha; + if (@c == @QQ_AULDSBEL) goto L_Q_auldsbel; + if (@c == @QQ_OLDWIZ) goto L_Q_oldwiz; + + mes "[" + @name$ + "]"; + mes "\"Alas, I know very little about this matter.\""; + next; + goto L_Main; + +L_Q_oldwiz: + mes "[" + @name$ + "]"; + mes "\"The old wizard has been an old man for as long as I remember, living near the mountains in his magic hut – a hut that is bigger on the inside, just like in the old tales of Gyer Filla the Wise....\""; + next; + mes "[" + @name$ + "]"; + mes "\"I doubt that they are the same person, though. For one, I have never seen his hut fly. For another, Gyer never took apprentices.\""; + next; + goto L_Main; + +L_Q_elanore: + mes "[" + @name$ + "]"; + mes "\"Elanore is this town's healer. Rumor has it that she traveled far and wide when she was younger, to learn the deepest secrets of healing magic, after her brother caught a mysterious illness.\""; + next; + goto L_Main; + +L_Q_manaseed: + mes "[" + @name$ + "]"; + mes "\"The Mana Seed is said to be a source of great magic. Perhaps some witch or wizard might know more about it?\""; + next; + goto L_Main; + +L_Q_wyara: + mes "[" + @name$ + "]"; + mes "\"Wyara is not actually from Hurnscald. As a young witch, she decided to settle down there to help the people of Hurnscald. She is kind and gentle, except towards the Doctor, who seems to have little respect for her potions.\""; + next; + goto L_Main; + +L_Q_sagatha: + mes "[" + @name$ + "]"; + mes "\"Sagatha! Ah, such a wonderful and mysterious being; the center of many a tale...\""; + next; + mes "[" + @name$ + "]"; + mes "\"Some say that she is the most powerful witch in all of Argaes. I don't know whether that is true or not, but I am quite certain that she is the most beautiful witch of all! Alas, she will let no man touch her...\""; + mes "He sighs."; + next; + mes "[" + @name$ + "]"; + mes "\"I met her only twice, back in my traveling days, but there are two pieces of advice I can give you:\""; + next; + mes "[" + @name$ + "]"; + mes "\"First, she will suffer no fool easily, particularly no man.\""; + next; + mes "[" + @name$ + "]"; + mes "\"Second, the creatures of the forest mean everything to her. Harm them, and you may find her an enemy – and a powerful one at that...\""; + next; + goto L_Main; + +L_Q_auldsbel: + mes "[" + @name$ + "]"; + mes "\"Auldsbel is a wizard further north. From what I have gathered he bought a hut near Hurnscald some years back and often comes here to experiment on things. This is probably because he is not allowed to do these experiments where he comes from.\""; + next; + goto L_Main; + +L_Song: + mes "[" + @name$ + "]"; + set @id, rand(3); + mes @songs$[@id]; + goto L_Close; + +L_Close: + set @name$, ""; + set @id, 0; + cleararray @songs$[0], "", 2; + close; +} diff --git a/world/map/npc/002-1/dock.txt b/world/map/npc/002-1/dock.txt new file mode 100644 index 00000000..f902006d --- /dev/null +++ b/world/map/npc/002-1/dock.txt @@ -0,0 +1,5 @@ +002-1.gat,67,65,0|script|Ferry Schedule#3|396 +{ + callfunc "FerryManifest"; + end; +} diff --git a/world/map/npc/002-1/elanore.txt b/world/map/npc/002-1/elanore.txt new file mode 100644 index 00000000..fec70d44 --- /dev/null +++ b/world/map/npc/002-1/elanore.txt @@ -0,0 +1,619 @@ +// + +function|script|ElanoreFix +{ + set @Q_MASK, NIBBLE_1_MASK; + set @Q_SHIFT, NIBBLE_1_SHIFT; + + set @Q_STATUS_MAX, 3; // FIXME once level 3 magic was released + + set @Q_status, (QUEST_MAGIC2 & @Q_MASK) >> @Q_SHIFT; + if (@Q_status > @Q_STATUS_MAX) + set @Q_status, @STATUS_INITIAL; + if (@Q_status > 1 && (getskilllv(SKILL_MAGIC_LIFE) < 2)) + set @Q_status, @STATUS_INITIAL; + + set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Q_MASK) | (@Q_status << @Q_SHIFT)); + return; +} + +002-1.gat,75,62,0|script|Elanore#_M|108 +{ + set @has_magic, getskilllv(SKILL_MAGIC); + + set @Q_MASK, NIBBLE_1_MASK; + set @Q_SHIFT, NIBBLE_1_SHIFT; + + set @Q_status, (QUEST_MAGIC2 & @Q_MASK) >> @Q_SHIFT; + set @Q_heal_exp, MAGIC_EXPERIENCE >> 24; + + // Set up SkillUp function + set @SUP_id, SKILL_MAGIC_LIFE; + set @SUP_name$, "Life Magic"; + + set @STATUS_INITIAL, 0; + set @STATUS_LEARNED_LIGHT_HEAL, 1; + set @STATUS_MASTERED_LIGHT_HEAL, 2; + set @STATUS_LEARNED_LAY_ON_HANDS, 3; + set @STATUS_WAITING_FOR_KADIYA, 4; + set @STATUS_READY_TO_LEARN_CURE_POISON, 5; + set @STATUS_LEARNED_CURE_POISON, 6; + + callfunc "ElanoreFix"; + + // This operation works around an earlier possible corruption of this state + if (@Q_status > @Q_STATUS_MAX) + set @Q_status, @STATUS_INITIAL; + callsub S_update_var; + if (sc_check(sc_poison)) goto L_CurePoison; + if (BaseLevel > 20) goto L_NoHeal; + set @TEMP,rand(4); + if(@TEMP == 1) goto L_Heal2; + if(@TEMP == 2) goto L_Heal3; + if(@TEMP == 3) goto L_Heal4; + goto L_Heal1; + +L_Heal1: + + mes "[Elanore the Healer]"; + mes "\"You don't look too well; let me treat your wounds.\""; + next; + goto L_Heal_L; + +L_Heal2: + + mes "[Elanore the Healer]"; + mes "\"I will make quick work of your wounds.\""; + next; + goto L_Heal_L; + +L_Heal3: + + mes "[Elanore the Healer]"; + mes "\"Need a healing?\""; + next; + goto L_Heal_L; + +L_Heal4: + + mes "[Elanore the Healer]"; + mes "\"Sometimes you just need to run from battle.\""; + next; + goto L_Heal_L; + +L_Heal_L: + set @TEMP,rand(3); + if(@TEMP == 1) goto L_Heal_2; + if(@TEMP == 2) goto L_Heal_3; + if(@TEMP == 3) goto L_Heal_4; + goto L_Heal_1; + +L_Heal_1: + + mes "[Elanore the Healer]"; + mes "\"Here you go!\""; + heal 10000,10000; + goto L_Close; + +L_Heal_2: + + mes "[Elanore the Healer]"; + mes "\"Painless, wasn't it?"; + heal 10000,10000; + goto L_Close; + +L_Heal_3: + + mes "[Elanore the Healer]"; + mes "\"You should be more careful.\""; + heal 10000,10000; + goto L_Close; + +L_Heal_4: + + mes "[Elanore the Healer]"; + mes "\"Much better, right?!\""; + heal 10000,10000; + goto L_Close; + +L_NoHeal: + if (MAGIC_FLAGS) + goto L_Chat; + goto L_NoHealMessage; + +L_NoHealMessage: + mes "[Elanore the Healer]"; + mes "\"I'm sorry but unless you are young and in need, I can't help you, and your level is already higher than twenty."; + mes "With so many gaurds still injured, I really have no time to help."; + mes "You can get some rest in the inn near here.\""; + goto L_Close; + +L_Chat: + mes "[Elanore the Healer]"; + mes "\"Hello! Can I help you?\""; + next; + goto L_Main; + +L_Main: + if (@has_magic && (@Q_status == @STATUS_INITIAL)) + menu + "Can you heal me?", L_NoHealMessage, + "Can you teach me magic?", L_Teach, + "What do you know about...", L_Question, + "Goodbye!", L_bye; + if (@has_magic && (@Q_status > @STATUS_INITIAL)) + menu + "Can you heal me?", L_NoHealMessage, + "Can you teach me more?", L_Teach, + "Where can I get more lifestones?", L_Lifestones, + "What do you know about...", L_Question, + "Goodbye!", L_bye; + if (!@has_magic) + menu + "Can you heal me?", L_NoHealMessage, + "What do you know about...", L_Question, + "Goodbye!", L_bye; + goto L_Close; + +OnPCKillEvent: + if (attachrid(@killerrid) == 0) + end; + set @Q_heal_exp, MAGIC_EXPERIENCE >> 24; + if (@Q_heal_exp < 8) goto L_OnPcKillWipe; + set @Q_heal_exp, @Q_heal_exp - 8; + goto L_OnPcKillFinish; + +L_OnPcKillWipe: + set @Q_heal_exp, 0; + goto L_OnPcKillFinish; + +L_OnPcKillFinish: + set MAGIC_EXPERIENCE, (MAGIC_EXPERIENCE & ~(255 << 24)) | (@Q_heal_exp << 24); + goto L_Close; + +L_Lifestones: + mes "[Elanore the Healer]"; + mes "\"I always need components for my own healing spells. If you bring me ten gamboge leaves, ten alizarin leaves, ten mauve leaves and ten cobalt leaves, I can make ten lifestones; I will give you half of them.\""; + next; + menu + "OK, I will get them.", L_Close, + "No way!", L_Close, + "Here you are!", L_Lifestones_Trade, + "Can I make them myself?", L_Lifestones_MakeSelf; + +L_Lifestones_Trade: + if (countitem("MauveHerb") < 10) goto L_Lifestones_Trade_Missing; + if (countitem("GambogeHerb") < 10) goto L_Lifestones_Trade_Missing; + if (countitem("AlizarinHerb") < 10) goto L_Lifestones_Trade_Missing; + if (countitem("CobaltHerb") < 10) goto L_Lifestones_Trade_Missing; + getinventorylist; + if (@inventorylist_count == 100 && countitem("Lifestone") == 0 + && countitem("MauveHerb") > 10 + && countitem("GambogeHerb") > 10 + && countitem("AlizarinHerb") > 10 + && countitem("CobaltHerb") > 10) goto L_Lifestones_NoRoom; + + delitem "MauveHerb", 10; + delitem "GambogeHerb", 10; + delitem "AlizarinHerb", 10; + delitem "CobaltHerb", 10; + getitem "Lifestone", 5; + getexp 200, 1; + mes "[Elanore the Healer]"; + mes "Elanore carefully goes over your leaves, then smiles."; + mes "\"These will do just fine.\""; + mes "She picks up all fourty and presses them together in her hands, then whispers something."; + next; + mes "[Elanore the Healer]"; + mes "As she opens her hands again, the leaves have turned into ten golden crystals."; + mes "\"Five for you and five for me.\""; + mes "She smiles."; + mes "[200 experience points]"; + goto L_Close; + +L_Lifestones_NoRoom: + mes "[Elanore the Healer]"; + mes "\"Oh... it seems that you have no room for the lifestones. But please do come back later when you have made a little space.\""; + goto L_Close; + +L_Lifestones_Trade_Missing: + mes "[Elanore the Healer]"; + mes "Elanore counts the leaves you show her."; + mes "\"No, I am sorry. Please bring me ten leaves each of gamboge, alizarin, mauve, and cobalt.\""; + goto L_Close; + +L_Lifestones_MakeSelf: + mes "[Elanore the Healer]"; + if (@has_magic < 2) goto L_Lifestones_MakeSelf_no; + goto L_Lifestones_MakeSelf_yes; + +L_Lifestones_MakeSelf_yes: + mes "\"Oh, but of course! You are powerful enough to make your own lifestones, using the enchantment '" + getspellinvocation("enchant-lifestone") + "'. This will consume a bug leg or a maggot slime or one of each of the four healing herbs, though.\""; + goto L_Close; + +L_Lifestones_MakeSelf_no: + mes "\"No, you are not powerful enough yet. Please come back and ask me again when you have learned to control more powerful magic, though!\""; + goto L_Close; + +L_Teach: + if (@Q_status == @STATUS_INITIAL) goto L_Teach_Initial; + if (@Q_status == @STATUS_LEARNED_LIGHT_HEAL) goto L_Teach_CheckAdvanceTo2; + if (@Q_status == @STATUS_MASTERED_LIGHT_HEAL) goto L_Teach_CheckAdvanceToLOH; + if (@Q_status == @STATUS_LEARNED_LAY_ON_HANDS) goto L_Teach_Explain3; + if (@Q_status == @STATUS_WAITING_FOR_KADIYA) goto L_Teach_CheckAdvanceTo3; + if (@Q_status == @STATUS_READY_TO_LEARN_CURE_POISON) goto L_Teach_CurePosion; + if (@Q_status == @STATUS_LEARNED_CURE_POISON) goto L_Teach_dunno; + + mes "[Elanore the Healer]"; + mes "\"You have made good progress, but you lack the magical power to advance further. Also, I would like to observe you some more to be certain that you will make a good healer.\""; + goto L_Close; + +L_Teach_Initial: + mes "[Elanore the Healer]"; + mes "\"I will only teach you magic of the school of Life, and that only if you prove yourself to be a good healer – that is, if you use your powers to help others.\""; + mes "She hesistates."; + next; + mes "[Elanore the Healer]"; + mes "\"I don't know you very well, but I don't think that there is any harm in teaching you a simple spell.\""; + mes "She reaches inside her satchel and pulls out a piece of crystal, glittering in the sun."; + mes "\"This here is a lifestone, life energy encased in a crystal shell. You will need it for most healing magic.\""; + next; + mes "[Elanore the Healer]"; + mes "\"To heal someone, first locate the injury. As a beginner, you have to touch the wound; with practice, it will be enough to think about it. Hold the lifestone in one hand, touching the wound with the other.\""; + mes "\"Then say, '" + getspellinvocation("lesser-heal") + "', followed by the name of the one you wish to heal.\""; + next; + mes "[Elanore the Healer]"; + mes "\"You might want to write that down, actually. In fact, you might want to make sure to keep notes of all spells you hear, for you never know if you will hear them again!\""; + mes "\"The invocation was '" + getspellinvocation("lesser-heal") + "'.\""; + next; + mes "[Elanore the Healer]"; + mes "\"This will only cure cuts and bruises, though, and it will take some time to take effect. It will be useless to mend broken bones or more severe injuries!\""; + mes "\"To heal yourself, it's enough to just say '" + getspellinvocation("lesser-heal") + "' by itself.\""; + next; + mes "[Elanore the Healer]"; + mes "\"Let me give you a lifestone to get started with.\""; + next; + getinventorylist; + if ((@inventorylist_count == 100) && (countitem("Lifestone") == 0)) goto L_Teach_Initial_Noroom; + getitem "Lifestone", 1; + set @Q_status, @STATUS_LEARNED_LIGHT_HEAL; + callsub S_update_var; + + mes "[Elanore the Healer]"; + mes "Elanore hands you the crystal."; + mes "\"Here you are. I hope that it will allow you to do good!\""; + goto L_Close; + +L_Teach_Initial_Noroom: + mes "[Elanore the Healer]"; + mes "\"Oh... you managed to put things into every little nook and pocket, haven't you? Well, come back later, I will give it to you then.\""; + goto L_Close; + +L_Teach_CheckAdvanceTo2: + mes "[Elanore the Healer]"; + if (@Q_heal_exp < 20) goto L_Teach_CheckAdvanceTo2_fail; + mes "Elanore smiles at you."; + mes "\"From what I have been hearing, you seem to be doing well on your way to becoming a healer. I have decided to accept you as a student of the School of Life Magic.\""; + next; + if (getskilllv(SKILL_MAGIC) < 2) goto L_Teach_AdvanceTo2_warn; + goto L_Teach_AdvanceTo2_skip; + +L_Teach_AdvanceTo2_warn: + mes "[Elanore the Healer]"; + mes "\"But be warned: you won't be able to use advanced healing magic until you are more capable in your regular magic usage.\""; + next; + goto L_Teach_AdvanceTo2_skip; + +L_Teach_AdvanceTo2_skip: + mes "[Elanore the Healer]"; + mes "\"Please stand still.\""; + mes "She walks up to you, holds your shoulders, and smiles at you."; + next; + mes "[Elanore the Healer]"; + mes "Then, she rises up on her tiptoes and kisses you on your forehead."; + next; + mes "[Elanore the Healer]"; + mes "You feel a strange, tingling kind of warmth spread through your body."; + set @Q_status, @STATUS_MASTERED_LIGHT_HEAL; + callsub S_update_var; + set @SUP_xp, 5000; + set @SUP_lvl, 2; + callfunc "SkillUp"; + goto L_Close; + +L_Teach_CheckAdvanceTo2_fail: + mes "\"I think I would like to observe you for a little longer to see if you would make a good healer.\""; + if (@Q_heal_exp < 5) + mes "\"You are still at the beginning of your path, but do keep practicing.\""; + if ((@Q_heal_exp >= 5) && (@Q_heal_exp < 15)) + mes "\"You are making progress, but you still need more practice.\""; + if (@Q_heal_exp >= 15) + mes "\"You have made good progress, but please do continue in your efforts.\""; + goto L_Close; + +L_Teach_CheckAdvanceToLOH: + if (getskilllv(SKILL_MAGIC) < 2) goto L_Teach_LOH_advance_abort0; + if (@Q_heal_exp < 30) goto L_Teach_LOH_advance_abort1; + + mes "[Elanore the Healer]"; + mes "\"I will now teach you how to heal by laying on your hands. The technique is similar to the spell I taught you at the beginning, but this time you transfer your own health instead of drawing health from a lifestone.\""; + next; + mes "[Elanore the Healer]"; + mes "\"First, lay your hand on the person you wish to heal. You needn't touch the injury itself, though you have to touch the skin until you are a little more experienced. Then, medidate on the word '" + getspellinvocation("lay-on-hands") + "'\""; + next; + mes "[Elanore the Healer]"; + mes "\"This will let your own life force flow into the person you are healing. If you are badly injured yourself, you will not be able to do this.\""; + mes "[1000 experience points]"; + getexp 1000, 0; + set @Q_status, @STATUS_LEARNED_LAY_ON_HANDS; + callsub S_update_var; + goto L_Close; + +L_Teach_LOH_advance_abort0: + mes "[Elanore the Healer]"; + mes "\"You don't have enough magical power to learn the next healing spell yet.\""; + goto L_Close; + +L_Teach_LOH_advance_abort1: + mes "[Elanore the Healer]"; + mes "\"I'm sorry, but I am not yet convinced that you are a good enough healer. Please continue in your endeavours.\""; + goto L_Close; + +L_Teach_Explain3: + if (getskilllv(SKILL_MAGIC) < 3) goto L_Teach_Explain3_abort; + if (@Q_heal_exp < 50) goto L_Teach_Explain3_fail; + + mes "[Elanore the Healer]"; + mes "Elanore smiles."; + mes "\"You seem to be ready to advance as a healer. There is one favour I must ask of you first, though.\""; + set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(NIBBLE_3_MASK)); // Initialise Kadiya quest + set @Q_status, @STATUS_WAITING_FOR_KADIYA; + callsub S_update_var; + next; + + mes "[Elanore the Healer]"; + mes "\"There is a man here in Tulimshar with a beautiful young daughter; his name is Omar, and his daughter's name is Kadiya.\""; + mes "\"Once, when I was a young apprentice, I made a mistake treating Omar. Ever since, he no longer trusts me.\""; + next; + + mes "[Elanore the Healer]"; + mes "\"But his daugher has contracted Mopox, so she needs help. He doesn't trust me, but perhaps he will trust you; you have been helping quite a few people, after all.\""; + next; + goto L_3_menu; + +L_3_menu: + menu + "What should I do?", L_3_what_to_do, + "Where can I find the sick girl?", L_3_where, + "How did you mess up?", L_3_messup, + "I will get started right away.", L_Main, + "Maybe later.", L_Main; + +L_3_what_to_do: + mes "[Elanore the Healer]"; + mes "\"You will have to brew a Mopox cure potion and give it to her. You should ask Caul to help you, he knows the recipe.\""; + next; + mes "[Elanore the Healer]"; + mes "\"First, you will need a concentration potion and an iron potion – together, they will give her her strength back. You also need a lifestone, and a gamboge leaf against the toxins in her body.\""; + next; + mes "[Elanore the Healer]"; + mes "\"You then have to add in roots, water, mauve leaves and sulphur powder until the brew is gooey and neither light nor dark. Caul will explain the details to you.\""; + next; + mes "[Elanore the Healer]"; + mes "\"There is a transmutation spell to make sulphur powder. If you don't know the magic, perhaps you can ask a transmutation mage to help you with this part.\""; + next; + goto L_3_menu; + +L_3_messup: + mes "[Elanore the Healer]"; + mes "\"Ah... well, Omar is a trader, and a frequent traveler. One day he came back from a journey with fleas in his beard and asked me to get rid of them.\""; + next; + mes "[Elanore the Healer]"; + mes "\"Unfortunately I used the wrong lotion on the fleas, so instead of being scared away, they grew to enormous proportions and ate up all of his beard.\""; + next; + mes "[Elanore the Healer]"; + mes "Elanore blushes."; + mes "\"Ever since then he hasn't been very trusting towards my skills, and I suppose that I can't blame him. But I don't want poor Kadiya to suffer because of that.\""; + next; + goto L_3_menu; + +L_3_where: + mes "[Elanore the Healer]"; + mes "\"Kadiya and Omar live relatively close by. See this corner in the inner city wall east of here? Turn past it, then go north. It's the second house.\""; + next; + goto L_3_menu; + +L_Teach_Explain3_abort: + mes "[Elanore the Healer]"; + mes "\"I'm sorry, but you lack the magical power to advance.\""; + goto L_Close; + +L_Teach_Explain3_fail: + mes "[Elanore the Healer]"; + if (@Q_heal_exp < 30) + mes "\"You seem to have regressed as a healer. This is worrisome; please mend your ways or I will not teach you any further.\""; + if ((@Q_heal_exp >= 30) && (@Q_heal_exp < 40)) + mes "\"You still need more practice in the art of healing.\""; + if ((@Q_heal_exp >= 40)) + mes "\"You are doing well, but you need some more practice as a healer first.\""; + goto L_Close; + +L_Teach_CheckAdvanceTo3: + callfunc "KadiyaSubquestConsts"; + + if (@Q_kadiya_status >= @Q_STATUS_COMPLETED) goto L_Teach_AdvanceTo3Ready; + + mes "[Elanore the Healer]"; + mes "\"Please help Kadiya.\""; + next; + goto L_3_menu; + +L_Teach_AdvanceTo3Ready: + mes "[Elanore the Healer]"; + mes "\"I have heard of what you did. Hiding the potion in her favorite food – that was clever.\""; + mes "She smiles at you."; + mes "\"Omar let me have a look at her earlier, and she seems to be recovering. You did very well."; + next; + mes "[Elanore the Healer]"; + mes "Elanor turns towards you, rises up on her toes and kisses you on the forehead."; + next; + set @xp, 30000; + if (@Q_kadiya_status == @Q_STATUS_COMPLETED_ELANORE) + set @xp, 50000; + mes "[Elanore the Healer]"; + mes "You feel a strange, tingling kind of warmth spread through your body."; + mes "[" + @xp + " experience points]"; + mes "[Level 3 in Life Magic]"; + + set @Q_status, @STATUS_READY_TO_LEARN_CURE_POISON; + callsub S_update_var; + getexp @xp, 0; + if (getskilllv(SKILL_MAGIC_LIFE) < 3) + setskill SKILL_MAGIC_LIFE, 3; + next; + + if (@Q_kadiya_status != @Q_STATUS_COMPLETED_ELANORE) goto L_Main; + + mes "[Elanore the Healer]"; + mes "\"Overall I am impressed by your progress. If you continue as you are doing now, you might become a great healer.\""; + mes "She hands you a handful of lifestones."; + mes "\"Please come back soon; there is more that I would like to teach you.\""; + next; + set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_ELANORE_OMAR; + getitem "Lifestone", 20; + + goto L_Main; + +L_Teach_CurePosion: + mes "[Elanore the Healer]"; + mes "\"Thank you again for your help with Kadiya!\""; + mes "\"Curing sicknesses is often quite difficult; most of them require complicated potions to be brewed.\""; + next; + mes "[Elanore the Healer]"; + mes "\"Fortunately, things are much easier with most poisons. For those we have a simple spell that only requires a Gamboge leaf.\""; + mes "\"This is the next spell that I would like to teach you.\""; + next; + mes "[Elanore the Healer]"; + mes "\"If you would like to cure someone who is poisoned, first rub a Gamboge leaf between your hands. Your hands must be covered in Gamboge liquid for this to work.\""; + mes "\"Speak the invocation, `" + getspellinvocation("cure-poison") + "'.\""; + mes "\"Next, you either touch the poisoned person with your hands, or speak their name. You have to be close for this to work, though.\""; + next; + mes "[Elanore the Healer]"; + mes "\"Once again, the invocation is `" + getspellinvocation("cure-poison") + "'.\""; + mes "\"Come back again soon; there is another spell I would like to teach you.\""; + next; + set @Q_status, @STATUS_LEARNED_CURE_POISON; + callsub S_update_var; + goto L_Main; + +L_Teach_dunno: + mes "[Elanore the Healer]"; + mes "\"Hmm. I wanted to teach you something, but I've forgotten what it was... please come back later.\""; + next; + goto L_Main; + +L_Question: + callfunc "MagicTalkOptionsSetup"; + set @ignore, @QQ_ELANORE; + callfunc "MagicTalkMenu"; + + if (@c == 0) goto L_Main; + if (@c == @QQ_MANASEED) goto L_Q_manaseed; + if (@c == @QQ_MANAPOTION) goto L_Q_manapotion; + if (@c == @QQ_WYARA) goto L_Q_wyara; + if (@c == @QQ_SAGATHA) goto L_Q_sagatha; + if (@c == @QQ_AULDSBEL) goto L_Q_auldsbel; + if (@c == @QQ_OLDWIZ) goto L_Q_oldwiz; + if (@c == @QQ_ASTRALSOUL) goto L_Q_astralsoul; + + mes "[Elanore the Healer]"; + mes "Elanore shakes her head."; + mes "\"I am sorry, but I don't think that I know anything that would help you.\""; + next; + goto L_Main; + +L_Q_astralsoul: + mes "[Elanore the Healer]"; + mes "\"The astral soul skill is one of the most important skills for mages. I learned this focus long time ago. Without that skill your magic is quite useless, isn't it? If the rumors are really true, there is an experienced mage in the Woodlands around Hurnscald.\""; + next; + goto L_Main; + +L_Q_oldwiz: + mes "[Elanore the Healer]"; + mes "\"He is a kind old man. He stays mostly with his books and his apprentice, though we have chatted a few times.\""; + next; + goto L_Main; + +L_Q_manaseed: + mes "[Elanore the Healer]"; + mes "She smiles."; + mes "\"If the rumors are true and there really is a Mana Seed, then that would be wonderful news – perhaps we will have a few more healers soon!\""; + next; + goto L_Main; + +L_Q_manapotion: + mes "[Elanore the Healer]"; + mes "\"I'm sorry, but I can't help you with that.\""; + next; + goto L_Main; + +L_Q_wyara: + mes "[Elanore the Healer]"; + mes "\"Wyara is the Hurnscald town witch. She was also the town healer before the Doctor moved there.\""; + next; + goto L_Main; + +L_Q_sagatha: + mes "[Elanore the Healer]"; + mes "\"Oh, I have only met Sagatha once or twice, while collecting herbs. She is a warm and gentle person, but she tries to hide it.\""; + next; + goto L_Main; + +L_Q_auldsbel: + mes "[Elanore the Healer]"; + mes "\"Oh, sorry – I don't really know him very well.\""; + next; + goto L_Main; + +L_CurePoison: + mes "[Elanore the Healer]"; + mes "\"Oh dear! That looks like poison; hang on...\""; + mes "She performs a complicated gesture."; + sc_end(sc_poison); + sc_end(sc_slowpoison); + misceffect sfx_magic_life, strcharinfo(0); + misceffect sfx_magic_life; + next; + mes "[Elanore the Healer]"; + mes "\"There you are, right as rain! Now you take care, all right?\""; + goto L_Close; + +L_bye: + mes "[Elanore the Healer]"; + mes "\"Goodbye!\""; + goto L_Close; + +L_Close: + set @Q_MASK, 0; + set @Q_SHIFT, 0; + set @has_magic, 0; + set @Q_STATUS_MAX, 0; + set @Q_heal_exp, 0; + set @Q_status, 0; + set @SUP_id, 0; + set @SUP_name$, ""; + set @ignore, 0; + set @STATUS_LEARNED_LIGHT_HEAL, 0; + set @STATUS_MASTERED_LIGHT_HEAL, 0; + set @STATUS_LEARNED_LAY_ON_HANDS, 0; + set @STATUS_WAITING_FOR_KADIYA, 0; + set @STATUS_READY_TO_LEARN_CURE_POISON, 0; + set @STATUS_LEARNED_CURE_POISON, 0; + set @TEMP,0; + set @xp, 0; + close; + +S_update_var: + set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Q_MASK) | (@Q_status << @Q_SHIFT)); + return; +} diff --git a/world/map/npc/002-1/gaurds.txt b/world/map/npc/002-1/gaurds.txt new file mode 100644 index 00000000..d7fb023f --- /dev/null +++ b/world/map/npc/002-1/gaurds.txt @@ -0,0 +1,19 @@ +// Guards by the gates to the port +002-1.gat,100,21,0|script|Guard#port1|104 +{ + mes "[Guard]"; + mes "\"Lots of stuff happens in the port district. Those sailors can get quite rowdy.\""; + close; +} +002-1.gat,61,27,0|script|Guard#port2|104 +{ + mes "[Guard]"; + mes "\"You wouldn't believe the refuse that comes in from the docks.\""; + close; +} +002-1.gat,83,48,0|script|Guard#east1|104 +{ + mes "[Guard]"; + mes "\"I make sure less desirables don't bother the Nobles.\""; + close; +} diff --git a/world/map/npc/002-1/itka.txt b/world/map/npc/002-1/itka.txt new file mode 100644 index 00000000..fec553d8 --- /dev/null +++ b/world/map/npc/002-1/itka.txt @@ -0,0 +1,21 @@ +// Outside the Hotel +002-1.gat,66,39,0|script|Itka|114 +{ + mes "[Itka]"; + mes "\"This hotel is the best!\""; + next; + mes "\"It has a Baker, a Barber, a Casino and a Theatre.\""; + next; + mes "\"Come on inside now!\""; + close; + +OnTimer300000: + npctalk "Come to The Wizard's Rest!"; + setnpctimer 0; + end; + +OnInit: + if (debug >= 2) end; + initnpctimer; + end; +} diff --git a/world/map/npc/002-1/lieutenant_dausen.txt b/world/map/npc/002-1/lieutenant_dausen.txt index f8a6cf66..c945a296 100644 --- a/world/map/npc/002-1/lieutenant_dausen.txt +++ b/world/map/npc/002-1/lieutenant_dausen.txt @@ -1,7 +1,7 @@ // Lieutenant in charge of monitoring the monster threat surrounding the city. // Variables used: nibble 4 and 5 of QUEST_SouthTulimshar -002-1.gat,54,27,0|script|Lieutenant Dausen|122 +002-1.gat,63,67,0|script|Lieutenant Dausen|122 { // This NPC previously used the variable TMW_Quest callfunc "ClearVarTMW_Quest"; @@ -17,28 +17,16 @@ if (@state == 2) goto L_LD_Woe_Is_Me; if (@state == 1) goto L_LD_Drinks; - set @bermik, ((QUEST_SouthTulimshar & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); - set @sarah, ((QUEST_SouthTulimshar & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT); - set @vincent, ((QUEST_SouthTulimshar & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); - set @sandra, ((QUEST_SouthTulimshar & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); - - if ((@state == 0) && (@bermik >= 6) && (@sarah >= 2) && (@vincent >= 2) && (@sandra >= 2)) - goto L_LD_Start; - mes "[Lieutenant Dausen]"; mes "\"Hello. I am Lieutenant Dausen. I monitor the monster threat around the city to ensure the safety of its citizens.\""; - next; - if (@state) goto L_Close; - mes "[Lieutenant Dausen]"; - mes "\"I may have a job for you, stranger, but first I would like to learn more about you. Go walk among the citizens of Tulimshar, see if any of them could use some help. Once you have established a good reputation, word will get to me.\""; - goto L_Close; + goto L_LD_Start; L_LD_Start: set @state, 1; callsub S_Update_Var; - mes "[Lieutenant Dausen]"; + next; mes "\"Out here in the desert, it sure does get hot! My men and I get thirsty rather quickly. Cactus Drinks are our favourite; if you can get some for us, we'd surely appreciate your effort. About 10 would do.\""; goto L_Close; @@ -134,10 +122,6 @@ L_LD_Key: L_Close: set @state, 0; - set @bermik, 0; - set @sarah, 0; - set @vincent, 0; - set @sandra, 0; close; S_Update_Var: diff --git a/world/map/npc/002-1/luca.txt b/world/map/npc/002-1/luca.txt new file mode 100644 index 00000000..c6c47647 --- /dev/null +++ b/world/map/npc/002-1/luca.txt @@ -0,0 +1,451 @@ +// + +002-1.gat,112,26,0|script|Luca|102 +{ + set @EXP_BRAWLING, 2000; + + if (BaseLevel >= 35) goto L_teach; + + if (BaseLevel >= 25) goto L_teach_soon; + + mes "[Luca the Hunter]"; + mes "\"Ouch! It hurts, this wound I got from battle.\""; + next; + menu "Tell me about it",L_Exp,"Nevermind",L_Nev; + +L_Exp: + mes "[Luca the Hunter]"; + mes "\"I was just coming back from a long journey. I ran into a group of scorpions and started fighting them for experience.\""; + next; + mes "[Luca the Hunter]"; + mes "\"Then, out of a cave came a BLACK one! I had NEVER seen it before!\""; + next; + mes "[Luca the Hunter]"; + mes "\"Luckily I had a camera with me! Here's a picture of it... Let me find it, I put it in my pocket somewhere...\""; + next; + mes "[Luca the Hunter]"; + mes "\"Oh man! My pockets have been ripped clean off!\""; + goto L_Close; + +L_Nev: + mes "[Luca the Hunter]"; + mes "\"Hmpf!\""; + goto L_Close; + +L_teach_soon: + mes "[Luca the Hunter]"; + mes "\"You've grown quite a bit stronger since I first saw you, strolling around town like that! You know, if you train a little more, maybe we can help each other out a little?\""; + goto L_Close; + +L_teach: + if (getskilllv(SKILL_POOL)) goto L_teachmore; + + mes "[Luca the Hunter]"; + mes "\"Hey there! You've become quite the adventurer, haven't you? I think it's time that someone taught you some basic skills.\""; + next; + mes "[Luca the Hunter]"; + mes "\"If you want, I can help with that!\""; + next; + menu + "Sure, that sounds fun!", L_Next, + "I'm not interested.", L_Nev; + +L_Next: + mes "[Luca the Hunter]"; + mes "\"All right! It's not all that easy, though. First you have to learn how to focus. That's because you can learn many skills, but you can't focus on all of them all the time.\""; + next; + mes "[Luca the Hunter]"; + mes "\"When you can do that, you can learn some real skills, and when you know them, you can come back to me to tell me which ones you want to focus on. Deal?\""; + next; + menu + "Yeah!", L_teach0_follow, + "Certainly!", L_teach0_follow, + "Wait... what do you mean?", L_Explain, + "Please explain some more.", L_Explain, + "No.", L_Nev; + +L_teach0_follow: + if (getskilllv(SKILL_POOL)) goto L_teachmore; + + mes "[Luca the Hunter]"; + mes "\"Great! Now, before I can give you that skill, I have to make sure that those stories about you are all true and that you really are experienced enough.\""; + next; + mes "[Luca the Hunter]"; + mes "\"So I'm going to ask you some easy questions.\""; + next; + mes "[Luca the Hunter]"; + mes "\"First, who is the man who guards the entrance to the old Tulimshar underground arena?\""; + next; + input @answer$; + if (@answer$ != "Phaet" && @answer$ != "phaet") goto L_wronganswer; + mes "[Luca the Hunter]"; + mes "\"Good. Next, what's the name of the pipe-smoker who lives on top of Lore Mountain and makes leathery goods there?\""; + next; + input @answer$; + if (@answer$ != "Pachua" && @answer$ != "pachua") goto L_wronganswer; + mes "[Luca the Hunter]"; + mes "\"Great! One more: Who was the adventurer who built Dimond's Cove for Dimond?\""; + next; + input @answer$; + if (@answer$ != "Merlin" && @answer$ != "merlin") goto L_wronganswer; + mes "[Luca the Hunter]"; + mes "Luca laughs in excitement."; + mes "\"All right! You're the real thing, my friend!\""; + next; + mes "[Luca the Hunter]"; + mes "\"Now stand over there. This should only take a second...\""; + mes "He takes off a pendant he is wearing and holds it up."; + next; + mes "[Luca the Hunter]"; + mes "\"See that fang at the end of the chain? Keep staring at it.\""; + next; + mes "[Luca the Hunter]"; + mes "He starts swinging the pendant back and forth."; + mes "\"And whatever you do, don't blink. Don't look away, and don't blink.\""; + next; + mes "[Luca the Hunter]"; + mes "The world slows down around you as you focus on the pendant going back..."; + next; + mes "and forth..."; + next; + mes "and back..."; + next; + mes "and forth..."; + next; + mes "and back..."; + next; + mes "and..."; + next; + mes "You feel relaxed."; + next; + mes "[Luca the Hunter]"; + mes "\"... still there?\""; + mes "You hear the sound of fingers snapping. Why would someone do that on such a calm day?"; + next; + mes "[Luca the Hunter]"; + mes "\"Oh, good... I think it worked. Nice job!\""; + mes "He grins."; + mes "[You gain 10,000 experience points]"; + mes "[You learned Skill Focus]"; + setskill SKILL_POOL, 1; + getexp 10000, 0; + next; + goto L_teachmore2; + +L_wronganswer: + mes "[Luca the Hunter]"; + mes "\"No, that was wrong. I suppose you're not as experienced as I thought you'd be.\""; + goto L_Close; + +L_Explain: + mes "[Luca the Hunter]"; + mes "\"Alright, what do you want to know?\""; + next; + goto L_Explain_loop; + +L_Explain_loop: + menu + "What's skill focus?", L_explain_focus, + "What skills are there?", L_explain_skills, + "How do skills work?", L_explain_work, + "Thanks, I think I got it!", L_Next; + +L_explain_focus: + mes "[Luca the Hunter]"; + mes "\"Well, you can learn many, many skills. But you can't really use all of them at once, not even old Auldsbels' head is big enough for that! So you have to focus.\""; + next; + mes "[Luca the Hunter]"; + mes "\"But you can change that focus whenever you want. It works like this: You come to me, you tell me what you want to focus on, and we do exercises until it's stuck in your head.\""; + next; + mes "[Luca the Hunter]"; + mes "\"If there's not enough space in your head, you'll first have to stop thinking about some other thing. There's an exercise I learned to do that, so when you talk to me you can just let me know what you want to forget.\""; + next; + mes "[Luca the Hunter]"; + if (getskilllv(SKILL_POOL) == 0) + mes "\"Right now you can't focus on anything yet, so I'll first have to teach you a simple skill to keep your focus.\""; + if (getskilllv(SKILL_POOL) == 1) + mes "\"Right now you can only focus on one thing at a time. So if you want to change what your focus is, you have to forget whatever else you've focused on.\""; + if (getskilllv(SKILL_POOL) > 1) + mes "\"You can focus on " + getskilllv(SKILL_POOL) + " skills right now.\""; + next; + mes "[Luca the Hunter]"; + mes "\"You can come back to me to focus or unfocus a skill whenever you want, I'm here all day.\""; + next; + mes "\"For unfocusing you need to bring a potion; a special potion. That potion is not the easiest to get, but I am sure you are able to.\""; + next; + goto L_Explain_loop; + +L_explain_skills: + mes "[Luca the Hunter]"; + mes "\"Well, I don't really know... lots, I think. I can teach you brawling, which is good when you've run out of arrows or don't have a weapon around.\""; + next; + mes "[Luca the Hunter]"; + mes "\"But there's other skills around. Some mages need special skills to concentrate, so ask around in that crowd, if that's your thing.\""; + next; + mes "[Luca the Hunter]"; + mes "\"I've also heard that there is someone in Hurnscald who can help you make your body more resistant against some things. But body and mind belong together, so you probably have to focus for that, too.\""; + next; + mes "[Luca the Hunter]"; + mes "\"Other than that, just ask around! There have to be some people who can teach you something...\""; + next; + goto L_Explain_loop; + +L_explain_work: + mes "[Luca the Hunter]"; + mes "\"Well, skills allow you to be better in some things, or allow to do what you couldn't do without them. When you've learned a skill and are focusing on it, then it affects what you do.\""; + next; + mes "[Luca the Hunter]"; + mes "\"Now, when you start out with a skill, you won't be very good at it yet. But if you keep practicing you'll learn how to get better.\""; + next; + mes "[Luca the Hunter]"; + mes "\"My old teacher always called that getting `skill points' and that you can see them with [F5], whoever that is.\""; + next; + //TODO: + //mes "[Luca the Hunter]"; + //mes "\"She also said that with this [F5] thing you can get better at those skills, and that it costs you as many skill points as the level you want to go to.\""; + //next; + mes "[Luca the Hunter]"; + mes "\"She always would have one cactus potion too many... but she was an amazing teacher.\""; + mes "He nods emphatically."; + next; + goto L_Explain_loop; + +L_teachmore: + mes "[Luca the Hunter]"; + mes "\"Good to see you again!\""; + next; + goto L_teachmore2; + +L_teachmore2: + setarray @choices, 0,0,0,0,0; + setarray @choice$, "", "", "", "", ""; + set @choice_nr, 0; + + set @C_focus, 1; + set @C_unfocus, 2; + set @C_teachbrawling, 3; + set @C_teachnothing, 4; + set @C_explainagain, 5; + set @C_nvm, 6; + set @C_focusoverview, 7; + + getactivatedpoolskilllist; + if (!((getskilllv(SKILL_POOL) - @skilllist_count) > 0)) goto L_teachmore2_nof; + getunactivatedpoolskilllist; + if (@skilllist_count == 0) goto L_teachmore2_nof; + set @choices[@choice_nr], @C_focus; + set @choice$[@choice_nr], "I would like to focus."; + set @choice_nr, @choice_nr + 1; + goto L_teachmore2_nof; + +L_teachmore2_nof: + getactivatedpoolskilllist; + if (@skilllist_count == 0) goto L_teachmore2_nounf; + set @choices[@choice_nr], @C_unfocus; + set @choice$[@choice_nr], "I would like to unfocus."; + set @choice_nr, @choice_nr + 1; + goto L_teachmore2_nounf; + +L_teachmore2_nounf: + if (!(getskilllv(SKILL_BRAWLING))) + set @choices[@choice_nr], @C_teachbrawling; + if (getskilllv(SKILL_BRAWLING)) + set @choices[@choice_nr], @C_teachnothing; + set @choice$[@choice_nr], "Can you teach me a skill?"; + set @choice_nr, @choice_nr + 1; + + set @choices[@choice_nr], @C_explainagain; + set @choice$[@choice_nr], "Can you explain skills again?"; + set @choice_nr, @choice_nr + 1; + + if (!(getskilllv(SKILL_POOL))) goto L_teachmore2_noovv; + set @choices[@choice_nr], @C_focusoverview; + set @choice$[@choice_nr], "Can you tell me what skills I'm currently focused on?"; + set @choice_nr, @choice_nr + 1; + goto L_teachmore2_noovv; + +L_teachmore2_noovv: + set @choices[@choice_nr], @C_nvm; + set @choice$[@choice_nr], "I'm done for now, thanks!"; + set @choice_nr, @choice_nr + 1; + + menu + @choice$[0],L_MenuItems, + @choice$[1],L_MenuItems, + @choice$[2],L_MenuItems, + @choice$[3],L_MenuItems, + @choice$[4],L_MenuItems; + +L_MenuItems: + set @menu, @menu - 1; + if (@choices[@menu] == 0) goto L_Close; + if (@choices[@menu] == @C_focus) goto L_focus; + if (@choices[@menu] == @C_unfocus) goto L_unfocus; + if (@choices[@menu] == @C_teachbrawling) goto L_teach_brawling; + if (@choices[@menu] == @C_teachnothing) goto L_teach_nothing; + if (@choices[@menu] == @C_explainagain) goto L_teachmore_explain; + if (@choices[@menu] == @C_focusoverview) goto L_focus_overview; + if (@choices[@menu] == @C_nvm) goto L_Close; + goto L_Close; + +L_teachmore_explain: + goto L_Explain; + +L_focus: + getunactivatedpoolskilllist; + set @skilllist_id[@skilllist_count], 0; + set @skilllist_name$[@skilllist_count], "Nevermind"; + set @skilllist_name$[@skilllist_count + 1], ""; + menu + @skilllist_name$[0], L_MenuItems1, + @skilllist_name$[1], L_MenuItems1, + @skilllist_name$[2], L_MenuItems1, + @skilllist_name$[3], L_MenuItems1, + @skilllist_name$[4], L_MenuItems1, + @skilllist_name$[5], L_MenuItems1, + @skilllist_name$[6], L_MenuItems1, + @skilllist_name$[7], L_MenuItems1; + +L_MenuItems1: + set @menu, @menu - 1; + if (@skilllist_id[@menu] == 0) goto L_teachmore2; + + poolskill @skilllist_id[@menu]; + goto L_teachmore2; + +L_unfocus: + if (countitem("GrimaceOfDementia") > 0) goto L_unfocus_menu; + + if (MAGIG_FLAGS & MFLAG_KNOWS_UNFOCUS_RECIPE) goto L_nopotion; + + mes "[Luca the Hunter]"; + mes "\"Unfocusing is one of the harder parts though, because it is sunk in. You see?\""; + next; + mes "\"So to remove that mental focus we will need a special potion.\""; + next; + mes "\"Maybe you should consult some very skilled alchemists.\""; + next; + mes "\"Ah yes, of course you will need a recipe. Although the alchemist usually knows it.\""; + next; + mes "\"The potion is called Grimace of Dementia. So the alchemist will know for sure.\""; + set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_KNOWS_UNFOCUS_RECIPE; + menu + "Ok, I will get a Grimace of Dementia potion", L_Close, + "Alright, be right back!", L_Close; + +L_nopotion: + mes "[Luca the Hunter]"; + mes "\"Hey, you really need that dementia potion for unfocusing.\""; + next; + mes "\"Come back when you've found a suitable alchemist who can mix such a potion.\""; + next; + goto L_teachmore2; + +L_unfocus_menu: + mes "[Luca the Hunter]"; + mes "\"Ahh, I see you have a dementia potion.\""; + next; + mes "\"What skill would you like to unfocus?\""; + + getactivatedpoolskilllist; + + set @skilllist_id[@skilllist_count], 0; + set @skilllist_name$[@skilllist_count], "Nevermind"; + set @skilllist_name$[@skilllist_count + 1], ""; + menu + @skilllist_name$[0], L_MenuItems2, + @skilllist_name$[1], L_MenuItems2, + @skilllist_name$[2], L_MenuItems2, + @skilllist_name$[3], L_MenuItems2, + @skilllist_name$[4], L_MenuItems2, + @skilllist_name$[5], L_MenuItems2, + @skilllist_name$[6], L_MenuItems2, + @skilllist_name$[7], L_MenuItems2; + +L_MenuItems2: + set @menu, @menu - 1; + if (@skilllist_id[@menu] == 0) goto L_teachmore2; + + if (countitem("GrimaceOfDementia") == 0) goto L_nopotion; + delitem "GrimaceOfDementia", 1; + + unpoolskill @skilllist_id[@menu]; + goto L_Close; + +L_focus_overview: + getactivatedpoolskilllist; + + if (@skilllist_count != 0) goto L_focus_overview1; + mes "[Luca the Hunter]"; + mes "\"You aren't focused on a skill at the moment.\""; + next; + goto L_teachmore2; + +L_focus_overview1: + mes "[Luca the Hunter]"; + set @message$, "\"At the moment you are focused on "; + goto L_focus_overview2; + +L_focus_overview2: + set @skilllist_count, @skilllist_count-1; + set @message$, @message$ + @skilllist_name$[@skilllist_count]; + if (@skilllist_count == 0) goto L_focus_overview3; + set @message$, @message$ + ", "; + goto L_focus_overview2; + +L_focus_overview3: + set @message$, @message$ + ".\""; + mes @message$; + next; + goto L_teachmore2; + +L_teach_brawling: + mes "[Luca the Hunter]"; + mes "\"Well, yes, I can teach you brawling. It's a nice thing, if you have nothing left but your hands to defend yourself.\""; + next; + mes "He is laughing."; + mes "\"And is handy, if some sapling starts getting naughty.\""; + next; + mes "He raises his hands in front of his face and clenches his fists."; + mes "\"Ok, let's go! Hold your hands like this.\""; + next; + mes "......."; + next; + mes "Some bruises later."; + mes "\"Great! I think, you got it.\""; + next; + set @SUP_id, SKILL_BRAWLING; + set @SUP_lvl, 1; + set @SUP_name$, "Brawling"; + set @SUP_xp, @EXP_BRAWLING; + callfunc "SkillUp"; + goto L_Close; + +L_teach_nothing: + mes "[Luca the Hunter]"; + mes "\"I was able to teach you brawling. For other professions you should visit someone else.\""; + next; + mes "\"You see, I am an adventurer. Everybody has his tricks. But you really should visit someone who is a teacher, not an adventurer, now.\""; + next; + goto L_teachmore2; + +L_Close: + set @SUP_id, 0; + set @SUP_lvl, 0; + set @SUP_name$, ""; + set @SUP_xp, 0; + set @EXP_BRAWLING, 0; + set @answer$, ""; + set @message$, ""; + cleararray @choices[0], 0, 4; + cleararray @choice$[0], "", 4; + set @choice_nr, 0; + set @C_focus, 0; + set @C_unfocus, 0; + set @C_teachbrawling, 0; + set @C_teachnothing, 0; + set @C_explainagain, 0; + set @C_nvm, 0; + set @C_focusoverview, 0; + close; +} diff --git a/world/map/npc/002-1/mapflags.txt b/world/map/npc/002-1/mapflags.txt index 2fabcfb8..91b323a1 100644 --- a/world/map/npc/002-1/mapflags.txt +++ b/world/map/npc/002-1/mapflags.txt @@ -1 +1 @@ -002-1.gat|mapflag|resave|001-1,57,71 +002-1.gat|mapflag|resave|001-1,60,105 diff --git a/world/map/npc/002-1/mine_debug.txt b/world/map/npc/002-1/mine_debug.txt new file mode 100644 index 00000000..d9ee55dc --- /dev/null +++ b/world/map/npc/002-1/mine_debug.txt @@ -0,0 +1,81 @@ +// Mine Debug +// Author: Wushin + +function|script|DesertMineDebug +{ + mes "[Mine Debug]"; + mes "What would you like to do?"; + menu + "Reset", L_Reset, + "Set", L_Set, + "Show", L_Show, + "nothing.", L_Close; + +L_Reset: + set @state, 0; + callsub S_Update_Var; + goto L_Close; + +L_Set: + mes "Values are between 0 and 28"; + mes "8 is Mine Start"; + mes "18 is Angry Scorpions Start"; + mes "20 is Underground Palace Start"; + mes "26 is Giant Cave Maggot Start"; + input @state; + callsub S_Update_Var; + goto L_Close; + +L_Show: + set @state, ((QUEST_SouthTulimshar & BYTE_2_MASK) >> BYTE_2_SHIFT); + mes "Current State: " + @state; + goto L_Close; + +L_Close: + set @state, 0; + close; + +S_Update_Var: + set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(BYTE_2_MASK) | (@state << BYTE_2_SHIFT)); + return; +} +002-1.gat,61,69,0|script|Mine Debug#1|122 +{ + callfunc "DesertMineDebug"; + end; + +OnInit: + if (!debug) + disablenpc "Mine Debug#1"; + end; +} +002-3.gat,45,49,6|script|Mine Debug#2|109 +{ + callfunc "DesertMineDebug"; + end; + +OnInit: + if (!debug) + disablenpc "Mine Debug#2"; + end; +} +002-4.gat,88,99,6|script|Mine Debug#3|109 +{ + callfunc "DesertMineDebug"; + end; + +OnInit: + if (!debug) + disablenpc "Mine Debug#3"; + end; +} +002-5.gat,43,96,6|script|Mine Debug#4|340 +{ + callfunc "DesertMineDebug"; + end; + +OnInit: + if (!debug) + disablenpc "Mine Debug#4"; + end; +} diff --git a/world/map/npc/002-1/nickos.txt b/world/map/npc/002-1/nickos.txt index 39c1cc66..2377bbaf 100644 --- a/world/map/npc/002-1/nickos.txt +++ b/world/map/npc/002-1/nickos.txt @@ -1,7 +1,7 @@ // Sandstorm mine guard // Variables used: nibble 4 and 5 of QUEST_SouthTulimshar -002-1.gat,28,94,0|script|Nickos|123 +002-1.gat,46,108,0|script|Nickos|123 { // This NPC previously used the variable TMW_Quest callfunc "ClearVarTMW_Quest"; diff --git a/world/map/npc/002-1/nomads.txt b/world/map/npc/002-1/nomads.txt index 456bc2b6..987d10ce 100644 --- a/world/map/npc/002-1/nomads.txt +++ b/world/map/npc/002-1/nomads.txt @@ -1,6 +1,6 @@ // -002-1.gat,92,100,0|script|Samuel|132 +002-1.gat,101,114,0|script|Samuel|132 { mes "[Samuel the Nomad]"; mes "\"This is really a nice place.\""; @@ -8,7 +8,7 @@ close; } -002-1.gat,102,100,0|script|Elijah|128 +002-1.gat,105,114,0|script|Elijah|128 { mes "[Elijah the Nomad]"; mes "\"It's nice to find a respite like this...\""; diff --git a/world/map/npc/002-1/npcs.txt b/world/map/npc/002-1/npcs.txt new file mode 100644 index 00000000..a2ae00ac --- /dev/null +++ b/world/map/npc/002-1/npcs.txt @@ -0,0 +1,24 @@ +002-1.gat,96,23,0|script|Jeric|214 +{ + set @npcname$, "Jeric"; + + mes "[" + @npcname$ + "]"; + mes "\"My father is an adventurer.\""; + next; + mes "\"After he proved himself around town, the guards let him fight monsters in the Sandstorm mine.\""; + set @npcname$, ""; + close; +} +002-1.gat,112,48,0|script|Silvia|207 +{ + set @npcname$, "Silvia"; + + mes "[" + @npcname$ + "]"; + mes "\"If you follow the road west, then north, you will arrive at the Bazaar in Northern Tulimshar.\""; + next; + mes "\"If you go west, then north, you'll see the Wizard Academy my parents just sent me to.\""; + next; + mes "\"The Academy is good, but I wish I had more free time. It takes a lot of intelligence to get what the teachers are talking about.\""; + set @npcname$, ""; + close; +} diff --git a/world/map/npc/002-1/sarah.txt b/world/map/npc/002-1/sarah.txt new file mode 100644 index 00000000..15eeb83b --- /dev/null +++ b/world/map/npc/002-1/sarah.txt @@ -0,0 +1,88 @@ +// Variables used: nibble 1 of QUEST_SouthTulimshar + +002-1.gat,93,43,0|script|Sarah|106 +{ + // This NPC previously used the variable TMW_Quest + callfunc "ClearVarTMW_Quest"; + + set @state, ((QUEST_SouthTulimshar & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT); + + if (@state >= 2) goto L_Done; + if (@state == 1) goto L_Progress; + + mes "[Sarah]"; + mes "\"Boy, am I hungry or what!\""; + next; + + set @TEMP, rand(2); + if(@TEMP == 1) goto L_Opening1; + goto L_Opening0; + +L_Opening0: + mes "\"Cherry Cake is the best!\""; + next; + goto L_Ask; + +L_Opening1: + mes "\"Mmm, Cherry Cake... I love it!\""; + next; + goto L_Ask; + +L_Ask: + mes "\"Can you bring me a piece of Cherry Cake? Pretty please?\""; + menu + "Yes.", L_Req0, + "No.", L_Close; + +L_Req0: + mes "[Sarah]"; + mes "\"Yippee! Bring me a piece of Cherry Cake, and I'll give you a nice hat!\""; + next; + set @state, 1; + callsub S_Update_Var; + mes "[Sarah]"; + mes "\"Please bring it to me!\""; + goto L_Close; + +L_Progress: + if (countitem("CherryCake") < 1) + goto L_NotEnough; + mes "[Sarah]"; + mes "\"Whee!\""; + next; + mes "You brought me Cherry Cake! Here is your new hat, as promised.\""; + emotion EMOTE_TONGUE; + getinventorylist; + if ((@inventorylist_count - (countitem("CherryCake") == 1)) > 99) goto L_TooMany; + delitem "CherryCake", 1; + getitem "SerfHat", 1; + set @state, 2; + callsub S_Update_Var; + goto L_Close; + +L_NotEnough: + mes "[Sarah]"; + mes "\"Oh, I'm starving! Please bring me Cherry Cake!\""; + goto L_Close; + +L_Done: + mes "[Sarah]"; + mes "\"It was so tasty, I can't eat anything more... Thank you!\""; + emotion EMOTE_TONGUE; + goto L_Close; + +L_Close: + set @TEMP, 0; + set @state, 0; + close; + +L_TooMany: + next; + mes "[Sarah]"; + mes "\"You don't have room for my reward. I'll wait until you do.\""; + goto L_Close; + +S_Update_Var: + set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_1_MASK) | (@state << NIBBLE_1_SHIFT)); + return; +} diff --git a/world/map/npc/002-1/soul-menhir.txt b/world/map/npc/002-1/soul-menhir.txt new file mode 100644 index 00000000..9fe0c06a --- /dev/null +++ b/world/map/npc/002-1/soul-menhir.txt @@ -0,0 +1,18 @@ +// + +002-1.gat,58,60,0|script|Soul Menhir#tulimshar|345 +{ + callfunc "ClearVariables"; + set @map$, "001-1.gat"; + setarray @Xs, 57, 58, 59, 57, 59, 57, 59; + setarray @Ys, 59, 59, 59, 60, 60, 61, 61; + set @x, 0; + set @y, 0; + callfunc "SoulMenhir"; + set @map$, ""; + cleararray @Xs[0], 0, 7; + cleararray @Ys[0], 0, 7; + set @x, 0; + set @y, 0; + close; +} diff --git a/world/map/npc/002-1/stewen.txt b/world/map/npc/002-1/stewen.txt index 727c0ee3..461451fe 100644 --- a/world/map/npc/002-1/stewen.txt +++ b/world/map/npc/002-1/stewen.txt @@ -1,7 +1,7 @@ // East sandstorm guard // Variables used: nibble 4 and 5 of QUEST_SouthTulimshar -002-1.gat,106,76,0|script|Stewen|123 +002-1.gat,116,93,0|script|Stewen|123 { // This NPC previously used the variable TMW_Quest callfunc "ClearVarTMW_Quest"; diff --git a/world/map/npc/002-1/traveler.txt b/world/map/npc/002-1/traveler.txt new file mode 100644 index 00000000..567d8667 --- /dev/null +++ b/world/map/npc/002-1/traveler.txt @@ -0,0 +1,11 @@ +// This is a teleportation (warp) NPC. Its purpose is to offer expensive, fast trips throughout the world. +// Author: Wombat, wushin +// cost depending on level and adapted to new scripting guidelines: Jenalya + +002-1.gat,60,41,0|script|Nina the Traveler|103 +{ + set @NpcName$, "Nina"; + set @NpcTravelBit, $@tulimshar_bit; + callfunc "Traveler"; + end; +} diff --git a/world/map/npc/003-1/_import.txt b/world/map/npc/003-1/_import.txt deleted file mode 100644 index 4ab3384f..00000000 --- a/world/map/npc/003-1/_import.txt +++ /dev/null @@ -1,7 +0,0 @@ -// Map 003-1: Beach -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 003-1.gat -npc: npc/003-1/_mobs.txt -npc: npc/003-1/_warps.txt -npc: npc/003-1/mapflags.txt -npc: npc/003-1/stranger.txt diff --git a/world/map/npc/003-1/_mobs.txt b/world/map/npc/003-1/_mobs.txt deleted file mode 100644 index a2ea4b4c..00000000 --- a/world/map/npc/003-1/_mobs.txt +++ /dev/null @@ -1,40 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Beach mobs - -003-1.gat,158,68,28,96|monster|GiantMaggot|1006,10,100000ms,30000ms,Mob003-1::On1006 -003-1.gat,0,0,0,0|monster|SeaSlime|1033,15,100000ms,30000ms,Mob003-1::On1033 -003-1.gat,120,31,22,22|monster|SeaSlime|1033,5,100000ms,30000ms,Mob003-1::On1033 -003-1.gat,119,68,105,101|monster|GreenSlime|1005,35,100000ms,30000ms,Mob003-1::On1005 -003-1.gat,134,69,76,71|monster|RedScorpion|1004,20,100000ms,30000ms,Mob003-1::On1004 -003-1.gat,35,25,10,3|monster|MountainSnake|1026,1,700000ms,600000ms,Mob003-1::On1026 - - -003-1.gat,0,0,0|script|Mob003-1|-1 -{ - end; - -On1004: - set @mobID, 1004; - callfunc "MobPoints"; - end; - -On1005: - set @mobID, 1005; - callfunc "MobPoints"; - end; - -On1006: - set @mobID, 1006; - callfunc "MobPoints"; - end; - -On1026: - set @mobID, 1026; - callfunc "MobPoints"; - end; - -On1033: - set @mobID, 1033; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/003-1/_warps.txt b/world/map/npc/003-1/_warps.txt deleted file mode 100644 index 0d99d333..00000000 --- a/world/map/npc/003-1/_warps.txt +++ /dev/null @@ -1,8 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Beach warps - -003-1.gat,172,77|warp|To Sandstorm Desert|-1,3,002-1.gat,13,66 -003-1.gat,141,19|warp|To Beach|1,-1,004-1.gat,37,110 -003-1.gat,48,36|warp|To Beach House|-1,-1,003-2.gat,22,28 -003-1.gat,59,29|warp|To Beach Storage|-1,-1,003-2.gat,56,28 -003-1.gat,114,117|warp|To Beach|2,-1,043-1.gat,44,20 diff --git a/world/map/npc/003-1/mapflags.txt b/world/map/npc/003-1/mapflags.txt deleted file mode 100644 index 682c6a82..00000000 --- a/world/map/npc/003-1/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -003-1.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/003-1/stranger.txt b/world/map/npc/003-1/stranger.txt deleted file mode 100644 index 65f7abd9..00000000 --- a/world/map/npc/003-1/stranger.txt +++ /dev/null @@ -1,464 +0,0 @@ -003-1.gat,35,25,0|script|Stranger|192 -{ - set @IRONINGOT, 5; - set @PINKANTENNA, 21; - set @Exp, 20000; - setarray @towelReq$, "WhiteHitchhikersTowel","RedHitchhikersTowel","GreenHitchhikersTowel","BlueHitchhikersTowel","YellowHitchhikersTowel","PurpleHitchhikersTowel","OrangeHitchhikersTowel","PinkHitchhikersTowel","TealHitchhikersTowel","LimeHitchhikersTowel","HitchhikersTowel"; - - if (FLAGS & FLAG_TOWEL_COMPLETED) goto L_Event_Done; - if ((gettimetick(2)-TUT_var < 6*7*86400) || (BaseLevel < 42)) //player must be created at least 6 weeks ago and at least level 42 - goto L_No_Event; - if (FLAGS & FLAG_TOWEL_HELPED) goto L_Towel; - - mes "[Stranger]"; - mes "\"Hello, hello! It's great to see you. Maybe you can help me with a little problem I have.\""; - next; - mes "\"I need some materials to repair my spacesh- ahm, it's not important why I need it.\""; - next; - mes "\"Anyway, I'd be really happy if you can give me " + @IRONINGOT + " Iron Ingots and " + @PINKANTENNA + " Pink Antennas.\""; - next; - mes "\"Do you have that for me?\""; - menu - "Yeah, sure.",L_Items, - "No.",L_Close; - -L_Items: - if (countitem("IronIngot") < @IRONINGOT) goto L_No_Item; - if (countitem("PinkAntenna") < @PINKANTENNA) goto L_No_Item; - delitem "IronIngot", @IRONINGOT; - delitem "PinkAntenna", @PINKANTENNA; - getexp @Exp, 0; - set FLAGS, FLAGS | FLAG_TOWEL_HELPED; - - mes "[Stranger]"; - mes "\"Great! Thank you!\""; - next; - mes "\"I have a lot of work to do now. But before you leave...\""; - next; - goto L_Towel; - -L_Towel: - getinventorylist; - if (@inventorylist_count == 100) goto L_Full_Inv; - mes "[Stranger]"; - mes "\"On May 25th it is a very special day - Towel Day.\""; - next; - mes "\"To celebrate this I'll ask you some questions about my favourite book, The Hitchhiker's Guide to the Galaxy. If you can answer them, I'll give you something very useful.\""; - next; - mes ""; - mes "[Server]"; - mes "The answers might need to have whitespaces."; - mes "If you're using a client which confirms your answer when pressing space, change this setting before continuing."; - mes ""; - next; - mes "[Stranger]"; - mes "\"The first one is easy.\""; - next; - - setarray @easy_questions$, - "What two words are written in big friendly letters on the back cover?", - "What's the name of the paranoid robot?", - "What is the answer to life, the universe and everything?", - "What is the first name of the author of the hitchhikers guide?", - "What is the last name of the author of the hitchhikers guide?", - "Who is the male human protagonist?", - "Who is the female human protagonist?", - "According to the Guide, space is ____?", - "What is the name of the spaceship which was stolen by the president of the universe?", - "How many heads does Zaphod Beeblebrox have?"; - - setarray @easy_answers_amount,2,2,2,2,2,4,4,2,4,2; - - set @random, rand(10); - mes "\"" + @easy_questions$[@random] + "\""; - input @answer$; - - if (@easy_answers_amount[@random] < 4) - goto L_Easy_Skip4; - set @quizparam$, "towelanswer0" + @random + "d"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Easy; - goto L_Easy_Skip4; - -L_Easy_Skip4: - if (@easy_answers_amount[@random] < 3) - goto L_Easy_Skip3; - set @quizparam$, "towelanswer0" + @random + "c"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Easy; - goto L_Easy_Skip3; - -L_Easy_Skip3: - set @quizparam$, "towelanswer0" + @random + "b"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Easy; - - set @quizparam$, "towelanswer0" + @random + "a"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Easy; - - goto L_Wrong_Answer; - -L_Right_Answer_Easy: - mes "[Stranger]"; - mes "\"You're absolutely right. The next one will be more tricky.\""; - next; - - setarray @medium_questions$, - "What is the name of the rock group claiming to be the loudest band in the universe?", - "What star is near Ford's home planet?", - "Which country does the human protagonist come from?", - "What is the name of the computer on The Heart of Gold?", - "What color is a Babel Fish?", - "What did the bowl of petunias think?", - "What body orifice should a babel fish be inserted in to work properly?", - "What is the name of the super computer?", - "What were the second most intelligent creatures on Earth?", - "What race creates the worst poetry in universe?", - "What is the name of the Vogon home planet?", - "What is the name of the Restaurant at the End of the Universe?"; - - setarray @medium_answers_amount,2,2,2,2,2,3,2,2,4,4,2,2; - - set @random, rand(12); - mes "\"" + @medium_questions$[@random] + "\""; - input @answer$; - - if (@medium_answers_amount[@random] < 4) - goto L_Medium_Skip4; - - set @quizparam$, "towelanswer1" + @random + "d"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Medium; - goto L_Medium_Skip4; - -L_Medium_Skip4: - if (@medium_answers_amount[@random] < 3) - goto L_Medium_Skip3; - set @quizparam$, "towelanswer1" + @random + "c"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Medium; - goto L_Medium_Skip3; - -L_Medium_Skip3: - set @quizparam$, "towelanswer1" + @random + "b"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Medium; - - set @quizparam$, "towelanswer1" + @random + "a"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Medium; - - goto L_Wrong_Answer; - -L_Right_Answer_Medium: - mes "[Stranger]"; - mes "\"Not bad, not bad. Let's see if you can answer an even more difficult one.\""; - next; - - setarray @hard_questions$, - "Drinking what drink is like having your brain smashed out by a slice of lemon wrapped round a large gold brick?", - "How many pints of beers should you drink before hitchhiking?", - "What initials are carved into Zaphod Beeblebrox's brain?", - "What is Ford Prefect's nickname?", - "Who is responsible for the fjords of Norway?", - "What game is played on earth as a relict of memories to an ancient war?", - "What is the name of the triple-breasted whore from Eroticon VI?", - "Who will insult every living being in the universe, because he is immortal and getting bored?", - "What is the name of the piteous creature that is continually reincarnated and subsequently killed, each time unknowingly, by Arthur Dent?"; - - setarray @hard_answers_amount,4,2,2,2,2,2,2,4,2; - - set @random, rand(9); - mes "\"" + @hard_questions$[@random] + "\""; - input @answer$; - - if (@hard_answers_amount[@random] < 4) - goto L_Hard_Skip4; - set @quizparam$, "towelanswer2" + @random + "d"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Hard; - goto L_Hard_Skip4; - -L_Hard_Skip4: - if (@hard_answers_amount[@random] < 3) - goto L_Hard_Skip3; - set @quizparam$, "towelanswer2" + @random + "c"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Hard; - goto L_Hard_Skip3; - -L_Hard_Skip3: - set @quizparam$, "towelanswer2" + @random + "b"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Hard; - - set @quizparam$, "towelanswer2" + @random + "a"; - callfunc "StrangerQuiz"; - if (("###" + @answer$ == @quizanswer$)) - goto L_Right_Answer_Hard; - - goto L_Wrong_Answer; - -L_Right_Answer_Hard: - mes "[Stranger]"; - mes "\"Unbelievable! You're really a wise person.\""; - next; - mes "\"One last question, but this shouldn't be a problem for you.\""; - next; - mes "\"What is the most important item for every hitchhiker to have?\""; - input @answer$; - if (@answer$ != "Towel" && @answer$ != "towel") - goto L_Wrong_Answer; - - mes "[Stranger]"; - mes "\"There you are! A towel is really the most important item for a hitchhiker to have.\""; - next; - mes "\"Please take this.\""; // no full inventory check, this is done before the game - set FLAGS, FLAGS | FLAG_TOWEL_COMPLETED; - next; - goto L_Explain; - -L_Explain: - mes "[Stranger]"; - mes "\"This towel is even more useful than usual towels are. If you change its color, it uses a special techno-, ahm, let's say, it can help you to get to other places.\""; - next; - mes "\"Bring me some powder made from gemstones and a bottle of water, and I can prepare it for you.\""; - next; - mes "\"Depending on the color it will bring you to different places. It might wear out after a while and it'll loose its color, but I can prepare it for you again.\""; - next; - mes "\"Since I'm not familar with this plane-, ahm, with this area, I can't tell which places you will end up in.\""; - goto L_Close; - -L_No_Event: - mes "[Stranger]"; - mes "\"Hello. Isn't this a beautiful place?\""; - next; - mes "\"And it really comes in handy that I have my towel with me. A towel is about the most massively useful thing an inte- ahm, a person can have.\""; - next; - mes "\"You can read more about that in my favourite book, 'The Hitchhiker's Guide to the Galaxy'.\""; - if (FLAGS & FLAG_TOWEL_COMPLETED) - menu - "Thanks for the advice.",L_Close, - "I have my towel with me too.",L_Dye; - goto L_Close; - -L_Dye: - mes "[Stranger]"; - mes "\"Wonderful! Let me have a look.\""; - mes "He's taking a very interested look at your towel."; - next; - mes "[Stranger]"; - mes "\"I'm impressed. This is not an usual towel.\""; - next; - menu - "Oh? Can you explain about it?",L_Explain, - "I know. Could you dye it for me?",L_StartDyeTowel, - "It's great, isn't it? I have to go now.",L_Close; - -L_No_Item: - mes "[Stranger]"; - mes "\"Hu? It seems you haven't.\""; - goto L_Close; - -L_Wrong_Answer: - mes "[Stranger]"; - mes "\"Nah, that's wrong. Come back if you want to try again.\""; - goto L_Close; - -L_Event_Done: - mes "[Stranger]"; - mes "\"Ah, welcome back. Thanks again for your help.\""; - next; - mes "\"Shall I dye your towel?\""; - menu - "That would be great!", L_StartDyeTowel, - "No, thanks.", L_Close; - -L_StartDyeTowel: - mes "[Stranger]"; - mes "\"Alright, which color do you want?\""; -// the other colors should be added when more places are released - menu - "Red",L_Red, - "Yellow",L_Yellow, - "White",L_White, - "Blue",L_Blue, - "Green",L_Green, - "Purple",L_Purple, - "Orange",L_Orange, - "Pink",L_Pink, - "Lime",L_Lime, - "Teal",L_Teal, - "I changed my mind.", L_Close; - -L_White: - // Koga - set @warpTowelName$, "WhiteHitchhikersTowel"; - setarray @towelPowder$, "DiamondPowder"; - setarray @towelPowderCnt, 2; - goto L_DyeChecks; - -L_Red: - // Barbarians - set @warpTowelName$, "RedHitchhikersTowel"; - setarray @towelPowder$, "RubyPowder"; - setarray @towelPowderCnt, 2; - goto L_DyeChecks; - -L_Green: - // Candor - set @warpTowelName$, "GreenHitchhikersTowel"; - setarray @towelPowder$, "EmeraldPowder"; - setarray @towelPowderCnt, 2; - goto L_DyeChecks; - -L_Blue: - // Blue Sages - set @warpTowelName$, "BlueHitchhikersTowel"; - setarray @towelPowder$, "SapphirePowder"; - setarray @towelPowderCnt, 2; - goto L_DyeChecks; - -L_Yellow: - // Tulimshar Mines - set @warpTowelName$, "YellowHitchhikersTowel"; - setarray @towelPowder$, "TopazPowder"; - setarray @towelPowderCnt, 2; - goto L_DyeChecks; - -L_Purple: - // Dimonds Inn - set @warpTowelName$, "PurpleHitchhikersTowel"; - setarray @towelPowder$, "AmethystPowder"; - setarray @towelPowderCnt, 2; - goto L_DyeChecks; - -L_Orange: - // Graveyard - set @warpTowelName$, "OrangeHitchhikersTowel"; - setarray @towelPowder$, "RubyPowder", "TopazPowder"; - setarray @towelPowderCnt, 1, 1; - goto L_DyeChecks; - -L_Pink: - // Terranite Cave - set @warpTowelName$, "PinkHitchhikersTowel"; - setarray @towelPowder$, "RubyPowder", "DiamondPowder"; - setarray @towelPowderCnt, 1, 1; - goto L_DyeChecks; - -L_Teal: - // Mana Seed - set @warpTowelName$, "TealHitchhikersTowel"; - setarray @towelPowder$, "EmeraldPowder", "SapphirePowder"; - setarray @towelPowderCnt, 1, 1; - goto L_DyeChecks; - -L_Lime: - // Panchua - set @warpTowelName$, "LimeHitchhikersTowel"; - setarray @towelPowder$, "EmeraldPowder", "TopazPowder"; - setarray @towelPowderCnt, 1, 1; - goto L_DyeChecks; - -L_DyeChecks: - mes "[Stranger]"; - mes "\"Ok, I'll need a bottle of water first.\""; - next; - getinventorylist; - if (@inventorylist_count == 100) goto L_Full_Inv; - if (countitem("BottleOfWater") < 1) goto L_No_Water; - set @powderCheckCount, 0; - goto L_PowderChecks; - -L_PowderCheckAgain: - mes "[Stranger]"; - mes "\"Now I need " + @towelPowderCnt[@powderCheckCount] + " " + @towelPowder$[@powderCheckCount] + ".\""; - next; - if((@powderCheckCount + 1) == getarraysize(@towelPowder$)) - goto L_TowelChecks; - set @powderCheckCount, (@powderCheckCount + 1); - goto L_PowderChecks; - -L_PowderChecks: - if (countitem(@towelPowder$[@powderCheckCount]) < @towelPowderCnt[@powderCheckCount]) - goto L_No_Powder; - goto L_PowderCheckAgain; - -L_TowelCheckAgain: - set @towelCheckCount, (@towelCheckCount + 1); - if(@towelCheckCount >= getarraysize(@towelReq$)) - goto L_No_Towel; - goto L_TowelChecks; - -L_TowelChecks: - if (countitem(@towelReq$[@towelCheckCount]) > 0) - goto L_DeletePowder; - goto L_TowelCheckAgain; - -L_DeleteAgain: - set @powderCheckCount, (@powderCheckCount - 1); - goto L_DeletePowder; - -L_DeletePowder: - delitem @towelPowder$[@powderCheckCount], @towelPowderCnt[@powderCheckCount]; - if (@powderCheckCount) - goto L_DeleteAgain; - goto L_DyeTowel; - -L_DyeTowel: - delitem @towelReq$[@towelCheckCount], 1; - callfunc "MultiWarpTowel"; - delitem "BottleOfWater", 1; - getitem @warpTowelName$, 1; - mes "He takes your towel, the water and the gem powder, then he turns away and does something you can't see. After a few minutes, he turns to you again."; - next; - mes "[Stranger]"; - mes "\"Done! It'll use its color after being used, but just come back and I can dye it again for you.\""; - goto L_Close; - -L_No_Water: - mes "[Stranger]"; - mes "\"You don't have water.\""; - goto L_Close; - -L_No_Powder: - mes "[Stranger]"; - mes "\"You need to bring me enough gem powder in that color. Maybe someone used to mining can help you with that.\""; - goto L_Close; - -L_No_Towel: - mes "[Stranger]"; - mes "\"Where's your towel? It is really useful, you should always keep it with you.\""; - goto L_Close; - -L_Full_Inv: - mes "[Stranger]"; - mes "\"You carry a lot of stuff with you, don't you? Maybe you should get rid of something.\""; - goto L_Close; - -L_Close: - set @IRONINGOT, 0; - set @PINKANTENNA, 0; - set @Exp, 0; - set @random, 0; - set @quizparam$, ""; - set @warpTowelName$, ""; - set @powderCheckCount, 0; - set @towelCheckCount, 0; - cleararray @towelPowder$, "", getarraysize(@towelPowder$); - cleararray @towelPowderCnt, "", getarraysize(@towelPowderCnt); - close; -} diff --git a/world/map/npc/004-1/_import.txt b/world/map/npc/004-1/_import.txt deleted file mode 100644 index eccf8063..00000000 --- a/world/map/npc/004-1/_import.txt +++ /dev/null @@ -1,6 +0,0 @@ -// Map 004-1: Beach -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 004-1.gat -npc: npc/004-1/_mobs.txt -npc: npc/004-1/_warps.txt -npc: npc/004-1/mapflags.txt diff --git a/world/map/npc/004-1/_mobs.txt b/world/map/npc/004-1/_mobs.txt deleted file mode 100644 index 4802574a..00000000 --- a/world/map/npc/004-1/_mobs.txt +++ /dev/null @@ -1,36 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Beach mobs - -004-1.gat,39,57,8,29|monster|SeaSlime|1033,5,100000ms,30000ms,Mob004-1::On1033 -004-1.gat,33,83,9,40|monster|SeaSlime|1033,11,100000ms,30000ms,Mob004-1::On1033 -004-1.gat,28,103,11,14|monster|SeaSlime|1033,7,100000ms,30000ms,Mob004-1::On1033 -004-1.gat,71,104,27,20|monster|GiantMaggot|1006,5,100000ms,30000ms,Mob004-1::On1006 -004-1.gat,76,68,21,49|monster|RedScorpion|1004,13,100000ms,30000ms,Mob004-1::On1004 -004-1.gat,68,25,19,10|monster|GiantMaggot|1006,2,100000ms,30000ms,Mob004-1::On1006 -004-1.gat,93,27,2,3|monster|BlackScorpion|1009,1,120000ms,60000ms,Mob004-1::On1009 - - -004-1.gat,0,0,0|script|Mob004-1|-1 -{ - end; - -On1004: - set @mobID, 1004; - callfunc "MobPoints"; - end; - -On1006: - set @mobID, 1006; - callfunc "MobPoints"; - end; - -On1009: - set @mobID, 1009; - callfunc "MobPoints"; - end; - -On1033: - set @mobID, 1033; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/004-1/_warps.txt b/world/map/npc/004-1/_warps.txt deleted file mode 100644 index e3c1776b..00000000 --- a/world/map/npc/004-1/_warps.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Beach warps - -004-1.gat,63,96|warp|To Pirate Caves|-1,-1,004-3.gat,24,94 -004-1.gat,84,115|warp|To Sandstorm Desert|1,-1,002-1.gat,28,14 -004-1.gat,80,31|warp|To Beach House|-1,-1,004-2.gat,21,28 -004-1.gat,86,27|warp|To Second Floor|-1,-1,004-2.gat,57,65 -004-1.gat,68,19|warp|To Beach|1,-1,041-1.gat,101,94 -004-1.gat,37,111|warp|To Beach|1,-1,003-1.gat,141,20 diff --git a/world/map/npc/004-1/mapflags.txt b/world/map/npc/004-1/mapflags.txt deleted file mode 100644 index 194405b8..00000000 --- a/world/map/npc/004-1/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -004-1.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/008-1/_import.txt b/world/map/npc/008-1/_import.txt index 8808364d..677d39ba 100644 --- a/world/map/npc/008-1/_import.txt +++ b/world/map/npc/008-1/_import.txt @@ -5,8 +5,10 @@ npc: npc/008-1/_mobs.txt npc: npc/008-1/_warps.txt npc: npc/008-1/andra.txt npc: npc/008-1/annualeaster.txt +npc: npc/008-1/banu.txt npc: npc/008-1/diryn.txt npc: npc/008-1/dock.txt npc: npc/008-1/george.txt npc: npc/008-1/hinnak.txt npc: npc/008-1/mapflags.txt +npc: npc/008-1/mikhail.txt diff --git a/world/map/npc/008-1/_mobs.txt b/world/map/npc/008-1/_mobs.txt index 546a93a2..0c528a66 100644 --- a/world/map/npc/008-1/_mobs.txt +++ b/world/map/npc/008-1/_mobs.txt @@ -3,8 +3,8 @@ 008-1.gat,0,0,0,0|monster|PinkFlower|1014,10,20ms,0ms,Mob008-1::On1014 008-1.gat,0,0,0,0|monster|Pinkie|1018,18,20ms,0ms,Mob008-1::On1018 -008-1.gat,0,0,0,0|monster|SpikyMushroom|1019,18,20ms,0ms,Mob008-1::On1019 -008-1.gat,0,0,0,0|monster|Snail|1041,5,30ms,0ms,Mob008-1::On1041 +008-1.gat,0,0,0,0|monster|ManaBug|1131,18,30ms,0ms,Mob008-1::On1131 +008-1.gat,0,0,0,0|monster|Maggot|1002,30,30ms,0ms,Mob008-1::On1002 008-1.gat,0,0,0,0|monster|MauvePlant|1029,2,270000ms,180000ms,Mob008-1::On1029 008-1.gat,0,0,0,0|monster|Silkworm|1035,2,60000ms,30000ms,Mob008-1::On1035 008-1.gat,0,0,0,0|monster|CloverPatch|1037,2,0ms,1000ms,Mob008-1::On1037 @@ -16,6 +16,11 @@ { end; +On1002: + set @mobID, 1002; + callfunc "MobPoints"; + end; + On1014: set @mobID, 1014; callfunc "MobPoints"; @@ -26,11 +31,6 @@ On1018: callfunc "MobPoints"; end; -On1019: - set @mobID, 1019; - callfunc "MobPoints"; - end; - On1029: set @mobID, 1029; callfunc "MobPoints"; @@ -51,13 +51,13 @@ On1038: callfunc "MobPoints"; end; -On1041: - set @mobID, 1041; +On1055: + set @mobID, 1055; callfunc "MobPoints"; end; -On1055: - set @mobID, 1055; +On1131: + set @mobID, 1131; callfunc "MobPoints"; end; } diff --git a/world/map/npc/008-1/banu.txt b/world/map/npc/008-1/banu.txt new file mode 100644 index 00000000..957d74d4 --- /dev/null +++ b/world/map/npc/008-1/banu.txt @@ -0,0 +1,112 @@ +// Old woman working on a field, asks the player to get her some water +// after that she asks for a knife +// Using bit 10 and 11 of QUEST_NorthTulimshar (second half of nibble 2) +// author: Jenalya + +008-1.gat,70,42,0|script|Banu|154 +{ + set @state, ((QUEST_NorthTulimshar & TWOBIT_5_MASK) >> TWOBIT_5_SHIFT); + set @EXP, 100; + set @money_water, 250; + set @money_knife, 100; + + if (@state >= 3) goto L_Done; + if (@state == 2) goto L_Knife; + if (@state == 1) goto L_Water; + + mes "[Banu]"; + mes "\"Ah, hello. You've come at just the right moment. The field work is hard and the sun is burning."; + mes "Would you mind refilling an old woman's Empty Bottle with water?\""; + menu + "Sure!",L_Next, + "Sorry, I'm busy.",L_Close; + +L_Next: + getinventorylist; + if (@inventorylist_count == 100) + goto L_FullInv; + + mes "She smiles."; + mes "[Banu]"; + mes "\"Here is my Empty Bottle. There is a well right over there at Hurnscald.\""; + getitem "EmptyBottle", 1; + set @state, 1; + callsub S_Update_Mask; + goto L_Close; + +L_Water: + mes "[Banu]"; + mes "\"Ah, you're back. I'm so thirsty.\""; + next; + if (countitem("BottleOfWater") < 1) + goto L_NoWater; + delitem "BottleOfWater", 1; + mes "She grabs the Bottle of Water and drinks."; + getexp @EXP, 0; + set Zeny, Zeny + @money_water; + set @state, 2; + callsub S_Update_Mask; + mes "[Banu]"; + mes "\"Ah, that's refreshing. Thank you. You're a good kid. Have this for your expenses."; + mes "Maybe you can do me another favor?\""; + next; + mes "\"I need a new Knife. Peter in the Hurnscald forge to the South of here is selling some. But it's such a long way for my old legs."; + mes "Would you go to get me a Knife?\""; + goto L_Close; + +L_Knife: + mes "[Banu]"; + mes "\"Hello dear. Did you get the knife for me?\""; + menu + "Yeah, here is it.",L_Next1, + "Not yet.",L_Close; + +L_Next1: + if (countitem("Knife") < 1) + goto L_NoKnife; + delitem "Knife", 1; + getexp @EXP, 0; + set Zeny, Zeny + @money_knife; + set @state, 3; + callsub S_Update_Mask; + mes "[Banu]"; + mes "\"Thank you! You're a darling. Please take this for your effort.\""; + goto L_Close; + +L_Done: + mes "[Banu]"; + set @rand, rand(3); + if (@rand == 0) + mes "\"I spent all my life here in Hurnscald. It's a good place to live.\""; + if (@rand == 1) + mes "\"Did you see the kids playing hide and seek? Ah, when I was young I used to play with my good friend Sorfina. She lives in Candor now, East of Hurnscald by boat.\""; + if (@rand == 2) + mes "\"Tonori is ruled by a council of wise wizards.\""; + goto L_Close; + +L_NoWater: + mes "[Banu]"; + mes "\"You didn't get it yet? Shame on you, an old woman is depending on you.\""; + goto L_Close; + +L_NoKnife: + mes "[Banu]"; + mes "\"Where is it? Don't play tricks on an old woman! That's not nice.\""; + goto L_Close; + +L_FullInv: + mes "[Banu]"; + mes "\"Oh my dear! You're carrying so many things that you can't take my Empty Bottle.\""; + goto L_Close; + +L_Close: + set @inventorylist_count, 0; + set @EXP, 0; + set @state, 0; + set @rand, 0; + close; + +S_Update_Mask: + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_5_MASK)) | (@state << TWOBIT_5_SHIFT); + return; +} diff --git a/world/map/npc/008-1/dock.txt b/world/map/npc/008-1/dock.txt index d24355bd..c4c701d3 100644 --- a/world/map/npc/008-1/dock.txt +++ b/world/map/npc/008-1/dock.txt @@ -1,25 +1,43 @@ // The ferry dock -008-1.gat,134,63,0|script|Ferry Schedule#5|397 +008-1.gat,134,69,0|script|Ferry Schedule#5|397 { callfunc "FerryManifest"; end; } -008-1.gat,147,64,0|script|Hurnscald Koga|395,8,3 +008-1.gat,147,64,0|script|Hurnscald North Koga|395,8,3 { callfunc "BoardFerry"; close; } -008-1.gat,120,44,0|script|#HurnscaldDock|127 +008-1.gat,120,44,0|script|#Hurnscald NorthDock|127 { end; OnCommandArrive: - enablenpc "Hurnscald Koga"; + enablenpc "Hurnscald North Koga"; end; OnCommandWarp: - disablenpc "Hurnscald Koga"; + disablenpc "Hurnscald North Koga"; + end; +} + +008-1.gat,147,75,0|script|Hurnscald South Koga|395,8,3 +{ + callfunc "BoardCandorFerry"; + close; +} + +008-1.gat,65,25,0|script|#Hurnscald SouthDock|127 +{ + end; +OnCommandArrive: + enablenpc "Hurnscald South Koga"; + end; + +OnCommandWarp: + disablenpc "Hurnscald South Koga"; end; } diff --git a/world/map/npc/008-1/george.txt b/world/map/npc/008-1/george.txt index af36f75f..24679b34 100644 --- a/world/map/npc/008-1/george.txt +++ b/world/map/npc/008-1/george.txt @@ -1,6 +1,6 @@ // -008-1.gat,136,36,0|script|George#pirate|138 +008-1.gat,135,62,0|script|George#pirate|138 { set @halloween_npc_id, $@halloween_npc_george; callfunc "TrickOrTreat"; @@ -9,21 +9,36 @@ if (getequipid(equip_head) == 622) goto L_Bandana; if (getequipid(equip_head) == 621) goto L_EyePatch; mes "[George the Pirate]"; - mes "\"Arrrrh! 'Tis some kind of treasure map!\""; - close; + mes "\"Yar! Do you need something, matey?\""; + goto L_Main; + +L_Main: + menu + "Can you explain the Ferry?", L_Explain, + "Nothing I guess", L_Close; L_Pirate: mes "[George the Pirate]"; mes "\"Arrrrh! Ye be wearing a pirate's hat!\""; - close; + goto L_Main; L_Bandana: mes "[George the Pirate]"; mes "\"Arrrrh! Ye remind me of my old first mate!\""; - close; + goto L_Main; L_EyePatch: mes "[George the Pirate]"; mes "\"Arrrrh! Looks like ye lost an eye there!\""; + goto L_Main; + +L_Explain: + mes "[George the Pirate]"; + mes "\"Arrr matey! I helped pioneer the trade routes between Hurnscald and the rest of the World, so now merchants and adventurers can travel to and fro without any hassle of dodging wolvern, yarr.\""; + next; + callfunc "FerryHelp"; + goto L_Main; + +L_Close: close; } diff --git a/world/map/npc/008-1/mikhail.txt b/world/map/npc/008-1/mikhail.txt new file mode 100644 index 00000000..9de0480c --- /dev/null +++ b/world/map/npc/008-1/mikhail.txt @@ -0,0 +1,76 @@ +// Variables used: nibble 0 of QUEST_SouthTulimshar + +008-1.gat,135,25,0|script|Mikhail|120 +{ + // This NPC previously used the variable TMW_Quest + callfunc "ClearVarTMW_Quest"; + + set @state, ((QUEST_SouthTulimshar & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); + + if (@state >= 6) goto L_Done; + if (@state == 5) goto L_Progress; + if (@state == 4) goto L_Start; + goto L_Convince_Mikhail_First; + +L_Convince_Mikhail_First: + mes "[Mikhail]"; + mes "\"Hello... I'm supposed to be helping Bernard from the Inn but...\""; + mes "His eyes grow wide"; + mes "\"Eeekkk another one.\""; + mes ""; + mes "It seems that the boy would like to say more, but seems too terrified at the moment. Maybe you should help someone else first, so that he sees your intentions are good."; + goto L_Close; + +L_Start: + mes "[Mikhail]"; + mes "\"Bernard sent me to get five Maggot Slimes from the maggots in the fields, but they scare me so bad!\""; + next; + mes "\"You look like a nice person. Would you go get them for me?\""; + menu + "Of course, I'll go get them for you.", L_accept, + "I've got other things to do right now.", L_Close; + +L_accept: + mes "[Mikhail]"; + mes "\"Thank you so much! I'll wait for you here.\""; + set @state, 5; + callsub S_Update_Var; + close; + +L_Progress: + mes "[Mikhail]"; + mes "\"Did you bring me the five Maggot Slimes I need?\""; + next; + menu + "Yes, here they are, kiddo!", L_try, + "Not yet, but I'll be back soon.", L_Close; + +L_try: + if (countitem("MaggotSlime") >= 5) + goto L_get; + mes "[Mikhail]"; + mes "\"It doesn't look like you have them all...\""; + goto L_Close; + +L_get: + delitem "MaggotSlime", 5; + getexp 100, 0; + set @state, 6; + callsub S_Update_Var; + mes "[Mikhail]"; + mes "\"Ooh! Thank you so much! I can get back to Bernard now!\""; + goto L_Close; + +L_Done: + mes "[Mikhail]"; + mes "\"Thanks again for helping me get those Maggot Slimes!\""; + goto L_Close; + +L_Close: + set @state, 0; + close; + +S_Update_Var: + set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_0_MASK) | (@state << NIBBLE_0_SHIFT)); + return; +} diff --git a/world/map/npc/009-1/_import.txt b/world/map/npc/009-1/_import.txt index 1901a872..402d39ab 100644 --- a/world/map/npc/009-1/_import.txt +++ b/world/map/npc/009-1/_import.txt @@ -4,6 +4,7 @@ map: 009-1.gat npc: npc/009-1/_mobs.txt npc: npc/009-1/_warps.txt npc: npc/009-1/dock.txt +npc: npc/009-1/guide.txt npc: npc/009-1/jack.txt npc: npc/009-1/mapflags.txt npc: npc/009-1/milly.txt diff --git a/world/map/npc/009-1/guide.txt b/world/map/npc/009-1/guide.txt new file mode 100644 index 00000000..0be17d68 --- /dev/null +++ b/world/map/npc/009-1/guide.txt @@ -0,0 +1,186 @@ +// + +009-1.gat,92,29,0|script|Ian|102 +{ + // This line is only relevant for players, who started before the timestamp was introduced. + // Set the graduation cap flag at the right position. + // It is a bugfix + if ((TUT_var < 4) && (TUT_var & 2)) + set FLAGS, FLAGS|FLAG_GOT_GRADUATIONCAP; + + if ((TUT_var != 0) && !(FLAGS & FLAG_GOT_GRADUATIONCAP) && BaseLevel >= 10) + goto L_Grad; + goto L_DoneGrad; + +L_DoneGrad: + mes "[Ian the Guide]"; + mes "\"Would you like to know about something?\""; + next; + goto L_Menu_A; + +L_Menu_A: + menu + "Fighting", L_Fight, + "Items", L_Items, + "Monsters", L_Monster, + "Stylist", L_Style, + "Quests", L_Quests, + "NPCs", L_NPC, + "Commands", L_Comm, + "Attributes", L_Stats, + "Magic", L_Magic, + "Quick Keys", L_Key, + "Laws", L_Laws, + "I know everything!", L_Know; + +L_Fight: + mes "[Ian the Guide]"; + mes "\"People live in this world by living off of monsters."; + mes "You can fight monsters and even players by hitting the [CTRL] key, or left mouse click.\""; + next; + mes "[Ian the Guide]"; + mes "\"If you get tired of pressing the key too much, you can also type [SHIFT]+[CTRL]."; + mes "This will make your character attack continuously for the time you are inactive.\""; + next; + goto L_Menu_A; + +L_Items: + mes "[Ian the Guide]"; + mes "\"There are three types of items."; + mes "They can be Consumables, Equipment or Miscellaneous\""; + next; + mes "[Ian the Guide]"; + mes "\"Consumable items such as Potions, can be used only once."; + mes "After use, they will disappear from your inventory.\""; + next; + mes "[Ian the Guide]"; + mes "\"Equipment items like Armors, Weapons, Accessories"; + mes "can be equipped for fashionable purposes or to raise your status.\""; + next; + mes "[Ian the Guide]"; + mes "\"Miscellaneous items such as maggot slime, are used"; + mes "in creating other items, or just to trade and sell.\""; + next; + goto L_Menu_A; + +L_Monster: + mes "[Ian the Guide]"; + mes "\"In every world, there are beasts. Monsters can be found almost anywhere!~"; + mes "To fight them, please read [Fighting] if you do not know how.\""; + next; + mes "\"There a several types of monsters, Aggressive, Neutral, and Assistants.\""; + next; + mes "[Ian the Guide]"; + mes "\"Aggressive monsters know that they are always in danger"; + mes "so therefore they always keep their guard up,"; + mes "making them attack anybody in sight.\""; + next; + mes "[Ian the Guide]"; + mes "\"Neutral monsters tend to just lounge around until attacked."; + mes "They will leave everything alone unless they are threatened.\""; + next; + mes "[Ian the Guide]"; + mes "\"Assistants are monsters who help each other."; + mes "You should always check how many are around you before attacking a single one!\""; + next; + goto L_Menu_A; + +L_Style: + mes "[Ian the Guide]"; + mes "\"The stylist NPCs will cut and perm your hair!"; + mes "They are known for their hair growth formula\""; + next; + goto L_Menu_A; + +L_Quests: + mes "[Ian the Guide]"; + mes "\"There are people in the world in need of help!"; + mes "Most of these people aren't afraid to give rewards to those who help them."; + mes "So be nice and help people along the way!\""; + next; + mes "[Ian the Guide]"; + mes "\"If you are looking for a place to get started, I heard that the farmers just outside the gates are looking for help.\""; + next; + goto L_Menu_A; + +L_NPC: + mes "[Ian the Guide]"; + mes "\"NPCs [Non Playable Characters] are people who are always in the game,"; + mes "tending to many varieties of services from just chatting to helping others.\""; + next; + goto L_Menu_A; + +L_Comm: + mes "[Ian the Guide]"; + mes "\"/clear clears the text box.\""; + mes "\"/help displays the client commands (ones starting with a /) in the chat box.\""; + mes "\"/whisper [name] allows you to message someone privately.\""; + mes "\"/who displays the current number of online users.\""; + mes "\"/where displays the current map's name.\""; + next; + goto L_Menu_A; + +L_Stats: + mes "[Ian the Guide]"; + mes "\"People vary greatly by how much strength, agility, dexterity, intelligence, vitality, and luck they have.\""; + next; + mes "[Ian the Guide]"; + mes "\"Strength helps you carry items, and it also allows you to hit harder – but it is not too helpful if you focus on missile weapons."; + mes "More agility allows you to attack faster, and to dodge attacks more easily."; + mes "Your dexterity determines how likely you are to hit a monster, and how effective you are with missile weapons.\""; + next; + mes "[Ian the Guide]"; + mes "\"Vitality determines how resistant to injuries you are, and how much damage you can take before you die."; + mes "Intelligence is useful for alchemy and magic, but there are few opportunities for either at the moment."; + mes "Luck determines many small things, including the likelihood of both recieving and dealing critical hits\""; + next; + mes "[Ian the Guide]"; + mes "\"I recommend that you practice your dexterity, since some of the more dangerous monsters are very hard to hit otherwise."; + mes "Don't bother trying to work on your luck, and your intelligence is probably not something anyone cares about either.\""; + next; + goto L_Menu_A; + +L_Magic: + mes "[Ian the Guide]"; + mes "\"The only active Mana Seed remaining is West of here somewhere, Ask Wyara, they may know more about it.\""; + next; + mes "\"In decades past, there was a Mana Seed in Tulimshar, from which people could draw magical energies. Unfortunately, the seed went dorment."; + mes "However, I've overheard the bard mentioning something about this recently... if you are interested in magic, try talking to him!\""; + next; + goto L_Menu_A; + +L_Key: + mes "[Ian the Guide]"; + mes "\"There are many key combinations, press F1 for a short list of them!\""; + next; + goto L_Menu_A; + +L_Laws: + mes "[Ian the Guide]"; + callfunc "GameRules"; + next; + goto L_Menu_A; + +L_Know: + mes "[Ian the Guide]"; + mes "\"Lost? Confused? Want to know why you can't get past a quest, overcome an NPC or find an item? Check http://wiki.themanaworld.org for player hints, walkthroughs, item lists and more!\""; + next; + mes "\"But remember, the game isn't fun when you already know what to do. Use it well or you will lose interest in playing The Mana World! Please help by reporting anything that is unclear, outdated or that needs to be seen on our forums at http://forums.themanaworld.org.\""; + close; + +L_Grad: + getinventorylist; + if (@inventorylist_count == 100) goto L_TooMany; + mes "[Ian the Guide]"; + mes "\"Hey, you've been doing good, let me give you this.\""; + getitem "GraduationCap", 1; + set FLAGS, FLAGS | FLAG_GOT_GRADUATIONCAP; + next; + goto L_DoneGrad; + +L_TooMany: + mes "[Ian the Guide]"; + mes "\"I wanted to give you something, but you don't have room for it.\""; + next; + goto L_DoneGrad; +} diff --git a/world/map/npc/009-2/_import.txt b/world/map/npc/009-2/_import.txt index f3e16386..080bfeb6 100644 --- a/world/map/npc/009-2/_import.txt +++ b/world/map/npc/009-2/_import.txt @@ -5,8 +5,10 @@ npc: npc/009-2/_mobs.txt npc: npc/009-2/_warps.txt npc: npc/009-2/airlia.txt npc: npc/009-2/alan.txt +npc: npc/009-2/bernard.txt npc: npc/009-2/doctor.txt npc: npc/009-2/drunks.txt +npc: npc/009-2/entertainer.txt npc: npc/009-2/inspector.txt npc: npc/009-2/kfahr.txt npc: npc/009-2/lena.txt @@ -19,5 +21,7 @@ npc: npc/009-2/peter.txt npc: npc/009-2/richard.txt npc: npc/009-2/selim.txt npc: npc/009-2/shops.txt +npc: npc/009-2/trader.txt npc: npc/009-2/waitress.txt npc: npc/009-2/wyara.txt +npc: npc/009-2/yalina.txt diff --git a/world/map/npc/009-2/bernard.txt b/world/map/npc/009-2/bernard.txt new file mode 100644 index 00000000..307e7591 --- /dev/null +++ b/world/map/npc/009-2/bernard.txt @@ -0,0 +1,141 @@ +// Variables used: nibble 0 of QUEST_SouthTulimshar + +009-2.gat,67,79,0|script|Bernard|117 +{ + // This NPC previously used the variable TMW_Quest + callfunc "ClearVarTMW_Quest"; + + set @state, ((QUEST_SouthTulimshar & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); + + if (@state >= 6) goto L_Done3; + if (@state >= 4) goto L_Done2; + if (@state == 3) goto L_Progress2; + if (@state == 2) goto L_Done1; + if (@state == 1) goto L_Progress; + + set @TEMP, rand(2); + if(@TEMP == 1) goto L_Opening1; + goto L_Opening0; + +L_Opening0: + mes "[Bernard]"; + mes "\"The fields are crawling with maggots. Where is Mikhail? What is taking them so long?"; + mes "Could I ask a favor of you?\""; + next; + goto L_Ask; + +L_Opening1: + mes "[Bernard]"; + mes "\"The taste of maggots in soup is... unforgettable, they taste simply divine!"; + mes "I sent someone to kill me some maggots and they have yet to return. Would you help me kill some?\""; + next; + goto L_Ask; + +L_Ask: + menu + "Yes.", L_Yes, + "No.", L_Close; + +L_Yes: + set @TEMP, rand(2); + if(@TEMP == 1) goto L_Req1; + goto L_Req0; + +L_Req0: + mes "[Bernard]"; + mes "\"Great! I need a Roasted Maggot for my soup.\""; + next; + goto L_Set; + +L_Req1: + mes "[Bernard]"; + mes "\"Bring me a Roasted Maggot. I'll give you something if you do.\""; + next; + goto L_Set; + +L_Set: + set @state, 1; + callsub S_Update_Var; + mes "[Bernard]"; + mes "\"Please bring it to me!\""; + goto L_Close; + +L_Progress: + if (countitem("RoastedMaggot") < 1) goto L_NotEnough; + mes "[Bernard]"; + mes "\"Oooh, perfect! It's perfect!"; + mes "You brought me my Roasted Maggot! Here, have some cake for your troubles.\""; + getinventorylist; + if (@inventorylist_count - (countitem("RoastedMaggot") == 1) > 99 - (countitem("CherryCake") == 0) ) goto L_TooMany; + delitem "RoastedMaggot", 1; + getexp 100, 0; + getitem "CherryCake", 5; + set @state, 2; + callsub S_Update_Var; + next; + mes "\"Now let's see...\""; + goto L_Close; + +L_Progress2: + if (countitem("MaggotSlime") < 3) goto L_NotEnough1; + mes "[Bernard]"; + mes "\"Nice! They're perfect, just perfect!"; + mes "You brought me the 3 Maggot Slimes! Here, have some beer as reward.\""; + getinventorylist; + if ((@inventorylist_count - (countitem("MaggotSlime") == 3) > 99 - (countitem("Beer") == 0) )) goto L_TooMany; + delitem "MaggotSlime", 3; + getexp 100, 0; + getitem "Beer", 3; + set @state, 4; + callsub S_Update_Var; + goto L_Close; + +L_NotEnough: + mes "[Bernard]"; + mes "\"Oh, please hurry and bring me a Roasted Maggot. I'm yearning for maggot soup!\""; + goto L_Close; + +L_NotEnough1: + mes "[Bernard]"; + mes "\"Please do hurry and bring me 3 Maggot Slimes, so I can finish my soup!\""; + goto L_Close; + +L_Done1: + mes "[Bernard]"; + mes "\"Thank you so much!\""; + mes "\"But... something is missing to make the soup creamy.\""; + next; + mes "\"I need 3 Maggot Slimes for that.\""; + mes "\"Bring them to me, and I'll give you something nice.\""; + set @state, 3; + callsub S_Update_Var; + goto L_Close; + +L_Done2: + mes "[Bernard]"; + mes "\"I didn't mention it before, but I also put beer in my soup. I hope you like beer as much as I do, because, you see...\""; + next; + mes "\"Beer is life!\""; + goto L_Close; + +L_Done3: + mes "[Bernard]"; + mes "\"My help, Mikhail, finally returned with the slimes I needed."; + mes "I wonder what took him so long?\""; + goto L_Close; + +L_Close: + set @TEMP, 0; + set @state, 0; + close; + +L_TooMany: + next; + mes "[Bernard]"; + mes "\"You don't have room for my reward. I'll wait until you do.\""; + goto L_Close; + +S_Update_Var: + set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_0_MASK) | (@state << NIBBLE_0_SHIFT)); + return; +} diff --git a/world/map/npc/009-2/entertainer.txt b/world/map/npc/009-2/entertainer.txt new file mode 100644 index 00000000..1b2b9622 --- /dev/null +++ b/world/map/npc/009-2/entertainer.txt @@ -0,0 +1,38 @@ +// Emote NPC allows for players to learn the emote skill + +009-2.gat,61,49,0|script|Entertainer|165 +{ + mes "[Entertainer]"; + mes "\"Yes how can I help you?\""; + menu + "How are you showing emotions above your head?", L_Learn, + "Never mind", L_Close; + +L_Learn: + mes "[Entertainer]"; + mes "\"They are called emotes, I use them to express how I am feeling."; + mes "I can teach you if you'd like?\""; + menu + "Yes please.", L_Learn2, + "I don't see the point right now.", L_Close; + +L_Learn2: + mes "[Entertainer]"; + mes "\"All you have to do is press alt and a number."; + mes "The number determines what emotion will be shown."; + mes "Some clients will also show an emote shortcut-bar with the F12 button\""; + goto L_Close; + +L_Close: + close; + +OnTimer3000: + emotion rand(EMOTE_DISGUST, EMOTE_TEARS); + setnpctimer 0; + end; + +OnInit: + if (debug >= 2) end; + initnpctimer; + end; +} diff --git a/world/map/npc/009-2/peter.txt b/world/map/npc/009-2/peter.txt index 2c739055..4d248819 100644 --- a/world/map/npc/009-2/peter.txt +++ b/world/map/npc/009-2/peter.txt @@ -1,4 +1,5 @@ // Nicholas' Apprentice and Armorsmith +009-2.gat,183,57,0|shop|#PeterShop|127,Knife:*50,SharpKnife:*100,Dagger:*1000 009-2.gat,183,57,0|script|Peter|157 { @@ -30,6 +31,7 @@ "Light Plate ("+@peter_light_plate_coal+" coal, "+@peter_light_plate_ingot+" ingots and "+@peter_light_plate_money+" GP).", L_Peter_Light_Plate, "Warlord Plate ("+@peter_warlord_plate_coal+" coal, "+@peter_warlord_plate_ingot+" ingots and "+@peter_warlord_plate_money+" GP).", L_Peter_Warlord_Plate, "Do you know anything else than armor crafting?", L_Peter_New_Skills, + "Do you have anything else for sale?", L_Shop, "Nevermind.", L_Close; L_Peter_Chain_Mail: @@ -64,6 +66,10 @@ L_Peter_New_Skills: "Sure!", L_Peter_Warlord_Boots, "No thanks, that sounds too heavy for me.", L_Close; +L_Shop: + close2; + shop "#PeterShop"; + L_Peter_Warlord_Boots: set @peter_crafting_coal, @peter_warlord_boots_coal; set @peter_crafting_iron_ingot, @peter_warlord_boots_ingot; diff --git a/world/map/npc/009-2/shops.txt b/world/map/npc/009-2/shops.txt index d0da9413..e400c3ef 100644 --- a/world/map/npc/009-2/shops.txt +++ b/world/map/npc/009-2/shops.txt @@ -20,7 +20,7 @@ // Archer Shop // sells bow, short bow, arrows and iron arrows -009-2.gat,97,24,0|shop|Apprentice|120,Arrow:*2,IronArrow:*4,Bow:*1000,ShortBow:*3000 +009-2.gat,97,24,0|shop|Apprentice|120,SlingBullet:*1,Arrow:*2,IronArrow:*4,Bow:*1000,ShortBow:*3000 // Potion Shop // sells cactus drink, cactus potion, iron potion, concentration potion, and slow poison potion diff --git a/world/map/npc/009-2/trader.txt b/world/map/npc/009-2/trader.txt new file mode 100644 index 00000000..572cad1b --- /dev/null +++ b/world/map/npc/009-2/trader.txt @@ -0,0 +1,155 @@ +// Teaches Trading skill +// Offers item conversion for non-magic users +// Updated by: TheKandiman +// Reviewed by: Wombat + +009-2.gat,39,93,0|script|Trader|115 +{ + set @Ironprice, 1000; + set @Sulphurprice, 1200; + set @Potionprice, 500; + if (BaseLevel >= 25) goto L_Trade; + + mes "[Trader]"; + mes "\"Hello. I came here to trade wares with the people of Hurnscald. Unfortunately for you, I've traded everything I had.\""; + next; + menu + "Oh. I'll go then.", L_Close, + "You don't have anything?", L_More; + +L_More: + mes "[Trader]"; + mes "\"No. I have nothing for you. Except...\""; + next; + menu + "Yes?", L_Except, + "Ok then.", L_Close; + +L_Except: + mes "[Trader]"; + mes "\"I could teach you how to trade. It'll cost you 2GP.\""; + next; + menu + "Sure.", L_Teach, + "No thank you.", L_Close; + +L_Teach: + if (Zeny < 5) goto L_NotEnoughMoney; + set Zeny, Zeny - 2; + mes "[Trader]"; + mes "\"You can initiate trade with someone by right-clicking on them and choosing trade."; + mes "You'll both add the items and set the GP you're putting up then press propose trade."; + mes "After both parties have proposed their side, you can both review the trade, and then accept or reject by closing the window.\""; + next; + mes "[Trader]"; + mes "\"Items added to the trade cannot be removed, and so mistakes have to be dealt with by canceling the trade."; + mes "You need to press the change button to let the other person know about GP changes.\""; + next; + goto L_Later; + +L_Later: + mes "[Trader]"; + mes "\"Please feel free to check back later. I'm expecting a large shipment of goods to trade.\""; + goto L_Close; + +L_Trade: + mes "[Trader]"; + mes "\"Welcome back! My shipment came in and I have a bunch of things that I can trade now. What would you like?\""; + goto L_Trademenu; + +L_Trademenu: + menu + "Do you have Iron Powder?", L_Iron, + "How about Sulphur Powder?", L_Sulphur, + "I need Medium Healing Potions.", L_Healpots, + "I think I have everything I need, thanks.", L_Close; + +L_Iron: + mes "[Trader]"; + mes "\"I do have a few of those. I will give you 4 Iron Powders for 1 Iron Ore and " + @Ironprice + "gp.\""; + menu + "Sure.", L_Ipowder, + "What a ripoff! No way!", L_Close; + +L_Sulphur: + mes "[Trader]"; + mes "\"I can trade you 5 Sulphur Powders for 1 Pile of Ash and " + @Sulphurprice + "gp.\""; + menu + "Here you go.", L_Spowder, + "Are you nuts?! Forget it!", L_Close; + +L_Healpots: + mes "[Trader]"; + mes "\"Healing potions are always useful, but I rarely need anything larger than the small ones. I will happily trade you 1 Medium Healing Potion for 3 Small Healing Potions and " + @Potionprice + "gp.\""; + menu + "Alright.", L_Pots, + "Whoa, that's way too much.", L_Close; + +L_Ipowder: + if (countitem("IronOre") < 1) goto L_Missing; + if (Zeny < @Ironprice) goto L_NotEnoughMoney; + getinventorylist; + if (@inventorylist_count == 100 && countitem("IronOre") > 1 && countitem("IronPowder") < 1) goto L_Full; + delitem "IronOre", 1; + set Zeny, Zeny - @Ironprice; + getitem "IronPowder", 4; + mes "[Trader]"; + mes "\"There you go. Would you like to trade anything else?\""; + menu + "Yes.", L_Trademenu, + "No.", L_No; + +L_Spowder: + if (countitem("PileOfAsh") < 1) goto L_Missing; + if (Zeny < @Sulphurprice) goto L_NotEnoughMoney; + getinventorylist; + if (@inventorylist_count == 100 && countitem("PileOfAsh") > 1 && countitem("SulphurPowder") < 1) goto L_Full; + delitem "PileOfAsh", 1; + set Zeny, Zeny - @Sulphurprice; + getitem "SulphurPowder", 5; + mes "[Trader]"; + mes "\"There you go. Would you like to trade anything else?\""; + menu + "Yes.", L_Trademenu, + "No.", L_No; + +L_Pots: + if (countitem("SmallHealingPotion") < 3) goto L_Missing; + if (Zeny < @Potionprice) goto L_NotEnoughMoney; + getinventorylist; + if (@inventorylist_count == 100 && countitem("SmallHealingPotion") > 3 && countitem("MediumHealingPotion") < 1) goto L_Full; + delitem "SmallHealingPotion", 3; + set Zeny, Zeny - @Potionprice; + getitem "MediumHealingPotion", 1; + mes "[Trader]"; + mes "\"There you go. Would you like to trade anything else?\""; + menu + "Yes.", L_Trademenu, + "No.", L_No; + +L_Full: + mes "[Trader]"; + mes "\"You must have been making a lot of trades...your bag is completely full! Come back after you've made some room.\""; + goto L_Close; + +L_Missing: + mes "[Trader]"; + mes "\"It looks like you're missing some items. Please come back when you have enough to trade.\""; + goto L_Close; + +L_NotEnoughMoney: + mes "[Trader]"; + mes "\"You don't have enough money.\""; + goto L_Close; + +L_No: + mes "[Trader]"; + mes "\"Have a great day!\""; + goto L_Close; + +L_Close: + set @Ironprice, 0; + set @Sulphurprice, 0; + set @Potionprice, 0; + close; +} diff --git a/world/map/npc/009-2/wyara.txt b/world/map/npc/009-2/wyara.txt index 65c16fc7..f8df574a 100644 --- a/world/map/npc/009-2/wyara.txt +++ b/world/map/npc/009-2/wyara.txt @@ -46,12 +46,14 @@ L_Main: "Can you help me use the mana seed?", L_Q_manaseed_unabsorbed, "Can you help me learn magic?", L_Magic, "I would like to buy potions.", L_Shop, + "Can you reset my stats?", L_StatReset, "Bye!", L_Close; if (!(!@has_magic && (MAGIC_FLAGS & MFLAG_TOUCHED_MANASEED))) menu "What do you know about...", L_Question, "Can you help me learn magic?", L_Magic, "I would like to buy potions.", L_Shop, + "Can you reset my stats?", L_StatReset, "Bye!", L_Close; goto L_Shop; @@ -60,6 +62,11 @@ L_Shop: mes "\"Please have a look at the shelf behind me.\""; close; +L_StatReset: + set @NpcName$, "Wyara"; + callfunc "StatReset"; + goto L_Close; + L_Question: callfunc "MagicTalkOptionsSetup"; set @ignore, @QQ_WYARA; diff --git a/world/map/npc/009-2/yalina.txt b/world/map/npc/009-2/yalina.txt new file mode 100644 index 00000000..92055b48 --- /dev/null +++ b/world/map/npc/009-2/yalina.txt @@ -0,0 +1,11 @@ +009-2.gat,148,47,0|script|Yalina|209 +{ + set @npcname$, "Yalina"; + + mes "[" + @npcname$ + "]"; + mes "\"Ian knows a lot! I had so many questions he helped me with!\""; + next; + mes "\"He rewards those that know what they are doing. When the Nurse stops healing you, check in with Ian.\""; + set @npcname$, ""; + close; +} diff --git a/world/map/npc/021-1/_import.txt b/world/map/npc/021-1/_import.txt deleted file mode 100644 index 9a1b1507..00000000 --- a/world/map/npc/021-1/_import.txt +++ /dev/null @@ -1,20 +0,0 @@ -// Map 021-1: North Tulimshar -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 021-1.gat -npc: npc/021-1/_mobs.txt -npc: npc/021-1/_warps.txt -npc: npc/021-1/bakery.txt -npc: npc/021-1/banu.txt -npc: npc/021-1/eurni.txt -npc: npc/021-1/gate_guards.txt -npc: npc/021-1/hideandseek.txt -npc: npc/021-1/imec.txt -npc: npc/021-1/inac.txt -npc: npc/021-1/mapflags.txt -npc: npc/021-1/north_shops.txt -npc: npc/021-1/npcs.txt -npc: npc/021-1/pauline.txt -npc: npc/021-1/sewer_east.txt -npc: npc/021-1/sewer_north.txt -npc: npc/021-1/sewer_west.txt -npc: npc/021-1/weellos.txt diff --git a/world/map/npc/021-1/_mobs.txt b/world/map/npc/021-1/_mobs.txt deleted file mode 100644 index 285a62e1..00000000 --- a/world/map/npc/021-1/_mobs.txt +++ /dev/null @@ -1,24 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// North Tulimshar mobs - -021-1.gat,126,86,3,2|monster|Maggot|1002,2,100000ms,30000ms,Mob021-1::On1002 -021-1.gat,90,65,3,2|monster|Maggot|1002,2,100000ms,30000ms,Mob021-1::On1002 -021-1.gat,95,124,3,2|monster|Maggot|1002,2,100000ms,30000ms,Mob021-1::On1002 -021-1.gat,103,53,6,2|monster|Maggot|1002,5,100000ms,30000ms,Mob021-1::On1002 -021-1.gat,98,24,2,2|monster|SeaSlime|1033,1,150000ms,100000ms,Mob021-1::On1033 - - -021-1.gat,0,0,0|script|Mob021-1|-1 -{ - end; - -On1002: - set @mobID, 1002; - callfunc "MobPoints"; - end; - -On1033: - set @mobID, 1033; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/021-1/_warps.txt b/world/map/npc/021-1/_warps.txt deleted file mode 100644 index daa1a89d..00000000 --- a/world/map/npc/021-1/_warps.txt +++ /dev/null @@ -1,25 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// North Tulimshar warps - -021-1.gat,128,119|warp|To Tulimshar Musuem|0,-1,021-2.gat,71,177 -021-1.gat,144,22|warp|To Tulimshar Noble|3,-1,068-1.gat,34,105 -021-1.gat,157,44|warp|To Tulimshar Castle|-1,0,069-1.gat,21,44 -021-1.gat,157,97|warp|To Tulimshar Castle|-1,0,069-1.gat,21,97 -021-1.gat,135,119|warp|To Tulimshar Musuem|-1,-1,021-2.gat,90,177 -021-1.gat,55,146|warp|To South Tulimshar|3,-1,001-1.gat,44,21 -021-1.gat,136,147|warp|To South Tulimshar|0,-1,001-1.gat,125,22 -021-1.gat,53,133|warp|To Government Building|-1,-1,021-2.gat,27,29 -021-1.gat,55,133|warp|To Government Building|-1,-1,021-2.gat,33,29 -021-1.gat,57,133|warp|To Government Building|-1,-1,021-2.gat,39,29 -021-1.gat,103,99|warp|To Tulimshar Bakery|-1,-1,021-2.gat,91,27 -021-1.gat,103,96|warp|To Bakery|-1,-1,021-2.gat,122,23 -021-1.gat,49,64|warp|To Tulimshar Canyon|3,-1,024-1.gat,86,73 -021-1.gat,53,98|warp|To Wizard's Rest|-1,-1,021-2.gat,25,66 -021-1.gat,52,95|warp|To Wizard's Rest|-1,-1,021-2.gat,70,63 -021-1.gat,73,22|warp|To Tulimshar Port|3,-1,022-1.gat,73,109 -021-1.gat,113,22|warp|To Tulimshar Port|3,-1,022-1.gat,113,109 -021-1.gat,132,30|warp|To Tulimshar Forge|-1,-1,021-2.gat,79,138 -021-1.gat,133,24|warp|To Tulimshar Forge|-1,-1,021-2.gat,75,92 -021-1.gat,125,27|warp|To Tulimshar Forge|-1,-1,021-2.gat,124,68 -021-1.gat,125,30|warp|To Tulimshar Forge|-1,-1,021-2.gat,72,138 -021-1.gat,43,109|warp|To Store|-1,-1,021-2.gat,28,129 diff --git a/world/map/npc/021-1/bakery.txt b/world/map/npc/021-1/bakery.txt deleted file mode 100644 index 20dc49d5..00000000 --- a/world/map/npc/021-1/bakery.txt +++ /dev/null @@ -1,20 +0,0 @@ -// Outside the bakery - -021-1.gat,103,103,0|shop|Ara|163,WhiteCake:*500,ChocolateCake:*550,OrangeCake:*600,AppleCake:*600,CherryCake:*100 - -021-1.gat,108,102,0|script|Itka|114 -{ - mes "[Itka]"; - mes "\"This bakery is the best!\""; - close; - -OnTimer300000: - npctalk "Come to the bakery!"; - setnpctimer 0; - end; - -OnInit: - if (debug >= 2) end; - initnpctimer; - end; -} diff --git a/world/map/npc/021-1/banu.txt b/world/map/npc/021-1/banu.txt deleted file mode 100644 index db3830dc..00000000 --- a/world/map/npc/021-1/banu.txt +++ /dev/null @@ -1,112 +0,0 @@ -// Old woman working on a field, asks the player to get her some water -// after that she asks for a knife -// Using bit 10 and 11 of QUEST_NorthTulimshar (second half of nibble 2) -// author: Jenalya - -021-1.gat,102,54,0|script|Banu|154 -{ - set @state, ((QUEST_NorthTulimshar & TWOBIT_5_MASK) >> TWOBIT_5_SHIFT); - set @EXP, 30; - set @money_water, 200; - set @money_knife, 60; - - if (@state >= 3) goto L_Done; - if (@state == 2) goto L_Knife; - if (@state == 1) goto L_Water; - - mes "[Banu]"; - mes "\"Ah, hello. You've come at just the right moment. The field work is hard and the sun is burning."; - mes "Would you mind refilling an old woman's Empty Bottle with water?\""; - menu - "Sure!",L_Next, - "Sorry, I'm busy.",L_Close; - -L_Next: - getinventorylist; - if (@inventorylist_count == 100) - goto L_FullInv; - - mes "She smiles."; - mes "[Banu]"; - mes "\"Here is my Empty Bottle. There is a well right over there at the market.\""; - getitem "EmptyBottle", 1; - set @state, 1; - callsub S_Update_Mask; - goto L_Close; - -L_Water: - mes "[Banu]"; - mes "\"Ah, you're back. I'm so thirsty.\""; - next; - if (countitem("BottleOfWater") < 1) - goto L_NoWater; - delitem "BottleOfWater", 1; - mes "She grabs the Bottle of Water and drinks."; - getexp @EXP, 0; - set Zeny, Zeny + @money_water; - set @state, 2; - callsub S_Update_Mask; - mes "[Banu]"; - mes "\"Ah, that's refreshing. Thank you. You're a good kid. Have this for your expenses."; - mes "Maybe you can do me another favor?\""; - next; - mes "\"I need a new Knife. Mjolnir in the Tulimshar forge to the north east of here is selling some. But it's such a long way for my old legs."; - mes "Would you go to get me a Knife?\""; - goto L_Close; - -L_Knife: - mes "[Banu]"; - mes "\"Hello dear. Did you get the knife for me?\""; - menu - "Yeah, here is it.",L_Next1, - "Not yet.",L_Close; - -L_Next1: - if (countitem("Knife") < 1) - goto L_NoKnife; - delitem "Knife", 1; - getexp @EXP, 0; - set Zeny, Zeny + @money_knife; - set @state, 3; - callsub S_Update_Mask; - mes "[Banu]"; - mes "\"Thank you! You're a darling. Please take this for your effort.\""; - goto L_Close; - -L_Done: - mes "[Banu]"; - set @rand, rand(3); - if (@rand == 0) - mes "\"I spent all my life here in Tulimshar. It's a good place to live.\""; - if (@rand == 1) - mes "\"Did you see the kids playing hide and seek? Ah, when I was young I used to play with my good friend Sorfina. She lives in the suburbs now, north of Tulimshar.\""; - if (@rand == 2) - mes "\"Tulimshar is ruled by a council of wise wizards.\""; - goto L_Close; - -L_NoWater: - mes "[Banu]"; - mes "\"You didn't get it yet? Shame on you, an old woman is depending on you.\""; - goto L_Close; - -L_NoKnife: - mes "[Banu]"; - mes "\"Where is it? Don't play tricks on an old woman! That's not nice.\""; - goto L_Close; - -L_FullInv: - mes "[Banu]"; - mes "\"Oh my dear! You're carrying so many things that you can't take my Empty Bottle.\""; - goto L_Close; - -L_Close: - set @inventorylist_count, 0; - set @EXP, 0; - set @state, 0; - set @rand, 0; - close; - -S_Update_Mask: - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_5_MASK)) | (@state << TWOBIT_5_SHIFT); - return; -} diff --git a/world/map/npc/021-1/eurni.txt b/world/map/npc/021-1/eurni.txt deleted file mode 100644 index e24d774c..00000000 --- a/world/map/npc/021-1/eurni.txt +++ /dev/null @@ -1,45 +0,0 @@ -// - -021-1.gat,141,113,0|script|Eurni|136 -{ - set @halloween_npc_id, $@halloween_npc_eurni; - callfunc "TrickOrTreat"; - - if (BaseLevel < 10) goto L_TooYoung; - if (Zeny < 10000) goto L_NoMoney; - - mes "[Eurni the Surgeon]"; - mes "\"Are you tired of being what you are?\""; - next; - - mes "[Eurni the Surgeon]"; - mes "\"Would you maybe be interested in a sex change?\""; - next; - - mes "[Server]"; - mes "Warning: All characters under this login will be changed. Once it's done, you will be kicked from the server. Don't panic, as everything is fine."; - next; - menu - "Please do, my dear...", L_Change, - "Leave alone my family treasure!", L_Close; - -L_Change: - if (Zeny < 10000) - goto L_NoMoney; - set Zeny, Zeny - 10000; - changesex; - close; - -L_TooYoung: - mes "[Eurni the Surgeon]"; - mes "\"Move along, kid.\""; - close; - -L_NoMoney: - mes "[Eurni the Surgeon]"; - mes "\"You don't have enough to pay for my services.\""; - close; - -L_Close: - close; -} diff --git a/world/map/npc/021-1/gate_guards.txt b/world/map/npc/021-1/gate_guards.txt deleted file mode 100644 index 752718e8..00000000 --- a/world/map/npc/021-1/gate_guards.txt +++ /dev/null @@ -1,53 +0,0 @@ -// Various guards at gates - -// Guards by the gates to the port -021-1.gat,70,23,0|script|Guard#port1|104 -{ - mes "[Guard]"; - mes "\"Lots of stuff happens in the port district. Those sailors can get quite rowdy.\""; - close; -} - -021-1.gat,110,23,0|script|Guard#port2|104 -{ - mes "[Guard]"; - mes "\"You wouldn't believe the refuse that comes in from the docks.\""; - close; -} - -// Guard near the magic school -021-1.gat,46,65,0|script|Guard#school|104 -{ - mes "[Guard]"; - mes "\"I'm just here to provide a presence for the guards at this gate. The mages here can defend themselves without problem.\""; - close; -} - -// Guards by the gates to East Tulimshar -021-1.gat,146,23,0|script|Guard#east1|104 -{ - mes "[Guard]"; - mes "\"I make sure less desirables don't enter the Noble District.\""; - close; -} -021-1.gat,156,42,0|script|Guard#east2|104 -{ - mes "[Guard]"; - mes "\"The volcano and earthquake did a lot of damage, but the citizens of Tulimshar sure did a good job of cleaning up.\""; - close; -} - -021-1.gat,156,95,0|script|Guard#east3|104 -{ - mes "[Guard]"; - mes "\"The Palace is East of here. That is where you will find the Council of Wizards.\""; - close; -} - -// Near the bazaar, outside the government building -021-1.gat,55,136,0|script|Guard#govt_out|123 -{ - mes "[Guard]"; - mes "\"This is a government building. They have some clerical and tax offices in here. There is also a jail in the subbasement.\""; - close; -} diff --git a/world/map/npc/021-1/hideandseek.txt b/world/map/npc/021-1/hideandseek.txt deleted file mode 100644 index 621f8468..00000000 --- a/world/map/npc/021-1/hideandseek.txt +++ /dev/null @@ -1,385 +0,0 @@ -// Children playing Hide and Seek -// QUEST_NorthTulimshar -// BYTE 0 -// Bit 0: started quest at Ayasha -// Bit 1 - 5: found one of the kids each -// Bit 6: talked to Ayasha after finding all kids -// Bit 7: unused -// Author: Jenalya - --|script|#hideandseekNTconfig|-1 -{ - end; - -OnInit: - set $@hideandseekNT_started, (1 << 0); - set $@hideandseekNT_found1, (1 << 1); - set $@hideandseekNT_found2, (1 << 2); - set $@hideandseekNT_found3, (1 << 3); - set $@hideandseekNT_found4, (1 << 4); - set $@hideandseekNT_found5, (1 << 5); - set $@hideandseekNT_ended, (1 << 6); - end; -} -021-1.gat,89,66,0|script|AyashaDebug|258 -{ - mes "[Ayasha Debug]"; - menu - "Show", L_Show, - "Reset", L_Reset, - "Close.", L_Close; - -L_Show: - set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); - mes "State: " + @state; - if (QUEST_NorthTulimshar & $@hideandseekNT_started) - mes "Start set"; - if (QUEST_NorthTulimshar & $@hideandseekNT_found1) - mes "Found 1 set"; - if (QUEST_NorthTulimshar & $@hideandseekNT_found2) - mes "Found 2 set"; - if (QUEST_NorthTulimshar & $@hideandseekNT_found3) - mes "Found 3 set"; - if (QUEST_NorthTulimshar & $@hideandseekNT_found4) - mes "Found 4 set"; - if (QUEST_NorthTulimshar & $@hideandseekNT_found5) - mes "Found 5 set"; - if (QUEST_NorthTulimshar & $@hideandseekNT_ended) - mes "Complete set"; - goto L_Close; - -L_Reset: - set QUEST_NorthTulimshar, 0; - goto L_Close; - -L_Close: - close; - -OnInit: - if (!debug) - disablenpc "AyashaDebug"; - end; -} -021-1.gat,87,66,0|script|Ayasha|258 -{ - set @child_number, 0; - callfunc "XmasList"; - - set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); - - set @EXP, 75; - - if (@state > 63) goto L_Done; - if (@state == 63) goto L_Reward; - if (@state > 0) goto L_Doing; - - mes "You see a girl who is holding her hands in front of her face."; - mes "[Ayasha]"; - mes "\"98... 99... 100!\""; - mes "She takes away her hands and looks up."; - menu - "Hello, what are you doing?",L_Next, - "(Leave)",L_Close; - -L_Next: - mes "[Ayasha]"; - mes "\"I'm playing hide and seek with my friends!"; - mes "Do you want to play with us?\""; - menu - "Sure, sounds like fun.",L_Next1, - "I'm busy with more important things!",L_Close; - -L_Next1: - mes "[Ayasha]"; - mes "\"Great! You can take my turn with searching. You need to find all five of my friends."; - mes "They're hiding somewhere in the city, you will have to explore to find them. They could be hiding anywhere.\""; - - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_started; - goto L_Close; - -L_Doing: - mes "[Ayasha]"; - mes "\"You still need to find some of my friends. There are five of them."; - mes "Remember, they're hiding somewhere in the city, you will have to explore to find them. They could be hiding anywhere.\""; - goto L_Close; - -L_Reward: - mes "[Ayasha]"; - mes "\"Oh, you found them all! Good job! Now it's my turn with searching again. Go and hide!\""; - getexp @EXP, 0; - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_ended; - menu - "I think I need to do other things now.",L_Next2; - -L_Next2: - mes "[Ayasha]"; - mes "\"Oh, ok."; - mes "Have you already seen the bazaar? It's a very exciting place! I love the entertainer. She can make so many funny faces.\""; - goto L_Close; - -L_Done: - mes "[Ayasha]"; - mes "\"Hello! It was fun to play with you."; - mes "When you go to the bazaar, you can say hello to Mikhail. He's very nice! But very shy.\""; - goto L_Close; - -L_Close: - set @state, 0; - set @EXP, 0; - close; -} - -022-1.gat,112,23,0|script|Latif|262 -{ - set @child_number, 1; - callfunc "XmasList"; - set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); - - set @EXP, 15; - - if (@state > 63) goto L_Done; - if ((@state > 0) && !(QUEST_NorthTulimshar & $@hideandseekNT_found1)) goto L_Find; - if (@state > 0) goto L_Doing; - - mes "You see a kid hiding behind a box."; - menu - "What are you doing there?",L_Next, - "(Leave)",L_Close; - -L_Next: - mes "[Latif]"; - mes "\"Hiding. We're playing hide and seek. Don't say that is boring. It's fun.\""; - menu - "I agree, it's fun.",L_Agree, - "Hide and seek? Lame.",L_Next1; - -L_Next1: - mes "[Latif]"; - mes "\"My friend Vincent thinks so too. He doesn't want to join us playing. Do you know what he does instead?"; - mes "He builds action figures out of Bug Legs! That is lame.\""; - goto L_Close; - -L_Agree: - mes "[Latif]"; - mes "\"Yeah, right? My friend Vincent doesn't thinks so. He doesn't want to join us playing. Do you know what he does instead?"; - mes "He builds action figures out of Bug Legs! That is lame.\""; - goto L_Close; - -L_Find: - mes "[Latif]"; - mes "\"Hey! Ah, you found me. Well done. But my hiding place wasn't that difficult this time.\""; - getexp @EXP, 0; - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_found1; - next; - mes "\"Here, do you want a candy?\""; - getitem "Candy", 1; - goto L_Close; - -L_Doing: - mes "[Latif]"; - mes "\"You didn't find all of us yet? Seems like the other ones found a better place to hide.\""; - goto L_Close; - -L_Done: - mes "[Latif]"; - mes "\"Inside the building in the Northeastern market, there is a workshop. My father works there and wants me to do that too when I'm grown up. But I don't want do that! I want to go on an adventure! Just like you.\""; - goto L_Close; - -L_Close: - set @state, 0; - set @EXP, 0; - close; -} - -001-1.gat,39,33,0|script|Charda|260 -{ - set @child_number, 2; - callfunc "XmasList"; - set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); - - set @EXP, 15; - - if (@state > 63) goto L_Done; - if ((@state > 0) && !(QUEST_NorthTulimshar & $@hideandseekNT_found2)) goto L_Find; - if (@state > 0) goto L_Doing; - - mes "[Charda]"; - mes "\"Hello. Psht, be careful. I'm playing hide and seek with Ayasha. You'll draw attention to my hiding place.\""; - next; - mes "\"They will never find me in the bazaar. Ian is here, he helps all those adventurers that come here.\""; - goto L_Close; - -L_Find: - mes "[Charda]"; - mes "\"Oh! Got me! You're good at this.\""; - getexp @EXP, 0; - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_found2; - next; - mes "She takes something out of her pocket."; - mes "[Charda]"; - mes "\"I'm hungry now. Do you want chocolate too?\""; - getitem "ChocolateBar", 1; - next; - mes "\"My mom doesn't want me to eat so much chocolate, but I got it from the trader on the bazaar. He sells many different things."; - mes "I convinced him to teach me how to trade. It's fun.\""; - goto L_Close; - -L_Doing: - mes "[Charda]"; - mes "\"Did you find the others yet?\""; - goto L_Close; - -L_Done: - mes "[Charda]"; - mes "\"Hey! We're still playing hide and seek. What are you going to do? Will you go to Hurnscald with the ferry? The mother of my friends Rossy and Julia come from there. They are on a vacation there at the moment.\""; - next; - mes "\"Rossy told me that it's a very beautiful place. Lots of trees and flowers and grass, everything's green.\""; - mes "She sighs."; - mes "[Charda]"; - mes "\"Sounds wonderful.\""; - goto L_Close; - -L_Close: - set @state, 0; - set @EXP, 0; - close; -} - -021-1.gat,78,87,0|script|Faris|259 -{ - set @child_number, 3; - callfunc "XmasList"; - set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); - - set @EXP, 25; - - if (@state > 63) goto L_Done; - if ((@state > 0) && !(QUEST_NorthTulimshar & $@hideandseekNT_found3)) goto L_Find; - if (@state > 0) goto L_Doing; - - mes "[Faris]"; - mes "\"Oh, hi there. What are you doing here on the roof?\""; - menu - "I'm just having a look around.",L_Next, - "It's nice place here, isn't it?",L_Next; - -L_Next: - mes "[Faris]"; - mes "\"He, you're cool. I'm hiding here from Ayasha, we're playing hide and seek. This is the best hiding place ever.\""; - goto L_Close; - -L_Find: - mes "[Faris]"; - mes "\"You found me! Well done. You look a bit thirsty, here.\""; - getexp @EXP, 0; - getitem "CactusDrink", 1; - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_found3; - next; - mes "\"It's really cool you're playing with us. I'm sure you have a lot of other things to do."; - mes "You're an adventurer, right? I want to become an adventurer too when I'm grown up. I'll talk to Aidan then.\""; - next; - mes "\"Aidan is on the bazaar and you can register there for monster points. That's something the Wizard's Council made up. They reward you for slaying monsters. It's so cool.\""; - goto L_Close; - -L_Doing: - mes "[Faris]"; - mes "\"Are you still searching for the others? Nobody else is up here.\""; - goto L_Close; - -L_Done: - mes "[Faris]"; - mes "\"I'll go to the bazaar and ask Bernard for some soup when we're done with playing. His soup is delicious!\""; - goto L_Close; - -L_Close: - set @state, 0; - set @EXP, 0; - close; -} - -022-1.gat,28,34,0|script|Rasin|263 -{ - set @child_number, 4; - callfunc "XmasList"; - set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); - - set @EXP, 15; - - if (@state > 63) goto L_Done; - if ((@state > 0) && !(QUEST_NorthTulimshar & $@hideandseekNT_found4)) goto L_Find; - if (@state > 0) goto L_Doing; - - mes "[Rasin]"; - mes "\"The harbor is to the East from here. There you can take a ferry to other places."; - mes "And now go away, I'm playing hide and seek and Ayasha shouldn't see me here. You'll draw her attention when you talk to me.\""; - goto L_Close; - -L_Find: - mes "[Rasin]"; - mes "\"Ah, you found me. I need to find a better place to hide next time.\""; - getexp @EXP, 0; - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_found4; - goto L_Close; - -L_Doing: - mes "[Rasin]"; - mes "\"Hehe, I'm curious when you'll have found all of us.\""; - goto L_Close; - -L_Done: - mes "[Rasin]"; - mes "\"Thanks for playing with us! It was fun!"; - mes "Will you leave Tulimshar to go on an adventure in other places of the world?\""; - goto L_Close; - -L_Close: - set @state, 0; - set @EXP, 0; - close; -} - -068-1.gat,94,84,0|script|Ghada|265 -{ - set @child_number, 5; - callfunc "XmasList"; - set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); - - set @EXP, 15; - - if (@state > 63) goto L_Done; - if ((@state > 0) && !(QUEST_NorthTulimshar & $@hideandseekNT_found5)) goto L_Find; - if (@state > 0) goto L_Doing; - - mes "You see a girl standing behind the a tree. She has a look of intense concentration on her face."; - menu - "Hi, what are you doing there?",L_Next, - "(Leave)",L_Close; - -L_Next: - mes "[Ghada]"; - mes "\"Oh, hello. I'm hiding. We're playing hide and seek.\""; - goto L_Close; - -L_Find: - mes "[Ghada]"; - mes "\"Oh no! You found me! You must be very clever."; - mes "My friend Sandra is clever too, but she said it's a waste of time to play hide and seek.\""; - getexp @EXP, 0; - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_found5; - goto L_Close; - -L_Doing: - mes "[Ghada]"; - mes "\"Are you still searching for the others? I'm sure you'll find them soon.\""; - goto L_Close; - -L_Done: - mes "[Ghada]"; - mes "\"It's so nice that you played with us! You're about the same age as my older sister, but she never plays with us. Her name is Sarah.\""; - goto L_Close; - -L_Close: - set @state, 0; - set @EXP, 0; - close; -} diff --git a/world/map/npc/021-1/imec.txt b/world/map/npc/021-1/imec.txt deleted file mode 100644 index 1c280253..00000000 --- a/world/map/npc/021-1/imec.txt +++ /dev/null @@ -1,111 +0,0 @@ -// Merchant got his shop shot down due to selling poison and asks the player for some errand -// after finishing this, daily quest with scorpion stingers -// Using bit 8 and 9 of QUEST_NorthTulimshar (first half of nibble 2) -// author: Jenalya -021-1.gat,120,31,0|script|Imec|162 -{ - set @state, ((QUEST_NorthTulimshar & TWOBIT_4_MASK) >> TWOBIT_4_SHIFT); - set @money, 500; - - if (@state >= 3) goto L_Stingers; - if (@state == 2) goto L_Return; - if (@state == 1) goto L_Bring; - - mes "[Imec]"; - mes "\"The Wizard's Council shut down my shop!"; - mes "They said I was selling illegal things, but what's so illegal about poison?\""; - next; - mes "\"Anyway, I hope to get a merchant's permit again... One of these days...\""; - mes "He looks at you."; - next; - mes "[Imec]"; - mes "\"You can do an errand for me. I just finished writing a petition to the Council about my shop."; - mes "If you bring it to the government building near the bazaar, I'll give you a small reward.\""; - goto L_Offer; - -L_Offer: - menu - "What is in that government building and where is it?",L_Explain, - "Ok, sounds good.",L_Next, - "No!",L_Close; - -L_Next: - mes "[Imec]"; - mes "\"Very good. Here is the paper.\""; - mes "Imec gives you a sealed letter. You put it away in a pocket separated from your inventory, so it won't get lost."; - set @state, 1; - callsub S_Update_Mask; - goto L_Close; - -L_Explain: - mes "[Imec]"; - mes "\"Follow the road to the south past the bakery, then go west when you reach the town walls. It's right before the gate to the bazaar.\""; - next; - mes "\"In the building there are several offices. If you want to join or form a party, you have to pay your taxes there first.\""; - next; - mes "\"So, will you bring my petition to the office in that building?\""; - if (@state == 0) - goto L_Offer; - goto L_Close; - -L_Bring: - mes "[Imec]"; - mes "\"What are you waiting for? Bring my petition to the government building.\""; - menu - "Where is it again?",L_Explain, - "I'm on my way.",L_Close; - -L_Return: - mes "[Imec]"; - mes "\"Ah, you're back.\""; - mes "You hand the letter of acknowledgement over to Imec."; - next; - mes "[Imec]"; - mes "\"Very well. I'm sure I'll be able to open my shop again soon.\""; - next; - mes "It seems Imec doesn't notice you anymore."; - menu - "You mentioned a reward.",L_Next1; - -L_Next1: - mes "[Imec]"; - mes "\"What? Ah, right. Here, have this.\""; - set Zeny, Zeny + @money; - set @state, 3; - callsub S_Update_Mask; - next; - mes "\"Actually, you could be of further help to me.\""; - next; - goto L_Stingers; - -L_Stingers: - mes "[Imec]"; - set @dq_level, 10; - set @dq_cost, 3; - set @dq_count, 3; - set @dq_name$, "ScorpionStinger"; - set @dq_friendly_name$, "Scorpion Stingers"; - set @dq_money, 200; - set @dq_exp, 40; - - callfunc "DailyQuest"; - goto L_Close; - -L_Close: - set @money, 0; - set @state, 0; - - set @dq_level, 0; - set @dq_cost, 0; - set @dq_count, 0; - set @dq_name$, ""; - set @dq_friendly_name$, ""; - set @dq_money, 0; - set @dq_exp, 0; - set @dq_return, 0; - close; - -S_Update_Mask: - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_4_MASK)) | (@state << TWOBIT_4_SHIFT); - return; -} diff --git a/world/map/npc/021-1/inac.txt b/world/map/npc/021-1/inac.txt deleted file mode 100644 index b2ed01bd..00000000 --- a/world/map/npc/021-1/inac.txt +++ /dev/null @@ -1,17 +0,0 @@ -// - -021-1.gat,53,103,0|script|Inac|156 -{ - set @halloween_npc_id, $@halloween_npc_inac; - callfunc "TrickOrTreat"; - - mes "[Inac]"; - mes "\"This cities water system is amazing. It was built centuries ago after the cataclysm that turned Tonori into this desert.\""; - next; - mes "[Inac]"; - mes "\"They say that not much maintenance is needed, even though it's so old.\""; - next; - mes "[Inac]"; - mes "\"They also say monsters have moved into the underground tunnels that bring and distribute water.\""; - close; -} diff --git a/world/map/npc/021-1/mapflags.txt b/world/map/npc/021-1/mapflags.txt deleted file mode 100644 index ffa56dfe..00000000 --- a/world/map/npc/021-1/mapflags.txt +++ /dev/null @@ -1,2 +0,0 @@ -021-1.gat|mapflag|town -021-1.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/021-1/north_shops.txt b/world/map/npc/021-1/north_shops.txt deleted file mode 100644 index 3211b2b8..00000000 --- a/world/map/npc/021-1/north_shops.txt +++ /dev/null @@ -1,20 +0,0 @@ -// Northern shopping plaza - -// More high-end stuff to satisfy the richer people in Royal Tulimshar - -// Some clothing -021-1.gat,135,36,0|shop|Inar|108,CottonShirt:*300,CottonShorts:*1000,CottonBoots:*2000,CottonHeadband:*3000 - -021-1.gat,129,40,0|script|Well|400 -{ - callfunc "WaterBottle"; - end; -} - -// An officer (for security) -021-1.gat,128,37,0|script|Officer|150 -{ - mes "[Officer]"; - mes "I'm here for extra security for this market."; - close; -} diff --git a/world/map/npc/021-1/npcs.txt b/world/map/npc/021-1/npcs.txt deleted file mode 100644 index 50d18a6a..00000000 --- a/world/map/npc/021-1/npcs.txt +++ /dev/null @@ -1,39 +0,0 @@ -// Talk NPCs to help make trek interesting between Tutorial and Bazaar. - -021-1.gat,77,42,0|script|Jeric|214 -{ - set @npcname$, "Jeric"; - - mes "[" + @npcname$ + "]"; - mes "\"My father is an adventurer.\""; - next; - mes "\"After he proved himself around town, the guards let him fight monsters in the Sandstorm mine.\""; - set @npcname$, ""; - close; -} - -021-1.gat,76,67,0|script|Silvia|207 -{ - set @npcname$, "Silvia"; - - mes "[" + @npcname$ + "]"; - mes "\"If you follow the road west, then south, you will arrive at the Bazaar in Southern Tulimshar.\""; - next; - mes "\"If you go west, then north, you'll see the Wizard Academy my parents just sent me to.\""; - next; - mes "\"The Academy is good, but I wish I had more free time. It takes a lot of intelligence to get what the teachers are talking about.\""; - set @npcname$, ""; - close; -} - -021-1.gat,51,123,0|script|Michel|215 -{ - set @npcname$, "Michel"; - - mes "[" + @npcname$ + "]"; - mes "\"Elanore is a magician in Southern Tulimshar that helps young adventurers by healing their battle wounds. When they are experienced enough, she stops healing them.\""; - next; - mes "\"You can find her by going through the Bazaar and to the East.\""; - set @npcname$, ""; - close; -} diff --git a/world/map/npc/021-1/pauline.txt b/world/map/npc/021-1/pauline.txt deleted file mode 100644 index c2884c19..00000000 --- a/world/map/npc/021-1/pauline.txt +++ /dev/null @@ -1,307 +0,0 @@ -//Author: tux9th -//This is the continuation of Astral Magic Level 2. -//This uses the QUEST_MAGIC2 variable Nibble 4. -//Quest States: -// @pauline_state 1: Got Magic, started to talk to her about Magic. -// @pauline_state 2: Finished Talking to her about new Astral Spells, learnt invocations. -// @pauline_state 3: Told her the correct ingredients to the Mouboo summon spell. -// @pauline_state 4: Told her the correct ingredients to the Pinkie summon spell. -// -//Variables: -// @pauline_ingredient1$ First ingredient input. -// @pauline_ingredient2$ Second ingredient input. -// @pauline_REWARD amount of XP gained for telling her ingredients for each spell. - -021-1.gat,55,66,0|script|Pauline|208 -{ - -//Bitmasking -// QUEST_MAGIC2 - Nibble4 - set @Pauline_MASK, NIBBLE_4_MASK; - set @Pauline_SHIFT, NIBBLE_4_SHIFT; - - set @pauline_state, ((QUEST_MAGIC2 & @Pauline_MASK) >> @Pauline_SHIFT); - -//Bitmasks END - - set @pauline_REWARD, 10000; - - if (@pauline_state == 4) goto L_MoreMagic; - if (@pauline_state == 3) goto L_KnowIngredientsPinkie; - if (@pauline_state == 2) goto L_Ingredients; - if (@pauline_state == 1) goto L_Back; - - if (getskilllv(SKILL_MAGIC_ASTRAL) > 0) - goto L_Magic; - mes "[Pauline]"; - mes "\"I've mastered several schools of magic and fought the Yeti in Kaizei.\""; - next; - mes "\"The path of magic is a long and difficult one.\""; - goto L_Close; - -L_Magic: - mes "[Pauline]"; - mes "\"Ah. I see you are skilled in the Art of Astral Magic.\""; - mes "\"Who taught you?\""; - menu - "I learnt it myself!", L_Next, - "Sagatha is my teacher.", L_Sagatha, - "You must be mistaken.", L_Close; - -L_Next: - mes "\"You did? Not bad. I guess then there is nothing I can teach you. Or are you interested in sharing knowledge?\""; - menu - "Yes, please.", L_Spells, - "No, thanks.", L_Close; - -L_Sagatha: - mes "[Pauline]"; - mes "\"Ah, that Witch!\""; - mes "\"Very well.\""; - next; - mes "\"Do you want me to teach you things Sagatha doesn't know yet?\""; - next; - menu - "Yes.", L_Spells, - "No.", L_Close; - -L_Back: - mes "[Pauline]"; - mes "\"So, you're back. Are you ready to share knowledge now?\""; - menu - "Yes.", L_Spells, - "No.", L_Close; - -L_Spells: - set @pauline_state, 1; - callsub S_Update_Mask; - mes "[Pauline]"; - mes "\"Okay.\""; - mes "\"Not long ago I discovered some new caves near Tulimshar. In an abandond chamber I found some paintings on the wall.\""; - next; - mes "\"They weren't typical for this region, so I examined them closely. I found some invocations I have never heard before.\""; - mes "\"I thought that they would fit better into the Woodland area. I could only decipher two invocations so far. Those are two spells used to summon creatures.\""; - next; - mes "\"One was for summoning Mouboos and the other one was for summoning Pinkies.\""; - mes "\"Have you ever heared about those?\""; - next; - menu - "Yes. I thought you had something new to tell. [Walk Away]", L_Close, - "No, tell me more.", L_Next1; - -L_Next1: - mes "[Pauline]"; - mes "\"Well I could only read the invocations. So I don't exactly know what kind of ingredients you are going to need.\""; - mes "\"The first one for the mouboo was " + getspellinvocation("summon-mouboo") + " and the one for the pinkie was " + getspellinvocation("summon-pinkie") +".\""; - next; - mes "\"For the pinkie spell my suggestion is to try similar ingredients to the other Astral spells. Try a root and some item typical for pinkies.\""; - mes "\"The mouboo spell might be more complicated. From what I could translate, one of the spell components is crafted by magic.\""; - next; - mes "\"When you find the right ingredients, come back and bring them to me to try those spells out.\""; - next; - mes "\"Goodbye.\""; - set @pauline_state, 2; - callsub S_Update_Mask; - goto L_Close; - -L_Ingredients: - mes "[Pauline]"; - mes "\"Hello, have you found out what ingredients to use yet?\""; - menu - "Yes.", L_KnowIngredientsMouboo, - "No.", L_Next2; - -L_Next2: - mes "\"Okay. Come back as soon as you know.\""; - goto L_Close; - -L_KnowIngredientsMouboo: - mes "\"Did you bring them?\""; - menu - "Yes." , L_Next3, - "No.", L_ComeBackLater; - -L_Next3: - mes "\"Then tell me the ingredients for the mouboo summoning spell and give them to me. Start with the first ingredient and then tell me the second one separately.\""; - next; - mes "This is case sensitive. Also do not enter whitespaces."; - next; - input @pauline_ingredient1$; - mes "Next ingredient."; - input @pauline_ingredient2$; - if (@pauline_ingredient1$ == "") - goto L_Wrong; - if (@pauline_ingredient2$ == "") - goto L_Wrong; - if (countitem(@pauline_ingredient1$) < 1) - goto L_NotEnough; - if (countitem(@pauline_ingredient2$) < 1) - goto L_NotEnough; - mes "\"Do you want to give me these items?\""; - menu - "No.", L_ComeBackLater, - "Yes.", L_Next4; - -L_Next4: - delitem @pauline_ingredient1$, 1; - delitem @pauline_ingredient2$, 1; - mes "\"Okay let me try this.\""; - if (@pauline_ingredient1$ == "Root") - goto L_Pass1Mouboo; - if (@pauline_ingredient1$ == "MoubooFigurine") - goto L_Pass2Mouboo; - goto L_DidNotWorkMouboo; - -L_DidNotWorkMouboo: - mes "The Witch takes " + @pauline_ingredient1$ + " and " + @pauline_ingredient2$ + " and puts them together calling " + getspellinvocation("summon-mouboo") + "."; - mes "Nothing happens."; - mes "[Pauline]"; - mes "\"It seems you did not tell me the correct ingredients. Come back when you find the correct ones.\""; - goto L_Close; - -L_Pass1Mouboo: - if (@pauline_ingredient2$ == "MoubooFigurine") - goto L_TrySpellMouboo; - goto L_DidNotWorkMouboo; - -L_Pass2Mouboo: - if (@pauline_ingredient2$ == "Root") - goto L_TrySpellMouboo; - goto L_DidNotWorkMouboo; - -L_TrySpellMouboo: - mes "The Witch takes " + @pauline_ingredient1$ + " and " + @pauline_ingredient2$ + " and puts them together calling " + getspellinvocation("summon-mouboo") + "."; - monster "021-1.gat", 55,68, "Good", 1028, 1; - mes "[Pauline]"; - mes "\"It worked!\""; - set @pauline_state, 3; - callsub S_Update_Mask; - getexp @pauline_REWARD, 0; - goto L_Close; - -L_KnowIngredientsPinkie: - mes "[Pauline]"; - mes "\"Now give me the ingredients for the pinkie spell.\""; - next; - mes "This is case sensitive. Also do not enter whitespaces."; - input @pauline_ingredient1$; - mes "Next ingredient."; - input @pauline_ingredient2$; - if (@pauline_ingredient1$ == "") - goto L_Wrong; - if (@pauline_ingredient2$ == "") - goto L_Wrong; - if (countitem(@pauline_ingredient1$) < 1) - goto L_NotEnough; - if (countitem(@pauline_ingredient2$) < 1) - goto L_NotEnough; - mes "\"Do you want to give me these items?\""; - menu - "No.", L_ComeBackLater, - "Yes.", L_Next5; - -L_Next5: - delitem @pauline_ingredient1$, 1; - delitem @pauline_ingredient2$, 1; - mes "\"Okay, let me try this.\""; - if (@pauline_ingredient1$ == "Root") - goto L_Pass1Pinkie; - if (@pauline_ingredient1$ == "PinkAntenna") - goto L_Pass2Pinkie; - goto L_DidNotWorkPinkie; - -L_DidNotWorkPinkie: - mes "The Witch takes " + @pauline_ingredient1$ + " and " + @pauline_ingredient2$ + " and puts them together calling " + getspellinvocation("summon-pinkie") + "."; - mes "Nothing happens."; - mes "[Pauline]"; - mes "\"It seems you did not tell me the correct ingredients. Come back when you find the correct ones.\""; - goto L_Close; - -L_Pass1Pinkie: - if (@pauline_ingredient2$ == "PinkAntenna") - goto L_TrySpellPinkie; - goto L_DidNotWorkPinkie; - -L_Pass2Pinkie: - if (@pauline_ingredient2$ == "Root") - goto L_TrySpellPinkie; - goto L_DidNotWorkPinkie; - -L_TrySpellPinkie: - mes "The Witch takes " + @pauline_ingredient1$ + " and " + @pauline_ingredient2$ + " and puts them together calling " + getspellinvocation("summon-pinkie") + "."; - monster "021-1.gat", 54,68, "Good", 1018, 1; - mes "[Pauline]"; - mes "\"It worked!\""; - set @pauline_state, 4; - callsub S_Update_Mask; - getexp @pauline_REWARD, 0; - goto L_Close; - -L_MoreMagic: - mes "[Pauline]"; - mes "\"Thanks for telling me the ingredients. As soon as I find out more about those wall paintings I will let you know.\""; - goto L_Close; - -L_Wrong: - mes "The Witch looks at you and snorts."; - mes "[Pauline]"; - mes "\"You told me the wrong ingredients. Come back as soon as you know the correct ones.\""; - goto L_Close; - -L_NotEnough: - mes "[Pauline]"; - mes "\"Hey, you don't have this with you!\""; - mes "\"Come back when you have the right ingredients.\""; - goto L_Close; - -L_ComeBackLater: - mes "[Pauline]"; - mes "\"Then come back later.\""; - goto L_Close; - -L_Close: - set @pauline_ingredient1$, ""; - set @pauline_ingredient2$, ""; - set @pauline_state, 0; - set @pauline_REWARD, 0; - close; - -//Bitmasks -S_Update_Mask: - set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Pauline_MASK)) | (@pauline_state << @Pauline_SHIFT); - return; -} - -021-1.gat,53,66,0|script|PaulineDebug|208 -{ -//load Bitmasks; - set @Pauline_MASK, NIBBLE_4_MASK; - set @Pauline_SHIFT, NIBBLE_4_SHIFT; - - set @pauline_state, ((QUEST_MAGIC2 & @Pauline_MASK) >> @Pauline_SHIFT); - - mes "Reset Quest State"; - mes @pauline_state; - menu - "Yes.", L_Next, - "No.", L_Close; - -L_Next: - set @pauline_state, 0; - callsub S_Update_Mask; - mes "Done"; - close; - -L_Close: - set @pauline_state, 0; - close; - -S_Update_Mask: - set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Pauline_MASK)) | (@pauline_state << @Pauline_SHIFT); - return; - -OnInit: - if (!debug) - disablenpc "PaulineDebug"; - end; -} diff --git a/world/map/npc/021-1/sewer_east.txt b/world/map/npc/021-1/sewer_east.txt deleted file mode 100644 index 4a0b22d8..00000000 --- a/world/map/npc/021-1/sewer_east.txt +++ /dev/null @@ -1,17 +0,0 @@ -// The Sewer Grate - -021-1.gat,145,136,0|script|#tulimsharsewer2|45,0,0 -{ - mes "Descend into the sewers?"; - next; - menu - "Yes.", L_Sewer, - "Nevermind.", L_Close; - -L_Sewer: - warp "021-3",143,129; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/021-1/sewer_north.txt b/world/map/npc/021-1/sewer_north.txt deleted file mode 100644 index 9c4ed277..00000000 --- a/world/map/npc/021-1/sewer_north.txt +++ /dev/null @@ -1,17 +0,0 @@ -// The Sewer Grate - -021-1.gat,124,41,0|script|#tulimsharsewer1|45,0,0 -{ - mes "Descend into the sewers?"; - next; - menu - "Yes.", L_Sewer, - "Nevermind.", L_Close; - -L_Sewer: - warp "021-3",125,35; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/021-1/sewer_west.txt b/world/map/npc/021-1/sewer_west.txt deleted file mode 100644 index b629c342..00000000 --- a/world/map/npc/021-1/sewer_west.txt +++ /dev/null @@ -1,17 +0,0 @@ -// The Sewer Grate - -021-1.gat,52,104,0|script|#tulimsharsewer3|45,0,0 -{ - mes "Descend into the sewers?"; - next; - menu - "Yes.", L_Sewer, - "Nevermind.", L_Close; - -L_Sewer: - warp "021-3",57,101; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/021-1/weellos.txt b/world/map/npc/021-1/weellos.txt deleted file mode 100644 index 9f34e6a5..00000000 --- a/world/map/npc/021-1/weellos.txt +++ /dev/null @@ -1,34 +0,0 @@ -// A historian -// takes part in quest given by 021-2/kylian.txt - -021-1.gat,130,125,0|script|Weellos|103 -{ - set @halloween_npc_id, $@halloween_npc_weellos; - callfunc "TrickOrTreat"; - - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@knowWeellosNT; - set @kylian, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - - if isin("021-1.gat", 130, 120, 140, 125) goto L_In; - - mes "[Weellos]"; - mes "\"This is a very historic building. One of the oldest in the area. It's been turned into a museum.\""; - goto L_BeforeClose; - -// If the player is inside the fence with Weellos -L_In: - mes "[Weellos]"; - mes "\"What did you think of the historic building?\""; - goto L_BeforeClose; - -L_BeforeClose: - if (@kylian != 4) - goto L_Close; - next; - mes "You wonder if Kylian would be interested to see this building."; - goto L_Close; - -L_Close: - set @kylian, 0; - close; -} diff --git a/world/map/npc/022-1/_import.txt b/world/map/npc/022-1/_import.txt deleted file mode 100644 index 543a85c0..00000000 --- a/world/map/npc/022-1/_import.txt +++ /dev/null @@ -1,11 +0,0 @@ -// Map 022-1: Tulimshar Port -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 022-1.gat -npc: npc/022-1/_mobs.txt -npc: npc/022-1/_warps.txt -npc: npc/022-1/adrian.txt -npc: npc/022-1/anwar.txt -npc: npc/022-1/dock.txt -npc: npc/022-1/ferry_master.txt -npc: npc/022-1/mapflags.txt -npc: npc/022-1/npcs.txt diff --git a/world/map/npc/022-1/_mobs.txt b/world/map/npc/022-1/_mobs.txt deleted file mode 100644 index 51ade3ee..00000000 --- a/world/map/npc/022-1/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Port mobs - - - -022-1.gat,0,0,0|script|Mob022-1|-1 -{ - end; -} diff --git a/world/map/npc/022-1/_warps.txt b/world/map/npc/022-1/_warps.txt deleted file mode 100644 index f5f26146..00000000 --- a/world/map/npc/022-1/_warps.txt +++ /dev/null @@ -1,8 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Port warps - -022-1.gat,19,38|warp|To Tulismhar Suburbs|-1,2,042-1.gat,96,40 -022-1.gat,30,20|warp|To Lighthouse Beach|0,-1,023-1.gat,107,146 -022-1.gat,73,110|warp|To North Tulimshar|3,-1,021-1.gat,73,23 -022-1.gat,113,110|warp|To North Tulimshar|3,-1,021-1.gat,113,23 -022-1.gat,40,82|warp|To Tulimshar Suburbs|-1,-1,042-1.gat,116,85 diff --git a/world/map/npc/022-1/adrian.txt b/world/map/npc/022-1/adrian.txt deleted file mode 100644 index 7d76cf9d..00000000 --- a/world/map/npc/022-1/adrian.txt +++ /dev/null @@ -1,52 +0,0 @@ -// part of quest given by 021-2/kylian.txt -// Author: Jenalya - -// state 1: player has the task to get the luggage from the harbor -// state 2: Adrian gave the luggage to the player -// state 3: player gave luggage to Kylian and Kylian asks who to talk to for the shop license - -022-1.gat,58,54,0|script|Adrian|213 -{ - set @state, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - - mes "[Adrian]"; - mes "\"Hello. Are you here to get the luggage for some of our passengers?\""; - if (@state == 1) - menu - "Yes, Kylian sent me to get his luggage.",L_Get, - "No.",L_No; - menu - "No.",L_No; -L_No: - mes "[Adrian]"; - mes "\"Too bad. I want to go and drink a beer, but I have to wait here until all the luggage is picked up.\""; - mes "He sighs."; - goto L_Close; - -L_Get: - mes "[Adrian]"; - mes "\"Wonderful! Show me the ticket.\""; - mes "He checks the paper Kylian gave you and then takes a critical look at you."; - next; - getinventorylist; - if ((checkweight("LeatherSuitcase", 1) == 0) || (@inventorylist_count == 100)) - goto L_Inventory; - mes "[Adrian]"; - mes "\"Alright, here it is.\""; - mes "Adrain hands you a very heavy suitcase."; - getitem "LeatherSuitcase", 1; - set @state, 2; - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_5_MASK)) | (@state << NIBBLE_5_SHIFT); - goto L_Close; - -L_Inventory: - mes "[Adrian]"; - mes "\"The suitcase is rather heavy. You doesn't look as if you can handle that."; - mes "Maybe if you get rid of some of the other stuff you're carrying.\""; - goto L_Close; - -L_Close: - set @state, 0; - set @inventorylist_count, 0; - close; -} diff --git a/world/map/npc/022-1/anwar.txt b/world/map/npc/022-1/anwar.txt deleted file mode 100644 index 5de4532e..00000000 --- a/world/map/npc/022-1/anwar.txt +++ /dev/null @@ -1,203 +0,0 @@ -// Anwar needs a magic fertilizer for his field -// Quest uses Nibble 3 of QUEST_NorthTulimshar -// Author: Jenalya -// state 1: Anwar sent to Tinris for help to get a magic fertilizer -// state 2: Tinris asked for chocolate cake as present for his girlfriend -// state 3: Tinris asked for ingredients for the fertilizer -// state 4: Tinris gave you the fertilizer -// state 5: Anwar tried it out and it doesn't work well, sent you back to Tinris -// state 6: Tinris asked for more ingredients for a new try -// state 7: Tinris says it's really hard, gives you the fertilizer and tells you to ask Eomie to cast a spell on it -// state 8: Eomie sends you to get some stuff so she can interrupt her spell on the spot of grass -// state 9: Eomie casted a spell on the fertilizer -// state 10: Anwar used it and it worked. he asks you to help him preparing a thank-you-gift for each Tinris and Eomis -// state 11: Anwar asked to bring present to Tinris -// state 12: gave present to Tinris -// state 13: Anwar asked to bring present to Eomie -// state 14: gave present to Eomie -// state 15: reported back to Anwar and done -022-1.gat,41,46,0|script|Anwar|156 -{ - set @state, ((QUEST_NorthTulimshar & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); - - set @cloth_amount, 3; - set @silk_amount, 30; - - set @firstTry_exp, 400; - set @secondTry_exp, 700; - set @material_exp, 1000; - set @final_exp, 2000; - - if (@state >= 15) goto L_Done; - if (@state >= 13) goto L_GiveEomie; - if (@state >= 11) goto L_GiveTinris; - if (@state == 10) goto L_GiftMaterial; - if (@state >= 5) goto L_SecondTry; - if (@state >= 1) goto L_FirstTry; - - mes "[Anwar]"; - mes "\"Hello. You look like one of those young people who come here to go on an adventure."; - mes "Would you be interested in doing some small errand for me?\""; - menu - "Sure!",L_Sure, - "I'm busy, sorry.",L_Close; - -L_Sure: - mes "[Anwar]"; - mes "\"That's the spirit! Ok, I'm tired of spending most of my time working on this field. I heard the magicians at the magic school are researching ways to enhance the growth of plants with magic.\""; - next; - mes "\"I can't go there myself, since this area of the city is full of sneaky ragtags and they will rob my field if I leave here. Could you go to the magic school and ask for some magic enhancement for my field?\""; - next; - mes "\"To find the school just follow the street south and then go west.\""; - set @state, 1; - callsub S_Update_Mask; - goto L_Close; - -L_FirstTry: // @state >= 1 but below 5 - mes "[Anwar]"; - mes "\"I hope the wizards at the magic school can help me with the field. I'd really like to have more free time. I want to make clothing, but I'm not experienced enough to make a living out of that.\""; - if (@state != 4) - goto L_Close; - menu - "Tinris gave me a magic fertilizer for your field, but he isn't sure if it works.",L_Next; - -L_Next: - mes "[Anwar]"; - mes "\"Really? Well, let's try it out!\""; - mes "He takes the fertilizer and starts to bespatter the field."; - next; - mes "But it doesn't seem to be good for the plants, they start to shrivel and get brown."; - mes "[Anwar]"; - mes "\"Oh no! What is this? It's damaging my plants! Go back to Tinris and tell him it doesn't work!\""; - getexp @firstTry_exp, 0; - set @state, 5; - callsub S_Update_Mask; - goto L_Close; - -L_SecondTry: // @state >= 5 but below 10 - mes "[Anwar]"; - mes "\"I hope Tinris can come up with a better fertilizer. My plants are suffering from the first try.\""; - if (@state != 9) - goto L_Close; - menu - "Here is another one. Eomie cast a spell on it.",L_Continue; - -L_Continue: - mes "[Anwar]"; - mes "\"Eomie? I heard she's amazingly skilled with nature magic. I'll try if this works better.\""; - mes "He takes the fertilizer and puts it on only a few plants, then waits a moment to see the result."; - next; - mes "The plants recover a bit and become green again."; - mes "[Anwar]"; - mes "\"Ah, this one is better. I'll put it on the entire field.\""; - getexp @secondTry_exp, 0; - set @state, 10; - callsub S_Update_Mask; - next; - goto L_GiftMaterial; - -L_GiftMaterial: // @state == 10 - mes "[Anwar]"; - mes "\"I want to show my gratitude to Tinris and Eomie. Can you help me once again? I would like to make some clothes for them and need " + @cloth_amount + " pieces of Cotton Cloth and " + @silk_amount + " Silk Cocoons.\""; - menu - "I have it.",L_GiveGiftStuff, - "Where can I get that?",L_Hint, - "I'll see what I can do.",L_Close; - -L_GiveGiftStuff: - getinventorylist; - if (@inventorylist_count == 100) - goto L_Full_Inv; - if ((countitem("CottonCloth") < @cloth_amount) || (countitem("SilkCocoon") < @silk_amount)) - goto L_NoItem; - delitem "CottonCloth", @cloth_amount; - delitem "SilkCocoon", @silk_amount; - getexp @material_exp, 0; - - getitem "GreenVNeckSweater", 1; - set @state, 11; - callsub S_Update_Mask; - mes "[Anwar]"; - mes "\"Great! I'll start right away with the present for Tinris. That shouldn't take long.\""; - mes "After a short while of cutting and sewing he holds a V-Neck Sweater in his hands. Then he dyes it green."; - next; - mes "[Anwar]"; - mes "\"Wonderful! Could you please bring this to Tinris to show him my gratitude?\""; - goto L_Close; - -L_Hint: - mes "[Anwar]"; - mes "\"As far as I know Cotton Cloth is given out as reward for hunting monsters. You should talk to Aidan on the bazaar.\""; - next; - mes "\"And silk cocoons come from Silkworms. They live in the woodland area around Hurnscald. You can get there by taking the ferry.\""; - goto L_Close; - -L_GiveTinris: // @state >= 11 but below 13 - mes "[Anwar]"; - mes "\"Did you already bring the Green V-Neck Sweater to Tinris?\""; - if (@state != 12) - menu - "Not yet.",L_Close; - menu - "Yes, he was very happy.",L_Happy; - -L_Happy: - getinventorylist; - if (@inventorylist_count == 100) - goto L_Full_Inv; - mes "[Anwar]"; - mes "\"Wonderful! I also finished the present for Eomie. Can you bring it to her?\""; - getitem "SilkHeadband", 1; - set @state, 13; - callsub S_Update_Mask; - goto L_Close; - -L_GiveEomie: // @state >= 13 but below 15 - getinventorylist; - if (@inventorylist_count == 100) - goto L_Full_Inv; - mes "[Anwar]"; - mes "\"Did you give the Silk Headband to Eomie?\""; - if (@state != 14) - menu - "Not yet.",L_Close; - menu - "Yes. She asked me to thank you.",L_ThankYou; - -L_ThankYou: - mes "Anwar smiles."; - mes "[Anwar]"; - mes "\"I'm so happy. Thank you so much for your help. I made this for you while you went to see Eomie.\""; - getexp @final_exp, 0; - getitem "DarkGreenCottonTrousers", 1; - set @state, 15; - callsub S_Update_Mask; - goto L_Close; - -L_Done: // @state == 15 - mes "[Anwar]"; - mes "\"Thank you so much for your help. The plants are growing much better now. I don't have to spend all my time working in the field any more."; - mes "Finally I can do what I'm really interested in and work on getting better at sewing clothes.\""; - goto L_Close; - -L_NoItem: - mes "[Anwar]"; - mes "\"You don't have it!\""; - goto L_Close; - -L_Full_Inv: - mes "[Anwar]"; - mes "\"You carry a lot of stuff. Come back when you have more room.\""; - goto L_Close; - -L_Close: - set @state, 0; - set @cloth_amount, 0; - set @silk_amount, 0; - set @inventorylist_count, 0; - close; - -S_Update_Mask: - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_3_MASK)) | (@state << NIBBLE_3_SHIFT); - return; -} diff --git a/world/map/npc/022-1/dock.txt b/world/map/npc/022-1/dock.txt deleted file mode 100644 index 8da5b8aa..00000000 --- a/world/map/npc/022-1/dock.txt +++ /dev/null @@ -1,51 +0,0 @@ -// The ferry dock -// Author: Wushin - -// Ferry Sign -022-1.gat,62,36,0|script|Ferry Schedule#2|396 -{ - callfunc "FerryManifest"; - end; -} - -022-1.gat,65,71,0|script|Ferry Schedule#3|396 -{ - callfunc "FerryManifest"; - end; -} - -022-1.gat,85,71,0|script|Tulimshar South Koga|395,6,2 -{ - callfunc "BoardFerry"; - close; -} - -022-1.gat,80,62,0|script|#Tulimshar SouthDock|127 -{ - end; -OnCommandArrive: - enablenpc "Tulimshar South Koga"; - end; - -OnCommandWarp: - disablenpc "Tulimshar South Koga"; - end; -} - -022-1.gat,60,24,0|script|Tulimshar North Koga|395,4,4 -{ - callfunc "BoardCandorFerry"; - close; -} - -022-1.gat,65,25,0|script|#Tulimshar NorthDock|127 -{ - end; -OnCommandArrive: - enablenpc "Tulimshar North Koga"; - end; - -OnCommandWarp: - disablenpc "Tulimshar North Koga"; - end; -} diff --git a/world/map/npc/022-1/ferry_master.txt b/world/map/npc/022-1/ferry_master.txt deleted file mode 100644 index d9594bcd..00000000 --- a/world/map/npc/022-1/ferry_master.txt +++ /dev/null @@ -1,30 +0,0 @@ -// - -022-1.gat,71,71,0|script|Ferry Master|138 -{ - mes "[Ferry Master]"; - mes "\"Hello! Do you need something?\""; - goto L_Main; - -L_Main: - menu - "How do I use the ferry?", L_Explain, - "Nothing I guess", L_Close; - -L_Explain: - mes "[Ferry Master]"; - mes "\"You wait on the dock for the ship to come in. You'll be given a chance to board the boat when it comes into port.\""; - mes "\"It lingers in port to allow you some time to board in case you are running behind.\""; - mes "\"Once on the ship, it will sail to different ports and annouce where it is docking.\""; - next; - mes "\"There are 2 Ferrys, both ferrys are free to ride.\""; - mes "\"The Main ferry travels from Argeas, Kaizei and Tonori. It docks in the major ports Hurnscald, Nivalis and the Tulimshar South Dock.\""; - mes "\"The Candor Ferry only travels betwen Candor and the Tulimshar North Dock.\""; - next; - mes "\"Refreshments and supplies are offered aboard both ships during the voyage.\""; - mes "\"We also have some slot machines in case you get bored.\""; - goto L_Main; - -L_Close: - close; -} diff --git a/world/map/npc/022-1/mapflags.txt b/world/map/npc/022-1/mapflags.txt deleted file mode 100644 index 1977e88c..00000000 --- a/world/map/npc/022-1/mapflags.txt +++ /dev/null @@ -1,2 +0,0 @@ -022-1.gat|mapflag|town -022-1.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/022-1/npcs.txt b/world/map/npc/022-1/npcs.txt deleted file mode 100644 index b94f790e..00000000 --- a/world/map/npc/022-1/npcs.txt +++ /dev/null @@ -1,57 +0,0 @@ -// Talk NPCs to help make trek interesting between Tutorial and Bazaar. - -022-1.gat,35,36,0|script|Marikel|211 -{ - set @npcname$, "Marikel"; - - mes "[" + @npcname$ + "]"; - mes "\"Working on the docks can be hard nowadays.\""; - next; - mes "\"At least it pays well.\""; - menu - "Why does it pay well?",L_Marikel_1, - "Pfft! Working on the docks is for the birds.",L_Marikel_2; - -L_Marikel_1: - mes "[" + @npcname$ + "]"; - mes "\"Tulimshar is the wealthiest and most powerful city in the world!\""; - close; - -L_Marikel_2: - mes "[" + @npcname$ + "]"; - mes "\"Yeah, killing monsters may pay well, but I'd need more hazard pay than a tower mason to hunt monsters.\""; - next; - mes "\"I'll just play safe and stick to putting our stock away. Be careful, the monsters outside the city can be dangerous.\""; - next; - mes "\"The Sandstorm mine, just South of Tulimshar, is blocked from most but miners, soldiers and seasoned monster slayers.\""; - close; -} - -022-1.gat,65,46,0|script|Joelin|212 -{ - set @npcname$, "Joelin"; - - mes "[" + @npcname$ + "]"; - mes "\"My ship's to set sail soon. We'll tour around the Acean Isles, then back around to Argaes, then here in Tonori.\""; - next; - mes "\"Tulimshar's Fleets also are sending exploration teams to build a dock in Nivalis on Kaizei, which I'm not really hoping for. It's cold up there!\""; - close; -} - -022-1.gat,67,46,0|script|Harper|213 -{ - set @npcname$, "Harper"; - - mes "[" + @npcname$ + "]"; - mes "\"My captain knows an awlful lot about the world's continents.\""; - close; -} - -022-1.gat,75,99,0|script|Swezanne|206 -{ - set @npcname$, "Swezanne"; - - mes "[" + @npcname$ + "]"; - mes "\"Just through those gates is Northern Tulimshar. In Southern Tulimshar I go to the Bazaar and talk with Aidan about monster points.\""; - close; -} diff --git a/world/map/npc/023-1/_import.txt b/world/map/npc/023-1/_import.txt deleted file mode 100644 index b850d7ea..00000000 --- a/world/map/npc/023-1/_import.txt +++ /dev/null @@ -1,6 +0,0 @@ -// Map 023-1: Tulimshar Lighthouse Beach -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 023-1.gat -npc: npc/023-1/_mobs.txt -npc: npc/023-1/_warps.txt -npc: npc/023-1/mapflags.txt diff --git a/world/map/npc/023-1/_mobs.txt b/world/map/npc/023-1/_mobs.txt deleted file mode 100644 index c892d844..00000000 --- a/world/map/npc/023-1/_mobs.txt +++ /dev/null @@ -1,42 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Lighthouse Beach mobs - -023-1.gat,70,41,7,7|monster|Thug|1119,1,100000ms,30000ms,Mob023-1::On1119 -023-1.gat,84,33,11,7|monster|Swashbuckler|1120,1,100000ms,30000ms,Mob023-1::On1120 -023-1.gat,58,28,6,6|monster|Grenadier|1121,1,100000ms,30000ms,Mob023-1::On1121 -023-1.gat,80,99,11,7|monster|Swashbuckler|1120,1,100000ms,30000ms,Mob023-1::On1120 -023-1.gat,86,117,19,2|monster|Grenadier|1121,1,100000ms,30000ms,Mob023-1::On1121 -023-1.gat,55,126,7,7|monster|Thug|1119,1,100000ms,30000ms,Mob023-1::On1119 -023-1.gat,47,86,7,7|monster|Thug|1119,1,100000ms,30000ms,Mob023-1::On1119 -023-1.gat,102,67,11,7|monster|Swashbuckler|1120,1,100000ms,30000ms,Mob023-1::On1120 -023-1.gat,105,90,7,7|monster|Thug|1119,1,100000ms,30000ms,Mob023-1::On1119 -023-1.gat,62,60,7,7|monster|Thug|1119,1,100000ms,30000ms,Mob023-1::On1119 -023-1.gat,93,49,13,11|monster|Grenadier|1121,1,100000ms,30000ms,Mob023-1::On1121 -023-1.gat,64,95,1,46|monster|AngrySeaSlime|1109,3,150000ms,100000ms,Mob023-1::On1109 -023-1.gat,45,54,5,38|monster|AngrySeaSlime|1109,3,150000ms,100000ms,Mob023-1::On1109 - - -023-1.gat,0,0,0|script|Mob023-1|-1 -{ - end; - -On1109: - set @mobID, 1109; - callfunc "MobPoints"; - end; - -On1119: - set @mobID, 1119; - callfunc "MobPoints"; - end; - -On1120: - set @mobID, 1120; - callfunc "MobPoints"; - end; - -On1121: - set @mobID, 1121; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/023-1/_warps.txt b/world/map/npc/023-1/_warps.txt deleted file mode 100644 index 6d04f18e..00000000 --- a/world/map/npc/023-1/_warps.txt +++ /dev/null @@ -1,17 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Lighthouse Beach warps - -023-1.gat,108,148|warp|To Tulismhar Docks|0,-1,022-1.gat,30,22 -023-1.gat,65,146|warp|To Tulismhar Suburbs|0,-1,042-1.gat,65,24 -023-1.gat,75,134|warp|To Lighthouse Caves|-1,-1,023-3.gat,75,132 -023-1.gat,71,117|warp|To Lighthouse Caves|-1,-1,023-3.gat,71,114 -023-1.gat,83,114|warp|To Lighthouse Caves|-1,-1,023-3.gat,83,112 -023-1.gat,107,120|warp|To Lighthouse Caves|-1,-1,023-3.gat,106,118 -023-1.gat,105,114|warp|To Lighthouse Caves|-1,-1,023-3.gat,106,115 -023-1.gat,70,95|warp|To Lighthouse Caves|-1,-1,023-3.gat,70,93 -023-1.gat,48,80|warp|To Lighthouse Caves|-1,-1,023-3.gat,48,78 -023-1.gat,61,36|warp|To Lighthouse Caves|-1,-1,023-3.gat,61,39 -023-1.gat,36,34|warp|To Lighthouse |-1,-1,023-2.gat,31,38 -023-1.gat,37,23|warp|To Lighthouse |-1,-1,023-2.gat,31,33 -023-1.gat,66,101|warp|To Other Side Of Bridge|-1,2,023-1.gat,61,100 -023-1.gat,62,101|warp|To Other Side Of Bridge|-1,2,023-1.gat,67,100 diff --git a/world/map/npc/023-1/mapflags.txt b/world/map/npc/023-1/mapflags.txt deleted file mode 100644 index 0db48b57..00000000 --- a/world/map/npc/023-1/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -023-1.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/024-1/_import.txt b/world/map/npc/024-1/_import.txt deleted file mode 100644 index fac35b9a..00000000 --- a/world/map/npc/024-1/_import.txt +++ /dev/null @@ -1,11 +0,0 @@ -// Map 024-1: Tulimshar Canyon -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 024-1.gat -npc: npc/024-1/_mobs.txt -npc: npc/024-1/_warps.txt -npc: npc/024-1/ched.txt -npc: npc/024-1/david.txt -npc: npc/024-1/eomie.txt -npc: npc/024-1/mapflags.txt -npc: npc/024-1/tinris.txt -npc: npc/024-1/tondar.txt diff --git a/world/map/npc/024-1/_mobs.txt b/world/map/npc/024-1/_mobs.txt deleted file mode 100644 index 7df01305..00000000 --- a/world/map/npc/024-1/_mobs.txt +++ /dev/null @@ -1,36 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Canyon mobs - -024-1.gat,89,52,3,2|monster|Maggot|1002,2,100000ms,30000ms,Mob024-1::On1002 -024-1.gat,40,45,3,2|monster|Maggot|1002,2,100000ms,30000ms,Mob024-1::On1002 -024-1.gat,90,37,10,7|monster|Maggot|1002,4,100000ms,30000ms,Mob024-1::On1002 -024-1.gat,96,25,3,10|monster|SeaSlime|1033,1,100000ms,30000ms,Mob024-1::On1033 -024-1.gat,33,45,24,20|monster|BlackScorpion|1009,3,100000ms,30000ms,Mob024-1::On1009 -024-1.gat,93,35,5,6|monster|GiantMaggot|1006,1,100000ms,30000ms,Mob024-1::On1006 -024-1.gat,63,54,3,6|monster|Maggot|1002,1,100000ms,30000ms,Mob024-1::On1002 - - -024-1.gat,0,0,0|script|Mob024-1|-1 -{ - end; - -On1002: - set @mobID, 1002; - callfunc "MobPoints"; - end; - -On1006: - set @mobID, 1006; - callfunc "MobPoints"; - end; - -On1009: - set @mobID, 1009; - callfunc "MobPoints"; - end; - -On1033: - set @mobID, 1033; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/024-1/_warps.txt b/world/map/npc/024-1/_warps.txt deleted file mode 100644 index f579b33f..00000000 --- a/world/map/npc/024-1/_warps.txt +++ /dev/null @@ -1,7 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Canyon warps - -024-1.gat,86,74|warp|To North Tulimshar|3,-1,021-1.gat,49,65 -024-1.gat,80,48|warp|To Tulimshar Magic Scho|0,-1,024-2.gat,26,26 -024-1.gat,86,48|warp|To Tulimshar Magic Scho|-1,-1,024-2.gat,42,27 -024-1.gat,80,30|warp|To Magic Passage|-1,-1,042-3.gat,56,45 diff --git a/world/map/npc/024-1/ched.txt b/world/map/npc/024-1/ched.txt deleted file mode 100644 index 0137ed55..00000000 --- a/world/map/npc/024-1/ched.txt +++ /dev/null @@ -1,48 +0,0 @@ -// Student at Tulimshar's magic academy - -024-1.gat,69,56,0|script|Ched|113 -{ - if (isin("024-1.gat", 62, 52, 65, 57)) goto L_Garden; - if (isin("024-1.gat", 66, 43, 80, 54)) goto L_Canyon; - - mes "[Ched]"; - mes "\"I'm trying to get a spell to work. It's supposed to combine two potions, but I can't seem to figure out which two those are...\""; - next; - menu - "Well, good luck with that!", L_Done, - "What spell is that?", L_Next; - -L_Next: - mes "[Ched]"; - mes "\"Well, I don't know what it's called... I took it out of `Timbleweed's Advanced Transmutations.' It seems awfully hard to cast, somehow.\""; - next; - mes "[Ched]"; - mes "\"Well, the invocation is `" + getspellinvocation("merge-concentration-potions") + "'. You're supposed to just hold up the potions and cast it, and then they're supposed to merge.\""; - next; - mes "[Ched]"; - mes "\"Maybe I should go back to `detect magic' until I can cast that one properly.\""; - close; - -L_Done: - close; - -L_Garden: - if (BaseLevel < 40) - goto L_Warp; - mes "[Ched]"; - mes "\"Be careful of those plants. They can be dangerous,\""; - close; - -L_Canyon: - if (BaseLevel < 40) - goto L_Warp; - mes "[Ched]"; - mes "\"I'm not allowed back there.\""; - close; - -L_Warp: - warp "024-1.gat", 71, 56; - mes "[Ched]"; - mes "\"You can't be back there.\""; - close; -} diff --git a/world/map/npc/024-1/david.txt b/world/map/npc/024-1/david.txt deleted file mode 100644 index b3a56dc4..00000000 --- a/world/map/npc/024-1/david.txt +++ /dev/null @@ -1,53 +0,0 @@ -024-1.gat,70,70,0|script|David|120 -{ - set @Potion_EXP, 2000; - - if (Rossy_Quest == 17) goto L_FinalEnd; - if (Rossy_Quest == 14) goto L_Julia; - if (Rossy_Quest >= 8) goto L_Done; - - mes "[David]"; - mes "\"Learning magic is hard...\""; - if (Rossy_Quest == 7) goto L_Help; - close; - -L_Help: - menu - "Do you know Rossy?", L_Set, - "I can tell, it is hard.", L_No; - -L_Set: - mes "[David]"; - mes "\"Yes, I do. I am her teacher. Actually, that reminds me about her final exam... she didn't hand in her potion yet. Time is running out.\""; - menu - "A potion? Oh, uhm... Strange kind of exam. Bye.", L_No, - "Right, I have her potion in my pocket. She asked me to bring it to you. Here it is.", L_Next; - -L_Next: - mes "[David]"; - mes "\"Let me see.\""; - set Rossy_Quest, 8; - mes "\"This potion is... perfect! Tell Rossy that she successfully made her potion; it is flawless!\""; - getexp @Potion_EXP, 0; - close; - -L_Done: - mes "[David]"; - mes "\"I am really happy that my best student successfully passed her exam!\""; - close; - -L_No: - close; - -L_Julia: - mes "[David]"; - mes "\"I heard Rossy's sister got kidnapped. We're counting on you to find her!\""; - next; - mes "\"If you do find her, talk to her sister and her mother.\""; - close; - -L_FinalEnd: - mes "[David]"; - mes "Well done! Thanks for finding Julia!"; - close; -} diff --git a/world/map/npc/024-1/eomie.txt b/world/map/npc/024-1/eomie.txt deleted file mode 100644 index 35d9acae..00000000 --- a/world/map/npc/024-1/eomie.txt +++ /dev/null @@ -1,145 +0,0 @@ -// A professor at Tulimshar's magic academy, involved in quest: -// Anwar needs a magic fertilizer for his field -// Quest uses Nibble 3 of QUEST_NorthTulimshar -// Author: Jenalya -// state 1: Anwar sent to Tinris for help to get a magic fertilizer -// state 2: Tinris asked for chocolate cake as present for his girlfriend -// state 3: Tinris asked for ingredients for the fertilizer -// state 4: Tinris gave you the fertilizer -// state 5: Anwar tried it out and it doesn't work well, sent you back to Tinris -// state 6: Tinris asked for more ingredients for a new try -// state 7: Tinris says it's really hard, gives you the fertilizer and tells you to ask Eomie to cast a spell on it -// state 8: Eomie sends you to get some stuff so she can interrupt her spell on the spot of grass -// state 9: Eomie casted a spell on the fertilizer -// state 10: Anwar used it and it worked. he asks you to help him preparing a thank-you-gift for each Tinris and Eomis -// state 11: Anwar asked to bring present to Tinris -// state 12: gave present to Tinris -// state 13: Anwar asked to bring present to Eomie -// state 14: gave present to Eomie -// state 15: reported back to Anwar and done - -024-1.gat,72,94,0|script|Eomie|164 -{ - set @state, ((QUEST_NorthTulimshar & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); - - set @grass_amount, 5; - set @water_amount, 2; - set @ice_amount, 2; - - set @silk_exp, 600; - - if (@state >= 14) goto L_Done; - if (@state >= 9) goto L_CastedSpell; - if (@state == 8) goto L_GetStuff; - - mes "[Eomie]"; - mes "\"I maintain this little spot of grass in the desert.\""; - if (@state != 7) - goto L_Close; - menu - "I have this magic fertilizer from Tinris and need a spell cast on it.",L_Next; - -L_Next: - mes "[Eomie]"; - mes "\"Oh? I see, that's a difficult task."; - mes "I'd be glad to help you, but unfortunately I can't interrupt the magic I use to keep this spot of grass alive.\""; - next; - mes "\"It's unusually hot at the moment, even for this desert area. It might have something to do with the aftereffects of the earthquake.\""; - menu - "Isn't there any possibility?",L_Continue; - -L_Continue: - mes "She hesitates."; - set @state, 8; - callsub S_Update_Mask; - goto L_GetStuff; - -L_GetStuff: - // @state == 8 - mes "[Eomie]"; - mes "\"I could try to interrupt my spells to be able to cast the spell on the fertilizer, but then I need to prepare the grass for this."; - mes "Bring me " + @grass_amount + " Grass Seeds, " + @water_amount + " Bottles of Water and " + @ice_amount + " Ice Cubes.\""; - menu - "I have it.",L_More, - "Where can I get Grass Seeds?",L_Hurnscald, - "How can I get Ice Cubes? We're in the desert!",L_Mine, - "Ok, I'll go and get it.",L_Close; -L_More: - if ((countitem("GrassSeed") < @grass_amount) || (countitem("BottleOfWater") < @water_amount) || (countitem("IceCube") < @ice_amount)) - goto L_NoItem; - - delitem "GrassSeed", @grass_amount; - delitem "BottleOfWater", @water_amount; - delitem "IceCube", @ice_amount; - set @state, 9; - callsub S_Update_Mask; - mes "[Eomie]"; - mes "\"Very good.\""; - mes "She takes the things you brought her and uses them to create a bubble of coolness around the spot of grass."; - misceffect sfx_magic_nature; - next; - mes "[Eomie]"; - mes "\"This should last long enough to keep the spot of grass alive until I cast the spell on the fertilizer. And if some of it shrivels I still have the seeds you brought me which I can use to recover it.\""; - next; - mes "She takes the fertilizer and casts some invocations. After a while she's done and gives it back to you with a smile."; - misceffect sfx_magic_nature; - mes "[Eomie]"; - mes "\"This should help you. I'm glad you're taking care of the plants. Not enough people do that nowadays.\""; - goto L_Close; - -L_Hurnscald: // player asked how to get Grass Seeds - mes "[Eomie]"; - mes "\"Squirrels tend to pick up Grass Seeds as they gather food. You can find them around Hurnscald. To get there you will have to take the ferry in the harbor district.\""; - goto L_Close; - -L_Mine: // player asked how to get Ice Cubes - mes "[Eomie]"; - mes "\"Hm, that's a difficult task, indeed. Naturally you will find them on the continent of Kaizei, which is high up in the north and covered with snow most time of the year. But it might be difficult to get there.\""; - next; - mes "\"I heard that Ice Goblins were seen in the caves that are East of Nivalis. Maybe you can find Ice Cubes in there.\""; - next; - mes "\"Though they don't let in everyone. Miners, Soldiers and sometimes an adventurer. I suggest you talk to Lieutenant Dausen about that.\""; - goto L_Close; - -L_CastedSpell: // @state >= 9 but below 14 - mes "[Eomie]"; - mes "\"The grass wasn't damaged due to the interruption. I hope the magic fertilizer is useful for Anwar.\""; - if (@state != 13) - goto L_Close; - menu - "It was and he created this Silk Headband as a present for you.",L_Present, - "(Mumble something and leave)",L_Close; - -L_Present: - if (countitem("SilkHeadband") < 1) - goto L_NoItem; - delitem "SilkHeadband", 1; - getexp @silk_exp, 0; - set @state, 14; - callsub S_Update_Mask; - mes "[Eomie]"; - mes "\"Oh, this is very friendly! Please tell him I'm very happy about it.\""; - mes "She smiles."; - goto L_Close; - -L_Done: // @state >= 14 - mes "[Eomie]"; - mes "\"Hello. I'm happy to see someone like you being dedicated to the needs of plants and people.\""; - goto L_Close; - -L_NoItem: - mes "[Eomie]"; - mes "\"Where is it?\""; - goto L_Close; - -L_Close: - set @state, 0; - set @grass_amount, 0; - set @water_amount, 0; - set @ice_amount, 0; - close; - -S_Update_Mask: - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_3_MASK)) | (@state << NIBBLE_3_SHIFT); - return; -} diff --git a/world/map/npc/024-1/mapflags.txt b/world/map/npc/024-1/mapflags.txt deleted file mode 100644 index 7cfb1c4d..00000000 --- a/world/map/npc/024-1/mapflags.txt +++ /dev/null @@ -1,2 +0,0 @@ -024-1.gat|mapflag|town -024-1.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/024-1/tinris.txt b/world/map/npc/024-1/tinris.txt deleted file mode 100644 index e4465cd3..00000000 --- a/world/map/npc/024-1/tinris.txt +++ /dev/null @@ -1,219 +0,0 @@ -// Anwar needs a magic fertilizer for his field -// Quest uses Nibble 3 of QUEST_NorthTulimshar -// Author: Jenalya -// state 1: Anwar sent to Tinris for help to get a magic fertilizer -// state 2: Tinris asked for chocolate cake as present for his girlfriend -// state 3: Tinris asked for ingredients for the fertilizer -// state 4: Tinris gave you the fertilizer -// state 5: Anwar tried it out and it doesn't work well, sent you back to Tinris -// state 6: Tinris asked for more ingredients for a new try -// state 7: Tinris says it's really hard, gives you the fertilizer and tells you to ask Eomie to cast a spell on it -// state 8: Eomie sends you to get some stuff so she can interrupt her spell on the spot of grass -// state 9: Eomie casted a spell on the fertilizer -// state 10: Anwar used it and it worked. he asks you to help him preparing a thank-you-gift for each Tinris and Eomis -// state 11: Anwar asked to bring present to Tinris -// state 12: gave present to Tinris -// state 13: Anwar asked to bring present to Eomie -// state 14: gave present to Eomie -// state 15: reported back to Anwar and done - -024-1.gat,82,64,0|script|Tinris|160 -{ - set @state, ((QUEST_NorthTulimshar & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); - - set @cake_exp, 50; - set @sweater_exp, 400; - - set @slime_amount1, 6; - set @slime_amount2, 4; - set @bugleg_amount1, 4; - set @bugleg_amount2, 5; - set @stinger_amount1, 3; - set @stinger_amount2, 2; - set @ash_amount1, 1; - set @ash_amount2, 2; - set @cactusp_amount, 1; - - if (@state >= 12) goto L_Done; - if (@state == 11) goto L_GiveGift; - if (@state == 9) goto L_FertilizerDone; - if (@state >= 7) goto L_Eomie; - if (@state == 6) goto L_SecondTry; - if (@state >= 4) goto L_FirstTryDone; - if (@state == 3) goto L_FirstTry; - if (@state == 2) goto L_Annual; - - mes "[Tinris]"; - mes "\"This is a magic school. I'm a student here and focus on ways to magically enhance growth of plants."; - mes "That topic is very important in a desert area.\""; - if (@state != 1) - goto L_Close; - menu - "The farmer Anwar sent me to ask for exactly that! Can you give me something for his field?",L_Next; - -L_Next: - mes "[Tinris]"; - mes "\"Well... in principle yes. I can try to prepare something for him. But...\""; - next; - mes "\"The thing is, my girlfriend and I have our anniversary today. And the teachers won't let me leave the campus to get something for her!"; - mes "Please go to the bakery and buy a Chocolate Cake for me. She loves Chocolate Cakes.\""; - next; - mes "\"When I have a present for her I can focus on creating some magic fertilizer.\""; - set @state, 2; - callsub S_Update_Mask; - goto L_Close; - -L_Annual: // @state == 2 - mes "[Tinris]"; - mes "\"Hello, did you get the Chocolate Cake for my girlfriend? After that I can focus on creating some magic fertilizer for you.\""; - menu - "Fresh from the bakery!",L_FreshFrom, - "I didn't get it yet.",L_Close; - -L_FreshFrom: - if (countitem("ChocolateCake") < 1) - goto L_NoItem; - delitem "ChocolateCake", 1; - getexp @cake_exp, 0; - set @state, 3; - callsub S_Update_Mask; - mes "[Tinris]"; - mes "\"Oh, thank you! You saved me!"; - mes "All right, now we can start with the magic fertilizer.\""; - next; - goto L_FirstTry; - -L_FirstTry: - // @state == 3 - mes "[Tinris]"; - mes "\"You need to bring me some ingredients."; - mes "The ingredients are " + @slime_amount1 + " Maggot Slimes, " + @bugleg_amount1 + " Bug Legs, " + @stinger_amount1 + " Scorpion Stingers and " + @ash_amount1 + " Piles of Ash.\""; - menu - "I have it.",L_Continue, - "Ok, I'll go and get it.",L_Close; - -L_Continue: - if ((countitem("MaggotSlime") < @slime_amount1) || (countitem("BugLeg") < @bugleg_amount1) || (countitem("ScorpionStinger") < @stinger_amount1) || (countitem("PileOfAsh") < @ash_amount1)) - goto L_NoItem; - delitem "MaggotSlime", @slime_amount1; - delitem "BugLeg", @bugleg_amount1; - delitem "ScorpionStinger", @stinger_amount1; - delitem "PileOfAsh", @ash_amount1; - set @state, 4; - callsub S_Update_Mask; - mes "Tinris takes the things and starts to mix them together while mumbling some invocations."; - misceffect sfx_magic_nature; - next; - mes "[Tinris]"; - mes "\"Ok. This should do it. But I'm not sure. I'm still researching this topic."; - mes "Here, bring this to Anwar.\""; - mes "He gives you a bottle with the magic fertilizer. You put it away in a separate pocket, so it doesn't get mixed with your inventory."; - goto L_Close; - -L_FirstTryDone: // @state >= 4 but below 6 - mes "[Tinris]"; - mes "\"Bring the fertilizer to Anwar and let me know if it worked.\""; - if (@state != 5) - goto L_Close; - menu - "I did, the plants went brown and shriveled.",L_More; - -L_More: - set @state, 6; - callsub S_Update_Mask; - goto L_SecondTry; - -L_SecondTry: - // @state == 6 - mes "[Tinris]"; - mes "\"Oh no! All right, we need to do another try."; - mes "Bring me " + @slime_amount2 + " Maggot Slimes, " + @bugleg_amount2 + " Bug Legs, " + @stinger_amount2 + " Scorpion Stingers, " + @ash_amount2 + " Piles of Ash and " + @cactusp_amount + " Cactus Potion.\""; - menu - "Here it is.",L_HereItIs, - "Ok, I'll go and get it.",L_Close; - -L_HereItIs: - if ((countitem("MaggotSlime") < @slime_amount2) || (countitem("BugLeg") < @bugleg_amount2) || (countitem("ScorpionStinger") < @stinger_amount2) || (countitem("PileOfAsh") < @ash_amount2) || (countitem("CactusPotion") < @cactusp_amount)) - goto L_NoItem; - delitem "MaggotSlime", @slime_amount2; - delitem "BugLeg", @bugleg_amount2; - delitem "ScorpionStinger", @stinger_amount2; - delitem "PileOfAsh", @ash_amount2; - delitem "CactusPotion", @cactusp_amount; - set @state, 7; - callsub S_Update_Mask; - mes "Tinris takes the things and starts to mix and mumble again."; - misceffect sfx_magic_nature; - next; - mes "It takes quite a while."; - next; - mes "He looks rather stressed while working on the mixture."; - next; - mes "He sighs."; - mes "[Tinris]"; - mes "\"Mh, I think the mixture itself is good. But I can't get the spells right. Maybe you should ask Professor Eomie to cast it; she's a genius with nature magic.\""; - mes "He gives you the bottle with the magic fertilizer."; - goto L_Close; - -L_Eomie: - // @state >= 7 but below 9 - mes "[Tinris]"; - mes "\"I did the best I could, but it seems I'm not experienced enough to cast the spells correctly. Better ask Professor Eomie for help.\""; - goto L_Close; - -L_FertilizerDone: - // @state == 9 - mes "[Tinris]"; - mes "\"I heard Eomie cast the spell? I really hope it'll work this time. Bring the magic fertilizer to Anwar now.\""; - goto L_Close; - -L_GiveGift: - // @state == 11 - mes "[Tinris]"; - mes "\"Ah, did Anwar try the new fertilizer?\""; - menu - "Yes, it works great and he asked me to give you this Green V-Neck Sweater he made.",L_ItWorksGreat, - "Not yet.",L_Close; - -L_ItWorksGreat: - if (countitem("GreenVNeckSweater") < 1) - goto L_NoItem; - delitem "GreenVNeckSweater", 1; - getexp @sweater_exp, 0; - set @state, 12; - callsub S_Update_Mask; - mes "[Tinris]"; - mes "\"Hey, that's really nice. Tell him my thanks.\""; - goto L_Close; - -L_Done: - // @state >= 12 - mes "[Tinris]"; - mes "\"My girlfriend was delighted with the Chocolate Cake and Professor Eomie was happy with my work on the magic fertilizer.\""; - mes "He twinkles."; - mes "[Tinris]"; - mes "\"We're a good team.\""; - goto L_Close; - -L_NoItem: - mes "[Tinris]"; - mes "\"You don't have it!\""; - goto L_Close; - -L_Close: - set @state, 0; - set @slime_amount1, 0; - set @slime_amount2, 0; - set @bugleg_amount1, 0; - set @bugleg_amount2, 0; - set @stinger_amount1, 0; - set @stinger_amount2, 0; - set @ash_amount1, 0; - set @ash_amount2, 0; - set @cactusp_amount, 0; - close; - -S_Update_Mask: - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_3_MASK)) | (@state << NIBBLE_3_SHIFT); - return; -} diff --git a/world/map/npc/024-1/tondar.txt b/world/map/npc/024-1/tondar.txt deleted file mode 100644 index 473c86e9..00000000 --- a/world/map/npc/024-1/tondar.txt +++ /dev/null @@ -1,56 +0,0 @@ -// A professor at Tulimshar's magic academy - -024-1.gat,83,51,0|script|Tondar|168 -{ - mes "[Tondar]"; - mes "\"We're not accepting any new students right now.\""; - if (getskilllv(SKILL_MAGIC) > 0) - goto L_may_ask; - goto L_end; - -L_may_ask: - next; - menu - "Can you teach me a spell?", L_askspell, - "Do you have a magic library?", L_library, - "Are you sure? I can pay well...", L_nopay, - "That's unfortunate.", L_end, - "Goodbye, then.", L_end; - -L_library: - mes "[Tondar]"; - mes "\"Of course we do. It is only for graduate students, alumni, and faculty.\""; - next; - menu - "Thank you, and goodbye.", L_end, - "Nobody else is allowed inside?", L_Next; - -L_Next: - mes "[Tondar]"; - mes "\"Well, it is possible to get a special permit from the headmaster. But he is currently on sabbatical.\""; - close; - -L_askspell: - mes "[Tondar]"; - mes "\"We only teach spells to students.\""; - next; - menu - "Oh, come on... just one little spell!", L_nopay, - "Pretty please?", L_spell, - "I can pay you, too...", L_nopay; - -L_spell: - mes "[Tondar]"; - mes "\"Well, all right; this one can't do much harm. Press your hands together and say `" + getspellinvocation("ask-magic-exp") + "'.\""; - mes "\"This will release a steady flow of magic within you. Focus and try to control it; it is a good meditative practice.\""; - close; - -L_nopay: - mes "[Tondar]"; - mes "The wizard frowns angrily."; - mes "\"Do not tempt me to teach you a different kind of lesson, young one! Begone!\""; - goto L_end; - -L_end: - close; -} diff --git a/world/map/npc/029-1/_import.txt b/world/map/npc/029-1/_import.txt index 80303795..e8afa64e 100644 --- a/world/map/npc/029-1/_import.txt +++ b/world/map/npc/029-1/_import.txt @@ -3,7 +3,20 @@ map: 029-1.gat npc: npc/029-1/_mobs.txt npc: npc/029-1/_warps.txt +npc: npc/029-1/aahna.txt npc: npc/029-1/barrier.txt npc: npc/029-1/dock.txt +npc: npc/029-1/ferry_master.txt +npc: npc/029-1/hasan.txt +npc: npc/029-1/hideandseek.txt +npc: npc/029-1/kaan.txt +npc: npc/029-1/liana.txt npc: npc/029-1/mapflags.txt +npc: npc/029-1/monster_guide.txt +npc: npc/029-1/rewards_master.txt +npc: npc/029-1/soul-menhir.txt npc: npc/029-1/traveler.txt +npc: npc/029-1/tutorial.txt +npc: npc/029-1/valon.txt +npc: npc/029-1/vincent.txt +npc: npc/029-1/zegas.txt diff --git a/world/map/npc/029-1/_mobs.txt b/world/map/npc/029-1/_mobs.txt index e7ebba61..ce8e7a64 100644 --- a/world/map/npc/029-1/_mobs.txt +++ b/world/map/npc/029-1/_mobs.txt @@ -1,45 +1,40 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Candor Island mobs -029-1.gat,69,65,12,13|monster|EvilMushroom|1013,4,20000ms,60000ms,Mob029-1::On1013 -029-1.gat,32,33,12,13|monster|Squirrel|1038,3,30000ms,60000ms,Mob029-1::On1038 029-1.gat,46,48,4,1|monster|CloverPatch|1037,1,10000ms,120000ms,Mob029-1::On1037 -029-1.gat,37,60,22,20|monster|SpikyMushroom|1019,5,10000ms,30000ms,Mob029-1::On1019 -029-1.gat,54,36,17,18|monster|Bat|1017,4,25000ms,30000ms,Mob029-1::On1017 -029-1.gat,59,51,13,9|monster|LogHead|1025,2,25000ms,30000ms,Mob029-1::On1025 +029-1.gat,73,93,14,13|monster|Maggot|1002,8,100000ms,30000ms,Mob029-1::On1002 +029-1.gat,90,35,15,11|monster|TameScorpion|1046,16,100000ms,30000ms,Mob029-1::On1046 +029-1.gat,93,100,21,18|monster|TameScorpion|1046,8,100000ms,30000ms,Mob029-1::On1046 +029-1.gat,43,43,31,23|monster|Scorpion|1003,2,100000ms,30000ms,Mob029-1::On1003 +029-1.gat,76,42,52,25|monster|ManaBug|1131,3,30ms,0ms,Mob029-1::On1131 029-1.gat,0,0,0|script|Mob029-1|-1 { end; -On1013: - set @mobID, 1013; +On1002: + set @mobID, 1002; callfunc "MobPoints"; end; -On1017: - set @mobID, 1017; +On1003: + set @mobID, 1003; callfunc "MobPoints"; end; -On1019: - set @mobID, 1019; - callfunc "MobPoints"; - end; - -On1025: - set @mobID, 1025; +On1037: + set @mobID, 1037; callfunc "MobPoints"; end; -On1037: - set @mobID, 1037; +On1046: + set @mobID, 1046; callfunc "MobPoints"; end; -On1038: - set @mobID, 1038; +On1131: + set @mobID, 1131; callfunc "MobPoints"; end; } diff --git a/world/map/npc/029-1/_warps.txt b/world/map/npc/029-1/_warps.txt index d7ee1fd0..6f0049be 100644 --- a/world/map/npc/029-1/_warps.txt +++ b/world/map/npc/029-1/_warps.txt @@ -1,3 +1,7 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Candor Island warps +029-1.gat,40,88|warp|To Valon's House|-1,-1,029-2.gat,29,61 +029-1.gat,44,83|warp|To Storeroom|-1,-1,029-2.gat,22,92 +029-1.gat,52,84|warp|To The Magic Shack|-1,-1,029-2.gat,103,61 +029-1.gat,58,79|warp|To Two Arms|-1,-1,029-2.gat,94,30 diff --git a/world/map/npc/029-1/aahna.txt b/world/map/npc/029-1/aahna.txt new file mode 100644 index 00000000..1b1c4489 --- /dev/null +++ b/world/map/npc/029-1/aahna.txt @@ -0,0 +1,23 @@ +// Aahna +// Author: Wushin +// Npc +029-1.gat,71,52,0|script|Aahna|404 +{ + setarray @npc_loc, 71, 52, 3; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_Range; + goto L_Meet; + +L_Meet: + mes "[Aahna]"; + mes "\"Hello, What a lovely day for a stroll.\""; + goto L_Close; + +L_Range: + message strcharinfo(0), "Whats that? Come closer I can't hear you."; + goto L_Close; + +L_Close: + close; +} diff --git a/world/map/npc/029-1/barrier.txt b/world/map/npc/029-1/barrier.txt index b7d6b62c..1acb0d17 100644 --- a/world/map/npc/029-1/barrier.txt +++ b/world/map/npc/029-1/barrier.txt @@ -1,7 +1,8 @@ -029-1.gat,54,37,0|script|#CandorBarrier|45,0,0 +029-1.gat,69,61,0|script|#CandorBarrier|45,0,0 { if ($@FIGHT_CAVE_STATUS == 1) goto L_Block; - warp "029-3.gat", 46, 23; + if (BaseLevel < 40) goto L_Block; + warp "029-3.gat", 49, 53; end; L_Block: diff --git a/world/map/npc/029-1/dock.txt b/world/map/npc/029-1/dock.txt index 6f195f36..7430971c 100644 --- a/world/map/npc/029-1/dock.txt +++ b/world/map/npc/029-1/dock.txt @@ -1,19 +1,19 @@ // The ferry dock // Ferry Sign -029-1.gat,27,36,0|script|Ferry Schedule#8|397 +029-1.gat,43,104,0|script|Ferry Schedule#8|397 { callfunc "FerryManifest"; end; } -029-1.gat,16,36,0|script|Candor Koga|395,6,2 +029-1.gat,51,118,0|script|Candor Koga|395,8,8 { callfunc "BoardCandorFerry"; close; } -029-1.gat,22,37,0|script|#CandorDock|127 +029-1.gat,55,110,0|script|#CandorDock|127 { end; OnCommandArrive: diff --git a/world/map/npc/029-1/ferry_master.txt b/world/map/npc/029-1/ferry_master.txt new file mode 100644 index 00000000..3163e6b2 --- /dev/null +++ b/world/map/npc/029-1/ferry_master.txt @@ -0,0 +1,21 @@ +// + +029-1.gat,45,107,0|script|Ferry Master#candor|138 +{ + mes "[Ferry Master]"; + mes "\"Hello! Do you need something?\""; + goto L_Main; + +L_Main: + menu + "How do I use the ferry?", L_Explain, + "Nothing I guess", L_Close; + +L_Explain: + mes "[Ferry Master]"; + callfunc "FerryHelp"; + goto L_Main; + +L_Close: + close; +} diff --git a/world/map/npc/029-1/hasan.txt b/world/map/npc/029-1/hasan.txt new file mode 100644 index 00000000..7a6b906e --- /dev/null +++ b/world/map/npc/029-1/hasan.txt @@ -0,0 +1,212 @@ +// This file is part of the Tutorial +// Authors: Jenalya, alastrim +// Hasan should be threatening someone else you come to help +// Going to throw someone in the water +// npctalk 2 NPCs Hasan talks about giving someone a short trip to Docks +// They respond by asking play for help +// Hasan tells them to but out of it. + +029-1.gat,35,33,0|script|Scared Man|160 +{ + setarray @npc_loc, 35, 33, 4; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_End; + if (@tutorial >= 13) + goto L_TutDone; + message strcharinfo(0), "He looks too afraid to say anything."; + goto L_End; + +L_TutDone: + message strcharinfo(0), "Thanks. Hasan has been much nicer to me now"; + goto L_End; + +L_End: + end; +} +029-1.gat,33,33,0|script|Hasan|189,3,3 +{ + setarray @npc_loc, 33, 33, 4; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_Close; + goto L_Main; + +L_Main: + callfunc "TutorialState"; + if ((getcharid(3) == $@ScorpionFighter) || ($@ScorpionFighter && $@ScorpionFighter != getcharid(3))) + goto L_Afraid; + if (@tutorial == 14) + goto L_TutDone; + if (@tutorial == 13) + goto L_Thank; + if (@tutorial == 12) + goto L_Trick; + if ((@tutorial == 9) || (@tutorial == 10) || (@tutorial == 11)) + goto L_FightAgain; + + mes "You over hear some people nearby."; + mes "[Unfriendly Guy]"; + mes "\"I told you if you didn't get the money, I'd give you swimming lessons, Haha!\""; + mes "[Scared Man]"; + mes "\"But the only person I need protection from is you.\""; + mes "[Unfriendly Guy]"; + mes "\"Thats why the price is so high.\""; + mes "\"Because I'm the toughest person in all of Candor\""; + mes "[Scared Man]"; + mes "\"No, your just a mean bully. Wait till I tell the guards about this!\""; + mes "[Unfriendly Guy]"; + mes "\"You do that and the next swimming lesson will be sleeping with the fishes.\""; + mes "[Scared Man]"; + mes "\"No, please don't. *sob*\""; + mes "Sounds like this person is in trouble.\""; + set @tutorial_tmp, 9; + callfunc "SetTutorialMask"; + mes "[Unfriendly Guy]"; + mes "\"What are you looking at?\""; + menu + "What ever you call maggot slime scrapped off a boat after a walk through the sewers.\"", L_Fight, + "Who me? I saw nothing, just passing by.", L_Close; + +L_FightAgain: + mes "[Hasan]"; + mes "\"Have you come back for a thrashing?\""; + menu + "No.", L_Close, + "Yes.", L_Fight; + +L_Fight: + mes "[Hasan]"; + mes "\"Do you really think you can beat me?\""; + mes "He pulls out a nasty looking dagger and stabs it in your direction."; + set Hp, 1; + mes "That hurt! You begin to think searching for a different solution might be healthier."; + mes "Maybe Kaan can help?"; + goto L_Close; + +L_Trick: + mes "[Hasan]"; + mes "\"Have you come back for another thrashing?\""; + menu + "No.",L_Close, + "Yes, yours! (Scratch your head.)",L_ScratchHead; + +L_ScratchHead: + if ($@ScorpionFighter) + goto L_Wait; + set $@ScorpionTimer, 0; + set $@ScorpionFighter, getcharid(3); + set $@ScorpDeath, PC_DIE_COUNTER; + cmdothernpc "#ScorpionTrigger", "HasanSpawn"; + specialeffect 22; + mes "While you're scratching your head, a scorpion appears."; + close; + +L_Thank: + mes "[Hasan]"; + mes "\"You - you saved me!"; + mes "I was mean to people, but you still saved me!\""; + mes "\"Hey, you're a really cool person."; + mes "I mean, the way you finished that ghastly scorpion!"; + mes "Amazing!\""; + mes "\"Let me tell you something, I will no longer bully people."; + mes "And you can have my Sharp Knife.\""; + getitem "SharpKnife", 1; + set @tutorial_tmp, 14; + callfunc "SetTutorialMask"; + mes "\"You want to go to Hurnscald, right? Shall I tell you how to get there?\""; + menu + "Sure, thanks.",L_HasanThanks, + "I'll try to find the way myself.",L_Explore; + +L_HasanThanks: + mes "[Hasan]"; + mes "\"Ok, when you leave here go back to the city. Wait on the south end of"; + mes "the city for the ferry to arrive at the docks. It will take you to Hurnscald.\""; + goto L_Close; + +L_Explore: + mes "[Hasan]"; + mes "\"Alright. Take care!\""; + goto L_Close; + +L_TutDone: + mes "[Hasan]"; + mes "\"You didn't see anything. I tell you what I'll be nicer if you don't tell anyone?\""; + menu + "As long as you learned your lesson.", L_TutCont; + +L_TutCont: + mes "\"I have, I promise not to bully people anymore. It's not fun being scared.\""; + goto L_Close; + +L_Wait: + mes "There is a scorpion near Hasan already. I think Kaan is helping someone else... Maybe I should try the plan later."; + goto L_Close; + +L_Afraid: + message strcharinfo(0), "Hasan: \"" + strcharinfo(0) + "! Please help me!\""; + end; + +L_Close: + close; + +OnTouch: + if (@tutorial >= 13) + end; + goto L_Main; +} +029-1.gat,0,0,0|script|#ScorpionTrigger|35 +{ + end; + +OnCommandHasanSpawn: + goto L_Summon; + +L_Summon: + monster "029-1.gat",33,33,"WeakScorpion",1046,1, "#ScorpionTrigger::OnScorpionDeath"; + initnpctimer; + end; + +L_SummonAgain: + message strcharinfo(0), "Kaan is mad at you for your interference! He summons a rock above your head, then summons another scorpion near Hasan!"; + percentheal -100, 0; + goto L_Summon; + +OnTimer5000: + if (attachrid($@ScorpionFighter) == 0) + goto L_Clean; + set $@ScorpionTimer, $@ScorpionTimer + 5; + if ($@ScorpionTimer >= 300) + goto L_TimeOut; + if (PC_DIE_COUNTER > $@ScorpDeath) + goto L_MessageDeath; + setnpctimer 0; + end; + +OnScorpionDeath: + if (getcharid(3) != $@ScorpionFighter) + goto L_SummonAgain; + if (@tutorial != 12) + goto L_Clean; + set @tutorial_tmp, 13; + callfunc "SetTutorialMask"; + message strcharinfo(0), "You saved Hasan."; + goto L_Clean; + +L_TimeOut: + message strcharinfo(0), "Hasan, with his eyes almost closed, trembling with fear, runs toward the scorpion and stabs it with all his strength!"; + goto L_Clean; + +L_MessageDeath: + message strcharinfo(0), "Ouch... I should be more careful when fighting these monsters."; + goto L_Clean; + +L_Clean: + killmonster "029-1.gat", "#ScorpionTrigger::OnScorpionDeath"; + set $@ScorpionFighter, 0; + set $@ScorpionTimer, 0; + set $@ScorpDeath, 0; + stopnpctimer; + end; +} diff --git a/world/map/npc/029-1/hideandseek.txt b/world/map/npc/029-1/hideandseek.txt new file mode 100644 index 00000000..4a4476ff --- /dev/null +++ b/world/map/npc/029-1/hideandseek.txt @@ -0,0 +1,403 @@ +// Children playing Hide and Seek +// QUEST_NorthTulimshar +// BYTE 0 +// Bit 0: started quest at Ayasha +// Bit 1 - 5: found one of the kids each +// Bit 6: talked to Ayasha after finding all kids +// Bit 7: unused +// Author: Jenalya + +-|script|#hideandseekNTconfig|-1 +{ + end; + +OnInit: + set $@hideandseekNT_started, (1 << 0); + set $@hideandseekNT_found1, (1 << 1); + set $@hideandseekNT_found2, (1 << 2); + set $@hideandseekNT_found3, (1 << 3); + set $@hideandseekNT_found4, (1 << 4); + set $@hideandseekNT_found5, (1 << 5); + set $@hideandseekNT_ended, (1 << 6); + end; +} +function|script|CountHideNSeek +{ + set @hidden_kid_cnt, 0; + if (QUEST_NorthTulimshar & $@hideandseekNT_found1) + set @hidden_kid_cnt, (@hidden_kid_cnt + 1); + if (QUEST_NorthTulimshar & $@hideandseekNT_found2) + set @hidden_kid_cnt, (@hidden_kid_cnt + 1); + if (QUEST_NorthTulimshar & $@hideandseekNT_found3) + set @hidden_kid_cnt, (@hidden_kid_cnt + 1); + if (QUEST_NorthTulimshar & $@hideandseekNT_found4) + set @hidden_kid_cnt, (@hidden_kid_cnt + 1); + if (QUEST_NorthTulimshar & $@hideandseekNT_found5) + set @hidden_kid_cnt, (@hidden_kid_cnt + 1); + return; +} +029-1.gat,64,90,0|script|AyashaDebug|258 +{ + mes "[Ayasha Debug]"; + menu + "Show", L_Show, + "Reset", L_Reset, + "Close.", L_Close; + +L_Show: + set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); + mes "State: " + @state; + if (QUEST_NorthTulimshar & $@hideandseekNT_started) + mes "Start set"; + if (QUEST_NorthTulimshar & $@hideandseekNT_found1) + mes "Found 1 set"; + if (QUEST_NorthTulimshar & $@hideandseekNT_found2) + mes "Found 2 set"; + if (QUEST_NorthTulimshar & $@hideandseekNT_found3) + mes "Found 3 set"; + if (QUEST_NorthTulimshar & $@hideandseekNT_found4) + mes "Found 4 set"; + if (QUEST_NorthTulimshar & $@hideandseekNT_found5) + mes "Found 5 set"; + if (QUEST_NorthTulimshar & $@hideandseekNT_ended) + mes "Complete set"; + goto L_Close; + +L_Reset: + set QUEST_NorthTulimshar, 0; + goto L_Close; + +L_Close: + close; + +OnInit: + if (!debug) + disablenpc "AyashaDebug"; + end; +} +029-1.gat,62,90,0|script|Ayasha|258 +{ + set @child_number, 0; + callfunc "XmasList"; + + set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); + + set @EXP, 75; + + if (@state > 63) goto L_Done; + if (@state == 63) goto L_Reward; + if (@state > 0) goto L_Doing; + + mes "You see a girl who is holding her hands in front of her face."; + mes "[Ayasha]"; + mes "\"98... 99... 100!\""; + mes "She takes away her hands and looks up."; + menu + "Hello, what are you doing?",L_Next, + "(Leave)",L_Close; + +L_Next: + mes "[Ayasha]"; + mes "\"I'm playing hide and seek with my friends!"; + mes "Do you want to play with us?\""; + menu + "Sure, sounds like fun.",L_Next1, + "I'm busy with more important things!",L_Close; + +L_Next1: + mes "[Ayasha]"; + mes "\"Great! You can take my turn with searching. You need to find all five of my friends."; + mes "They're hiding somewhere on the island, you will have to explore to find them. They could be hiding anywhere.\""; + + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_started; + goto L_Close; + +L_Doing: + callfunc "CountHideNSeek"; + mes "[Ayasha]"; + mes "\"You still need to find some of my friends. You have found " + @hidden_kid_cnt + " out of 5 of my friends.\""; + mes "Remember, they're hiding somewhere on the island, you will have to explore to find them. They could be hiding anywhere.\""; + goto L_Close; + +L_Reward: + mes "[Ayasha]"; + mes "\"Oh, you found them all! Good job! Now it's my turn with searching again. Go and hide!\""; + getexp @EXP, 0; + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_ended; + menu + "I think I need to do other things now.",L_Next2; + +L_Next2: + mes "[Ayasha]"; + mes "\"Oh, ok."; + mes "Have you already seen Hurnscald? It's a very exciting place! I love the entertainer. She can make so many funny faces.\""; + goto L_Close; + +L_Done: + mes "[Ayasha]"; + mes "\"Hello! It was fun to play with you."; + mes "When you go to the Hurnscald, you can say hello to Mikhail. He's very nice! But very shy.\""; + goto L_Close; + +L_Close: + set @state, 0; + set @EXP, 0; + close; +} + +029-1.gat,50,105,0|script|Latif|262 +{ + set @child_number, 1; + callfunc "XmasList"; + set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); + + set @EXP, 15; + + if (@state > 63) goto L_Done; + if ((@state > 0) && !(QUEST_NorthTulimshar & $@hideandseekNT_found1)) goto L_Find; + if (@state > 0) goto L_Doing; + + mes "You see a kid hiding behind a box."; + menu + "What are you doing there?",L_Next, + "(Leave)",L_Close; + +L_Next: + mes "[Latif]"; + mes "\"Hiding. We're playing hide and seek. Don't say that is boring. It's fun.\""; + menu + "I agree, it's fun.",L_Agree, + "Hide and seek? Lame.",L_Next1; + +L_Next1: + mes "[Latif]"; + mes "\"My friend Vincent thinks so too. He doesn't join us playing."; + mes "Do you know what he does instead? He builds action figures out of Bug Legs! That is lame.\""; + goto L_Close; + +L_Agree: + mes "[Latif]"; + mes "\"Yeah, right? My friend Vincent doesn't thinks so. He doesn't join us playing."; + mes "Do you know what he does instead? He builds action figures out of Bug Legs! That is lame.\""; + goto L_Close; + +L_Find: + mes "[Latif]"; + mes "\"Hey! Ah, you found me. Well done. But my hiding place wasn't that difficult this time.\""; + getexp @EXP, 0; + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_found1; + mes "\"Here, do you want a candy?\""; + getitem "Candy", 1; + goto L_Close; + +L_Doing: + callfunc "CountHideNSeek"; + mes "[Latif]"; + mes "\"You didn't find all of us yet? Seems like the other ones found a better place to hide.\""; + mes "\"" + @hidden_kid_cnt + " out of 5 have been found.\""; + goto L_Close; + +L_Done: + mes "[Latif]"; + mes "\"The northeastern most building of town is a workshop. My father works there and wants me to do that too when I'm grown up. But I don't want do that! I want to go on an adventure! Just like you.\""; + goto L_Close; + +L_Close: + set @state, 0; + set @EXP, 0; + close; +} + +029-1.gat,48,67,0|script|Charda|260 +{ + set @child_number, 2; + callfunc "XmasList"; + set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); + + set @EXP, 15; + + if (@state > 63) goto L_Done; + if ((@state > 0) && !(QUEST_NorthTulimshar & $@hideandseekNT_found2)) goto L_Find; + if (@state > 0) goto L_Doing; + + mes "[Charda]"; + mes "\"Hello. Psht, be careful. I'm playing hide and seek with Ayasha. You'll draw attention to my hiding place.\""; + mes "\"They will never find me here.\""; + goto L_Close; + +L_Find: + mes "[Charda]"; + mes "\"Oh! Got me! You're good at this.\""; + getexp @EXP, 0; + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_found2; + mes "She takes something out of her pocket."; + mes "\"I'm hungry now. Do you want chocolate too?\""; + getitem "ChocolateBar", 1; + mes "\"My mom doesn't want me to eat so much chocolate, but I got it from the trader at the Hurnscald Market. He sells many different things"; + mes "when we goto vacation in Hurnscald. I convinced him to teach me how to trade. It's fun.\""; + goto L_Close; + +L_Doing: + callfunc "CountHideNSeek"; + mes "[Charda]"; + mes "\"Did you find the others yet?\""; + mes "\"Hrmm, no looks like only " + @hidden_kid_cnt + " out of 5 have been found.\""; + goto L_Close; + +L_Done: + mes "[Charda]"; + mes "\"Hey! We're still playing hide and seek. What are you going to do? Will you go to Hurnscald with the ferry? The mother of my friends Rossy and Julia come from there. They are on a vacation there at the moment.\""; + mes "\"Rossy told me that it's a very beautiful place. Lots of trees and flowers and grass, everything's green.\""; + mes "She sighs."; + mes "[Charda]"; + mes "\"Sounds wonderful.\""; + goto L_Close; + +L_Close: + set @state, 0; + set @EXP, 0; + close; +} + +029-1.gat,100,36,0|script|Faris|259 +{ + set @child_number, 3; + callfunc "XmasList"; + set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); + + set @EXP, 25; + + if (@state > 63) goto L_Done; + if ((@state > 0) && !(QUEST_NorthTulimshar & $@hideandseekNT_found3)) goto L_Find; + if (@state > 0) goto L_Doing; + + mes "[Faris]"; + mes "\"Oh, hi there. What are you doing here on the beach?\""; + menu + "I'm just having a look around.",L_Next, + "It's nice place here, isn't it?",L_Next; + +L_Next: + mes "[Faris]"; + mes "\"Hey, you're cool. I'm hiding here from Ayasha, we're playing hide and seek. This is the best hiding place ever.\""; + goto L_Close; + +L_Find: + mes "[Faris]"; + mes "\"You found me! Well done. You look a bit thirsty, here.\""; + getexp @EXP, 0; + getitem "CactusDrink", 1; + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_found3; + mes "\"It's really cool you're playing with us. I'm sure you have a lot of other things to do."; + mes "You're an adventurer, right? I want to become an adventurer too when I'm grown up. I'll talk to Aidan then.\""; + mes "\"Aidan is outside Sorfina's place and you can register there for monster points. That's something the Wizard's Council made up. They reward you for slaying monsters. It's so cool.\""; + goto L_Close; + +L_Doing: + callfunc "CountHideNSeek"; + mes "[Faris]"; + mes "\"Are you still searching for the others? Nobody else is here.\""; + mes "\"It seems you found " + @hidden_kid_cnt + " out of 5 of my friends.\""; + goto L_Close; + +L_Done: + mes "[Faris]"; + mes "\"I'll go to Hurnscald's Inn and ask Bernard for some soup when we're done with playing. His soup is delicious!\""; + goto L_Close; + +L_Close: + set @state, 0; + set @EXP, 0; + close; +} + +029-1.gat,28,52,0|script|Rasin|263 +{ + set @child_number, 4; + callfunc "XmasList"; + set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); + + set @EXP, 15; + + if (@state > 63) goto L_Done; + if ((@state > 0) && !(QUEST_NorthTulimshar & $@hideandseekNT_found4)) goto L_Find; + if (@state > 0) goto L_Doing; + + mes "[Rasin]"; + mes "\"The harbor is to the south from here. There you can take a ferry to other places."; + mes "And now go away, I'm playing hide and seek and Ayasha shouldn't see me here. You'll draw her attention when you talk to me.\""; + goto L_Close; + +L_Find: + mes "[Rasin]"; + mes "\"Ah, you found me. I need to find a better place to hide next time.\""; + getexp @EXP, 0; + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_found4; + goto L_Close; + +L_Doing: + callfunc "CountHideNSeek"; + mes "[Rasin]"; + mes "\"Hehe, I'm curious when you'll have found all of us.\""; + mes "\"There are " + @hidden_kid_cnt + " out of 5 found.\""; + goto L_Close; + +L_Done: + mes "[Rasin]"; + mes "\"Thanks for playing with us! It was fun!"; + mes "Will you leave Candor to go on an adventure in other places of the world?\""; + goto L_Close; + +L_Close: + set @state, 0; + set @EXP, 0; + close; +} + +029-1.gat,79,99,0|script|Ghada|265 +{ + set @child_number, 5; + callfunc "XmasList"; + set @state, ((QUEST_NorthTulimshar & BYTE_0_MASK) >> BYTE_0_SHIFT); + + set @EXP, 15; + + if (@state > 63) goto L_Done; + if ((@state > 0) && !(QUEST_NorthTulimshar & $@hideandseekNT_found5)) goto L_Find; + if (@state > 0) goto L_Doing; + + mes "You see a girl standing behind the wheat. She has a look of intense concentration on her face."; + menu + "Hi, what are you doing there?",L_Next, + "(Leave)",L_Close; + +L_Next: + mes "[Ghada]"; + mes "\"Oh, hello. I'm hiding. We're playing hide and seek.\""; + goto L_Close; + +L_Find: + mes "[Ghada]"; + mes "\"Oh no! You found me! You must be very clever."; + mes "My friend Sandra is clever too, but she said it's a waste of time to play hide and seek.\""; + getexp @EXP, 0; + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@hideandseekNT_found5; + goto L_Close; + +L_Doing: + callfunc "CountHideNSeek"; + mes "[Ghada]"; + mes "\"Are you still searching for the others? I'm sure you'll find them soon.\""; + mes "\"You found " + @hidden_kid_cnt + " out of 5 us.\""; + goto L_Close; + +L_Done: + mes "[Ghada]"; + mes "\"It's so nice that you played with us! You're about the same age as my older sister, but she never plays with us. Her name is Sarah.\""; + goto L_Close; + +L_Close: + set @state, 0; + set @EXP, 0; + close; +} diff --git a/world/map/npc/029-1/kaan.txt b/world/map/npc/029-1/kaan.txt new file mode 100644 index 00000000..0dabb802 --- /dev/null +++ b/world/map/npc/029-1/kaan.txt @@ -0,0 +1,125 @@ +// This file is part of the Tutorial +// Author: Jenalya + +029-1.gat,46,95,0|script|Kaan|160 +{ + setarray @npc_loc, 46, 97, 4; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_OutOfRange; + + callfunc "TutorialState"; + if (!(@kaan_talked)) goto L_Tanisha; + if (@tutorial >= 13) goto L_TutDone; + if (@tutorial == 12) goto L_Plan; + if (@tutorial == 11) goto L_TrickKnown; + if (@tutorial == 10) goto L_Trick; + if (@tutorial == 9) goto L_Hasan; + goto L_Out; + +L_OutOfRange: + message strcharinfo(0), "Come closer!"; + goto L_Close; + +L_Tanisha: + set STARTAREA, STARTAREA | $@SpokeToKaan; + mes "[Young Man]"; + mes "\"You're the person I brought here, right?"; + mes "My name is Kaan, I'm Tanisha's brother.\""; + mes "\"She was babbling at me about it all the morning until I sent her to take care of the maggots in the cafe.\""; + mes "Kaan grins mischieviously."; + mes "[Kaan]"; + mes "\"She hates maggots.\""; + mes "\"Did you already talk to Tanisha?\""; + menu + "Yes, I helped her with the maggots.",L_Tanisha1, + "Yeah, and she's done with the maggots.",L_Tanisha1; + +L_Tanisha1: + mes "[Kaan]"; + mes "\"Ah, that is good news."; + mes "You know, we have a lot of problems with bugs here.\""; + mes "\"I've slain many bugs here to keep them out of our fields.\""; + mes "\"If we don't watch out the maggots will eat all of our stocks."; + mes "And the island is crawling with scorpions.\""; + mes "\"Are you going to visit Hurnscald?"; + mes "Hurnscald is a wondeful place! Traders, entertainers, adventurers - it's very exciting.\""; + mes "\"And Ian the trainer is hanging around there often. You should talk to him, he's a smart guy.\""; + mes "\"The ferry to the south takes your there for free.\""; + goto L_Close; + +L_Out: + mes "[Kaan]"; + mes "\"Hello! How are you? Did you already visit Hurnscald?\""; + menu + "Yes.", L_Close, + "Not yet.",L_Close; + +L_Hasan: + mes "[Kaan]"; + mes "\"Hello! How are you? Did you already visit Hurnscald?\""; + menu + "A guy named Hasan is bullying someone.",L_Next1, + "Yes.", L_Close, + "Not yet.",L_Close; + +L_Next1: + mes "\"Hasan! That's crazy. He becomes more cheeky with every day."; + mes "I'd like to help you, but - I won't risk an open confrontation with him.\""; + mes "\"Sometimes he just freaks out and then he's dangerous."; + mes "He might listen to one of the adult men, but they're all off to work in Hurnscald during the day.\""; + mes "\"We should think about some kind of trick. Ah, if only I knew his weak point.\""; + set @tutorial_tmp, 10; + callfunc "SetTutorialMask"; + goto L_Trick; + +L_Trick: + mes "[Kaan]"; + mes "\"Do you have any idea what Hasan's weakness could be?"; + mes "I wonder if Sorfina know something about him that could help us.\""; + menu + "No idea.",L_Close; + +L_TrickKnown: + mes "[Kaan]"; + mes "\"Do you have any idea what Hasan's weakness could be?"; + menu + "He's afraid of scorpions.",L_Next2, + "No idea.",L_Close; + +L_Next2: + mes "[Kaan]"; + mes "\"Scorpions?! Right! How could I forget?"; + mes "When he was a child, he nearly died because he fell into a scorpion nest.\""; + set @tutorial_tmp, 12; + callfunc "SetTutorialMask"; + next; + goto L_Explain; + +L_Explain: + mes "\"Ok, then here's the plan:"; + mes "\"You'll go to Hasan and give me a sign when you're ready."; + mes "Lets say the sign is that you're scratching your head."; + mes "I'll watch you from this point.\""; + mes "\"When you give me the sign, I'll summon a scorpion on him."; + mes "I bet that will show him for the coward he really is.\""; + mes "\"How's that? We can start as soon as you're ready.\""; + goto L_Close; + +L_Plan: + mes "[Kaan]"; + mes "\"I'm ready. Just give me the sign when you're down there."; + mes "Or do you want me to explain the plan again?\""; + menu + "Yes please.",L_Explain, + "No, everything's alright.",L_Close; + +L_TutDone: + mes "[Kaan]"; + mes "\"Hi there. I hope you enjoy your time in Hurnscald."; + mes "Hasan can be a real troublemaker, but it seems like he has calmed down for now.\""; + goto L_Close; + +L_Close: + close; +} diff --git a/world/map/npc/029-1/liana.txt b/world/map/npc/029-1/liana.txt new file mode 100644 index 00000000..dd95cc0c --- /dev/null +++ b/world/map/npc/029-1/liana.txt @@ -0,0 +1,47 @@ +// Talk NPCs to help make trek interesting between Tutorial and Bazaar. + +029-1.gat,62,96,0|script|Liana|205 +{ + setarray @npc_loc, 62, 96, 4; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_End; + goto L_Talk; + +L_Talk: + mes "[Liana]"; + mes "\"Hurnscald is a large city. I'm sure glad I live in Candor because I know where everything's at.\""; + if (@tutorial == 10) goto L_Hasan; + goto L_Close; + +L_Hasan: + mes "[Liana]"; + mes "\"Are you enjoying yourself in Candor? Do you have any questions?\""; + menu + "A guy named Hasan is bullying people.",L_Next, + "No, thanks.",L_Close; + +L_Next: + mes "\"Ah, Hasan. He's causing trouble again?\""; + mes "She shakes her head."; + mes "\This guy has been a plague ever since he could walk. He's always causing trouble.\""; + mes "\"And his father... Well, one day his father thought he should teach Hasan a lesson.\""; + mes "\"He took him into the desert and then left him there!"; + mes "Hasan was only seven years old!\""; + mes "\"I never understood how someone could do something like that to a child, even if it's a rascal like Hasan.\""; + mes "\"Anyway, Hasan tried to find his way back home, but stumbled into a nest of scorpions!\""; + mes "She shakes her head."; + mes "\"If Lieutenant Dausen hadn't have come along that moment, Hasan would have died that day.\""; + mes "\"However, the scorpions poison caused a bad fever and once Hasan had recovered from that, he was even more malicious than before.\""; + mes "She sighs."; + set @tutorial_tmp, 11; + callfunc "SetTutorialMask"; + goto L_Close; + +L_End: + mes "You'll have to move closer"; + goto L_Close; + +L_Close: + close; +} diff --git a/world/map/npc/029-1/mapflags.txt b/world/map/npc/029-1/mapflags.txt index 03b117f8..2f352ae3 100644 --- a/world/map/npc/029-1/mapflags.txt +++ b/world/map/npc/029-1/mapflags.txt @@ -1 +1 @@ -029-1.gat|mapflag|resave|029-1,69,69 +029-1.gat|mapflag|resave|029-1,39,102 diff --git a/world/map/npc/029-1/monster_guide.txt b/world/map/npc/029-1/monster_guide.txt new file mode 100644 index 00000000..705dce05 --- /dev/null +++ b/world/map/npc/029-1/monster_guide.txt @@ -0,0 +1,48 @@ +// + +029-1.gat,45,97,0|script|Aidan|102 +{ + if (MPQUEST == 0) + goto L_Register; + mes "[Aidan the Monster Guide]"; + mes "You currently have " +Mobpt+ " Monster Points. These points are acquired while killing monsters"; + close; + +L_Register: + mes "[Aidan the Monster Guide]"; + mes "Oh my, you don't seem to be registered as a Quest Participant. Would you like to register?"; + next; + goto L_Choice; + +L_Choice: + menu + "Register",L_R, + "Not at the moment", + L_N,"Information",L_I; + +L_R: + mes "[Aidan the Monster Guide]"; + mes "Give me a second to look over your paperwork."; + next; + mes "[Monster Guide]"; + mes "Well, looks like you qualify!"; + mes "Welcome to the questing world!"; + set MPQUEST,1; + close; + +L_N: + mes "[Aidan the Monster Guide]"; + mes "Very well, you don't know what you're missing."; + close; + +L_I: + mes "[Aidan the Monster Guide]"; + mes "Here in The Mana World, there are certain rewards for your vanquishing of foes."; + mes "For example, there are Monster Points; every monster you kill has a certain amount of points that get added to your account."; + mes "The more points you have, the more expensive things you can buy using them."; + next; + mes "[Monster Guide]"; + mes "So whaddaya say, sign up won't you?"; + next; + goto L_Choice; +} diff --git a/world/map/npc/029-1/rewards_master.txt b/world/map/npc/029-1/rewards_master.txt new file mode 100644 index 00000000..cf8a1c1d --- /dev/null +++ b/world/map/npc/029-1/rewards_master.txt @@ -0,0 +1,151 @@ +// + +029-1.gat,47,97,0|script|Ishi|106 +{ + if (MPQUEST == 0) goto L_Register; + if (tvis == 0) set tvis, 1; + if (Mobpt < tvis) goto L_NotEnough; + + setarray @Items$, "AppleCake", "Arrow", "Beer", "Boots", "BugLeg", "CactusDrink", "CactusPotion", "Cake", "Candy", "CasinoCoins", "CherryCake", "ChickenLeg", "ChocolateBar", "ChocolateCake", "CottonBoots", "CottonCloth", "CottonShirt", "CottonShorts", "FancyHat", "GreenApple", "HardSpike", "IronOre", "Lifestone", "LightBlueDye", "MaggotSlime", "Milk", "Orange", "OrangeCake", "OrangeCupcake", "PinkPetal", "PileOfAsh", "PinkAntenna", "PoltergeistPowder", "RawLog", "RedApple", "RedDye", "ScorpionStinger", "SerfHat", "SmallHealingPotion", "SmallMushroom", "SnakeSkin", "SpectrePowder", "Steak", "TinyHealingPotion", "WhiteCake", "WhiteFur", "WispPowder", "YellowDye", "Coal"; + + mes "[Ishi the Rewards Master]"; + mes "\"Welcome! I see you have " + Mobpt + " Monster Points. Would you like to exchange some of those for items?\""; + next; + + set @i, 0; + setarray @Menu$, "", "", "", "", "", "", "", "", "", "", "", ""; + callsub S_prep_menu; + + menu + @Menu$[0], L_MenuItems, + @Menu$[1], L_MenuItems, + @Menu$[2], L_MenuItems, + @Menu$[3], L_MenuItems, + @Menu$[4], L_MenuItems, + @Menu$[5], L_MenuItems, + @Menu$[6], L_MenuItems, + @Menu$[7], L_MenuItems, + @Menu$[8], L_MenuItems, + @Menu$[9], L_MenuItems, + @Menu$[10], L_MenuItems, + @Menu$[11], L_MenuItems; + +L_MenuItems: + // this is for the last entry "No thanks": + if (@menu > @i) goto L_Close; + // this is for the "Give all" entry: + if (@menu == 11) goto L_Give_all; + + set @req, @menu; + set @rec, 0; + goto L_Item_Loop; + +L_Item_Loop: + if (@rec == @req || Mobpt < tvis) goto L_Item_Done; + + callsub S_give_item; + set @rec, @rec + 1; + goto L_Item_Loop; + +L_Item_Done: + if (@rec < @req) mes "It looks like your Monster Points were over estimated."; + goto L_Close; + +L_Register: + mes "[Ishi the Rewards Master]"; + mes "\"Hey, it seems like you didn't register as a quest participant yet! You can sign up with Aidan.\""; + goto L_Close; + +L_NotEnough: + mes "[Ishi the Rewards Master]"; + mes "\"You don't have enough Monster Points for a reward. You'll need to kill some more monsters first.\""; + goto L_Close; + +L_Give_all: + // we need to count how many loop iterations are done there, + // since the server complains about more than 250 (70 according to Jaxad0127) + // gotos without interrupting next statement. + set @gotocounter, 50; + goto L_Give_all_loop; + +L_Give_all_loop: + set @gotocounter, @gotocounter - 1; + if (@gotocounter < 1) goto L_Give_all_next; + set @itemgiveerror, 0; + callsub S_give_item; + if (@itemgiveerror != 0) goto L_Close; + goto L_Give_all_loop; + +L_Give_all_next: + next; + mes "[Ishi the Rewards Master]"; + mes "\"You have received a lot of items. You still have " + Mobpt + " monster points. Shall we continue?\""; + menu + "Yes", L_Give_all, + "No", L_Close; + +L_Close: + set @gotocounter, 0; + set @itemgiveerror, 0; + set @pts, 0; + set @dif, 0; + set @i, 0; + cleararray @Menu$[0], "", 10; + cleararray @Items$[0], "", 10; + close; + +////////////////////////////////////////////////// +// Subroutines +////////////////////////////////////////////////// + +S_prep_menu: + set @pts, Mobpt; + set @dif, tvis; + goto L_Menu_Loop; + +L_Menu_Loop: + if (@pts < @dif || @i == 10) goto L_Menu_Check; + + set @Menu$[@i], @i + 1; + + set @i, @i + 1; + set @pts, @pts - @dif; + set @dif, @dif + 1; + + goto L_Menu_Loop; + +L_Menu_Check: + // if we are able to give 10, we can enable the option to give all we can have + if (@i != 10) goto L_Menu_Done; + set @Menu$[@i], "Please give me as many as I deserve!"; + set @i, @i + 1; + goto L_Menu_Done; + +L_Menu_Done: + set @Menu$[@i], "No thanks"; + return; + +S_give_item: + set @itemgiveerror, 0; + getinventorylist; + if (@inventorylist_count == 100) goto S_give_noinv; + if (Mobpt < tvis) goto S_give_nomobpts; + set Mobpt, Mobpt - tvis; + set tvis, tvis + 1; + set @item$, @Items$[rand(getarraysize(@Items$))]; + + getitem @item$, 1; + + mes "You received one " + getitemname(@item$) + "!"; + return; + +S_give_noinv: + mes "Your inventory is full!"; + set @itemgiveerror, 1; + return; + +S_give_nomobpts: + mes "It looks like your Monster Points were over estimated."; + set @itemgiveerror, 1; + return; +} diff --git a/world/map/npc/029-1/soul-menhir.txt b/world/map/npc/029-1/soul-menhir.txt new file mode 100644 index 00000000..adabfff1 --- /dev/null +++ b/world/map/npc/029-1/soul-menhir.txt @@ -0,0 +1,18 @@ +// + +029-1.gat,39,101,0|script|Soul Menhir#candor|344 +{ + callfunc "ClearVariables"; + set @map$, "029-1.gat"; + setarray @Xs, 38, 39, 40, 38, 40, 38, 39, 40; + setarray @Ys, 100, 100, 100, 101, 101, 102, 102, 102; + set @x, 0; + set @y, 0; + callfunc "SoulMenhir"; + set @map$, ""; + cleararray @Xs[0], 0, getarraysize(@Xs); + cleararray @Ys[0], 0, getarraysize(@Ys); + set @x, 0; + set @y, 0; + close; +} diff --git a/world/map/npc/029-1/traveler.txt b/world/map/npc/029-1/traveler.txt index 9de43b14..13377fbf 100644 --- a/world/map/npc/029-1/traveler.txt +++ b/world/map/npc/029-1/traveler.txt @@ -2,7 +2,7 @@ // Author: Wombat, wushin // cost depending on level and adapted to new scripting guidelines: Jenalya -029-1.gat,69,67,0|script|Knitra the Traveler|103 +029-1.gat,69,68,0|script|Knitra the Traveler|103 { set @NpcName$, "Knitra"; set @NpcTravelBit, $@candor_bit; diff --git a/world/map/npc/029-1/tutorial.txt b/world/map/npc/029-1/tutorial.txt new file mode 100644 index 00000000..6a3df4ff --- /dev/null +++ b/world/map/npc/029-1/tutorial.txt @@ -0,0 +1,75 @@ +// This file is part of the Tutorial +// Author: Jenalya +// if you enter the tutorial area from outside, it is set to be already done +-|script|#TutorialConfig|-1 +{ + end; + +OnInit: + set $@ScorpionFighter, 0; + set $@ScorpionTimer, 0; + set $@ScorpDeath, 0; + set $@SpokeToKaan, (1 << 31); + end; +} +function|script|TutorialState +{ + callfunc "ClearVariables"; + set @tutorial, ((STARTAREA & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); + set @kaan_talked, (STARTAREA & $@SpokeToKaan); + return; +} +function|script|SetTutorialMask +{ + set STARTAREA, (STARTAREA & ~(NIBBLE_0_MASK) | (@tutorial_tmp << NIBBLE_0_SHIFT)); + set @tutorial_tmp, 0; + return; +} +029-2.gat,21,26,0|script|TutDebug|154 +{ + mes "[TutDebug]"; + mes "Reset?"; + menu + "Reset Kaan/Hasan",L_Kaan, + "Yes.",L_Reset, + "No.",L_Close; + +L_Kaan: + set @tutorial_tmp, 8; + set STARTAREA, (STARTAREA & ~(NIBBLE_0_MASK) | (@tutorial_tmp << NIBBLE_0_SHIFT)); + set STARTAREA, STARTAREA &~ $@SpokeToKaan; + mes "Reset!"; + goto L_Close; + +L_Reset: + set TUT_var, 0; + set @tutorial_tmp, 0; + set STARTAREA, (STARTAREA & ~(NIBBLE_0_MASK) | (@tutorial_tmp << NIBBLE_0_SHIFT)); + set STARTAREA, STARTAREA &~ $@SpokeToKaan; + mes "Reset!"; + goto L_Close; + +L_Close: + close; + +OnInit: + if(!debug) + disablenpc "TutDebug"; + end; +} +029-1.gat,32,99,0|script|#tutorialoutside|45,0,0 +{ + callfunc "TutorialState"; + if (@tutorial >= 8) + goto L_Warp; + goto L_ResetTutorial; + +L_ResetTutorial: + set @tutorial_tmp, 8; + callfunc "SetTutorialMask"; + goto L_Warp; + +L_Warp: + warp "029-2.gat", 114, 92; + end; +} diff --git a/world/map/npc/029-1/valon.txt b/world/map/npc/029-1/valon.txt new file mode 100644 index 00000000..0ce62c79 --- /dev/null +++ b/world/map/npc/029-1/valon.txt @@ -0,0 +1,158 @@ +// This file is part of the Tutorial +// Author: Jenalya, Wushin +-|script|#ValonConfig|-1 +{ + end; + +OnInit: + setarray $@ValonMob, 1002,1050,1046,1003; + setarray $@ValonMobName$, "Maggots","House Maggots","Tame Scorpions","Scorpion"; + setarray $@ValonMobCnt, 10,5,3,1; + end; +} +function|script|ValonState +{ + set @valon_state, ((STARTAREA & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT); + set @valon_mob, 0; + if (@valon_state >= 2) + set @valon_mob, (@valon_state - 2); + set @valon_count, ((STARTAREA & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); + return; +} +function|script|setValonMask +{ + set STARTAREA, (STARTAREA & ~(NIBBLE_1_MASK) | (@valon_tmp << NIBBLE_1_SHIFT)); + set @valon_tmp, 0; + return; +} +function|script|ResetValonCntMask +{ + set STARTAREA, (STARTAREA & ~(NIBBLE_2_MASK) | (0 << NIBBLE_2_SHIFT)); + return; +} +function|script|AddValonCntMask +{ + set @valon_tmp, (@valon_count + 1); + if (@valon_tmp > $@ValonMobCnt[@valon_mob]) + set @valon_tmp, $@ValonMobCnt[@valon_mob]; + set STARTAREA, (STARTAREA & ~(NIBBLE_2_MASK) | (@valon_tmp << NIBBLE_2_SHIFT)); + set @valon_tmp, 0; + callfunc "ValonProgress"; + return; +} +function|script|ValonProgress +{ + callfunc "ValonState"; + if ((@valon_state > 1) && (@valon_state < 6)) + message strcharinfo(0), $@ValonMobName$[@valon_mob] + ": " + @valon_count + "/" + $@ValonMobCnt[@valon_mob]; + return; +} +029-1.gat,74,86,0|script|ValonDebug|156 +{ + mes "[Valon Debug]"; + mes "Reset?"; + menu + "Yes.", L_Reset, + "No.", L_Close; + +L_Reset: + set STARTAREA, (STARTAREA & ~(NIBBLE_1_MASK) | (0 << NIBBLE_1_SHIFT)); + set STARTAREA, (STARTAREA & ~(NIBBLE_2_MASK) | (0 << NIBBLE_2_SHIFT)); + mes "Reset!"; + goto L_Close; + +L_Close: + close; + +OnInit: + if (!debug) + disablenpc "ValonDebug"; + end; +} +029-1.gat,72,86,0|script|Valon|156 +{ + setarray @npc_loc, 72, 86, 4; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_Close; + callfunc "ValonState"; + if (@valon_state >= 6) + goto L_QuestComplete; + if (@valon_start == 1) + goto L_QuestAskAgain; + if (@valon_count >= $@ValonMobCnt[@valon_mob]) + goto L_NextMob; + if ((@valon_state >= 2) && (@valon_state < 6)) + goto L_QuestStarted; + goto L_QuestAsk; + +L_QuestAskAgain: + mes "[Valon]"; + mes "\"Hello, Adventurer! Have you come back to help?\""; + menu + "Yes. I will help with the island beasts.", L_Accept, + "Maybe some other time.", L_Close; + +L_QuestAsk: + mes "[Valon]"; + mes "\"Hello!"; + mes "You're looking for adventures, right?\""; + mes "\"But you shouldn't underestimate this island, it is dangerous.\""; + mes "\"It's crawling with scorpions, and the heat has overcome adventurers tougher than you are.\""; + mes "\"I should know I guard this gate from all manner of island beasts.\""; + mes "\"Maybe you would like help and earn your stripes?\""; + mes "\"The Council of Wizard's does offer a reward for helping...\""; + set @valon_tmp, 1; + callfunc "setValonMask"; + callfunc "ResetValonCntMask"; + menu + "YES!!! let me at them!", L_Accept, + "Maybe some other time.", L_Close; + +L_Accept: + set @valon_tmp, 2; + callfunc "setValonMask"; + callfunc "ValonState"; + goto L_NewMob; + +L_NextMob: + getexp 40, 0; + mes "\"I see you killed all the " + $@ValonMobName$[@valon_mob] + " needed.\""; + mes "\"The Wizard's thank thee as well.\""; + set Zeny, Zeny + 25; + set @valon_tmp, (@valon_state + 1); + callfunc "setValonMask"; + callfunc "ResetValonCntMask"; + callfunc "ValonState"; + if (@valon_mob == getarraysize($@ValonMob)) + goto L_QuestOver; + goto L_NewMob; + +L_NewMob: + mes "\"Let's see whats on the list. Ah ok, I need you to kill me " + $@ValonMobCnt[@valon_mob] + " " + $@ValonMobName$[@valon_mob] + "\""; + mes "\"I'll be waiting here, come back and see after you've killed those mobs.\""; + goto L_Close; + +L_QuestStarted: + mes "[Valon]"; + mes "Hail adventurer! You are well on your way to mastering the beasts of the island.\""; + mes "\"You need to kill " + $@ValonMobName$[@valon_mob] + ": " + @valon_count + "/" + $@ValonMobCnt[@valon_mob] + "\""; + mes "\"Come back and see me when the job is done.\""; + goto L_Close; + +L_QuestOver: + mes "[Valon]"; + mes "\"Thanks once again for helping with the monsters in the island.\""; + getexp 50, 0; + set @valon_tmp, (@valon_state + 1); + callfunc "setValonMask"; + goto L_Close; + +L_QuestComplete: + mes "[Valon]"; + mes "\"Thanks once again for helping with the monsters in the island.\""; + goto L_Close; + +L_Close: + close; +} diff --git a/world/map/npc/029-1/vincent.txt b/world/map/npc/029-1/vincent.txt new file mode 100644 index 00000000..36ce4c2d --- /dev/null +++ b/world/map/npc/029-1/vincent.txt @@ -0,0 +1,150 @@ +// Variables used: nibble 2 of QUEST_SouthTulimshar + +029-1.gat,108,108,0|script|Vincent Debug|113 +{ + mes "[Vincent Debug]"; + mes "Reset?"; + menu + "Yes.", L_Reset, + "No.", L_Close; + +L_Reset: + set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_2_MASK) | (0 << NIBBLE_2_SHIFT)); + mes "Reset!"; + goto L_Close; + +L_Close: + close; + +OnInit: + if (!debug) + disablenpc "Vincent Debug"; + end; +} +029-1.gat,107,110,0|script|Vincent|113 +{ + // This NPC previously used the variable TMW_Quest + callfunc "ClearVarTMW_Quest"; + set @halloween_npc_id, $@halloween_npc_vincent; + callfunc "TrickOrTreat"; + + set @state, ((QUEST_SouthTulimshar & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); + + if (@state >= 2) goto L_Done; + if (@state == 1) goto L_Progress; + goto L_Convince_Vincent_First; + +L_Convince_Vincent_First: + mes "[Vincent]"; + mes "\"I'm making an action figure. I'm almost done with it.\""; + next; + + set @TEMP, rand(4); + if(@TEMP == 1) goto L_Opening2; + if(@TEMP == 2) goto L_Opening3; + if(@TEMP == 3) goto L_Opening4; + goto L_Opening1; + +L_Opening1: + mes "\"I just need 5 more Bug Legs to finish my action figure!\""; + next; + goto L_Ask; + +L_Opening2: + mes "\"This maggot action figure is awesome! I just need to attach 5 Bug Legs.\""; + next; + goto L_Ask; + +L_Opening3: + mes "\"This is a great action figure! A must have! All I need is a few parts...\""; + next; + goto L_Ask; + +L_Opening4: + mes "\"Can you get me 5 Bug Legs? I need them to replace the action figure parts.\""; + next; + goto L_Ask; + +L_Ask: + mes "\"Will you help me find 5 Bug Legs?\""; + next; + menu + "Yes.", L_Sure, + "No.", L_Close; + +L_Sure: + set @state, 1; + callsub S_Update_Var; + set @TEMP, rand(4); + if(@TEMP == 1) goto L_Req2; + if(@TEMP == 2) goto L_Req3; + if(@TEMP == 3) goto L_Req4; + goto L_Req1; + +L_Req1: + mes "[Vincent]"; + mes "\"Thank you!\""; + next; + goto L_Wait; + +L_Req2: + mes "[Vincent]"; + mes "\"I don't know how to thank you enough!\""; + next; + goto L_Wait; + +L_Req3: + mes "[Vincent]"; + mes "\"I will thank you when I get them!\""; + next; + goto L_Wait; + +L_Req4: + mes "[Vincent]"; + mes "\"I'm sure I will give a small reward.\""; + next; + goto L_Wait; + +L_Wait: + mes "\"Now please go get me 5 Bug Legs.\""; + goto L_Close; + +L_Progress: + if(countitem("BugLeg") >= 5) + goto L_Have; + mes "[Vincent]"; + mes "\"Please help me collect 5 Bug Legs! I need them to complete my action figure.\""; + goto L_Close; + +L_Have: + mes "[Vincent]"; + mes "\"Excellent! Finally I can complete the model!!\""; + next; + if(countitem("BugLeg") < 5) + goto L_Progress; + delitem "BugLeg", 5; + getexp 50, 0; + set Zeny, Zeny + 1000; + set @state, 2; + callsub S_Update_Var; + + mes "[Vincent]"; + mes "\"Here you go, a little of my appreciation!\""; + mes ""; + mes "[1000 gold]"; + goto L_Close; + +L_Done: + mes "[Vincent]"; + mes "\"Thanks for your help!\""; + goto L_Close; + +L_Close: + set @TEMP, 0; + set @state, 0; + close; + +S_Update_Var: + set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_2_MASK) | (@state << NIBBLE_2_SHIFT)); + return; +} diff --git a/world/map/npc/029-1/zegas.txt b/world/map/npc/029-1/zegas.txt new file mode 100644 index 00000000..8ecc55e4 --- /dev/null +++ b/world/map/npc/029-1/zegas.txt @@ -0,0 +1,108 @@ +// Barrels +// Author: Wushin +// Npc +029-1.gat,45,85,0|script|Zegas|165 +{ + setarray @npc_loc, 45, 85, 2; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_Range; + + callfunc "CheckBarrelQuest"; + if (@barrel_quest == 1) + goto L_Find; + if (@barrel_quest == 2) + goto L_Looking; + if (@barrel_quest == 3) + goto L_QuestEnd; + if (@barrel_quest == 4) + goto L_Thanks; + goto L_Meet; + +L_Range: + message strcharinfo(0), "Whats that? Come closer I can't hear you."; + goto L_Close; + +L_Meet: + mes "[Zegas]"; + mes "\"Hey do you have a second?\""; + next; + mes "\"The storehouse here is over run with house maggots.\""; + next; + mes "\"Wouldn't you know it, the bug bomb Eomie gave us is in one of the store room barrels.\""; + next; + mes "\"Can you search the barrels for the bug bomb and set it off when you find it?\""; + set @barrel_tmp, 1; + callfunc "SetBarrelMask"; + menu + "Sure.",L_Start, + "Maybe some other time.",L_Close; + +L_Find: + mes "[Zegas]"; + mes "\"The storehouse is still over run with house maggots.\""; + next; + mes "\"Please help me find the bug bomb Eomie gave us is in one of the store room barrels?\""; + menu + "Sure.",L_Start, + "Maybe some other time.",L_Close; + +L_Start: + mes "[Zegas]"; + set @barrel_tmp, 2; + callfunc "SetBarrelMask"; + mes "\"Thanks, come back and see me once you found the bug bomb and set it off.\""; + goto L_Close; + +L_Looking: + mes "[Zegas]"; + mes "\"Still haven't found it? Well keep looking I know it's in there some where.\""; + goto L_Close; + +L_QuestEnd: + mes "[Zegas]"; + mes "\"From the smell I can see you found the bug bomb!\""; + mes "\"Thanks once again, I know it's not much but here is 50 GP for your troubles.\""; + getexp 50, 0; + set Zeny, (Zeny + 50); + set @barrel_tmp, 4; + callfunc "SetBarrelMask"; + goto L_Close; + +L_Thanks: + mes "[Zegas]"; + mes "\"Thanks for Helping with clear out the store room!\""; + goto L_Close; + +L_Close: + close; +} +029-1.gat,47,86,0|script|ZegasDebug|165 +{ + mes "[Zegas Debug]"; + mes "Reset ?"; + menu + "Yes.", L_Reset, + "No.", L_Close; + +L_Reset: + set STARTAREA, (STARTAREA & ~(NIBBLE_4_MASK) | (0 << NIBBLE_4_SHIFT)); + set STARTAREA, STARTAREA &~ (1 << 20); + set STARTAREA, STARTAREA &~ (1 << 21); + set STARTAREA, STARTAREA &~ (1 << 22); + set STARTAREA, STARTAREA &~ (1 << 23); + set STARTAREA, STARTAREA &~ (1 << 24); + set STARTAREA, STARTAREA &~ (1 << 25); + set STARTAREA, STARTAREA &~ (1 << 26); + set STARTAREA, STARTAREA &~ (1 << 27); + mes "Reset!"; + goto L_Close; + +L_Close: + close; + +OnInit: + if (!debug) + disablenpc "ZegasDebug"; + end; +} diff --git a/world/map/npc/029-2/_import.txt b/world/map/npc/029-2/_import.txt new file mode 100644 index 00000000..bbf2ecdd --- /dev/null +++ b/world/map/npc/029-2/_import.txt @@ -0,0 +1,13 @@ +// Map 029-2: Candor Island Indoor +// This file is generated automatically. All manually changes will be removed when running the Converter. +map: 029-2.gat +npc: npc/029-2/_mobs.txt +npc: npc/029-2/_warps.txt +npc: npc/029-2/barrels.txt +npc: npc/029-2/barrels_config.txt +npc: npc/029-2/mapflags.txt +npc: npc/029-2/morgan.txt +npc: npc/029-2/sorfina.txt +npc: npc/029-2/stat_reset.txt +npc: npc/029-2/tanisha.txt +npc: npc/029-2/two_arms.txt diff --git a/world/map/npc/029-2/_mobs.txt b/world/map/npc/029-2/_mobs.txt new file mode 100644 index 00000000..faddfb5b --- /dev/null +++ b/world/map/npc/029-2/_mobs.txt @@ -0,0 +1,15 @@ +// This file is generated automatically. All manually changes will be removed when running the Converter. +// Candor Island Indoor mobs + +029-2.gat,33,57,24,7|monster|HouseMaggot|1050,7,100000ms,30000ms,Mob029-2::On1050 + + +029-2.gat,0,0,0|script|Mob029-2|-1 +{ + end; + +On1050: + set @mobID, 1050; + callfunc "MobPoints"; + end; +} diff --git a/world/map/npc/029-2/_warps.txt b/world/map/npc/029-2/_warps.txt new file mode 100644 index 00000000..258f224b --- /dev/null +++ b/world/map/npc/029-2/_warps.txt @@ -0,0 +1,8 @@ +// This file is generated automatically. All manually changes will be removed when running the Converter. +// Candor Island Indoor warps + +029-2.gat,29,62|warp|To Outside|-1,-1,029-1.gat,40,89 +029-2.gat,22,93|warp|To Outside|-1,-1,029-1.gat,44,84 +029-2.gat,112,84|warp|To Bedroom|-1,-1,029-2.gat,44,30 +029-2.gat,103,62|warp|To Outside|-1,-1,029-1.gat,52,85 +029-2.gat,94,31|warp|To Outside|-1,-1,029-1.gat,58,80 diff --git a/world/map/npc/029-2/barrels.txt b/world/map/npc/029-2/barrels.txt new file mode 100644 index 00000000..aba6ed58 --- /dev/null +++ b/world/map/npc/029-2/barrels.txt @@ -0,0 +1,63 @@ +// Barrels +// Author: Wushin +029-2.gat,23,86,0|script|Barrel#0|400 +{ + setarray @npc_loc, 23, 86, 2; + set @barrel, 0; + callfunc "CheckBarrel"; + end; + +OnMaggotDeath: + set @mobID, 1050; + callfunc "MobPoints"; + end; +} +029-2.gat,28,86,0|script|Barrel#1|400 +{ + setarray @npc_loc, 28, 86, 2; + set @barrel, 1; + callfunc "CheckBarrel"; + end; +} +029-2.gat,31,91,0|script|Barrel#2|400 +{ + setarray @npc_loc, 31, 91, 2; + set @barrel, 2; + callfunc "CheckBarrel"; + end; +} +029-2.gat,36,85,0|script|Barrel#3|400 +{ + setarray @npc_loc, 36, 85, 2; + set @barrel, 3; + callfunc "CheckBarrel"; + end; +} +029-2.gat,40,89,0|script|Barrel#4|400 +{ + setarray @npc_loc, 40, 89, 2; + set @barrel, 4; + callfunc "CheckBarrel"; + end; +} +029-2.gat,38,91,0|script|Barrel#5|400 +{ + setarray @npc_loc, 38, 91, 2; + set @barrel, 5; + callfunc "CheckBarrel"; + end; +} +029-2.gat,29,92,0|script|Barrel#6|400 +{ + setarray @npc_loc, 29, 92, 2; + set @barrel, 6; + callfunc "CheckBarrel"; + end; +} +029-2.gat,24,91,0|script|Barrel#7|400 +{ + setarray @npc_loc, 24, 91, 2; + set @barrel, 7; + callfunc "CheckBarrel"; + end; +} diff --git a/world/map/npc/029-2/barrels_config.txt b/world/map/npc/029-2/barrels_config.txt new file mode 100644 index 00000000..5407a944 --- /dev/null +++ b/world/map/npc/029-2/barrels_config.txt @@ -0,0 +1,105 @@ +// Barrels +// Author: Wushin +029-2.gat,33,88,24,7|monster|HouseMaggot|1050,2,100000ms,30000ms,Barrel#0::OnMaggotDeath +-|script|#BarrelConfig|-1 +{ + end; + +OnInit: + setarray $@BarrelBits, (1 << 20), (1 << 21), (1 << 22), (1 << 23), (1 << 24), (1 << 25), (1 << 26), (1 << 27); + setarray $@BarrelRewards, 533, 507, 505, 518, 537, 526; + set $@BarrelSpawnCnt, 1; + set $@BarrelSpawnId, 1050; + set $@BarrelSpawnName$, "House Maggot"; + set $@BarrelMax, getarraysize($@BarrelBits); + end; +} +function|script|SetBarrelMask +{ + set STARTAREA, (STARTAREA & ~(NIBBLE_4_MASK) | (@barrel_tmp << NIBBLE_4_SHIFT)); + set @barrel_tmp, 0; + return; +} +function|script|CheckBarrelQuest +{ + callfunc "CountBarrels"; + set @barrel_quest, ((STARTAREA & NIBBLE_4_MASK) >> NIBBLE_4_SHIFT); + return; +} +function|script|CountBarrels +{ + set @barrel_count, 0; + set @count_tmp, 0; + goto L_Loop; + +L_Loop: + if (STARTAREA & $@BarrelBits[@barrel_count]) + goto L_AddOne; + goto L_LoopAgain; + +L_AddOne: + set @barrel_count, (@barrel_count + 1); + goto L_LoopAgain; + +L_LoopAgain: + set @count_tmp, (@count_tmp + 1); + if (@count_tmp == getarraysize($@BarrelBits)) + goto L_BarrelTally; + goto L_Loop; + +L_BarrelTally: + return; +} +function|script|CheckBarrel +{ + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_Range; + callfunc "CheckBarrelQuest"; + if (!(@barrel_quest == 2)) + goto L_NoI; + if (STARTAREA & $@BarrelBits[@barrel]) + goto L_Empty; + set STARTAREA, STARTAREA | $@BarrelBits[@barrel]; + + callfunc "CountBarrels"; + if (@barrel_count == $@BarrelMax) + goto L_QuestReward; + set @player_random, rand(@barrel_count * 10); + set @barrel_random, rand(@barrel_count * $@BarrelMax); + if (@barrel_random > @player_random) + goto L_Spawn; + goto L_Reward; + +L_Range: + message strcharinfo(0), "You'll need to get closer."; + goto L_Return; + +L_NoI: + message strcharinfo(0), "Nothing interesting here."; + goto L_Return; + +L_Empty: + message strcharinfo(0), "You've already searched this barrel."; + goto L_Return; + +L_QuestReward: + message strcharinfo(0), "You found the bug bomb."; + misceffect 33; + set @barrel_tmp, 3; + callfunc "SetBarrelMask"; + killmonster getmap() + ".gat", "Barrel#0::OnMaggotDeath"; + goto L_Return; + +L_Spawn: + message strcharinfo(0), "Uck, More Maggots!"; + areamonster getmap() + ".gat", @npc_loc[0], @npc_loc[1], (@npc_loc[0] + 1), (@npc_loc[1] + 1), $@BarrelSpawnName$, $@BarrelSpawnId, $@BarrelSpawnCnt, "Barrel#0::OnMaggotDeath"; + goto L_Return; + +L_Reward: + getitem $@BarrelRewards[rand(getarraysize($@BarrelRewards))], 1; + goto L_Return; + +L_Return: + return; +} diff --git a/world/map/npc/029-2/mapflags.txt b/world/map/npc/029-2/mapflags.txt new file mode 100644 index 00000000..ef75b6c6 --- /dev/null +++ b/world/map/npc/029-2/mapflags.txt @@ -0,0 +1,2 @@ +029-2.gat|mapflag|nosave|029-2,22,24 +029-2.gat|mapflag|resave|029-2,22,24 diff --git a/world/map/npc/029-2/morgan.txt b/world/map/npc/029-2/morgan.txt new file mode 100644 index 00000000..f6679f67 --- /dev/null +++ b/world/map/npc/029-2/morgan.txt @@ -0,0 +1,132 @@ +// Tut mage +// Author: Wushin +// Gains Access to Magic School +// See 024-2 clean that shit up +// Morgan, liana +function|script|MorganState +{ + callfunc "ClearVariables"; + set @morgan, ((STARTAREA & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); + return; +} +function|script|SetMorganMask +{ + set STARTAREA, (STARTAREA & ~(NIBBLE_3_MASK) | (@morgan_tmp << NIBBLE_3_SHIFT)); + set @morgan_tmp, 0; + return; +} +029-2,105,57,0|script|MorganDebug|355 +{ + mes "[Morgan Debug]"; + mes "Reset?"; + menu + "Yes.", L_Reset, + "No.", L_End; +L_Reset: + set STARTAREA, (STARTAREA & ~(NIBBLE_3_MASK) | (0 << NIBBLE_3_SHIFT)); + mes "Reset!"; + goto L_End; + +L_End: + end; + +OnInit: + if (!debug) + disablenpc "MorganDebug"; + end; +} +029-2,101,57,0|script|Morgan#_M|355 +{ + setarray @npc_loc, 101, 57, 4; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_Close; + callfunc "MorganState"; + if (readparam(bInt) >= 5) + goto L_Learn; + goto L_NotMagic; + +L_Learn: + if (@morgan == 0) + goto L_NotSeen; + if (@morgan == 1) + goto L_Seen; + if (@morgan == 2) + goto L_Started; + if (@morgan == 3) + goto L_CastOnce; + if (@morgan == 4) + goto L_LearningDone; + goto L_Close; + +L_NotSeen: + set @morgan_tmp, 1; + callfunc "SetMorganMask"; + mes "[Morgan]"; + mes "\"Welcome to the magic school of Candor\""; + mes "\"My name is Morgan, I'm Head of Wizardry.\""; + mes "\"You appear to have the markings to use magic.\""; + mes "\"Granted you are still to young to cast spells.\""; + mes "\"But we can teach you to use simple magic devices.\""; + mes "\"Would you like to learn some apprentice skills?\""; + menu + "Yes.", L_Start, + "Maybe later", L_Close; + +L_Seen: + mes "[Morgan]"; + mes "\"Have you returned to learn some magic?\""; + menu + "Yes.", L_Start, + "Maybe later", L_Close; + +L_NotMagic: + mes "[Morgan]"; + mes "\"Hrmm you don't appear to posses enough magical talent to teach.\""; + goto L_Close; + +L_Start: + set @morgan_tmp, 2; + callfunc "SetMorganMask"; + mes "\"Great, lets begin your first lesson.\""; + getitem 1171, 1; + mes "\"This is a wand, there are many like it but this one is now yours.\""; + mes "\"Various wands and staffs are found throughout the land with many different strengths and weaknesses.\""; + mes "\"To use the wand you need to have it equipped and speak the incantation to let it tap into your mana.\""; + mes "\"As the power of your magic grows so will the spells you can cast.\""; + mes "\"Lets start with a basic wand attack. " + getspellinvocation("wand") + "\""; + mes "\"Equip the wand and lets try out that spell.\""; + mes "\"To cast a spell open the chat window, type the invocation and press enter.\""; + mes "\"Speak to me again once you've cast the spell.\""; + goto L_Close; + +L_Started: + mes "[Morgan]"; + mes "\"Lets start with a basic wand attack. " + getspellinvocation("wand") + "\""; + mes "\"Equip the wand and lets try out that spell.\""; + mes "\"To cast a spell open the chat window, type the invocation and press enter.\""; + mes "\"Speak to me again once you've cast the spell.\""; + goto L_Close; + +L_CastOnce: + mes "[Morgan]"; + mes "\"Ok, good job! Looks like you have good mana flow.\""; + mes "\"Onto the next lesson. Now that you have " + getspellinvocation("wand") + " cast,\""; + mes "\"Each time you attack the wand will convert a bit of you mana into a magic bolt.\""; + mes "\"After so many attacks, you will need to recast the invocation to stay attuned to the wand.\""; + mes "\"(Logging out will also cancel any spell effects currently active in-game.).\""; + set @morgan_tmp, 4; + callfunc "SetMorganMask"; + goto L_Close; + +L_LearningDone: + mes "[Morgan]"; + mes "\"" + getspellinvocation("wand") + " is a basic wand attack.\""; + mes "\"A Wand must be equipped to use the spell.\""; + mes "\"To cast a spell open the chat window, type the invocation and press enter.\""; + mes "\"I've taught you all I can for now. You should visit the Mana Seed north west of Hurnscald.\""; + goto L_Close; + +L_Close: + close; +} diff --git a/world/map/npc/029-2/sorfina.txt b/world/map/npc/029-2/sorfina.txt new file mode 100644 index 00000000..671835f1 --- /dev/null +++ b/world/map/npc/029-2/sorfina.txt @@ -0,0 +1,388 @@ +// This file is part of the Tutorial +// Author: Jenalya +029-2.gat,27,27,0|script|Sorfina|154,0,1 +{ + setarray @npc_loc, 27, 27, 2; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_Close; + goto L_Main; + +L_Main: + callfunc "TutorialState"; + if (@tutorial == 10) goto L_Hasan; + if (@tutorial >= 4) goto L_Again; + if (@tutorial == 3) goto L_Clothes; + if (@tutorial == 2) goto L_Dresser; + if (@tutorial == 1) goto L_Carpet; + goto L_Start; + +L_Start: + mes "You open your eyes."; + mes ""; + mes "[Old Woman]"; + mes "\"Ah, you woke up. You washed ashore on the beach 3 days ago. You've been asleep since."; + mes "You must have been thrown off one of the ships sailing during that last tremor.\""; + mes "\"My little granddaughter Tanisha found you. Kaan was able to carry you to bed."; + mes "We've been taking care of you ever since. Waiting for you to wake up.\""; + mes "\"You didn't have any possessions on you when we found you and no one knows who you are.\""; + mes "Do you have a name?"; + menu + strcharinfo(0), L_Name; + +L_Name: + mes "[Old Woman]"; + mes "\"Well " + strcharinfo(0) + " what else can you tell me about yourself?.\""; + menu + "Umm... I... I don't remember anything...", L_KnowNothing; + +L_KnowNothing: + mes "[Old Woman]"; + mes "\"Well I can tell you some useful things, if you want to hear."; + mes "Some of it might jog your memory or at least help you catch your bearings."; + mes "Oh, and by the way my name is Sorfina.\""; + menu + "That would be great!",L_Tut, + "No, thanks. I already know how things are going.",L_SkipTut; + +L_Tut: + mes "She smiles at you."; + mes "[Sorfina]"; + mes "\"You have arrived at a very strange time. The Council is visiting Candor today.\""; + mes "\"All the recent rumbling from the cave has all of Candor worried.\""; + mes "\"Our guess is something with the last big shaker was the reason you ended up here.\""; + mes "\"Ok, lets start by getting you dressed.\""; + goto L_Carpet; + +L_Carpet: + mes "[Sorfina]"; + mes "\"Try to take a few steps and walk to that carpet over there."; + mes "Just use the ###keyMoveUp; to move up, press ###keyMoveDown; to move down, "; + mes "press ###keyMoveLeft; to move left, press ###keyMoveRight; to move right "; + mes " or click on the place you want to go to.\""; + set @tutorial_tmp, 1; + callfunc "SetTutorialMask"; + goto L_Close; + +L_Dresser: + mes "[Sorfina]"; + mes "\"In that dresser there are some clothes you can wear.\""; + mes "\"To interact with things in your environment or talk to NPCs you can either click on it or press ###keyTargetNPC; to focus and ###keyTalk; to talk/activate.\""; + mes "\"Now get the clothes out of the dresser.\""; + goto L_Close; + +L_Naked: + mes "[Sorfina]"; + mes "\"Press ###keyWindowInventory; or click on the Inventory button in the bar at the upper right corner to open your bag.\""; + mes "\"Once we stop talking, double-click on the clothes to equip.\""; + mes "\"Talk to me again after you get dressed. You can either click on me, or press ###keyTargetNPC; to focus on me and ###keyTalk; to talk.\""; + goto L_Close; + +L_Clothes: + if (getequipid(equip_torso) < 0) + goto L_Naked; + mes "[Sorfina]"; + mes "\"That's much better, don't you think?\""; + mes "\"Here take this.\""; + getitem "HitchhikersTowel", 1; + mes "\"Your HitchHikers Towel will return you to your last set soul menhir or here if not set.\""; + mes "\"It can't be used constantly as the magic needs time to power the jump.\""; + mes "\"I think this will help you a bit. To get more information, press the button Setup and look at the controls on the Keyboard tab. You can also change them as you like."; + mes "Talk to me again if you want me to explain more things.\""; + + mes "\"Oh, and if you're looking for extra work, you should talk to Aidan and Valon when you go outside. They're giving rewards for monster hunting."; + mes "You can find Aidan near the camp fire outside and Valon out by the fields in the east.\""; + next; + + mes "She digs in her pocket for a moment."; + mes "\"And here is some money for you. Don't spend it all in one place."; + mes "Now go help Tanisha downstairs.\""; + set Zeny, Zeny + 30; + set @tutorial_tmp, 4; + callfunc "SetTutorialMask"; + goto L_Close; + +L_Again: + mes "[Sorfina]"; + mes "\"Make yourself at home! Do you have any questions?\""; + menu + "Yes, could you explain about...",L_Explain, + "Could I get Healed?",L_Heal, + "No, thanks.",L_Close; + +L_Heal: + if (BaseLevel > 20) + goto L_NoHeal; + mes "[Sorfina]"; + mes "\"Hello Dear! You look tired, you should rest a moment.\""; + mes "You take a short nap and feel refreshed."; + heal MaxHp, 0; + goto L_Main; + +L_NoHeal: + mes "[Sorfina]"; + mes "\"I'm sorry but your wounds are far to advanced for my skills.\""; + goto L_Main; + +L_Explain: + menu + "... walking?",L_Walk, + "... talking?",L_Talk, + "... the inventory and items?",L_Items, + "... shortcuts?",L_Shortcut, + "... what to do in Candor?",L_Aidan, + "... nevermind.",L_Close; + +L_Walk: + mes "[Sorfina]"; + mes "\"You can use the arrow keys to walk around."; + mes "Just use the ###keyMoveUp; to move up, press ###keyMoveDown; to move down, "; + mes "press ###keyMoveLeft; to move left, press ###keyMoveRight; to move right "; + mes " or click on the place you want to go to.\""; + mes "This only works if that place is reachable and walkable.\""; + goto L_Close; + +L_Talk: + mes "[Sorfina]"; + mes "\"If you want to talk to a normal person, you can click at him or her."; + mes "Or you can press ###keyTargetNPC; to focus on the nearest person and then press ###keyTalk; to talk.\""; + next; + mes "\"If you want to talk to other adventurers, press ###keyChat; to open your chat window."; + mes "Then type your message and press Enter to send.\""; + next; + mes "\"You may want to talk privately to another adventurer sometimes. In that case you can whisper."; + mes "After pressing ###keyChat; type '/whisper [name] [message]'."; + mes "Or you can right click on someone and choose the whisper option.\""; + next; + mes "\"Press ###keyWindowChat; to show and hide your chat window.\""; + goto L_Close; + +L_Items: + mes "[Sorfina]"; + mes "\"There are three types of items."; + mes "They can be Consumables, Equipment or Miscellaneous.\""; + next; + mes "\"Consumable items such as Potions, can be used only once."; + mes "After use, they will disappear from your inventory."; + mes "There are some rare items that can be used but don't get consumed."; + next; + mes "\"Equipment items like Armors, Weapons, Accessories can be equipped for fashionable purposes or to raise your status.\""; + next; + mes "\"Miscellaneous items such as maggot slime, can be used in creating other items, or just to trade and sell.\""; + next; + mes "\"Your HitchHikers Towel will return you to your last set soul menhir or here if not set.\""; + mes "\"It can't be used constantly as the magic needs time to power the jump.\""; + next; + mes "\"Press ###keyWindowInventory; to open your inventory."; + mes "When placing your cursor over an item there, you can see a box with some information about that item.\""; + next; + mes "\"To use or equip an item, select it by double-clicking on it."; + mes "Selecting the item then pressing Use or Equip also works.\""; + goto L_Close; + +L_Shortcut: + mes "[Sorfina]"; + mes "\"Press ###keyWindowShortcut; or click the Shortcut button in the bar at the upper right to open your shortcut window.\""; + next; + mes "\"You can select the item you want to put on a shortcut with your mouse and then click on the position in the shortcut window you want to place it.\""; + next; + mes "\"Now you can use or equip/unequip it by pressing the number of the shortcut.\""; + goto L_Close; + +L_Aidan: + mes "[Sorfina]"; + mes "\"I heard Aidan and Valon are looking for brave adventurers, you might want to talk to them. "; + mes "You can find Aidan near the camp fire outside. The fields are just south of the town exit. "; + mes "You'll see Valon of the city gaurd standing there. They both are offering rewards for monster hunting.\""; + next; + mes "\"When you leave this area to the South, you'll come to the docks."; + mes "They will take you to Hurnscald, a major trading port.\""; + next; + mes "\"Go east out of Candor and north. You will find the cave everyone is talking about to the north."; + next; + mes "Talk to everybody. You can never tell when they might know something useful.\""; + goto L_Close; + +L_Hasan: + mes "[Sorfina]"; + mes "\"Make yourself at home! Do you have any questions?\""; + menu + "A guy named Hasan is bullying people.",L_Next, + "Yes, could you explain again about...",L_Explain, + "No, thanks.",L_Close; + +L_Next: + mes "\"Ah, Hasan. He's causing trouble again?\""; + mes "She shakes her head."; + mes "[Sorfina]"; + mes "\This guy has been a plague ever since he could walk. He's always causing trouble.\""; + mes "\"And his father... Well, one day his father thought he should teach Hasan a lesson.\""; + mes "\"He took him into the desert and then left him there!"; + mes "Hasan was only seven years old!\""; + mes "\"I never understood how someone could do something like that to a child, even if it's a rascal like Hasan.\""; + mes "\"Anyway, Hasan tried to find his way back home, but stumbled into a nest of scorpions!\""; + mes "She shakes her head."; + mes "\"If Valon hadn't have come along that moment, Hasan would have died that day.\""; + mes "\"However, the scorpions poison caused a bad fever and once Hasan had recovered from that, he was even more malicious than before.\""; + mes "She sighs."; + set @tutorial_tmp, 11; + callfunc "SetTutorialMask"; + goto L_Close; + +L_SkipTut: + mes "[Sorfina]"; + mes "\"Really? You seem quite unexperienced. Listening to some advice won't hurt.\""; + menu + "Thinking about it twice... please tell me.",L_Tut, + "Yeah, but thanks for the offer. Bye.",L_Bye; + +L_Bye: + mes "[Sorfina]"; + mes "\"Alright, if you say so. But take at least this. See you later.\""; + getitem "Knife", 1; + getitem "SlingShot", 1; + getitem "SlingBullet", 500; + getitem "HitchhikersTowel", 1; + getitem "CottonShirt", 1; + getitem "RaggedShorts", 1; + set Zeny, Zeny + 50; + set @tutorial_tmp, 8; + callfunc "SetTutorialMask"; + goto L_Close; + +L_Close: + close; + +OnTouch: + callfunc "TutorialState"; + if (@tutorial > 0) + end; + goto L_Start; +} + +029-2.gat,33,27,0|script|#Carpet|32767,1,1 +{ + end; + +OnTouch: + callfunc "TutorialState"; + if (@tutorial != 1) + end; + mes "[Sorfina]"; + mes "\"You should get dressed now.\""; + mes "\"In that dresser there are some clothes you can wear.\""; + mes "\"To interact with things in your environment or talk to NPCs you can either click on it or press N to focus and T to talk/activate.\""; + next; + mes "\"Now get the clothes out of the dresser.\""; + set @tutorial_tmp, 2; + callfunc "SetTutorialMask"; + close; +} + +029-2.gat,29,23,0|script|Dresser#tutorial|400 +{ + setarray @npc_loc, 29, 23, 2; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_CloseDis; + callfunc "TutorialState"; + if (@tutorial > 2) goto L_Empty; + if (@tutorial == 2) goto L_Shirt; + goto L_Walk; + +L_Walk: + mes "[Sorfina]"; + mes "\"Thats not what I said to do. Please don't skip ahead.\""; + close; + +L_Shirt: + mes "You take a simple Cotton Shirt and some very worn-out Ragged Shorts out of the dresser."; + getitem "CottonShirt", 1; + getitem "RaggedShorts", 1; + mes "[Sorfina]"; + mes "\"Great! Now you can equip it.\""; + mes "\"You can open your inventory by pressing F3 or clicking on the 'Inventory' button in the bar at the upper right corner.\""; + next; + mes "\"After we finish talking, click on the clothes and press the equip button.\""; + set @tutorial_tmp, 3; + callfunc "SetTutorialMask"; + close; + +L_Empty: + mes "The dresser is empty."; + close; + +L_CloseDis: + mes "You cannot reach that far."; + close; +} + +029-2.gat,44,31,0|script|#DoorOutTut1|45,0,0 +{ + end; + +OnTouch: + callfunc "TutorialState"; + if (@tutorial < 4) + goto L_Block; + warp "029-2.gat", 112, 85; + end; + +L_Block: + message strcharinfo(0), "Sorfina: Wait a moment! You're not ready to leave."; + end; +} +029-2.gat,23,24,0|script|#GameRules1|32767,0,1 +{ + end; + +OnTouch: + if (TUT_var > 0) + end; + mes "[Server/Client Notice]"; + mes "The explanations in this tutorial are based on the official client, Manaplus."; + mes "If you're using another client, settings and controls may be different."; + callfunc "GameRules"; + close; +} +029-2.gat,21,24,0|script|#GameRules2|32767,0,1 +{ + end; + +OnTouch: + if (TUT_var > 0) + end; + callfunc "GameRules"; + mes "[Server/Client Notice]"; + mes "The explanations in this tutorial are based on the official client, Manaplus."; + mes "If you're using another client, settings and controls may be different."; + close; +} +029-2.gat,22,26,0|script|#GameRules3|32767,1,0 +{ + if (TUT_var == 0) + goto L_KnockBack; + goto L_Close; + +L_KnockBack: + message strcharinfo(0), "Please Accept the Game rules"; + warp "029-2.gat", 22, 24; + goto L_Close; + +L_Close: + close; +} +029-2.gat,24,24,0|script|#GameRules4|32767,0,1 +{ + if (TUT_var == 0) + goto L_KnockBack; + goto L_Close; + +L_KnockBack: + message strcharinfo(0), "Please Accept the Game rules"; + warp "029-2.gat", 22, 24; + goto L_Close; + +L_Close: + close; +} diff --git a/world/map/npc/029-2/stat_reset.txt b/world/map/npc/029-2/stat_reset.txt new file mode 100644 index 00000000..f3af6df6 --- /dev/null +++ b/world/map/npc/029-2/stat_reset.txt @@ -0,0 +1,44 @@ +// + +029-2.gat,98,92,0|script|Jessie|159 +{ + setarray @npc_loc, 98, 91, 4; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_Close; + if (BaseLevel >= 10) + goto L_Sorry; + + mes "[Jessie]"; + mes "\"I know a spell that will"; + mes "reset status points on the youngings."; + next; + menu + "Reset my stats",L_Reset, + "Forget about it",L_Pass; + +L_Reset: + resetstatus; + + mes "[Jessie]"; + mes "\"There you are."; + mes ""; + mes "Good as new!\""; + goto L_Close; + +L_Pass: + mes "[Jessie]"; + mes "\"Very well then, see you.\""; + goto L_Close; + +L_Sorry: + mes "[Jessie]"; + mes "\"My spell only works on the very young, sorry.\""; + next; + mes "\"You can try Mailvox in the Tulimshar Bazaar or Wyara in the Potion Shop in Hurnscald.\""; + next; + goto L_Close; + +L_Close: + close; +} diff --git a/world/map/npc/029-2/tanisha.txt b/world/map/npc/029-2/tanisha.txt new file mode 100644 index 00000000..b45b5d06 --- /dev/null +++ b/world/map/npc/029-2/tanisha.txt @@ -0,0 +1,299 @@ +// This file is part of the Tutorial +// Authors: Jenalya, alastrim +// Cleanup: o11c + +029-2.gat,110,88,0|script|Tanisha|114 +{ + setarray @npc_loc, 110, 88, 4; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_Close; + + if (isin("029-2.gat", 98, 84, 106, 89)) + goto L_Fighting; + + callfunc "TutorialState"; + if (@tutorial >= 8) goto L_Tut_Done; + if (@tutorial == 7) goto L_Stats; + if (@tutorial == 6) goto L_Fail; + if (@tutorial == 5) goto L_Maggots; + + mes "[Tanisha]"; + mes "\"Hey! You're up again!\""; + emotion EMOTE_HAPPY; + mes "\"Are you feeling better?\""; + menu + "Yes, thank you.",L_Next, + "Yeah, but everything is gone. My stuff and memories..",L_Next; + +L_Next: + mes "[Tanisha]"; + mes "\"I'm glad you're feeling better. It was really bad luck what happened to you."; + mes "Hey, I have an idea.\""; + set @tutorial_tmp, 5; + callfunc "SetTutorialMask"; + goto L_Maggots; + +L_Maggots: + mes "[Tanisha]"; + mes "\"There are some maggots eating the goods and I'm supposed to get rid of them."; + mes "But they're so yucky!\""; + mes "\"If you kill them, I'll give you my knife."; + mes "What do you say?\""; + menu + "I guess it's the least I can do.",L_Next1; + +L_Next1: + mes "[Tanisha]"; + mes "\"Wonderful."; + // since the check happens here, it is actually possible to have + // more than $@Maggot_MaxHunters in the area at one time + // but that's not a BIG problem + if (getareausers("029-2.gat", 98, 84, 106, 89) >= $@Maggot_MaxHunters) + goto L_Crowded; + next; + goto L_Fight_Again; + +L_Fight_Again: + mes "[Tanisha]"; + mes "\"Ok, listen what to do."; + mes "Equip a weapon and kill the maggots.\""; + mes "\"Press ###keyTargetMonster; to focus on a monster. With ###keyTargetAttack; you can focus and start attacking the same time."; + mes "But it also works to click on the monster with your mouse.\""; + next; + mes "\"If you press the ###keyTarget;, you can abort your attack.\""; + next; + mes "\"Maggots aren't aggressive, so they won't harm you until you attack them first. Take them out one by one.\""; + next; + mes "\"Sometimes dead monsters leave some useful things. You can pick them up by pressing ###keyPickup; or clicking on the items with your mouse.\""; + close2; + // The getitem must be in the same place as set @tutorial, 2; + // since it was moved to after L_Fight_Again, add it conditionally + callfunc "TutorialState"; + if (@tutorial == 5) + goto L_GetFightItems; + goto L_ContinueFight; + +L_GetFightItems: + set @tutorial_tmp, 6; + callfunc "SetTutorialMask"; + getitem "Knife", 1; + getitem "SlingShot", 1; + getitem "SlingBullet", 500; + goto L_ContinueFight; + +L_ContinueFight: + set @tutorial_tmp, 6; + callfunc "SetTutorialMask"; + set @Maggot_Kills, 0; + set @time, 0; + if (getareausers("029-2.gat", 98, 84, 106, 89) == 0) + initnpctimer; + warp "029-2.gat", 101, 87; + goto L_Summon; + +L_Summon: + areamonster "029-2.gat", 98, 84, 106, 89, "", 1002, 1, "Tanisha::OnMaggotDeath"; + end; + +L_Stats: + mes "[Tanisha]"; + mes "\"That was great! Like a professional exterminator!\""; + mes "\"And it seems you became stronger and more experienced."; + mes "That means you got some status points which you can use to increase your abilities.\""; + mes "\"Press ###keyWindowStatus; or click the Status button in the bar at the upper right to see your status window. There you can distribute your points on six different properties.\""; + next; + goto L_StatsRe; + +L_StatsRe: + mes "\"Strength makes you hit harder and you can carry more weight.\""; + mes "\"Agility increases your attack speed and your ability to dodge attacks.\""; + mes "\"Vitality gives you more hit points and more defense against physical attacks.\""; + mes "\"Intelligence is useful for magic attack and defense."; + mes "But as long as you don't know any magic, you shouldn't use your points on this.\""; + mes "\"Dexterity is needed to hit monsters. It's also very important for the damage if you use a ranged weapon.\""; + mes "\"Luck gives you the chance to do critical hits and lowers the chance to receive a critical hit from your opponent.\""; + next; + mes "\"Think about how you want to play before assigning the points.\""; + mes "\"My Uncle sitting at the counter knows a spell to help the younglings reset their stats.\""; + mes "\"He also knows of mages with even more powerful reset spells.\""; + next; + callfunc "TutorialState"; + if (@tutorial == 7) + goto L_Money; + goto L_Advice; + +L_Money: + next; + mes "[Tanisha]"; + mes "\"Hey, you are so smart taking out all that yucky maggots for me."; + mes "You can have my pocket money. Here.\""; + set @tutorial_tmp, 8; + callfunc "SetTutorialMask"; + set Zeny, Zeny + 5; + next; + goto L_Advice; + +L_Advice: + mes "\"When you go to Hurnscald, you should see Bernard. He can make a delicious soup!"; + mes "Good luck!\""; + emotion EMOTE_HAPPY; + goto L_Close; + +L_Explain: + menu + "... how to fight?",L_Fight, + "... monsters?",L_Mob, + "... status points?",L_StatsRe, + "... what to do in Hurnscald?",L_Advice, + "... nevermind.",L_Close; + +L_Fight: + mes "[Tanisha]"; + mes "\"Press ###keyTargetMonster; to focus on a monster. With ###keyTargetAttack; you can focus and attack."; + mes "But it also works to click on the monster with your mouse.\""; + next; + mes "\"If you press the ###keyTarget; button, you can abort your attack.\""; + next; + mes "\"Sometimes dead monsters leave some useful things. You can pick them up with pressing ###keyPickup; or clicking on the items with your mouse.\""; + next; + mes "\"If you feel exhausted from battle you can sit down by pressing ###keyBeingSit; to recover faster.\""; + goto L_Close; + +L_Mob: + mes "[Tanisha]"; + mes "\"I don't know much about monsters, I'm just a little girl. But I know a few things."; + mes "There are several types of monsters...Aggressive, Neutral, and Assistants.\""; + next; + mes "\"Aggressive monsters will attack you as soon as they see you.\""; + next; + mes "\"Neutral monsters are peaceful until they get attacked.\""; + next; + mes "\"Assistants are monsters who help each other.\""; + goto L_Close; + +L_Tut_Done: + mes "[Tanisha]"; + mes "\"These yucky maggots! They're eating our goods!"; + mes "No matter how many of them you kill, they always come back.\""; + mes "She sighs."; + mes "[Tanisha]"; + mes "\"Do you have any questions?\""; + menu + "Yes, could you explain about...", L_Explain, + "No, thanks.", L_Close; + +L_Crowded: + mes "[Tanisha]"; + mes "\"That's great! But..."; + mes "it seems a little crowded in there.\""; + mes "\"Let's wait a short while.\""; + goto L_Close; + +L_Sleep: + warp "029-2.gat", 101, 87; + mes "[Tanisha]"; + mes "\"What are you doing in there?"; + mes "Sleeping?"; + mes "Come back when you're serious.\""; + set @Maggot_Kills, 0; + set @time, 0; + close2; + if (getareausers("029-2.gat", 98, 84, 106, 89) == 0) + goto L_CleanUp; + end; + +L_Fail: + mes "Tanisha seems to be trying hard to supress laughter."; + mes "[Tanisha]"; + mes "\"The maggots defeated you.\""; + mes "She bursts out with laughter."; + mes "\"Oops, I'm sorry. It's just too funny."; + mes "Do you want to try it again?\""; + menu + "Sure!", L_Next2, + "No, I need a rest.", L_Close; + +L_Next2: + if (getareausers("029-2.gat", 98, 84, 106, 89) >= $@Maggot_MaxHunters) + goto L_Crowded; + goto L_Fight_Again; + +L_Fighting: + message strcharinfo(0), "Tanisha: I believe in you!"; + end; + +OnTimer1000: + setnpctimer 0; + if (getareausers("029-2.gat", 98, 84, 106, 89) == 0) + goto L_CleanUp; + // This is needed because multiple players can be in the area at once + areatimer "029-2.gat", 98, 84, 106, 89, 0, "Tanisha::OnTick"; + end; + +L_CleanUp: + killmonster "029-2.gat", "Tanisha::OnMaggotDeath"; + set $@Maggot_Hunters, 0; + stopnpctimer; + areamonster "029-2.gat", 98, 84, 106, 89, "", 1002, 1, "Tanisha::OnMaggotDeath"; + end; + +OnTick: + set @time, @time + 1; + if (@time > 300) + goto L_Sleep; + if (isdead()) + end; + if (Hp > 20) + end; + heal MaxHp, 0; + message strcharinfo(0), "Tanisha: You're doing good!"; + end; + +OnMaggotDeath: + if (@Maggot_Kills == 1) + message strcharinfo(0), "Tanisha: Aaahhhh... another one! It will crawl up your legs!"; + if (@Maggot_Kills == 2) + message strcharinfo(0), "Tanisha: Ohh... Irrhk... Eeeeww... They just appear from nowhere!"; + if (@Maggot_Kills == 3) + message strcharinfo(0), "Tanisha: Yuck... I think I am getting sick."; + if (isin("029-2.gat", 98, 84, 106, 89)) + set @Maggot_Kills, @Maggot_Kills + 1; + if (@Maggot_Kills < 5) + goto L_Summon; + // else, complete + warp "029-2.gat", 110, 88; + set @tutorial_tmp, 7; + callfunc "SetTutorialMask"; + set @Maggot_Kills, 0; + set @time, 0; + if (getareausers("029-2.gat", 98, 84, 106, 89) == 0) + goto L_CleanUp; + end; + +L_Close: + close; + +OnInit: + set $@Maggot_MaxHunters, 4; + areamonster "029-2.gat", 98, 84, 106, 89, "", 1002, 1, "Tanisha::OnMaggotDeath"; + end; +} +029-2.gat,114,93,0|script|#DoorOutTut2|45,0,0 +{ + end; + +OnTouch: + callfunc "TutorialState"; + if (@tutorial >= 8) + goto L_Warp; + goto L_Block; + +L_Warp: + warp "029-1.gat", 32, 100; + end; + +L_Block: + message strcharinfo(0), "Tanisha: Please come here. I'd like some help!"; + end; +} diff --git a/world/map/npc/029-2/two_arms.txt b/world/map/npc/029-2/two_arms.txt new file mode 100644 index 00000000..33b4b843 --- /dev/null +++ b/world/map/npc/029-2/two_arms.txt @@ -0,0 +1,4 @@ +// Forge Shops + +029-2.gat,99,25,0|shop|Rosen|311,SlingShot:*500,SlingBullet:*1,ShortBow:*8000,Arrow:*1,IronArrow:*4 +029-2.gat,112,24,0|shop|Toichi|377,Knife:*50,SharpKnife:*100,Dagger:*1000,LeatherShirt:*2000,LeatherShield:*2000 diff --git a/world/map/npc/041-1/_import.txt b/world/map/npc/041-1/_import.txt deleted file mode 100644 index f7ba8d9e..00000000 --- a/world/map/npc/041-1/_import.txt +++ /dev/null @@ -1,6 +0,0 @@ -// Map 041-1: Beach -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 041-1.gat -npc: npc/041-1/_mobs.txt -npc: npc/041-1/_warps.txt -npc: npc/041-1/mapflags.txt diff --git a/world/map/npc/041-1/_mobs.txt b/world/map/npc/041-1/_mobs.txt deleted file mode 100644 index 85362452..00000000 --- a/world/map/npc/041-1/_mobs.txt +++ /dev/null @@ -1,40 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Beach mobs - -041-1.gat,81,55,18,9|monster|Scorpion|1003,3,100000ms,30000ms,Mob041-1::On1003 -041-1.gat,101,67,18,9|monster|Scorpion|1003,3,100000ms,30000ms,Mob041-1::On1003 -041-1.gat,100,84,18,9|monster|Scorpion|1003,3,100000ms,30000ms,Mob041-1::On1003 -041-1.gat,61,34,13,20|monster|Scorpion|1003,3,100000ms,30000ms,Mob041-1::On1003 -041-1.gat,55,30,10,48|monster|SeaSlime|1033,3,100000ms,30000ms,Mob041-1::On1033 -041-1.gat,59,13,10,9|monster|Scorpion|1003,3,100000ms,30000ms,Mob041-1::On1003 -041-1.gat,60,7,3,2|monster|TameScorpion|1046,1,100000ms,30000ms,Mob041-1::On1046 -041-1.gat,66,49,3,2|monster|TameScorpion|1046,1,100000ms,30000ms,Mob041-1::On1046 -041-1.gat,95,75,21,9|monster|TameScorpion|1046,1,100000ms,30000ms,Mob041-1::On1046 -041-1.gat,100,57,18,9|monster|RedScorpion|1004,3,100000ms,30000ms,Mob041-1::On1004 -041-1.gat,83,64,18,9|monster|RedScorpion|1004,3,100000ms,30000ms,Mob041-1::On1004 - - -041-1.gat,0,0,0|script|Mob041-1|-1 -{ - end; - -On1003: - set @mobID, 1003; - callfunc "MobPoints"; - end; - -On1004: - set @mobID, 1004; - callfunc "MobPoints"; - end; - -On1033: - set @mobID, 1033; - callfunc "MobPoints"; - end; - -On1046: - set @mobID, 1046; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/041-1/_warps.txt b/world/map/npc/041-1/_warps.txt deleted file mode 100644 index 736486dc..00000000 --- a/world/map/npc/041-1/_warps.txt +++ /dev/null @@ -1,5 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Beach warps - -041-1.gat,101,95|warp|To Beach|1,-1,004-1.gat,68,20 -041-1.gat,58,4|warp|To Tulimshar Suburbs|1,-1,042-1.gat,44,113 diff --git a/world/map/npc/041-1/mapflags.txt b/world/map/npc/041-1/mapflags.txt deleted file mode 100644 index 59863e5d..00000000 --- a/world/map/npc/041-1/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -041-1.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/042-1/_import.txt b/world/map/npc/042-1/_import.txt deleted file mode 100644 index 0c712a7c..00000000 --- a/world/map/npc/042-1/_import.txt +++ /dev/null @@ -1,12 +0,0 @@ -// Map 042-1: Tulimshar Suburbs -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 042-1.gat -npc: npc/042-1/_mobs.txt -npc: npc/042-1/_warps.txt -npc: npc/042-1/hasan.txt -npc: npc/042-1/kaan.txt -npc: npc/042-1/liana.txt -npc: npc/042-1/mapflags.txt -npc: npc/042-1/tutorial.txt -npc: npc/042-1/valon.txt -npc: npc/042-1/zegas.txt diff --git a/world/map/npc/042-1/_mobs.txt b/world/map/npc/042-1/_mobs.txt deleted file mode 100644 index 1482fefa..00000000 --- a/world/map/npc/042-1/_mobs.txt +++ /dev/null @@ -1,39 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Suburbs mobs - -042-1.gat,101,69,31,15|monster|Maggot|1002,5,100000ms,30000ms,Mob042-1::On1002 -042-1.gat,65,59,27,15|monster|Maggot|1002,7,100000ms,30000ms,Mob042-1::On1002 -042-1.gat,68,102,7,8|monster|BlackScorpion|1009,5,100000ms,30000ms,Mob042-1::On1009 -042-1.gat,98,88,5,8|monster|Scorpion|1003,4,100000ms,30000ms,Mob042-1::On1003 -042-1.gat,63,63,37,30|monster|TameScorpion|1046,6,100000ms,30000ms,Mob042-1::On1046 -042-1.gat,85,102,5,8|monster|Scorpion|1003,5,100000ms,30000ms,Mob042-1::On1003 -042-1.gat,98,99,5,5|monster|Scorpion|1003,3,100000ms,30000ms,Mob042-1::On1003 -042-1.gat,82,87,6,3|monster|Scorpion|1003,2,100000ms,30000ms,Mob042-1::On1003 -042-1.gat,70,88,5,8|monster|BlackScorpion|1009,5,100000ms,30000ms,Mob042-1::On1009 -042-1.gat,80,35,11,5|monster|BlackScorpion|1009,5,100000ms,30000ms,Mob042-1::On1009 - - -042-1.gat,0,0,0|script|Mob042-1|-1 -{ - end; - -On1002: - set @mobID, 1002; - callfunc "MobPoints"; - end; - -On1003: - set @mobID, 1003; - callfunc "MobPoints"; - end; - -On1009: - set @mobID, 1009; - callfunc "MobPoints"; - end; - -On1046: - set @mobID, 1046; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/042-1/_warps.txt b/world/map/npc/042-1/_warps.txt deleted file mode 100644 index bf32dc06..00000000 --- a/world/map/npc/042-1/_warps.txt +++ /dev/null @@ -1,15 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Suburbs warps - -042-1.gat,97,41|warp|To Tulismhar Docks|-1,2,022-1.gat,21,37 -042-1.gat,65,20|warp|To Lighthouse Beach|0,-1,023-1.gat,64,143 -042-1.gat,91,72|warp|To Store House|-1,-1,042-2.gat,22,92 -042-1.gat,104,72|warp|To Store House|-1,-1,042-2.gat,44,92 -042-1.gat,65,74|warp|To Tulimshar Suburbs Ho|-1,-1,042-2.gat,29,61 -042-1.gat,62,42|warp|To Sorfina's Dinner|-1,-1,042-2.gat,112,85 -042-1.gat,51,43|warp|To Sorfina's House|-1,-1,042-2.gat,44,30 -042-1.gat,117,101|warp|To Magic School Researc|-1,-1,042-2.gat,103,62 -042-1.gat,112,95|warp|To Magic School Researc|-1,-1,042-2.gat,94,54 -042-1.gat,120,95|warp|To Magic School Researc|-1,-1,042-2.gat,112,54 -042-1.gat,117,85|warp|To Tulismhar Docks|-1,-1,022-1.gat,41,82 -042-1.gat,44,115|warp|To Tulismhar Outskirts|1,-1,041-1.gat,58,6 diff --git a/world/map/npc/042-1/hasan.txt b/world/map/npc/042-1/hasan.txt deleted file mode 100644 index 734e0df0..00000000 --- a/world/map/npc/042-1/hasan.txt +++ /dev/null @@ -1,228 +0,0 @@ -// This file is part of the Tutorial -// Authors: Jenalya, alastrim -// Hasan should be threatening someone else you come to help -// Going to throw someone off a cliff -// npctalk 2 NPCs Hasan talks about giving someone a short trip to Docks -// They respond by asking play for help -// Hasan tells them to but out of it. - -042-1.gat,104,49,0|script|Scared Man|160 -{ - setarray @npc_loc, 104, 49, 4; - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_End; - if (@tutorial >= 13) - goto L_TutDone; - message strcharinfo(0), "He looks too afraid to say anything."; - goto L_End; - -L_TutDone: - message strcharinfo(0), "Thanks. Kaan's been much nicer to me now"; - goto L_End; - -L_End: - end; -} -042-1.gat,102,49,0|script|Hasan|189,2,2 -{ - setarray @npc_loc, 102, 49, 4; - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_Close; - goto L_Main; - -L_Main: - callfunc "TutorialState"; - if ((getcharid(3) == $@ScorpionFighter) || ($@ScorpionFighter && $@ScorpionFighter != getcharid(3))) - goto L_Afraid; - if (@tutorial == 14) - goto L_TutDone; - if (@tutorial == 13) - goto L_Thank; - if (@tutorial == 12) - goto L_Trick; - if ((@tutorial == 9) || (@tutorial == 10) || (@tutorial == 11)) - goto L_FightAgain; - - mes "You over hear some people nearby."; - mes "[Unfriendly Guy]"; - mes "\"I told you if you didn't get the money, I'd give you flying lessons, Haha!\""; - next; - mes "[Scared Man]"; - mes "\"But the only person I need protection from is you.\""; - next; - mes "[Unfriendly Guy]"; - mes "\"Thats why the price is so high.\""; - next; - mes "\"Because I'm the toughest person in all of Tulimshar\""; - next; - mes "[Scared Man]"; - mes "\"No, your just a mean bully. Wait till I tell the gaurds about this!\""; - next; - mes "[Unfriendly Guy]"; - mes "\"You do that and the next flying lesson will be from the beach cliffs.\""; - next; - mes "[Scared Man]"; - mes "\"No, please don't. *sob*\""; - next; - mes "Sounds like this person is in trouble.\""; - next; - set @tutorial_tmp, 9; - callfunc "SetTutorialMask"; - mes "[Unfriendly Guy]"; - mes "\"What are you looking at?\""; - menu - "What ever you call maggot slime scrapped off a boat after a walk through the sewers.\"", L_Fight, - "Who me? I saw nothing, just passing by.", L_Close; - -L_FightAgain: - mes "[Hasan]"; - mes "\"Have you come back for a thrashing?\""; - menu - "No.", L_Close, - "Yes.", L_Fight; - -L_Fight: - mes "[Hasan]"; - mes "\"Do you really think you can beat me?\""; - mes "He pulls out a nasty looking dagger and stabs it in your direction."; - set Hp, 1; - next; - mes "That hurt! You begin to think searching for a different solution might be healthier."; - mes "Maybe Kaan can help?"; - goto L_Close; - -L_Trick: - mes "[Hasan]"; - mes "\"Have you come back for another thrashing?\""; - menu - "No.",L_Close, - "Yes, yours! (Scratch your head.)",L_ScratchHead; - -L_ScratchHead: - if ($@ScorpionFighter) - goto L_Wait; - set @tutorial_tmp, 14; - callfunc "SetTutorialMask"; - set $@ScorpionTimer, 0; - set $@ScorpionFighter, getcharid(3); - set $@ScorpDeath, PC_DIE_COUNTER; - cmdothernpc "#ScorpionTrigger", "HasanSpawn"; - mes "While you're scratching your head, you see Kaan approaching the fence."; - close; - -L_Thank: - mes "[Hasan]"; - mes "\"You - you saved me!"; - mes "I was mean to people, but you still saved me!\""; - next; - mes "\"Hey, you're a really cool person."; - mes "I mean, the way you finished that ghastly scorpion!"; - mes "Amazing!\""; - next; - mes "\"Let me tell you something, I will no longer bully people."; - mes "And you can have my Sharp Knife.\""; - getitem "SharpKnife", 1; - set @tutorial_tmp, 14; - callfunc "SetTutorialMask"; - next; - mes "\"You want to go to the bazaar, right? Shall I tell you how to get there?\""; - menu - "Sure, thanks.",L_HasanThanks, - "I'll try to find the way myself.",L_Explore; - -L_HasanThanks: - mes "[Hasan]"; - mes "\"Ok, when you leave here follow the road past the docks until you reach the old city gates.\""; - next; - mes "\"Pass through them and at the crossway, just go west and then south until you reach some other gateway.\""; - next; - mes "\"Behind it there is the bazaar of Tulimshar.\""; - goto L_Close; - -L_Explore: - mes "[Hasan]"; - mes "\"Alright. Take care!\""; - goto L_Close; - -L_TutDone: - mes "[Hasan]"; - mes "\"You didn't see anything. I tell you what I'll be nicer if you don't tell anyone?\""; - menu - "As long as you learned your lesson.", L_TutCont; - -L_TutCont: - mes "\"I have, I promise not to bully people anymore. It's not fun being scared.\""; - goto L_Close; - -L_Wait: - mes "There is a scorpion near Hasan already. I think Kaan is helping someone else... Maybe I should try the plan later."; - goto L_Close; - -L_Afraid: - message strcharinfo(0), "Hasan: \"" + strcharinfo(0) + "! Please help me!\""; - end; - -L_Close: - close; - -OnTouch: - if (@tutorial >= 13) - end; - goto L_Main; -} -042-1.gat,0,0,0|script|#ScorpionTrigger|35 -{ - end; - -OnCommandHasanSpawn: - goto L_Summon; - -L_Summon: - monster "042-1.gat",102,49,"WeakScorpion",1046,1, "#ScorpionTrigger::OnScorpionDeath"; - initnpctimer; - end; - -L_SummonAgain: - message strcharinfo(0), "Kaan is mad at you for your interference! He walks over to the edge of the fence and throws a rock on top of your head, then lets another scorpion run just near Hasan!"; - percentheal -100, 0; - goto L_Summon; - -OnTimer5000: - if (attachrid($@ScorpionFighter) == 0) - goto L_Clean; - set $@ScorpionTimer, $@ScorpionTimer + 5; - if ($@ScorpionTimer >= 300) - goto L_TimeOut; - if (PC_DIE_COUNTER > $@ScorpDeath) - goto L_MessageDeath; - setnpctimer 0; - end; - -OnScorpionDeath: - if (getcharid(3) != $@ScorpionFighter) - goto L_SummonAgain; - if (@tutorial != 12) - goto L_Clean; - set @tutorial_tmp, 13; - callfunc "SetTutorialMask"; - message strcharinfo(0), "You saved Hasan."; - goto L_Clean; - -L_TimeOut: - message strcharinfo(0), "Hasan, with his eyes almost closed, trembling with fear, runs toward the scorpion and stabs it with all his strength!"; - goto L_Clean; - -L_MessageDeath: - message strcharinfo(0), "Ouch... I should be more careful when fighting these monsters."; - goto L_Clean; - -L_Clean: - killmonster "042-1.gat", "#ScorpionTrigger::OnScorpionDeath"; - set $@ScorpionFighter, 0; - set $@ScorpionTimer, 0; - set $@ScorpDeath, 0; - stopnpctimer; - end; -} diff --git a/world/map/npc/042-1/kaan.txt b/world/map/npc/042-1/kaan.txt deleted file mode 100644 index 92067c41..00000000 --- a/world/map/npc/042-1/kaan.txt +++ /dev/null @@ -1,144 +0,0 @@ -// This file is part of the Tutorial -// Author: Jenalya - -042-1.gat,109,87,0|script|Kaan|160 -{ - setarray @npc_loc, 109, 87, 4; - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_Close; - - callfunc "TutorialState"; - if (!(@kaan_talked)) goto L_Tanisha; - if (@tutorial >= 13) goto L_TutDone; - if (@tutorial == 12) goto L_Plan; - if (@tutorial == 11) goto L_TrickKnown; - if (@tutorial == 10) goto L_Trick; - if (@tutorial == 9) goto L_Hasan; - goto L_Out; - -L_Tanisha: - set STARTAREA, STARTAREA | $@SpokeToKaan; - mes "[Young Man]"; - mes "\"You're the person Tanisha brought here, right?"; - mes "My name is Kaan, I'm her brother.\""; - next; - mes "\"She was babbling at me about it all the morning until I sent her to take care of the maggots in the storehouse.\""; - next; - mes "Kaan grins mischieviously."; - mes "[Kaan]"; - mes "\"She hates maggots.\""; - next; - mes "\"Did you already talk to Tanisha?\""; - menu - "Yes, I helped her with the maggots.",L_Tanisha1, - "Yeah, and she's done with the maggots.",L_Tanisha1; - -L_Tanisha1: - mes "[Kaan]"; - mes "\"Ah, that is good news."; - mes "You know, we have a lot of problems with bugs here.\""; - next; - mes "\"If we don't watch out the maggots will eat all of our stocks."; - mes "And the desert is crawling with scorpions."; - mes "They also come here and you need to watch out not to step on them.\""; - next; - mes "\"But I took care of that problem.\""; - mes "He looks very proud."; - next; - mes "\"I've trapped or slain many scorpians south of here to keep them out of our fields.\""; - next; - menu - "Impressive! Just a bit... skewed.",L_Next, - "Wow, it looks very - ahm, unconventional.",L_Next; - -L_Next: - mes "[Kaan]"; - mes "\"Well, I keep the scorpions out. That's all that matters.\""; - next; - mes "\"Are you going to visit Tulimshar?"; - mes "The bazaar there is a wondeful place! Traders, entertainers, adventurers - it's very exciting.\""; - next; - mes "\"And Ian the trainer is hanging around there often. You should talk to him, he's a smart guy.\""; - goto L_Out; - -L_Out: - mes "[Kaan]"; - mes "\"Hello! How are you? Did you already visit Tulimshar?\""; - menu - "Not yet.",L_Close; - -L_Hasan: - mes "[Kaan]"; - mes "\"Hello! How are you? Did you already visit Tulimshar?\""; - menu - "A guy named Hasan is bullying someone.",L_Next1, - "Not yet.",L_Close; - -L_Next1: - mes "\"Hasan! That's crazy. He becomes more cheeky with every day."; - mes "I'd like to help you, but - I won't risk an open confrontation with him.\""; - next; - mes "\"Sometimes he just freaks out and then he's dangerous."; - mes "He might listen to one of the adult men, but they're all off to work in Tulimshar during the day.\""; - next; - mes "\"We should think about some kind of trick. Ah, if only I knew his weak point.\""; - set @tutorial_tmp, 10; - callfunc "SetTutorialMask"; - next; - goto L_Trick; - -L_Trick: - mes "[Kaan]"; - mes "\"Do you have any idea what Hasan's weakness could be?"; - mes "I wonder if Sorfina or Tanisha know something about him that could help us.\""; - menu - "No idea.",L_Close; - -L_TrickKnown: - mes "[Kaan]"; - mes "\"Do you have any idea what Hasan's weakness could be?"; - menu - "He's afraid of scorpions.",L_Next2, - "No idea.",L_Close; - -L_Next2: - mes "[Kaan]"; - mes "\"Scorpions?! Right! How could I forget?"; - mes "When he was a child, he nearly died because he fell into a scorpion nest.\""; - set @tutorial_tmp, 12; - callfunc "SetTutorialMask"; - next; - goto L_Explain; - -L_Explain: - mes "\"Ok, then here's the plan:"; - mes "I will catch one of the scorpions behind the fences.\""; - next; - mes "\"You'll go to Hasan and give me a sign when you're ready."; - mes "Lets say the sign is that you're scratching your head."; - mes "I'll watch you from this point.\""; - next; - mes "\"When you give me the sign, I'll throw the scorpion on him."; - mes "I bet that will show him for the coward he really is.\""; - next; - mes "\"How's that? We can start as soon as you're ready.\""; - goto L_Close; - -L_Plan: - mes "[Kaan]"; - mes "\"I'm ready. Just give me the sign when you're down there."; - mes "Or do you want me to explain the plan again?\""; - menu - "Yes please.",L_Explain, - "No, everything's alright.",L_Close; - -L_TutDone: - mes "[Kaan]"; - mes "\"Hi there. I hope you enjoy your time in Tulimshar."; - mes "Hasan can be a real troublemaker, but it seems like he has calmed down for now.\""; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/042-1/liana.txt b/world/map/npc/042-1/liana.txt deleted file mode 100644 index c6df63a9..00000000 --- a/world/map/npc/042-1/liana.txt +++ /dev/null @@ -1,24 +0,0 @@ -// Talk NPCs to help make trek interesting between Tutorial and Bazaar. - -042-1.gat,82,96,0|script|Liana|205 -{ - setarray @npc_loc, 82, 96, 4; - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_End; - goto L_Talk; - -L_Talk: - mes "[Liana]"; - mes "\"Tulimshar is a large city. I'm sure glad I live in the suburbs because I know where everything's at.\""; - next; - mes "\"I think Tanisha is in the building to the right. That girl is growing up fast.\""; - goto L_Close; - -L_End: - mes "You'll have to move closer"; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/042-1/mapflags.txt b/world/map/npc/042-1/mapflags.txt deleted file mode 100644 index 3c0e8f71..00000000 --- a/world/map/npc/042-1/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -042-1.gat|mapflag|resave|042-2,26,26 diff --git a/world/map/npc/042-1/tutorial.txt b/world/map/npc/042-1/tutorial.txt deleted file mode 100644 index bed98436..00000000 --- a/world/map/npc/042-1/tutorial.txt +++ /dev/null @@ -1,67 +0,0 @@ -// This file is part of the Tutorial -// Author: Jenalya -// if you enter the tutorial area from outside, it is set to be already done --|script|#TutorialConfig|-1 -{ - end; - -OnInit: - set $@ScorpionFighter, 0; - set $@ScorpionTimer, 0; - set $@ScorpDeath, 0; - set $@SpokeToKaan, (1 << 31); - end; -} -function|script|TutorialState -{ - callfunc "ClearVariables"; - set @tutorial, ((STARTAREA & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); - set @kaan_talked, (STARTAREA & $@SpokeToKaan); - return; -} -function|script|SetTutorialMask -{ - set STARTAREA, (STARTAREA & ~(NIBBLE_0_MASK) | (@tutorial_tmp << NIBBLE_0_SHIFT)); - set @tutorial_tmp, 0; - return; -} -042-2.gat,21,26,0|script|TutDebug|154 -{ - mes "[TutDebug]"; - mes "Reset?"; - menu - "Yes.",L_Reset, - "No.",L_End; - -L_Reset: - set TUT_var, 0; - set @tutorial_tmp, 0; - set STARTAREA, (STARTAREA & ~(NIBBLE_0_MASK) | (@tutorial_tmp << NIBBLE_0_SHIFT)); - set STARTAREA, STARTAREA &~ $@SpokeToKaan; - mes "Reset!"; - goto L_End; - -L_End: - end; - -OnInit: - if(!debug) - disablenpc "TutDebug"; - end; -} -042-1.gat,63,47,0|script|#tutorialoutside|45,0,0 -{ - callfunc "TutorialState"; - if (@tutorial >= 8) - goto L_Warp; - goto L_ResetTutorial; - -L_ResetTutorial: - set @tutorial_tmp, 8; - callfunc "SetTutorialMask"; - goto L_Warp; - -L_Warp: - warp "042-2.gat", 114, 92; - end; -} diff --git a/world/map/npc/042-1/valon.txt b/world/map/npc/042-1/valon.txt deleted file mode 100644 index b50207a3..00000000 --- a/world/map/npc/042-1/valon.txt +++ /dev/null @@ -1,168 +0,0 @@ -// This file is part of the Tutorial -// Author: Jenalya, Wushin --|script|#ValonConfig|-1 -{ - end; - -OnInit: - setarray $@ValonMob, 1002,1050,1046,1003; - setarray $@ValonMobName$, "Maggots","House Maggots","Tame Scorpions","Scorpion"; - setarray $@ValonMobCnt, 10,5,3,1; - end; -} -function|script|ValonState -{ - set @valon_state, ((STARTAREA & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT); - set @valon_mob, 0; - if (@valon_state >= 2) - set @valon_mob, (@valon_state - 2); - set @valon_count, ((STARTAREA & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); - return; -} -function|script|setValonMask -{ - set STARTAREA, (STARTAREA & ~(NIBBLE_1_MASK) | (@valon_tmp << NIBBLE_1_SHIFT)); - set @valon_tmp, 0; - return; -} -function|script|ResetValonCntMask -{ - set STARTAREA, (STARTAREA & ~(NIBBLE_2_MASK) | (0 << NIBBLE_2_SHIFT)); - return; -} -function|script|AddValonCntMask -{ - set @valon_tmp, (@valon_count + 1); - if (@valon_tmp > $@ValonMobCnt[@valon_mob]) - set @valon_tmp, $@ValonMobCnt[@valon_mob]; - set STARTAREA, (STARTAREA & ~(NIBBLE_2_MASK) | (@valon_tmp << NIBBLE_2_SHIFT)); - set @valon_tmp, 0; - callfunc "ValonProgress"; - return; -} -function|script|ValonProgress -{ - callfunc "ValonState"; - if ((@valon_state > 1) && (@valon_state < 6)) - message strcharinfo(0), $@ValonMobName$[@valon_mob] + ": " + @valon_count + "/" + $@ValonMobCnt[@valon_mob]; - return; -} -042-1.gat,51,111,0|script|ValonDebug|156 -{ - mes "[Valon Debug]"; - mes "Reset?"; - menu - "Yes.", L_Reset, - "No.", L_End; - -L_Reset: - set STARTAREA, (STARTAREA & ~(NIBBLE_1_MASK) | (0 << NIBBLE_1_SHIFT)); - set STARTAREA, (STARTAREA & ~(NIBBLE_2_MASK) | (0 << NIBBLE_2_SHIFT)); - mes "Reset!"; - goto L_End; - -L_End: - end; - -OnInit: - if (!debug) - disablenpc "ValonDebug"; - end; -} -042-1.gat,48,111,0|script|Valon|156 -{ - setarray @npc_loc, 48, 111, 4; - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_Close; - callfunc "ValonState"; - if (@valon_state >= 6) - goto L_QuestComplete; - if (@valon_start == 1) - goto L_QuestAskAgain; - if (@valon_count >= $@ValonMobCnt[@valon_mob]) - goto L_NextMob; - if ((@valon_state >= 2) && (@valon_state < 6)) - goto L_QuestStarted; - goto L_QuestAsk; - -L_QuestAskAgain: - mes "[Valon]"; - mes "\"Hello, Adventurer! Have you come back to help?\""; - menu - "Yes. I will help with the desert beasts.", L_Accept, - "Maybe some other time.", L_Close; - -L_QuestAsk: - mes "[Valon]"; - mes "\"Hello!"; - mes "You're looking for adventures, right?\""; - next; - mes "\"But you shouldn't underestimate this desert, it is dangerous.\""; - next; - mes "\"It's crawling with scorpions, and the heat has overcome adventurers tougher than you are.\""; - next; - mes "\"I should know I gaurd this gate from all manner of desert beasts.\""; - next; - mes "\"Maybe you would like help and earn your stripes?\""; - next; - mes "\"The Council of Wizard's does offer a reward for helping...\""; - set @valon_tmp, 1; - callfunc "setValonMask"; - callfunc "ResetValonCntMask"; - menu - "YES!!! let me at them!", L_Accept, - "Maybe some other time.", L_Close; - -L_Accept: - set @valon_tmp, 2; - callfunc "setValonMask"; - callfunc "ValonState"; - goto L_NewMob; - -L_NextMob: - getexp 40, 0; - mes "\"I see you killed all the " + $@ValonMobName$[@valon_mob] + " needed.\""; - next; - mes "\"The Wizard's thank thee as well.\""; - set Zeny, Zeny + 25; - set @valon_tmp, (@valon_state + 1); - callfunc "setValonMask"; - callfunc "ResetValonCntMask"; - callfunc "ValonState"; - next; - if (@valon_mob == getarraysize($@ValonMob)) - goto L_QuestOver; - goto L_NewMob; - -L_NewMob: - mes "\"Let's see whats on the list. Ah ok, I need you to kill me " + $@ValonMobCnt[@valon_mob] + " " + $@ValonMobName$[@valon_mob] + "\""; - next; - mes "\"I'll be waiting here, come back and see after you've killed those mobs.\""; - goto L_Close; - -L_QuestStarted: - mes "[Valon]"; - mes "Hail adventurer! You are well on your way to mastering the beasts of the desert.\""; - next; - mes "\"You need to kill " + $@ValonMobName$[@valon_mob] + ": " + @valon_count + "/" + $@ValonMobCnt[@valon_mob] + "\""; - next; - mes "\"Come back and see me when the job is done.\""; - goto L_Close; - -L_QuestOver: - mes "[Valon]"; - mes "\"Thanks once again for helping with the monsters in the desert.\""; - getexp 50, 0; - set @valon_tmp, (@valon_state + 1); - callfunc "setValonMask"; - goto L_Close; - -L_QuestComplete: - mes "[Valon]"; - mes "\"Thanks once again for helping with the monsters in the desert.\""; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/042-1/zegas.txt b/world/map/npc/042-1/zegas.txt deleted file mode 100644 index 4a153ebe..00000000 --- a/world/map/npc/042-1/zegas.txt +++ /dev/null @@ -1,109 +0,0 @@ -// Barrels -// Author: Wushin -// Npc -042-1.gat,97,75,0|script|Zegas|165 -{ - setarray @npc_loc, 97, 75, 2; - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_Range; - - callfunc "CheckBarrelQuest"; - if (@barrel_quest == 1) - goto L_Find; - if (@barrel_quest == 2) - goto L_Looking; - if (@barrel_quest == 3) - goto L_QuestEnd; - if (@barrel_quest == 4) - goto L_Thanks; - goto L_Meet; - -L_Range: - message strcharinfo(0), "Whats that? Come closer I can't hear you."; - goto L_Close; - -L_Meet: - mes "[Zegas]"; - mes "\"Hey do you have a second?\""; - next; - mes "\"The storehouse here is over run with house maggots.\""; - next; - mes "\"Wouldn't you know it, the bug bomb Eomie gave us is in one of the store room barrels.\""; - next; - mes "\"Can you search the barrels for the bug bomb and set it off when you find it?\""; - set @barrel_tmp, 1; - callfunc "SetBarrelMask"; - menu - "Sure.",L_Start, - "Maybe some other time.",L_Close; - -L_Find: - mes "[Zegas]"; - mes "\"The storehouse is still over run with house maggots.\""; - next; - mes "\"Please help me find the bug bomb Eomie gave us is in one of the store room barrels?\""; - menu - "Sure.",L_Start, - "Maybe some other time.",L_Close; - -L_Start: - mes "[Zegas]"; - set @barrel_tmp, 2; - callfunc "SetBarrelMask"; - mes "\"Thanks, come back and see me once you found the bug bomb and set it off.\""; - goto L_Close; - -L_Looking: - mes "[Zegas]"; - mes "\"Still haven't found it? Well keep looking I know it's in there some where.\""; - goto L_Close; - -L_QuestEnd: - mes "[Zegas]"; - mes "\"From the smell I can see you found the bug bomb!\""; - mes "\"Thanks once again, I know it's not much but here is 50 GP for your troubles.\""; - getexp 50, 0; - set Zeny, (Zeny + 50); - set @barrel_tmp, 4; - callfunc "SetBarrelMask"; - next; - goto L_Close; - -L_Thanks: - mes "[Zegas]"; - mes "\"Thanks for Helping with clear out the store room!\""; - goto L_Close; - -L_Close: - close; -} -042-1.gat,100,75,0|script|ZegasDebug|165 -{ - mes "[Zegas Debug]"; - mes "Reset ?"; - menu - "Yes.", L_Reset, - "No.", L_End; - -L_Reset: - set STARTAREA, (STARTAREA & ~(NIBBLE_4_MASK) | (0 << NIBBLE_4_SHIFT)); - set STARTAREA, STARTAREA &~ (1 << 20); - set STARTAREA, STARTAREA &~ (1 << 21); - set STARTAREA, STARTAREA &~ (1 << 22); - set STARTAREA, STARTAREA &~ (1 << 23); - set STARTAREA, STARTAREA &~ (1 << 24); - set STARTAREA, STARTAREA &~ (1 << 25); - set STARTAREA, STARTAREA &~ (1 << 26); - set STARTAREA, STARTAREA &~ (1 << 27); - mes "Reset!"; - goto L_End; - -L_End: - end; - -OnInit: - if (!debug) - disablenpc "ZegasDebug"; - end; -} diff --git a/world/map/npc/042-2/_import.txt b/world/map/npc/042-2/_import.txt deleted file mode 100644 index 7522e5e2..00000000 --- a/world/map/npc/042-2/_import.txt +++ /dev/null @@ -1,13 +0,0 @@ -// Map 042-2: Tulimshar Suburbs Indoor -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 042-2.gat -npc: npc/042-2/_mobs.txt -npc: npc/042-2/_warps.txt -npc: npc/042-2/barrels.txt -npc: npc/042-2/barrels_config.txt -npc: npc/042-2/magic_basement.txt -npc: npc/042-2/mapflags.txt -npc: npc/042-2/morgan.txt -npc: npc/042-2/sorfina.txt -npc: npc/042-2/stat_reset.txt -npc: npc/042-2/tanisha.txt diff --git a/world/map/npc/042-2/_mobs.txt b/world/map/npc/042-2/_mobs.txt deleted file mode 100644 index 31c54238..00000000 --- a/world/map/npc/042-2/_mobs.txt +++ /dev/null @@ -1,15 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Suburbs Indoor mobs - -042-2.gat,33,57,24,7|monster|HouseMaggot|1050,7,100000ms,30000ms,Mob042-2::On1050 - - -042-2.gat,0,0,0|script|Mob042-2|-1 -{ - end; - -On1050: - set @mobID, 1050; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/042-2/_warps.txt b/world/map/npc/042-2/_warps.txt deleted file mode 100644 index 3fa81e27..00000000 --- a/world/map/npc/042-2/_warps.txt +++ /dev/null @@ -1,10 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Suburbs Indoor warps - -042-2.gat,29,62|warp|To Outside|-1,-1,042-1.gat,65,76 -042-2.gat,22,93|warp|To Outside|-1,-1,042-1.gat,91,74 -042-2.gat,44,93|warp|To Outside|-1,-1,042-1.gat,104,74 -042-2.gat,112,84|warp|To Outside|-1,-1,042-1.gat,62,41 -042-2.gat,94,53|warp|To Outside|-1,-1,042-1.gat,112,94 -042-2.gat,112,53|warp|To Outside|-1,-1,042-1.gat,120,94 -042-2.gat,103,62|warp|To Outside|-1,-1,042-1.gat,117,103 diff --git a/world/map/npc/042-2/barrels.txt b/world/map/npc/042-2/barrels.txt deleted file mode 100644 index 60a0e163..00000000 --- a/world/map/npc/042-2/barrels.txt +++ /dev/null @@ -1,63 +0,0 @@ -// Barrels -// Author: Wushin -042-2.gat,23,86,0|script|Barrel#0|400 -{ - setarray @npc_loc, 23, 86, 2; - set @barrel, 0; - callfunc "CheckBarrel"; - end; - -OnMaggotDeath: - set @mobID, 1050; - callfunc "MobPoints"; - end; -} -042-2.gat,28,86,0|script|Barrel#1|400 -{ - setarray @npc_loc, 28, 86, 2; - set @barrel, 1; - callfunc "CheckBarrel"; - end; -} -042-2.gat,31,91,0|script|Barrel#2|400 -{ - setarray @npc_loc, 31, 91, 2; - set @barrel, 2; - callfunc "CheckBarrel"; - end; -} -042-2.gat,36,85,0|script|Barrel#3|400 -{ - setarray @npc_loc, 36, 85, 2; - set @barrel, 3; - callfunc "CheckBarrel"; - end; -} -042-2.gat,40,89,0|script|Barrel#4|400 -{ - setarray @npc_loc, 40, 89, 2; - set @barrel, 4; - callfunc "CheckBarrel"; - end; -} -042-2.gat,38,91,0|script|Barrel#5|400 -{ - setarray @npc_loc, 38, 91, 2; - set @barrel, 5; - callfunc "CheckBarrel"; - end; -} -042-2.gat,29,92,0|script|Barrel#6|400 -{ - setarray @npc_loc, 29, 92, 2; - set @barrel, 6; - callfunc "CheckBarrel"; - end; -} -042-2.gat,24,91,0|script|Barrel#7|400 -{ - setarray @npc_loc, 24, 91, 2; - set @barrel, 7; - callfunc "CheckBarrel"; - end; -} diff --git a/world/map/npc/042-2/barrels_config.txt b/world/map/npc/042-2/barrels_config.txt deleted file mode 100644 index d125d9e1..00000000 --- a/world/map/npc/042-2/barrels_config.txt +++ /dev/null @@ -1,104 +0,0 @@ -// Barrels -// Author: Wushin -042-2.gat,33,88,24,7|monster|HouseMaggot|1050,2,100000ms,30000ms,Barrel#0::OnMaggotDeath --|script|#BarrelConfig|-1 -{ - end; - -OnInit: - setarray $@BarrelBits, (1 << 20), (1 << 21), (1 << 22), (1 << 23), (1 << 24), (1 << 25), (1 << 26), (1 << 27); - setarray $@BarrelRewards, 533, 507, 505, 518, 537, 526; - set $@BarrelSpawnCnt, 1; - set $@BarrelSpawnId, 1050; - set $@BarrelSpawnName$, "House Maggot"; - set $@BarrelMax, getarraysize($@BarrelBits); - end; -} -function|script|SetBarrelMask -{ - set STARTAREA, (STARTAREA & ~(NIBBLE_4_MASK) | (@barrel_tmp << NIBBLE_4_SHIFT)); - set @barrel_tmp, 0; - return; -} -function|script|CheckBarrelQuest -{ - callfunc "CountBarrels"; - set @barrel_quest, ((STARTAREA & NIBBLE_4_MASK) >> NIBBLE_4_SHIFT); - return; -} -function|script|CountBarrels -{ - set @barrel_count, 0; - set @count_tmp, 0; - goto L_Loop; - -L_Loop: - if (STARTAREA & $@BarrelBits[@barrel_tmp]) - goto L_AddOne; - goto L_LoopAgain; - -L_AddOne: - set @barrel_count, (@barrel_count + 1); - goto L_LoopAgain; - -L_LoopAgain: - set @count_tmp, (@count_tmp + 1); - if (@count_tmp == getarraysize($@BarrelBits)) - goto L_BarrelTally; - goto L_Loop; - -L_BarrelTally: - return; -} -function|script|CheckBarrel -{ - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_Range; - callfunc "CheckBarrelQuest"; - if (!(@barrel_quest == 2)) - goto L_NoI; - if (STARTAREA & $@BarrelBits[@barrel]) - goto L_Empty; - set STARTAREA, STARTAREA | $@BarrelBits[@barrel]; - - callfunc "CountBarrels"; - if (@barrel_count == $@BarrelMax) - goto L_QuestReward; - set @player_random, rand(@barrel_count * 10); - set @barrel_random, rand(@barrel_count * $@BarrelMax); - if (@barrel_random > @player_random) - goto L_Spawn; - goto L_Reward; - -L_Range: - message strcharinfo(0), "You'll need to get closer."; - goto L_Return; - -L_NoI: - message strcharinfo(0), "Nothing interesting here."; - goto L_Return; - -L_Empty: - message strcharinfo(0), "You've already searched this barrel."; - goto L_Return; - -L_QuestReward: - message strcharinfo(0), "You found the bug bomb."; - misceffect 33; - set @barrel_tmp, 3; - callfunc "SetBarrelMask"; - killmonster getmap() + ".gat", "Barrel#0::OnMaggotDeath"; - goto L_Return; - -L_Spawn: - areamonster getmap() + ".gat", @npc_loc[0], @npc_loc[1], (@npc_loc[0] + 1), (@npc_loc[1] + 1), $@BarrelSpawnName$, $@BarrelSpawnId, $@BarrelSpawnCnt, "Barrel#0::OnMaggotDeath"; - goto L_Return; - -L_Reward: - getitem $@BarrelRewards[rand(getarraysize($@BarrelRewards))], 1; - goto L_Return; - -L_Return: - return; -} diff --git a/world/map/npc/042-2/magic_basement.txt b/world/map/npc/042-2/magic_basement.txt deleted file mode 100644 index 0817375d..00000000 --- a/world/map/npc/042-2/magic_basement.txt +++ /dev/null @@ -1,21 +0,0 @@ -// -// Author: Wushin - -042-2.gat,103,56,0|script|#MagicBasement|400,0,0 -{ - callfunc "MorganState"; - if (@morgan < 4) - goto L_Close; - mes "Descend into the basement?"; - next; - menu - "Yes.", L_MagicBase, - "Nevermind.", L_Close; - -L_MagicBase: - warp "042-3",24,21; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/042-2/mapflags.txt b/world/map/npc/042-2/mapflags.txt deleted file mode 100644 index 80f1928e..00000000 --- a/world/map/npc/042-2/mapflags.txt +++ /dev/null @@ -1,2 +0,0 @@ -042-2.gat|mapflag|nosave|042-2,26,26 -042-2.gat|mapflag|resave|042-2,26,26 diff --git a/world/map/npc/042-2/morgan.txt b/world/map/npc/042-2/morgan.txt deleted file mode 100644 index ed6367ff..00000000 --- a/world/map/npc/042-2/morgan.txt +++ /dev/null @@ -1,146 +0,0 @@ -// Tut mage -// Author: Wushin -// Gains Access to Magic School -// See 024-2 clean that shit up -// Morgan, liana -function|script|MorganState -{ - callfunc "ClearVariables"; - set @morgan, ((STARTAREA & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); - return; -} -function|script|SetMorganMask -{ - set STARTAREA, (STARTAREA & ~(NIBBLE_3_MASK) | (@morgan_tmp << NIBBLE_3_SHIFT)); - set @morgan_tmp, 0; - return; -} -042-2,105,57,0|script|MorganDebug|355 -{ - mes "[Morgan Debug]"; - mes "Reset?"; - menu - "Yes.", L_Reset, - "No.", L_End; -L_Reset: - set STARTAREA, (STARTAREA & ~(NIBBLE_3_MASK) | (0 << NIBBLE_3_SHIFT)); - mes "Reset!"; - goto L_End; - -L_End: - end; - -OnInit: - if (!debug) - disablenpc "MorganDebug"; - end; -} -042-2,101,57,0|script|Morgan|355 -{ - setarray @npc_loc, 101, 57, 4; - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_Close; - callfunc "MorganState"; - if (readparam(bInt) >= 5) - goto L_Learn; - goto L_NotMagic; - -L_Learn: - if (@morgan == 0) - goto L_NotSeen; - if (@morgan == 1) - goto L_Seen; - if (@morgan == 2) - goto L_Started; - if (@morgan == 3) - goto L_CastOnce; - if (@morgan == 4) - goto L_LearningDone; - goto L_Close; - -L_NotSeen: - set @morgan_tmp, 1; - callfunc "SetMorganMask"; - mes "[Morgan]"; - mes "\"Welcome to the Magic Insitute of Tulimshar!\""; - next; - mes "\"My name is Morgan, I'm the Dean of Wizardry.\""; - next; - mes "\"You appear to have the markings to use magic.\""; - next; - mes "\"Granted you are still to young to cast spells.\""; - next; - mes "\"But we can teach you to use simple magic devices.\""; - next; - mes "\"Would you like to learn some apprentice skills?\""; - menu - "Yes.", L_Start, - "Maybe later", L_Close; - -L_Seen: - mes "[Morgan]"; - mes "\"Have you returned to learn some magic?\""; - menu - "Yes.", L_Start, - "Maybe later", L_Close; - -L_NotMagic: - mes "[Morgan]"; - mes "\"Hrmm you don't appear to posses enough magical talent to teach.\""; - goto L_Close; - -L_Start: - set @morgan_tmp, 2; - callfunc "SetMorganMask"; - mes "\"Great, lets begin your first lesson.\""; - next; - getitem 1171, 1; - mes "\"This is a wand, there are many like it but this one is now yours.\""; - next; - mes "\"Various wands and staffs are found throughout the land with many different strengths and weaknesses.\""; - next; - mes "\"To use the wand you need to have it equipped and speak the incantation to let it tap into your mana.\""; - next; - mes "\"As the power of your magic grows so will the spells you can cast.\""; - next; - mes "\"Lets start with a basic wand attack. " + getspellinvocation("wand") + "\""; - next; - mes "\"Equip the wand and lets try out that spell.\""; - next; - mes "\"Speak to me again once you've cast the spell.\""; - goto L_Close; - -L_Started: - mes "[Morgan]"; - mes "\"Lets start with a basic wand attack. " + getspellinvocation("wand") + "\""; - next; - mes "\"Equip the wand and lets try out that spell.\""; - next; - mes "\"Speak to me again once you've cast the spell.\""; - goto L_Close; - -L_CastOnce: - mes "[Morgan]"; - mes "\"Ok, good job! Looks like you have good mana flow.\""; - next; - mes "\"Onto the next lesson. Now that you have " + getspellinvocation("wand") + " cast,\""; - next; - mes "\"Each time you attack the wand will convert a bit of you mana into a magic bolt.\""; - next; - mes "\"After so many attacks, you will need to recast the invocation to stay attuned to the wand.\""; - next; - mes "\"(Logging out will also cancel any spell effects currently active in-game.).\""; - next; - set @morgan_tmp, 4; - callfunc "SetMorganMask"; - goto L_Close; - -L_LearningDone: - mes "[Morgan]"; - mes "\"I've taught you all I can for now. Come back later.\""; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/042-2/sorfina.txt b/world/map/npc/042-2/sorfina.txt deleted file mode 100644 index 839a5f65..00000000 --- a/world/map/npc/042-2/sorfina.txt +++ /dev/null @@ -1,346 +0,0 @@ -// This file is part of the Tutorial -// Author: Jenalya -042-2.gat,28,26,0|script|Sorfina|154,1,4 -{ - setarray @npc_loc, 28, 26, 4; - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_Close; - - callfunc "TutorialState"; - - if ((Hp != MaxHp) && (@tutorial >= 4)) - goto L_Heal; - goto L_Main; - -L_Heal: - mes "[Sorfina]"; - mes "\"Hello Dear! You look tired, you should rest a moment.\""; - mes "You take a short nap and feel refreshed."; - heal MaxHp, 0; - goto L_Main; - -L_Main: - if (@tutorial == 10) goto L_Hasan; - if (@tutorial >= 4) goto L_Again; - if (@tutorial == 3) goto L_Clothes; - if (@tutorial == 2) goto L_Chest; - if (@tutorial == 1) goto L_Carpet; - - callfunc "GameRules"; - goto L_Start; - -L_Start: - mes "You open your eyes."; - mes ""; - mes "[Old Woman]"; - mes "\"Ah, you woke up. It seems you collapsed after you left the boat that brought you to Tulimshar."; - mes "A group of ragtags immediately took advantage of that and stole all your stuff!\""; - next; - mes "\"My little granddaughter Tanisha saw that, but couldn't do anything to stop them."; - mes "She hurried to get someone to help. It was too late to catch the thieves, but at least the helpers brought you here to recover.\""; - next; - mes "\"We're in the suburbs of Tulimshar here and this area of the town is full of shady people, so I don't think there's a chance to get your stuff back.\""; - mes "She has a sad look on her face, but then she shakes her head and smiles."; - next; - mes "[Old Woman]"; - mes "\"Did you come here to look for a job? Many young people come to Tulimshar for this reason.\""; - next; - mes "\"I can tell you some useful things, if you want to hear."; - mes "Oh, and by the way my name is Sorfina.\""; - next; - mes "[Server]"; - mes "The explanations in this tutorial are based on the official client, Manaplus."; - mes "If you're using another client, settings and controls may be different."; - menu - "That would be great!",L_Tut, - "No, thanks. I already know how things are going.",L_SkipTut; - -L_Tut: - mes "She smiles at you."; - mes "[Sorfina]"; - mes "\"A wise decision.\""; - next; - mes "\"You still look rather shaky."; - mes "You're not used to the hot weather, right?\""; - next; - goto L_Carpet; - -L_Carpet: - mes "[Sorfina]"; - mes "\"Try to take a few steps and walk to that carpet over there."; - mes "Just use the ###keyMoveUp; to move up, press ###keyMoveDown; to move down, "; - mes "press ###keyMoveLeft; to move left, press ###keyMoveRight; to move right "; - mes " or click on the place you want to go to.\""; - set @tutorial_tmp, 1; - callfunc "SetTutorialMask"; - goto L_Close; - -L_Chest: - mes "[Sorfina]"; - mes "\"In that chest there are some clothes you can take.\""; - next; - mes "\"To interact with things in your environment or talk to NPCs you can either click on it or press ###keyTargetNPC; to focus and ###keyTalk; to talk/activate.\""; - next; - mes "\"Now get the clothes out of the chest.\""; - goto L_Close; - -L_Naked: - mes "[Sorfina]"; - mes "\"Press ###keyWindowInventory; or click on the Inventory button in the bar at the upper right corner to open your bag.\""; - next; - mes "\"Once we stop talking, double-click on the clothes to equip.\""; - next; - mes "\"Talk to me again after you get dressed. You can either click on me, or press ###keyTargetNPC; to focus on me and ###keyTalk; to talk.\""; - goto L_Close; - -L_Clothes: - if (getequipid(equip_torso) < 0) - goto L_Naked; - mes "[Sorfina]"; - mes "\"That's much better, don't you think?\""; - next; - mes "\"Here take this.\""; - getitem "HitchhikersTowel", 1; - mes "\"Your HitchHikers Towel will return you to your last set soul menhir or here if not set.\""; - mes "\"It can't be used constantly as the magic needs time to power the jump.\""; - next; - mes "\"I think this will help you a bit. To get more information, press the button Setup and look at the controls on the Keyboard tab. You can also change them as you like."; - mes "Talk to me again if you want me to explain more things.\""; - next; - mes "\"Now you should go to see my granddaughter, she is very worried. She's downstairs.\""; - next; - mes "\"Oh, and if you're looking for work, you should talk to Aidan when you go to Tulimshar. They're giving rewards for monster hunting."; - mes "You can find him near the south gate.\""; - next; - mes "She hesitates a moment."; - mes "\"[Sorfina]\""; - mes "\"And here is some money for you. At least you can buy yourself something to eat."; - mes "Good luck!\""; - set Zeny, Zeny + 30; - set @tutorial_tmp, 4; - callfunc "SetTutorialMask"; - goto L_Close; - -L_Again: - mes "[Sorfina]"; - mes "\"Make yourself at home! Do you have any questions?\""; - menu - "Yes, could you explain about...",L_Explain, - "No, thanks.",L_Close; - -L_Explain: - menu - "... walking?",L_Walk, - "... talking?",L_Talk, - "... the inventory and items?",L_Items, - "... shortcuts?",L_Shortcut, - "... what to do in Tulimshar?",L_Aidan, - "... nevermind.",L_Close; - -L_Walk: - mes "[Sorfina]"; - mes "\"You can use the arrow keys to walk around."; - mes "Just use the ###keyMoveUp; to move up, press ###keyMoveDown; to move down, "; - mes "press ###keyMoveLeft; to move left, press ###keyMoveRight; to move right "; - mes " or click on the place you want to go to.\""; - mes "This only works if that place is reachable and walkable.\""; - goto L_Close; - -L_Talk: - mes "[Sorfina]"; - mes "\"If you want to talk to a normal person, you can click at him or her."; - mes "Or you can press ###keyTargetNPC; to focus on the nearest person and then press ###keyTalk; to talk.\""; - next; - mes "\"If you want to talk to other adventurers, press ###keyChat; to open your chat window."; - mes "Then type your message and press Enter to send.\""; - next; - mes "\"You may want to talk privately to another adventurer sometimes. In that case you can whisper."; - mes "After pressing ###keyChat; type '/whisper [name] [message]'."; - mes "Or you can right click on someone and choose the whisper option.\""; - next; - mes "\"Press ###keyWindowChat; to show and hide your chat window.\""; - goto L_Close; - -L_Items: - mes "[Sorfina]"; - mes "\"There are three types of items."; - mes "They can be Consumables, Equipment or Miscellaneous.\""; - next; - mes "\"Consumable items such as Potions, can be used only once."; - mes "After use, they will disappear from your inventory."; - mes "There are some rare items that can be used but don't get consumed."; - next; - mes "\"Equipment items like Armors, Weapons, Accessories can be equipped for fashionable purposes or to raise your status.\""; - next; - mes "\"Miscellaneous items such as maggot slime, can be used in creating other items, or just to trade and sell.\""; - next; - mes "\"Your HitchHikers Towel will return you to your last set soul menhir or here if not set.\""; - mes "\"It can't be used constantly as the magic needs time to power the jump.\""; - next; - mes "\"Press ###keyWindowInventory; to open your inventory."; - mes "When placing your cursor over an item there, you can see a box with some information about that item.\""; - next; - mes "\"To use or equip an item, select it by double-clicking on it."; - mes "Selecting the item then pressing Use or Equip also works.\""; - goto L_Close; - -L_Shortcut: - mes "[Sorfina]"; - mes "\"Press ###keyOutfitShortcut1; or click the Shortcut button in the bar at the upper right to open your shortcut window.\""; - next; - mes "\"You can select the item you want to put on a shortcut with your mouse and then click on the position in the shortcut window you want to place it.\""; - next; - mes "\"Now you can use or equip/unequip it by pressing the number of the shortcut.\""; - goto L_Close; - -L_Aidan: - mes "[Sorfina]"; - mes "\"I suggest to go to the bazaar near the south gate."; - mes "We're in the north of Tulimshar here, so you have to walk across the town.\""; - next; - mes "\"When you leave this area to the Southeast, you'll come to the docks."; - mes "Follow the street to the south to pass the old town gates.\""; - next; - mes "\"Turn west at the next intersection. You'll pass by the gates of Tulimshar's famous magic school there."; - mes "Just follow the street to the south and you'll reach the bazaar.\""; - next; - mes "\"I heard Aidan is looking for brave adventurers, you might want to talk to him."; - mes "Usually the bazaar is bustling with activity, there are many people who can help."; - mes "Talk to everybody. You can never tell when they might know something useful.\""; - goto L_Close; - -L_Hasan: - mes "[Sorfina]"; - mes "\"Make yourself at home! Do you have any questions?\""; - menu - "A guy named Hasan is bullying people.",L_Next, - "Yes, could you explain again about...",L_Explain, - "No, thanks.",L_Close; - -L_Next: - mes "\"Ah, Hasan. He's causing trouble again?\""; - mes "She shakes her head."; - next; - mes "[Sorfina]"; - mes "\This guy has been a plague ever since he could walk. He's always causing trouble.\""; - next; - mes "\"And his father... Well, one day his father thought he should teach Hasan a lesson.\""; - next; - mes "\"He took him into the desert and then left him there!"; - mes "Hasan was only seven years old!\""; - next; - mes "\"I never understood how someone could do something like that to a child, even if it's a rascal like Hasan.\""; - next; - mes "\"Anyway, Hasan tried to find his way back home, but stumbled into a nest of scorpions!\""; - mes "She shakes her head."; - next; - mes "\"If Valon hadn't have come along that moment, Hasan would have died that day.\""; - next; - mes "\"However, the scorpions poison caused a bad fever and once Hasan had recovered from that, he was even more malicious than before.\""; - mes "She sighs."; - set @tutorial_tmp, 11; - callfunc "SetTutorialMask"; - goto L_Close; - -L_SkipTut: - mes "[Sorfina]"; - mes "\"Really? You seem quite unexperienced. Listening to some advice won't hurt.\""; - menu - "Thinking about it twice... please tell me.",L_Tut, - "Yeah, but thanks for the offer. Bye.",L_Bye; - -L_Bye: - mes "[Sorfina]"; - mes "\"Alright, if you say so. But take at least this."; - getitem "Knife", 1; - getitem "SlingShot", 1; - getitem "SlingBullet", 100; - getitem "HitchhikersTowel", 1; - getitem "CottonShirt", 1; - getitem "RaggedShorts", 1; - set Zeny, Zeny + 50; - set @tutorial_tmp, 8; - callfunc "SetTutorialMask"; - mes "Good luck.\""; - goto L_Close; - -L_Close: - close; - -OnTouch: - if (TUT_var != 0) - end; - callfunc "GameRules"; - goto L_Start; -} - -042-2.gat,33,27,0|script|#Carpet|32767,1,1 -{ - end; - -OnTouch: - callfunc "TutorialState"; - if (@tutorial != 1) - end; - mes "[Sorfina]"; - mes "\"Very good! I'm glad you're recovering."; - mes "Now you should get dressed again.\""; - next; - mes "Sorfina unlocks the chest behind her."; - next; - mes "[Sorfina]"; - mes "\"In that chest there are some clothes you can take.\""; - next; - mes "\"To interact with things in your environment or talk to NPCs you can either click on it or press N to focus and T to talk/activate.\""; - next; - mes "\"Now get the clothes out of the chest.\""; - set @tutorial_tmp, 2; - callfunc "SetTutorialMask"; - close; -} - -042-2.gat,29,23,0|script|Chest#tutorial|111 -{ - callfunc "TutorialState"; - if (@tutorial > 2) goto L_Empty; - if (@tutorial == 2) goto L_Shirt; - - mes "The chest is locked."; - close; - -L_Shirt: - mes "You take a simple Cotton Shirt and some very worn-out Ragged Shorts out of the chest."; - getitem "CottonShirt", 1; - getitem "RaggedShorts", 1; - next; - mes "[Sorfina]"; - mes "\"Great! Now you can equip it.\""; - next; - mes "\"You can open your inventory by pressing F3 or clicking on the 'Inventory' button in the bar at the upper right corner.\""; - next; - mes "\"After we finish talking, click on the clothes and press the equip button.\""; - set @tutorial_tmp, 3; - callfunc "SetTutorialMask"; - close; - -L_Empty: - mes "The chest is empty."; - close; -} - -042-2.gat,44,31,0|script|#DoorOutTut1|45,0,0 -{ - end; - -OnTouch: - callfunc "TutorialState"; - if (@tutorial < 4) - goto L_Block; - warp "042-1.gat", 51, 44; - end; - -L_Block: - message strcharinfo(0), "Sorfina: Wait a moment! You're not ready to leave."; - end; -} diff --git a/world/map/npc/042-2/stat_reset.txt b/world/map/npc/042-2/stat_reset.txt deleted file mode 100644 index 43a13f5d..00000000 --- a/world/map/npc/042-2/stat_reset.txt +++ /dev/null @@ -1,46 +0,0 @@ -// - -042-2.gat,98,91,0|script|Jessie|159 -{ - setarray @npc_loc, 98, 91, 4; - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_Close; - if (BaseLevel >= 10) - goto L_Sorry; - - mes "[Jessie]"; - mes "\"I know a spell that will"; - mes "reset status points on the youngings."; - next; - menu - "Reset my stats",L_Reset, - "Forget about it",L_Pass; - -L_Reset: - resetstatus; - - mes "[Jessie]"; - mes "\"There you are."; - mes ""; - mes "Good as new!\""; - goto L_Close; - -L_Pass: - mes "[Jessie]"; - mes "\"Very well then, see you.\""; - goto L_Close; - -L_Sorry: - mes "[Jessie]"; - mes "\"My spell only works on the very young, sorry.\""; - next; - mes "\"You can always try Mailvox in the Noble Quarter.\""; - next; - mes "\"Head east through the docks, then south into North Tulimshar,"; - mes "Then go north east into the Noble Quarter, sitting behind a stall in the east.\""; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/042-2/tanisha.txt b/world/map/npc/042-2/tanisha.txt deleted file mode 100644 index 2bfdf9ee..00000000 --- a/world/map/npc/042-2/tanisha.txt +++ /dev/null @@ -1,347 +0,0 @@ -// This file is part of the Tutorial -// Authors: Jenalya, alastrim -// Cleanup: o11c - -042-2.gat,110,88,0|script|Tanisha|114 -{ - setarray @npc_loc, 110, 88, 4; - callfunc "PCtoNPCRange"; - if (@npc_check) - goto L_Close; - - if (isin("042-2.gat", 98, 84, 106, 89)) - goto L_Fighting; - - callfunc "TutorialState"; - if (@tutorial == 10) goto L_Hasan; - if (@tutorial >= 8) goto L_Tut_Done; - if (@tutorial == 7) goto L_Stats; - if (@tutorial == 6) goto L_Fail; - if (@tutorial == 5) goto L_Maggots; - - mes "[Tanisha]"; - mes "\"Hey! You're up again!\""; - emotion EMOTE_HAPPY; - next; - mes "\"Are you feeling better?\""; - menu - "Yes, thank you.",L_Next, - "Yeah, but all my stuff is gone.",L_Next; - -L_Next: - mes "[Tanisha]"; - mes "\"I'm glad you're feeling better. It was really bad luck what happened to you."; - mes "Hey, I have an idea.\""; - next; - set @tutorial_tmp, 5; - callfunc "SetTutorialMask"; - goto L_Maggots; - -L_Maggots: - mes "[Tanisha]"; - mes "\"There are some maggots eating the goods and I'm supposed to get rid of them."; - mes "But they're so yucky!\""; - next; - mes "\"If you kill them, I'll give you my knife."; - mes "What do you say?\""; - menu - "I guess it's the least I can do.",L_Next1; - -L_Next1: - mes "[Tanisha]"; - mes "\"Wonderful!\""; - // since the check happens here, it is actually possible to have - // more than $@Maggot_MaxHunters in the area at one time - // but that's not a BIG problem - if (getareausers("042-2.gat", 98, 84, 106, 89) >= $@Maggot_MaxHunters) - goto L_Crowded; - next; - goto L_Fight_Again; - -L_Fight_Again: - mes "\"Ok, listen what to do."; - mes "Equip a weapon and kill the maggots.\""; - next; - mes "\"Press ###keyTargetMonster; to focus on a monster. With ###keyTargetAttack; you can focus and start attacking the same time."; - mes "But it also works to click on the monster with your mouse.\""; - next; - mes "\"If you press the ###keyTarget;, you can abort your attack.\""; - next; - mes "\"Maggots aren't aggressive, so they won't harm you until you attack them first. Take them out one by one.\""; - next; - mes "\"Sometimes dead monsters leave some useful things. You can pick them up by pressing ###keyPickup; or clicking on the items with your mouse.\""; - close2; - // The getitem must be in the same place as set @tutorial, 2; - // since it was moved to after L_Fight_Again, add it conditionally - callfunc "TutorialState"; - if (@tutorial == 5) - goto L_GetFightItems; - goto L_ContinueFight; - -L_GetFightItems: - set @tutorial_tmp, 6; - callfunc "SetTutorialMask"; - getitem "Knife", 1; - getitem "SlingShot", 1; - getitem "SlingBullet", 100; - goto L_ContinueFight; - -L_ContinueFight: - set @tutorial_tmp, 6; - callfunc "SetTutorialMask"; - set @Maggot_Kills, 0; - set @time, 0; - if (getareausers("042-2.gat", 98, 84, 106, 89) == 0) - initnpctimer; - warp "042-2.gat", 101, 87; - goto L_Summon; - -L_Summon: - areamonster "042-2.gat", 98, 84, 106, 89, "", 1002, 1, "Tanisha::OnMaggotDeath"; - end; - -L_Stats: - mes "[Tanisha]"; - mes "\"That was great! Like a professional exterminator!\""; - next; - mes "\"And it seems you became stronger and more experienced."; - mes "That means you got some status points which you can use to increase your abilities.\""; - next; - mes "\"Press ###keyWindowStatus; or click the Status button in the bar at the upper right to see your status window. There you can distribute your points on six different properties.\""; - next; - mes "\"My Uncle sitting at the counter knows a spell to help the younglings reset their stats.\""; - next; - mes "\"He also knows of mages with even more powerful reset spells.\""; - next; - mes "\"Some strange wizard lurking around in the Tulimshar Noble Quarter.\""; - next; - goto L_StatsRe; - -L_StatsRe: - mes "\"Strength makes you hit harder and you can carry more weight.\""; - next; - mes "\"Agility increases your attack speed and your ability to dodge attacks.\""; - next; - mes "\"Vitality gives you more hit points and more defense against physical attacks.\""; - next; - mes "\"Intelligence is useful for magic attack and defense."; - mes "But as long as you don't know any magic, you shouldn't use your points on this.\""; - next; - mes "\"Dexterity is needed to hit monsters. It's also very important for the damage if you use a ranged weapon.\""; - next; - mes "\"Luck gives you the chance to do critical hits and lowers the chance to receive a critical hit from your opponent.\""; - next; - mes "\"Think about how you want to play before assigning the points.\""; - next; - mes "\"My Uncle sitting at the counter knows a spell to help the younglings reset their stats.\""; - next; - mes "\"He also knows of mages with even more powerful reset spells.\""; - next; - mes "\"Some strange wizard lurking around in the Tulimshar Noble Quarter.\""; - next; - mes "Tanisha looks at you with wide opened eyes."; - next; - mes "[Tanisha]"; - mes "\"But I doubt he'd do that without a service in return.\""; - callfunc "TutorialState"; - if (@tutorial == 7) - goto L_Money; - goto L_Advice; - -L_Money: - next; - mes "[Tanisha]"; - mes "\"Hey, you are so smart taking out all that yucky maggots for me."; - mes "You can have my pocket money. Here.\""; - set @tutorial_tmp, 8; - callfunc "SetTutorialMask"; - set Zeny, Zeny + 5; - next; - goto L_Advice; - -L_Advice: - mes "\"When you go to Tulimshar, you should see Bernard. He can make a delicious soup!"; - mes "Good luck!\""; - emotion EMOTE_HAPPY; - goto L_Close; - -L_Explain: - menu - "... how to fight?",L_Fight, - "... monsters?",L_Mob, - "... status points?",L_StatsRe, - "... what to do in Tulimshar?",L_Advice, - "... nevermind.",L_Close; - -L_Fight: - mes "[Tanisha]"; - mes "\"Press ###keyTargetMonster; to focus on a monster. With ###keyTargetAttack; you can focus and attack."; - mes "But it also works to click on the monster with your mouse.\""; - next; - mes "\"If you press the ###keyTarget; button, you can abort your attack.\""; - next; - mes "\"Sometimes dead monsters leave some useful things. You can pick them up with pressing ###keyPickup; or clicking on the items with your mouse.\""; - next; - mes "\"If you feel exhausted from battle you can sit down by pressing ###keyBeingSit; to recover faster.\""; - goto L_Close; - -L_Mob: - mes "[Tanisha]"; - mes "\"I don't know much about monsters, I'm just a little girl. But I know a few things."; - mes "There are several types of monsters...Aggressive, Neutral, and Assistants.\""; - next; - mes "\"Aggressive monsters will attack you as soon as they see you.\""; - next; - mes "\"Neutral monsters are peaceful until they get attacked.\""; - next; - mes "\"Assistants are monsters who help each other.\""; - goto L_Close; - -L_Hasan: - mes "[Tanisha]"; - mes "\"Hi there! Is everything alright? Do you have questions?\""; - menu - "A guy named Hasan is being mean.",L_Next3, - "Yes, could you explain again about...",L_Explain, - "No, thanks.",L_Close; - -L_Next3: - mes "[Tanisha]"; - mes "\"Bah, Hasan. He's a jerk. But he's very strong.\""; - next; - mes "\"The only thing he's afraid of are scorpions."; - mes "I'm not sure why, some bad experience when he was a child."; - mes "That was before I was born.\""; - set @tutorial_tmp, 11; - callfunc "SetTutorialMask"; - goto L_Close; - -L_Tut_Done: - mes "[Tanisha]"; - mes "\"These yucky maggots! They're eating our goods!"; - mes "No matter how many of them you kill, they always come back.\""; - mes "She sighs."; - next; - mes "[Tanisha]"; - mes "\"Do you have any questions?\""; - menu - "Yes, could you explain about...", L_Explain, - "No, thanks.", L_Close; - -L_Crowded: - mes "[Tanisha]"; - mes "\"That's great! But..."; - mes "it seems a little crowded in there.\""; - next; - mes "\"Let's wait a short while.\""; - goto L_Close; - -L_Sleep: - warp "042-2.gat", 101, 87; - mes "[Tanisha]"; - mes "\"What are you doing in there?"; - mes "Sleeping?"; - mes "Come back when you're serious.\""; - set @Maggot_Kills, 0; - set @time, 0; - close2; - if (getareausers("042-2.gat", 98, 84, 106, 89) == 0) - goto L_CleanUp; - end; - -L_Fail: - mes "Tanisha seems to be trying hard to supress laughter."; - mes "[Tanisha]"; - mes "\"The maggots defeated you.\""; - next; - mes "She bursts out with laughter."; - mes "[Tanisha]"; - mes "\"Oops, I'm sorry. It's just too funny."; - mes "Do you want to try it again?\""; - menu - "Sure!", L_Next2, - "No, I need a rest.", L_Close; - -L_Next2: - if (getareausers("042-2.gat", 98, 84, 106, 89) >= $@Maggot_MaxHunters) - goto L_Crowded; - goto L_Fight_Again; - -L_Fighting: - message strcharinfo(0), "Tanisha: I believe in you!"; - end; - -OnTimer1000: - setnpctimer 0; - if (getareausers("042-2.gat", 98, 84, 106, 89) == 0) - goto L_CleanUp; - // This is needed because multiple players can be in the area at once - areatimer "042-2.gat", 98, 84, 106, 89, 0, "Tanisha::OnTick"; - end; - -L_CleanUp: - killmonster "042-2.gat", "Tanisha::OnMaggotDeath"; - set $@Maggot_Hunters, 0; - stopnpctimer; - areamonster "042-2.gat", 98, 84, 106, 89, "", 1002, 1, "Tanisha::OnMaggotDeath"; - end; - -OnTick: - set @time, @time + 1; - if (@time > 300) - goto L_Sleep; - if (isdead()) - end; - if (Hp > 20) - end; - heal MaxHp, 0; - message strcharinfo(0), "Tanisha: You're doing good!"; - end; - -OnMaggotDeath: - if (@Maggot_Kills == 1) - message strcharinfo(0), "Tanisha: Aaahhhh... another one! It will crawl up your legs!"; - if (@Maggot_Kills == 2) - message strcharinfo(0), "Tanisha: Ohh... Irrhk... Eeeeww... They just appear from nowhere!"; - if (@Maggot_Kills == 3) - message strcharinfo(0), "Tanisha: Yuck... I think I am getting sick."; - if (isin("042-2.gat", 98, 84, 106, 89)) - set @Maggot_Kills, @Maggot_Kills + 1; - if (@Maggot_Kills < 5) - goto L_Summon; - // else, complete - warp "042-2.gat", 110, 88; - set @tutorial_tmp, 7; - callfunc "SetTutorialMask"; - set @Maggot_Kills, 0; - set @time, 0; - if (getareausers("042-2.gat", 98, 84, 106, 89) == 0) - goto L_CleanUp; - end; - -L_Close: - close; - -OnInit: - set $@Maggot_MaxHunters, 4; - areamonster "042-2.gat", 98, 84, 106, 89, "", 1002, 1, "Tanisha::OnMaggotDeath"; - end; -} -042-2.gat,114,93,0|script|#DoorOutTut2|45,0,0 -{ - end; - -OnTouch: - callfunc "TutorialState"; - if (@tutorial >= 8) - goto L_Warp; - goto L_Block; - -L_Warp: - warp "042-1.gat", 63, 48; - end; - -L_Block: - message strcharinfo(0), "Tanisha: Please come here. I'd like some help!"; - end; -} diff --git a/world/map/npc/042-3/_import.txt b/world/map/npc/042-3/_import.txt deleted file mode 100644 index 2bc1c9d9..00000000 --- a/world/map/npc/042-3/_import.txt +++ /dev/null @@ -1,5 +0,0 @@ -// Map 042-3: Mages Passage -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 042-3.gat -npc: npc/042-3/_mobs.txt -npc: npc/042-3/_warps.txt diff --git a/world/map/npc/042-3/_mobs.txt b/world/map/npc/042-3/_mobs.txt deleted file mode 100644 index 5c2d6d9e..00000000 --- a/world/map/npc/042-3/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Mages Passage mobs - - - -042-3.gat,0,0,0|script|Mob042-3|-1 -{ - end; -} diff --git a/world/map/npc/042-3/_warps.txt b/world/map/npc/042-3/_warps.txt deleted file mode 100644 index dffcb6da..00000000 --- a/world/map/npc/042-3/_warps.txt +++ /dev/null @@ -1,5 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Mages Passage warps - -042-3.gat,57,46|warp|To Tulimshar Canyon|2,-1,024-1.gat,80,31 -042-3.gat,24,20|warp|To Magic Insitute of Tu|-1,-1,042-2.gat,103,55 diff --git a/world/map/npc/043-1/_import.txt b/world/map/npc/043-1/_import.txt deleted file mode 100644 index 4e21bda1..00000000 --- a/world/map/npc/043-1/_import.txt +++ /dev/null @@ -1,7 +0,0 @@ -// Map 043-1: Beach -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 043-1.gat -npc: npc/043-1/_mobs.txt -npc: npc/043-1/_warps.txt -npc: npc/043-1/mapflags.txt -npc: npc/043-1/ryger.txt diff --git a/world/map/npc/043-1/_mobs.txt b/world/map/npc/043-1/_mobs.txt deleted file mode 100644 index 3f601fce..00000000 --- a/world/map/npc/043-1/_mobs.txt +++ /dev/null @@ -1,27 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Beach mobs - -043-1.gat,0,0,0,0|monster|SeaSlime|1033,17,40000ms,30000ms,Mob043-1::On1033 -043-1.gat,0,0,0,0|monster|YellowSlime|1007,15,60000ms,60000ms,Mob043-1::On1007 -043-1.gat,0,0,0,0|monster|GreenSlime|1005,20,60000ms,60000ms,Mob043-1::On1005 - - -043-1.gat,0,0,0|script|Mob043-1|-1 -{ - end; - -On1005: - set @mobID, 1005; - callfunc "MobPoints"; - end; - -On1007: - set @mobID, 1007; - callfunc "MobPoints"; - end; - -On1033: - set @mobID, 1033; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/043-1/_warps.txt b/world/map/npc/043-1/_warps.txt deleted file mode 100644 index 2f2c590f..00000000 --- a/world/map/npc/043-1/_warps.txt +++ /dev/null @@ -1,6 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Beach warps - -043-1.gat,43,19|warp|To Beach|4,-1,003-1.gat,114,116 -043-1.gat,85,54|warp|To Mining Camp|-1,-1,002-3.gat,22,85 -043-1.gat,52,38|warp|To Sandy Dungeon|-1,-1,043-3.gat,31,35 diff --git a/world/map/npc/043-1/mapflags.txt b/world/map/npc/043-1/mapflags.txt deleted file mode 100644 index da09b939..00000000 --- a/world/map/npc/043-1/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -043-1.gat|mapflag|resave|002-3,72,66 diff --git a/world/map/npc/043-1/ryger.txt b/world/map/npc/043-1/ryger.txt deleted file mode 100644 index d814d0b5..00000000 --- a/world/map/npc/043-1/ryger.txt +++ /dev/null @@ -1,11 +0,0 @@ -// Sandstorm mine guard - -043-1.gat,88,60,0|script|Ryger|123 -{ - mes "[Ryger]"; - mes "\"I'm watching this mine to make sure the monsters don't harm the miners.\""; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/068-1/_import.txt b/world/map/npc/068-1/_import.txt deleted file mode 100644 index da872493..00000000 --- a/world/map/npc/068-1/_import.txt +++ /dev/null @@ -1,8 +0,0 @@ -// Map 068-1: Tulimshar Noble -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 068-1.gat -npc: npc/068-1/_mobs.txt -npc: npc/068-1/_warps.txt -npc: npc/068-1/mapflags.txt -npc: npc/068-1/stat_reset.txt -npc: npc/068-1/tombstones.txt diff --git a/world/map/npc/068-1/_mobs.txt b/world/map/npc/068-1/_mobs.txt deleted file mode 100644 index 14eeb839..00000000 --- a/world/map/npc/068-1/_mobs.txt +++ /dev/null @@ -1,24 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Noble mobs - -068-1.gat,60,67,52,1|monster|SeaSlime|1033,3,100000ms,30000ms,Mob068-1::On1033 -068-1.gat,93,49,4,3|monster|Maggot|1002,5,100000ms,30000ms,Mob068-1::On1002 -068-1.gat,89,71,5,8|monster|Maggot|1002,5,100000ms,30000ms,Mob068-1::On1002 -068-1.gat,78,38,7,6|monster|Maggot|1002,5,100000ms,30000ms,Mob068-1::On1002 -068-1.gat,59,83,52,1|monster|SeaSlime|1033,3,100000ms,30000ms,Mob068-1::On1033 - - -068-1.gat,0,0,0|script|Mob068-1|-1 -{ - end; - -On1002: - set @mobID, 1002; - callfunc "MobPoints"; - end; - -On1033: - set @mobID, 1033; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/068-1/_warps.txt b/world/map/npc/068-1/_warps.txt deleted file mode 100644 index 7e11bce2..00000000 --- a/world/map/npc/068-1/_warps.txt +++ /dev/null @@ -1,15 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Noble warps - -068-1.gat,34,108|warp|To North Tulimshar|3,-1,021-1.gat,144,23 -068-1.gat,84,108|warp|To Tulimshar Castle|3,-1,069-1.gat,55,23 -068-1.gat,42,96|warp|To Silk Shop|-1,-1,068-2.gat,94,60 -068-1.gat,40,79|warp|To Coconut Farm|-1,-1,068-2.gat,76,29 -068-1.gat,52,48|warp|To Barracks|-1,-1,068-2.gat,36,29 -068-1.gat,47,38|warp|To Watch Tower|-1,-1,068-2.gat,62,60 -068-1.gat,50,96|warp|To Weavers Shop|-1,-1,068-2.gat,61,91 -068-1.gat,56,96|warp|To Weavers Shop|-1,-1,068-2.gat,89,91 -068-1.gat,38,90|warp|To Silk Shop|-1,-1,068-2.gat,84,51 -068-1.gat,30,96|warp|To Bank|-1,-1,068-2.gat,31,91 -068-1.gat,29,84|warp|To Jeweler|-1,-1,068-2.gat,31,60 -068-1.gat,48,29|warp|To Watch Tower|-1,-1,068-2.gat,59,52 diff --git a/world/map/npc/068-1/mapflags.txt b/world/map/npc/068-1/mapflags.txt deleted file mode 100644 index 15694f25..00000000 --- a/world/map/npc/068-1/mapflags.txt +++ /dev/null @@ -1,2 +0,0 @@ -068-1.gat|mapflag|town -068-1.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/068-1/stat_reset.txt b/world/map/npc/068-1/stat_reset.txt deleted file mode 100644 index 73519a22..00000000 --- a/world/map/npc/068-1/stat_reset.txt +++ /dev/null @@ -1,55 +0,0 @@ -// - -068-1.gat,79,94,0|script|Malivox|103 -{ -// if (ResetA_charstate == 1) goto L_Multiple; - -// set @cost, 10000000 / ($ResetA_uses + 1); - - set @cost, BaseLevel * 100; - - mes "[Rogue Mage]"; - mes "\"I have come across a spell that will"; - mes "reset your status points."; - mes "Normally this spell is expensive, but"; - mes "due to an unusual constellation of the"; - mes "stars I can cast it very cheaply!"; - mes "For you it will cost only "+@cost+" gp.\""; - next; - menu - "Reset my stats",L_Next, - "Forget about it",L_Pass; - -L_Next: - if (Zeny<@cost) goto L_NoMoney; - goto L_Reset; - -// set $ResetA_uses, $ResetA_uses + 1; -// set ResetA_charstate, 1; - -L_Reset: - set Zeny, Zeny-@cost; - resetstatus; - - mes "[Rogue Mage]"; - mes "\"There you are."; - mes ""; - mes "Good as new!\""; - goto L_Close; - -L_Pass: - mes "[Rogue Mage]"; - mes "\"Very well then, see you.\""; - goto L_Close; - -L_NoMoney: - mes "[Rogue Mage]"; - mes "\"Oh dear, the price cannot be bargained."; - mes ""; - mes "Perhaps you can borrow from a friend?\""; - goto L_Close; - -L_Close: - set @cost, 0; - close; -} diff --git a/world/map/npc/068-1/tombstones.txt b/world/map/npc/068-1/tombstones.txt deleted file mode 100644 index 132be7ff..00000000 --- a/world/map/npc/068-1/tombstones.txt +++ /dev/null @@ -1,41 +0,0 @@ -// Tombstones in Noble memorial - -068-1.gat,91,48,0|script|Tombstone#1|400 -{ - - mes "~ wushin ~"; - mes "Tonori swallowed him whole."; - close; -} - -068-1.gat,92,48,0|script|Tombstone#2|400 -{ - - mes "~ Nard ~"; - mes "Crushed by a loom."; - close; -} - -068-1.gat,93,48,0|script|Tombstone#3|400 -{ - - mes "~ tux9th ~"; - mes "Eaten by bugs."; - close; -} - -068-1.gat,94,48,0|script|Tombstone#4|400 -{ - - mes "~ o11c ~"; - mes "He asked for it. So they gave it to him."; - close; -} - -068-1.gat,95,48,0|script|Tombstone#5|400 -{ - - mes "~ " + strcharinfo(0) + " ~"; - mes "The tombstone is blank and the grave freshly dug."; - close; -} diff --git a/world/map/npc/069-1/_import.txt b/world/map/npc/069-1/_import.txt deleted file mode 100644 index a5cb1023..00000000 --- a/world/map/npc/069-1/_import.txt +++ /dev/null @@ -1,6 +0,0 @@ -// Map 069-1: Tulimshar Castle -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 069-1.gat -npc: npc/069-1/_mobs.txt -npc: npc/069-1/_warps.txt -npc: npc/069-1/mapflags.txt diff --git a/world/map/npc/069-1/_mobs.txt b/world/map/npc/069-1/_mobs.txt deleted file mode 100644 index b7985756..00000000 --- a/world/map/npc/069-1/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Castle mobs - - - -069-1.gat,0,0,0|script|Mob069-1|-1 -{ - end; -} diff --git a/world/map/npc/069-1/_warps.txt b/world/map/npc/069-1/_warps.txt deleted file mode 100644 index 0a166c2c..00000000 --- a/world/map/npc/069-1/_warps.txt +++ /dev/null @@ -1,20 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Castle warps - -069-1.gat,55,21|warp|To Tulmishar Noble|3,-1,068-1.gat,84,107 -069-1.gat,19,44|warp|To Tulmishar|-1,0,021-1.gat,155,44 -069-1.gat,19,97|warp|To Tulmishar|-1,0,021-1.gat,155,97 -069-1.gat,67,56|warp|To Tulmishar Castle Ind|0,-1,069-2.gat,44,126 -069-1.gat,90,100|warp|To Tulmishar Castle Ind|-1,-1,069-2.gat,24,30 -069-1.gat,98,79|warp|To Tulmishar Castle Ind|-1,-1,069-2.gat,55,30 -069-1.gat,98,57|warp|To Tulmishar Castle Ind|-1,-1,069-2.gat,86,30 -069-1.gat,90,40|warp|To Tulmishar Castle Ind|-1,-1,069-2.gat,117,30 -069-1.gat,44,40|warp|To Tulmishar Castle Ind|-1,-1,069-2.gat,24,61 -069-1.gat,35,57|warp|To Tulmishar Castle Ind|-1,-1,069-2.gat,55,61 -069-1.gat,35,79|warp|To Tulmishar Castle Ind|-1,-1,069-2.gat,86,61 -069-1.gat,43,99|warp|To Tulmishar Castle Ind|-1,-1,069-2.gat,117,61 -069-1.gat,64,41|warp|To Tulmishar Castle Ind|-1,-1,069-2.gat,97,126 -069-1.gat,69,41|warp|To Tulmishar Castle Ind|-1,-1,069-2.gat,116,126 -069-1.gat,65,129|warp|To Prison|-1,-1,069-2.gat,4960,3104 -069-1.gat,71,122|warp|To Prison|0,-1,069-2.gat,4960,3104 -069-1.gat,99,122|warp|To Prison Mine|-1,-1,069-3.gat,4960,3104 diff --git a/world/map/npc/069-1/mapflags.txt b/world/map/npc/069-1/mapflags.txt deleted file mode 100644 index 4fcb8b81..00000000 --- a/world/map/npc/069-1/mapflags.txt +++ /dev/null @@ -1,2 +0,0 @@ -069-1.gat|mapflag|town -069-1.gat|mapflag|resave|001-1,57,71 -- cgit v1.2.3-60-g2f50 From 61c88ec162713b980f30e6e5111c1cfbd9f23d3a Mon Sep 17 00:00:00 2001 From: wushin Date: Wed, 7 Jan 2015 21:04:38 -0600 Subject: Adjust rest of world to Match new tutorial --- world/map/npc/001-2/_import.txt | 20 +- world/map/npc/001-2/_warps.txt | 25 +- world/map/npc/001-2/bank.txt | 8 + world/map/npc/001-2/casino.txt | 208 ------------- world/map/npc/001-2/david.txt | 53 ++++ world/map/npc/001-2/dedication.txt | 10 - world/map/npc/001-2/fieri.txt | 131 ++++++++ world/map/npc/001-2/forge_shops.txt | 4 + world/map/npc/001-2/government_building.txt | 144 +++++++++ world/map/npc/001-2/heathin.txt | 360 +++++++++++++++++++++ world/map/npc/001-2/jhedia.txt | 62 ++++ world/map/npc/001-2/manakins.txt | 47 +++ world/map/npc/001-2/mapflags.txt | 2 +- world/map/npc/001-2/omar.txt | 335 -------------------- world/map/npc/001-2/pauline.txt | 307 ++++++++++++++++++ world/map/npc/001-2/phaet.txt | 30 -- world/map/npc/001-2/sandra.txt | 118 +++++++ world/map/npc/001-2/shops.txt | 3 - world/map/npc/001-2/tathin.txt | 29 ++ world/map/npc/001-2/tondar.txt | 56 ++++ world/map/npc/001-2/troupe_leader.txt | 65 ---- world/map/npc/001-2/wizards.txt | 60 ++++ world/map/npc/001-2/yanis.txt | 47 +++ world/map/npc/001-3/_warps.txt | 2 +- world/map/npc/001-3/guards.txt | 2 +- world/map/npc/001-3/mapflags.txt | 3 +- world/map/npc/002-2/_import.txt | 19 +- world/map/npc/002-2/_warps.txt | 20 +- world/map/npc/002-2/bakery.txt | 158 ++++++++++ world/map/npc/002-2/barber.txt | 12 + world/map/npc/002-2/bleacher.txt | 293 ++++++++++++++++++ world/map/npc/002-2/casino.txt | 208 +++++++++++++ world/map/npc/002-2/dedication.txt | 10 + world/map/npc/002-2/eurni.txt | 45 +++ world/map/npc/002-2/hetchel.txt | 445 ++++++++++++++++++++++++++ world/map/npc/002-2/imec.txt | 113 +++++++ world/map/npc/002-2/inya.txt | 209 +++++++++++++ world/map/npc/002-2/kps.txt | 164 ++++++++++ world/map/npc/002-2/kylian.txt | 424 +++++++++++++++++++++++++ world/map/npc/002-2/latoy.txt | 33 ++ world/map/npc/002-2/mapflags.txt | 2 +- world/map/npc/002-2/omar.txt | 335 ++++++++++++++++++++ world/map/npc/002-2/phaet.txt | 30 ++ world/map/npc/002-2/rebecca.txt | 84 +++++ world/map/npc/002-2/shops.txt | 3 + world/map/npc/002-2/stranger.txt | 464 ++++++++++++++++++++++++++++ world/map/npc/002-2/traveler.txt | 11 - world/map/npc/002-2/troupe_leader.txt | 65 ++++ world/map/npc/002-3/_import.txt | 1 + world/map/npc/002-3/_warps.txt | 6 +- world/map/npc/002-3/traveler.txt | 11 + world/map/npc/003-2/_import.txt | 6 - world/map/npc/003-2/_mobs.txt | 9 - world/map/npc/003-2/_warps.txt | 5 - world/map/npc/003-2/mapflags.txt | 1 - world/map/npc/004-2/_import.txt | 7 - world/map/npc/004-2/_mobs.txt | 9 - world/map/npc/004-2/_warps.txt | 11 - world/map/npc/004-2/mapflags.txt | 1 - world/map/npc/004-2/pirate_cave_exit.txt | 18 -- world/map/npc/004-3/_warps.txt | 4 +- world/map/npc/004-3/mapflags.txt | 2 +- world/map/npc/004-4/mapflags.txt | 2 +- world/map/npc/004-5/mapflags.txt | 2 +- world/map/npc/005-1/_import.txt | 10 - world/map/npc/005-1/_mobs.txt | 45 --- world/map/npc/005-1/_warps.txt | 21 -- world/map/npc/005-1/mapflags.txt | 1 - world/map/npc/005-1/npcs.txt | 18 -- world/map/npc/005-1/spirit.txt | 299 ------------------ world/map/npc/005-1/traveler.txt | 11 - world/map/npc/005-1/tree.txt | 168 ---------- world/map/npc/005-3/_mobs.txt | 14 +- world/map/npc/005-3/_warps.txt | 9 +- world/map/npc/005-3/mapflags.txt | 2 +- world/map/npc/005-4/_import.txt | 5 - world/map/npc/005-4/_mobs.txt | 9 - world/map/npc/005-4/_warps.txt | 4 - world/map/npc/006-1/_import.txt | 3 + world/map/npc/006-1/_mobs.txt | 44 ++- world/map/npc/006-1/_warps.txt | 54 ++-- world/map/npc/006-1/miriam.txt | 340 ++++++++++++++++++++ world/map/npc/006-1/spirit.txt | 299 ++++++++++++++++++ world/map/npc/006-1/tree.txt | 168 ++++++++++ world/map/npc/006-3/_warps.txt | 13 +- world/map/npc/009-3/_mobs.txt | 10 +- world/map/npc/011-1/_mobs.txt | 12 + world/map/npc/011-4/_mobs.txt | 13 + world/map/npc/013-2/notes.txt | 26 +- world/map/npc/017-9/_warps.txt | 2 +- world/map/npc/017-9/secret.txt | 2 +- world/map/npc/018-1/_mobs.txt | 18 +- world/map/npc/018-3/_mobs.txt | 22 +- world/map/npc/021-2/_import.txt | 17 - world/map/npc/021-2/_mobs.txt | 9 - world/map/npc/021-2/_warps.txt | 29 -- world/map/npc/021-2/bakery.txt | 158 ---------- world/map/npc/021-2/barber.txt | 12 - world/map/npc/021-2/forge_shops.txt | 4 - world/map/npc/021-2/government_building.txt | 180 ----------- world/map/npc/021-2/heathin.txt | 360 --------------------- world/map/npc/021-2/jhedia.txt | 62 ---- world/map/npc/021-2/kps.txt | 164 ---------- world/map/npc/021-2/kylian.txt | 424 ------------------------- world/map/npc/021-2/manakins.txt | 47 --- world/map/npc/021-2/mapflags.txt | 2 - world/map/npc/021-2/rebecca.txt | 11 - world/map/npc/021-2/yanis.txt | 41 --- world/map/npc/021-3/_mobs.txt | 12 +- world/map/npc/021-3/_warps.txt | 7 +- world/map/npc/021-3/mapflags.txt | 2 +- world/map/npc/023-2/_import.txt | 6 - world/map/npc/023-2/_mobs.txt | 9 - world/map/npc/023-2/_warps.txt | 5 - world/map/npc/023-2/mapflags.txt | 1 - world/map/npc/023-3/_import.txt | 6 - world/map/npc/023-3/_mobs.txt | 25 -- world/map/npc/023-3/_warps.txt | 11 - world/map/npc/023-3/mapflags.txt | 1 - world/map/npc/024-2/_import.txt | 9 - world/map/npc/024-2/_mobs.txt | 9 - world/map/npc/024-2/_warps.txt | 5 - world/map/npc/024-2/barrier.txt | 16 - world/map/npc/024-2/mapflags.txt | 2 - world/map/npc/024-2/tyer.txt | 8 - world/map/npc/024-2/tyer_trigger.txt | 24 -- world/map/npc/024-3/_import.txt | 5 - world/map/npc/024-3/_mobs.txt | 9 - world/map/npc/024-3/_warps.txt | 3 - world/map/npc/024-4/_import.txt | 5 - world/map/npc/024-4/_mobs.txt | 9 - world/map/npc/024-4/_warps.txt | 3 - world/map/npc/029-3/barrier.txt | 4 +- world/map/npc/029-3/mapflags.txt | 4 +- world/map/npc/031-1/frozenbeard.txt | 11 +- world/map/npc/032-1/_import.txt | 7 - world/map/npc/032-1/_mobs.txt | 24 -- world/map/npc/032-1/_warps.txt | 4 - world/map/npc/032-1/mapflags.txt | 1 - world/map/npc/032-1/miriam.txt | 335 -------------------- world/map/npc/032-3/_warps.txt | 2 +- world/map/npc/032-3/mapflags.txt | 2 +- world/map/npc/035-2/koga.txt | 2 +- world/map/npc/036-2/emblems.txt | 4 +- world/map/npc/036-2/koga-candor.txt | 8 +- world/map/npc/043-3/_warps.txt | 4 +- world/map/npc/068-2/_import.txt | 10 - world/map/npc/068-2/_mobs.txt | 15 - world/map/npc/068-2/_warps.txt | 13 - world/map/npc/068-2/bank.txt | 8 - world/map/npc/068-2/hetchel.txt | 445 -------------------------- world/map/npc/068-2/inya.txt | 209 ------------- world/map/npc/068-2/latoy.txt | 33 -- world/map/npc/068-2/mapflags.txt | 2 - world/map/npc/069-2/_import.txt | 7 - world/map/npc/069-2/_mobs.txt | 9 - world/map/npc/069-2/_warps.txt | 17 - world/map/npc/069-2/mapflags.txt | 2 - world/map/npc/069-2/wizards.txt | 60 ---- world/map/npc/_import.txt | 27 +- world/map/npc/scripts.conf | 1 + 161 files changed, 5606 insertions(+), 4391 deletions(-) create mode 100644 world/map/npc/001-2/bank.txt delete mode 100644 world/map/npc/001-2/casino.txt create mode 100644 world/map/npc/001-2/david.txt delete mode 100644 world/map/npc/001-2/dedication.txt create mode 100644 world/map/npc/001-2/fieri.txt create mode 100644 world/map/npc/001-2/forge_shops.txt create mode 100644 world/map/npc/001-2/government_building.txt create mode 100644 world/map/npc/001-2/heathin.txt create mode 100644 world/map/npc/001-2/jhedia.txt create mode 100644 world/map/npc/001-2/manakins.txt delete mode 100644 world/map/npc/001-2/omar.txt create mode 100644 world/map/npc/001-2/pauline.txt delete mode 100644 world/map/npc/001-2/phaet.txt create mode 100644 world/map/npc/001-2/sandra.txt delete mode 100644 world/map/npc/001-2/shops.txt create mode 100644 world/map/npc/001-2/tathin.txt create mode 100644 world/map/npc/001-2/tondar.txt delete mode 100644 world/map/npc/001-2/troupe_leader.txt create mode 100644 world/map/npc/001-2/wizards.txt create mode 100644 world/map/npc/001-2/yanis.txt create mode 100644 world/map/npc/002-2/bakery.txt create mode 100644 world/map/npc/002-2/barber.txt create mode 100644 world/map/npc/002-2/bleacher.txt create mode 100644 world/map/npc/002-2/casino.txt create mode 100644 world/map/npc/002-2/dedication.txt create mode 100644 world/map/npc/002-2/eurni.txt create mode 100644 world/map/npc/002-2/hetchel.txt create mode 100644 world/map/npc/002-2/imec.txt create mode 100644 world/map/npc/002-2/inya.txt create mode 100644 world/map/npc/002-2/kps.txt create mode 100644 world/map/npc/002-2/kylian.txt create mode 100644 world/map/npc/002-2/latoy.txt create mode 100644 world/map/npc/002-2/omar.txt create mode 100644 world/map/npc/002-2/phaet.txt create mode 100644 world/map/npc/002-2/rebecca.txt create mode 100644 world/map/npc/002-2/shops.txt create mode 100644 world/map/npc/002-2/stranger.txt delete mode 100644 world/map/npc/002-2/traveler.txt create mode 100644 world/map/npc/002-2/troupe_leader.txt create mode 100644 world/map/npc/002-3/traveler.txt delete mode 100644 world/map/npc/003-2/_import.txt delete mode 100644 world/map/npc/003-2/_mobs.txt delete mode 100644 world/map/npc/003-2/_warps.txt delete mode 100644 world/map/npc/003-2/mapflags.txt delete mode 100644 world/map/npc/004-2/_import.txt delete mode 100644 world/map/npc/004-2/_mobs.txt delete mode 100644 world/map/npc/004-2/_warps.txt delete mode 100644 world/map/npc/004-2/mapflags.txt delete mode 100644 world/map/npc/004-2/pirate_cave_exit.txt delete mode 100644 world/map/npc/005-1/_import.txt delete mode 100644 world/map/npc/005-1/_mobs.txt delete mode 100644 world/map/npc/005-1/_warps.txt delete mode 100644 world/map/npc/005-1/mapflags.txt delete mode 100644 world/map/npc/005-1/npcs.txt delete mode 100644 world/map/npc/005-1/spirit.txt delete mode 100644 world/map/npc/005-1/traveler.txt delete mode 100644 world/map/npc/005-1/tree.txt delete mode 100644 world/map/npc/005-4/_import.txt delete mode 100644 world/map/npc/005-4/_mobs.txt delete mode 100644 world/map/npc/005-4/_warps.txt create mode 100644 world/map/npc/006-1/miriam.txt create mode 100644 world/map/npc/006-1/spirit.txt create mode 100644 world/map/npc/006-1/tree.txt delete mode 100644 world/map/npc/021-2/_import.txt delete mode 100644 world/map/npc/021-2/_mobs.txt delete mode 100644 world/map/npc/021-2/_warps.txt delete mode 100644 world/map/npc/021-2/bakery.txt delete mode 100644 world/map/npc/021-2/barber.txt delete mode 100644 world/map/npc/021-2/forge_shops.txt delete mode 100644 world/map/npc/021-2/government_building.txt delete mode 100644 world/map/npc/021-2/heathin.txt delete mode 100644 world/map/npc/021-2/jhedia.txt delete mode 100644 world/map/npc/021-2/kps.txt delete mode 100644 world/map/npc/021-2/kylian.txt delete mode 100644 world/map/npc/021-2/manakins.txt delete mode 100644 world/map/npc/021-2/mapflags.txt delete mode 100644 world/map/npc/021-2/rebecca.txt delete mode 100644 world/map/npc/021-2/yanis.txt delete mode 100644 world/map/npc/023-2/_import.txt delete mode 100644 world/map/npc/023-2/_mobs.txt delete mode 100644 world/map/npc/023-2/_warps.txt delete mode 100644 world/map/npc/023-2/mapflags.txt delete mode 100644 world/map/npc/023-3/_import.txt delete mode 100644 world/map/npc/023-3/_mobs.txt delete mode 100644 world/map/npc/023-3/_warps.txt delete mode 100644 world/map/npc/023-3/mapflags.txt delete mode 100644 world/map/npc/024-2/_import.txt delete mode 100644 world/map/npc/024-2/_mobs.txt delete mode 100644 world/map/npc/024-2/_warps.txt delete mode 100644 world/map/npc/024-2/barrier.txt delete mode 100644 world/map/npc/024-2/mapflags.txt delete mode 100644 world/map/npc/024-2/tyer.txt delete mode 100644 world/map/npc/024-2/tyer_trigger.txt delete mode 100644 world/map/npc/024-3/_import.txt delete mode 100644 world/map/npc/024-3/_mobs.txt delete mode 100644 world/map/npc/024-3/_warps.txt delete mode 100644 world/map/npc/024-4/_import.txt delete mode 100644 world/map/npc/024-4/_mobs.txt delete mode 100644 world/map/npc/024-4/_warps.txt delete mode 100644 world/map/npc/032-1/_import.txt delete mode 100644 world/map/npc/032-1/_mobs.txt delete mode 100644 world/map/npc/032-1/_warps.txt delete mode 100644 world/map/npc/032-1/mapflags.txt delete mode 100644 world/map/npc/032-1/miriam.txt delete mode 100644 world/map/npc/068-2/_import.txt delete mode 100644 world/map/npc/068-2/_mobs.txt delete mode 100644 world/map/npc/068-2/_warps.txt delete mode 100644 world/map/npc/068-2/bank.txt delete mode 100644 world/map/npc/068-2/hetchel.txt delete mode 100644 world/map/npc/068-2/inya.txt delete mode 100644 world/map/npc/068-2/latoy.txt delete mode 100644 world/map/npc/068-2/mapflags.txt delete mode 100644 world/map/npc/069-2/_import.txt delete mode 100644 world/map/npc/069-2/_mobs.txt delete mode 100644 world/map/npc/069-2/_warps.txt delete mode 100644 world/map/npc/069-2/mapflags.txt delete mode 100644 world/map/npc/069-2/wizards.txt diff --git a/world/map/npc/001-2/_import.txt b/world/map/npc/001-2/_import.txt index ae570981..6ad9ffe0 100644 --- a/world/map/npc/001-2/_import.txt +++ b/world/map/npc/001-2/_import.txt @@ -3,10 +3,18 @@ map: 001-2.gat npc: npc/001-2/_mobs.txt npc: npc/001-2/_warps.txt -npc: npc/001-2/casino.txt -npc: npc/001-2/dedication.txt +npc: npc/001-2/bank.txt +npc: npc/001-2/david.txt +npc: npc/001-2/fieri.txt +npc: npc/001-2/forge_shops.txt +npc: npc/001-2/government_building.txt +npc: npc/001-2/heathin.txt +npc: npc/001-2/jhedia.txt +npc: npc/001-2/manakins.txt npc: npc/001-2/mapflags.txt -npc: npc/001-2/omar.txt -npc: npc/001-2/phaet.txt -npc: npc/001-2/shops.txt -npc: npc/001-2/troupe_leader.txt +npc: npc/001-2/pauline.txt +npc: npc/001-2/sandra.txt +npc: npc/001-2/tathin.txt +npc: npc/001-2/tondar.txt +npc: npc/001-2/wizards.txt +npc: npc/001-2/yanis.txt diff --git a/world/map/npc/001-2/_warps.txt b/world/map/npc/001-2/_warps.txt index 50745da6..6a310169 100644 --- a/world/map/npc/001-2/_warps.txt +++ b/world/map/npc/001-2/_warps.txt @@ -1,13 +1,18 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // South Tulimshar Indoor warps -001-2.gat,25,35|warp|To Outside|-1,-1,001-1.gat,32,72 -001-2.gat,44,25|warp|To Second Floor|-1,0,001-2.gat,65,25 -001-2.gat,64,25|warp|To First Floor|-1,-1,001-2.gat,43,25 -001-2.gat,67,30|warp|To Bedroom|-1,-1,001-2.gat,103,23 -001-2.gat,76,30|warp|To Deposit|-1,-1,001-2.gat,131,23 -001-2.gat,69,22|warp|To Casino|0,-1,001-2.gat,32,72 -001-2.gat,103,22|warp|To Second Floor|0,-1,001-2.gat,67,29 -001-2.gat,131,22|warp|To Second Floor|0,-1,001-2.gat,76,29 -001-2.gat,32,73|warp|To Second Floor|-1,-1,001-2.gat,69,23 -001-2.gat,71,73|warp|To Outside|-1,-1,001-1.gat,75,42 +001-2.gat,25,65|warp|To Outside|-1,-1,001-1.gat,114,100 +001-2.gat,28,102|warp|To Outside|-1,-1,001-1.gat,27,33 +001-2.gat,28,86|warp|To Light|-1,-1,001-1.gat,28,22 +001-2.gat,105,102|warp|To Outside|0,-1,001-1.gat,54,35 +001-2.gat,25,28|warp|To Outside|-1,-1,001-1.gat,49,72 +001-2.gat,28,28|warp|To Outside|-1,-1,001-1.gat,52,72 +001-2.gat,31,28|warp|To Outside|-1,-1,001-1.gat,55,72 +001-2.gat,71,102|warp|To Outside|-1,-1,001-1.gat,37,33 +001-2.gat,105,73|warp|Council Chambers|2,-1,001-2.gat,104,42 +001-2.gat,105,43|warp|Main Floor|2,-1,001-2.gat,104,74 +001-2.gat,114,53|warp|Parapet|-1,-1,001-1.gat,57,23 +001-2.gat,95,53|warp|Parapet|-1,-1,001-1.gat,52,23 +001-2.gat,57,90|warp|Lighthouse|-1,-1,001-2.gat,35,94 +001-2.gat,36,95|warp|MainFloor|-1,0,001-2.gat,58,90 +001-2.gat,65,26|warp|Outside|-1,-1,001-1.gat,59,99 diff --git a/world/map/npc/001-2/bank.txt b/world/map/npc/001-2/bank.txt new file mode 100644 index 00000000..b5bab670 --- /dev/null +++ b/world/map/npc/001-2/bank.txt @@ -0,0 +1,8 @@ +// A Banker +001-2.gat,63,17,0|script|Hydusun|149 +{ + set @npcname$, "Hydusun"; + callfunc "Banker"; + close; +} + diff --git a/world/map/npc/001-2/casino.txt b/world/map/npc/001-2/casino.txt deleted file mode 100644 index ad0b625b..00000000 --- a/world/map/npc/001-2/casino.txt +++ /dev/null @@ -1,208 +0,0 @@ -// Casino - -// takes part in quest given by 021-2/kylian.txt -001-2.gat,32,72,0|script|#CasinoEntrance|32767,1,1 -{ - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@knowCasinoNT; - set @kylian, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - if (@kylian != 6) - goto L_End; - message strcharinfo(0), "You wonder if Kylian would like to visit the casino in the evening."; - goto L_End; - -L_End: - set @kylian, 0; - end; -} - -001-2.gat,39,32,0|script|Valdo|117 -{ - mes "[Valdo the Worker]"; - mes "\"Please let me work. I'm really in a hurry!\""; - close; -} - -001-2.gat,37,65,0|script|Slots#1|400 -{ - callfunc "SlotMachine"; - close; -} - -001-2.gat,39,65,0|script|Slots#2|400 -{ - callfunc "SlotMachine"; - close; -} - -001-2.gat,41,65,0|script|Slots#3|400 -{ - callfunc "SlotMachine"; - close; -} - -001-2.gat,102,27,0|shop|MoneyChanger|124,CasinoCoins:*10 - -001-2.gat,28,63,0|script|BlackJack|107 -{ - mes "[Croupier]"; - mes "\"Would you like to play Black Jack?"; - mes "You will need 15 casino coins.\""; - next; - menu - "Yes", L_Begin, - "No", L_Close; - -L_Begin: - if(countitem("CasinoCoins") < 15) goto L_NoCoin; - delitem "CasinoCoins", 15; - set @croupier, rand(0, 4); - set @croupier, @croupier + 17; - set @player, rand(4, 21); - mes "\"You got " + @player + " with your cards."; - if(@player == 21) goto L_End; - mes "Do you want another card?\""; - next; - menu - "Yes", L_Another, - "No", L_End; - -L_Another: - set @tempace, rand(2, 11); - if (@tempace == 11) goto L_Ace; - set @player, @player + @tempace; - if (@player > 21) goto L_Lost; - if (@player == 21) goto L_End; - mes "\"You got " + @player + " with your cards."; - mes "Do you want another card?\""; - next; - menu - "Yes", L_Another, - "No", L_End; - -L_End: - if (@player <= @croupier) goto L_Lost; - mes "\"Congratulations, you won!"; - mes "I had " + @croupier + "."; - mes "You get 45 casino coins.\""; - getitem "CasinoCoins", 45; - goto L_Close; - -L_NoCoin: - mes "\"You need at least 15 coins.\""; - goto L_Close; - -L_Lost: - mes "\"I'm sorry but you lost."; - mes "You got " + @player + " with your cards."; - mes "I had " + @croupier + ".\""; - goto L_Close; - -L_Ace: - set @player, @player + 11; - if (@player > 21) set @player, @player - 10; - if (@player > 21) goto L_Lost; - if (@player == 21) goto L_End; - mes "You got " + @player + " with your cards."; - mes "Do you want another card?"; - next; - menu - "Yes", L_Another, - "No", L_End; - -L_Close: - mes "\"As you wish.\""; - set @croupier, 0; - set @player, 0; - set @tempace, 0; - close; -} - -001-2.gat,22,69,0|script|Roulette|107 -{ - mes "[Croupier]"; - mes "\"Good evening monsieur..."; - mes "How much would you like to bet?\""; - next; - menu - "1 coin", L_b1, - "5 coins", L_b5, - "10 coins", L_b10, - "50 coins", L_b50, - "100 coins", L_b100, - "Maybe I'll play later", L_Close; - -L_b1: - set @bet, 1; - goto L_Check; - -L_b5: - set @bet, 5; - goto L_Check; - -L_b10: - set @bet, 10; - goto L_Check; - -L_b50: - set @bet, 50; - goto L_Check; - -L_b100: - set @bet, 100; - goto L_Check; - -L_Check: - if(countitem("CasinoCoins") < @bet) goto L_NoCoin; - delitem "CasinoCoins", @bet; - menu - "Choose a color", L_PickColor, - "Choose a number", L_Number; - -L_PickColor: - menu - "Black", L_Color, - "Red", L_Color; - -L_Color: - set @color,rand(2); - if(@color == 1) goto L_Lost; - mes "You won!"; - getitem "CasinoCoins", @bet * 2; - goto L_Close; - -L_Number: - menu - "0", L_Menuitems, "00", L_Menuitems, "1", L_Menuitems, "2", L_Menuitems, "3", L_Menuitems, "4", L_Menuitems, "5", L_Menuitems, "6", L_Menuitems, "7", L_Menuitems, "8", L_Menuitems, - "9", L_Menuitems, "10", L_Menuitems, "11", L_Menuitems, "12", L_Menuitems, "13", L_Menuitems, "14", L_Menuitems, "15", L_Menuitems, "16", L_Menuitems, "17", L_Menuitems, "18", L_Menuitems, - "19", L_Menuitems, "20", L_Menuitems, "21", L_Menuitems, "22", L_Menuitems, "23", L_Menuitems, "24", L_Menuitems, "25", L_Menuitems, "26", L_Menuitems, "27", L_Menuitems, "28", L_Menuitems, - "29", L_Menuitems, "30", L_Menuitems, "31", L_Menuitems, "32", L_Menuitems, "33", L_Menuitems, "34", L_Menuitems, "35", L_Menuitems, "36", L_Menuitems; - -L_Menuitems: - if (@menu == 1) set @number, 0; - if (@menu == 2) set @number, 37; - if (@menu >= 3) set @number, @menu - 2; - - set @roulette, rand(38); - if (@roulette == 37) mes "The ball stopped on 00"; - if (@roulette < 37) mes "The ball stopped on " + @roulette; - if (@number != @roulette) goto L_Lost; - mes "\"You won!\""; - getitem "CasinoCoins", @bet * 10; - goto L_Close; - -L_NoCoin: - mes "\"You don't have enough coins.\""; - goto L_Close; - -L_Lost: - mes "\"I'm sorry, you lost.\""; - goto L_Close; - -L_Close: - mes "Come again."; - set @number, 0; - set @roulette, 0; - set @color, 0; - set @bet, 50; - close; -} diff --git a/world/map/npc/001-2/david.txt b/world/map/npc/001-2/david.txt new file mode 100644 index 00000000..fc9e3fd7 --- /dev/null +++ b/world/map/npc/001-2/david.txt @@ -0,0 +1,53 @@ +001-2.gat,92,88,0|script|David|120 +{ + set @Potion_EXP, 2000; + + if (Rossy_Quest == 17) goto L_FinalEnd; + if (Rossy_Quest == 14) goto L_Julia; + if (Rossy_Quest >= 8) goto L_Done; + + mes "[David]"; + mes "\"Learning magic is hard...\""; + if (Rossy_Quest == 7) goto L_Help; + close; + +L_Help: + menu + "Do you know Rossy?", L_Set, + "I can tell, it is hard.", L_No; + +L_Set: + mes "[David]"; + mes "\"Yes, I do. I am her teacher. Actually, that reminds me about her final exam... she didn't hand in her potion yet. Time is running out.\""; + menu + "A potion? Oh, uhm... Strange kind of exam. Bye.", L_No, + "Right, I have her potion in my pocket. She asked me to bring it to you. Here it is.", L_Next; + +L_Next: + mes "[David]"; + mes "\"Let me see.\""; + set Rossy_Quest, 8; + mes "\"This potion is... perfect! Tell Rossy that she successfully made her potion; it is flawless!\""; + getexp @Potion_EXP, 0; + close; + +L_Done: + mes "[David]"; + mes "\"I am really happy that my best student successfully passed her exam!\""; + close; + +L_No: + close; + +L_Julia: + mes "[David]"; + mes "\"I heard Rossy's sister got kidnapped. We're counting on you to find her!\""; + next; + mes "\"If you do find her, talk to her sister and her mother.\""; + close; + +L_FinalEnd: + mes "[David]"; + mes "Well done! Thanks for finding Julia!"; + close; +} diff --git a/world/map/npc/001-2/dedication.txt b/world/map/npc/001-2/dedication.txt deleted file mode 100644 index 03268df0..00000000 --- a/world/map/npc/001-2/dedication.txt +++ /dev/null @@ -1,10 +0,0 @@ -// Dedication to Irene Christina - -001-2.gat,76,68,0|script|#IreneDedication|400 -{ - mes "~ Irene Christina ~"; - mes "The song in this house is dedicated to Irene."; - next; - mes "She had seen only twenty hours of this world when she died in her father's arms."; - close; -} diff --git a/world/map/npc/001-2/fieri.txt b/world/map/npc/001-2/fieri.txt new file mode 100644 index 00000000..1264be4e --- /dev/null +++ b/world/map/npc/001-2/fieri.txt @@ -0,0 +1,131 @@ +// Variables used: nibble 0 of QUEST_SouthTulimshar + +001-2.gat,114,89,0|script|Fieri|117 +{ + set @state, ((QUEST_SouthTulimshar & NIBBLE_6_MASK) >> NIBBLE_6_SHIFT); + + if (@state >= 4) goto L_Done2; + if (@state == 3) goto L_Progress2; + if (@state == 2) goto L_Done1; + if (@state == 1) goto L_Progress; + + set @TEMP, rand(2); + if(@TEMP == 1) goto L_Opening1; + goto L_Opening0; + +L_Opening0: + mes "[Fieri]"; + mes "\"The Wizards are always hungry. All the magic all the time, sapping their energy."; + mes "Could I ask a favor of you?\""; + next; + goto L_Ask; + +L_Opening1: + mes "[Fieri]"; + mes "\"These Wizards eat like a store house full of maggots."; + mes "At this rate I'll have nothing left to cook. Can you help me with a task?\""; + next; + goto L_Ask; + +L_Ask: + menu + "Yes.", L_Yes, + "No.", L_Close; + +L_Yes: + set @TEMP, rand(2); + if(@TEMP == 1) goto L_Req1; + goto L_Req0; + +L_Req0: + mes "[Fieri]"; + mes "\"Great! I need a Beer for my Tonori Delight.\""; + next; + goto L_Set; + +L_Req1: + mes "[Fieri]"; + mes "\"Bring me a Beer. I'll give you something if you do.\""; + next; + goto L_Set; + +L_Set: + set @state, 1; + callsub S_Update_Var; + mes "[Fieri]"; + mes "\"Please bring it to me!\""; + goto L_Close; + +L_Progress: + if (countitem("Beer") < 1) goto L_NotEnough; + mes "[Fieri]"; + mes "\"Oooh, perfect! It's perfect!"; + mes "You brought me my Beer! Here, have some cake for your troubles.\""; + getinventorylist; + if (@inventorylist_count - (countitem("Beer") == 1) > 99 - (countitem("CherryCake") == 0) ) goto L_TooMany; + delitem "Beer", 1; + getexp 100, 0; + getitem "CherryCake", 5; + set @state, 2; + callsub S_Update_Var; + next; + mes "\"Now let's see...\""; + goto L_Close; + +L_Progress2: + if (countitem("MaggotSlime") < 3) goto L_NotEnough1; + mes "[Fieri]"; + mes "\"Nice! They're perfect, just perfect!"; + mes "You brought me the 3 Maggot Slimes! Here, have some Tonori Delight as reward.\""; + getinventorylist; + if ((@inventorylist_count - (countitem("MaggotSlime") == 3) > 99 - (countitem("TonoriDelight") == 0) )) goto L_TooMany; + delitem "MaggotSlime", 3; + getexp 100, 0; + getitem "TonoriDelight", 3; + set @state, 4; + callsub S_Update_Var; + goto L_Close; + +L_NotEnough: + mes "[Fieri]"; + mes "\"Oh, please hurry and bring me a Beer. The Wizards need their Tonori Delight!\""; + goto L_Close; + +L_NotEnough1: + mes "[Fieri]"; + mes "\"Please do hurry and bring me 3 Maggot Slimes, so I can finish the Tonori Delight!\""; + goto L_Close; + +L_Done1: + mes "[Fieri]"; + mes "\"Thank you so much!\""; + mes "\"But... I need some more ingredients.\""; + next; + mes "\"I need 3 Maggot Slimes for that.\""; + mes "\"Bring them to me, and I'll give you something nice.\""; + set @state, 3; + callsub S_Update_Var; + goto L_Close; + +L_Done2: + mes "[Fieri]"; + mes "\"I hope you like Tonori Delight as much as I do, because, you see...\""; + next; + mes "\"Tonori Delight is life!\""; + goto L_Close; + +L_Close: + set @TEMP, 0; + set @state, 0; + close; + +L_TooMany: + next; + mes "[Fieri]"; + mes "\"You don't have room for my reward. I'll wait until you do.\""; + goto L_Close; + +S_Update_Var: + set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_6_MASK) | (@state << NIBBLE_6_SHIFT)); + return; +} diff --git a/world/map/npc/001-2/forge_shops.txt b/world/map/npc/001-2/forge_shops.txt new file mode 100644 index 00000000..5f2ab3ba --- /dev/null +++ b/world/map/npc/001-2/forge_shops.txt @@ -0,0 +1,4 @@ +// Forge Shops + +001-2.gat,30,60,0|shop|Gungnir|311,SlingShot:*500,SlingBullet:*1,ShortBow:*8000,Arrow:*1,IronArrow:*4 +001-2.gat,25,59,0|shop|Mjolnir|377,Knife:*50,SharpKnife:*100,Dagger:*1000,LeatherShirt:*2000,LeatherShield:*2000 diff --git a/world/map/npc/001-2/government_building.txt b/world/map/npc/001-2/government_building.txt new file mode 100644 index 00000000..f201f192 --- /dev/null +++ b/world/map/npc/001-2/government_building.txt @@ -0,0 +1,144 @@ +// The government builing in the south west + +// A clerk +001-2.gat,25,21,0|script|Estard|107 +{ + mes "[Estard]"; + mes "\"Hello what can I do for you?\""; + next; + if (getpartnerid2()) + goto L_main_married; + + menu + "I'm looking at getting married.", L_marry, + "Nothing, I guess.", L_Close; + +L_main_married: + menu + "I'd like a divorce.", L_divorce, + "Nothing, I guess.", L_Close; + +L_marry: + if (BaseLevel < WEDDING_MIN_LEVEL) + goto L_marry_too_young; + if (Zeny < WEDDING_FEE) + goto L_marry_too_poor; + + mes "[Estard]"; + mes "\"Are you sure you want to get married? It'll cost " + WEDDING_FEE + " GP.\""; + menu + "Yes", L_marry_do, + "No", L_Close; + +L_marry_do: + callsub S_give_rings; + + mes "[Estard]"; + mes "\"Here are your rings. You can get married by standing in one of the designated places (like that small rug over there) with your partner, give them their ring, and say 'marry (their name here)'. You both need to have your rings on.\""; + close; + +L_marry_too_young: + mes "[Estard]"; + mes "\"I'm sorry, but you are too young to get married. You must be atleast " + WEDDING_MIN_LEVEL + " levels old.\""; + next; + + menu + "Can I at least get wedding rings?", L_get_rings, + "Thanks anyways.", L_Close; + +L_marry_too_poor: + mes "[Estard]"; + mes "\"You need " + WEDDING_FEE + " GP to get married. That covers all administrative fees for the marriage and provides two wedding rings.\""; + close; + +L_get_rings: + mes "[Estard]"; + mes "\"Yes. They are " + WEDDING_FEE + " GP. That covers all administrative fees for the marriage.\""; + + if (Zeny < WEDDING_FEE) + menu + "Thanks anyways. I don't have enough with me.", L_Close; + if (Zeny >= WEDDING_FEE) + menu + "I'll buy a pair.", L_get_rings_pay, + "Thanks anyways.", L_Close; + goto L_get_rings_pay; + +L_get_rings_pay: + callsub S_give_rings; + + mes "[Estard]"; + mes "\"There you go. Come again.\""; + close; + +L_divorce: + set @divorce_cost, DIVORCE_FEE_PER_LEVEL * BaseLevel; + + if (Zeny < @divorce_cost) + goto L_divorce_not_enough; + + mes "[Estard]"; + mes "\"If you're sure you want a divorce, it'll cost you " + @divorce_cost + " GP.\""; + next; + menu + "I am sure I want it.", L_do_divorce, + "I don't want it.", L_Close; + +L_do_divorce: + if (Zeny < @divorce_cost) + goto L_not_enough_money; + + if (divorce()) + goto L_divorce_done; + + mes "[Estard]"; + mes "\"I'm having trouble finding the record. \""; + mes "[Server]"; + mes "Try again when your partner is online too."; + close; + +L_divorce_done: + set Zeny, Zeny - @divorce_cost; + + mes "[Estard]"; + mes "\"You have been divorced. Come again.\""; + close; + +L_divorce_not_enough: + mes "[Estard]"; + mes "\"I'm sorry , but you don't have enough money to get a divorce. You need " + @divorce_cost + " GP.\""; + close; + +L_not_enough_money: + mes "[Estard]"; + mes "\"Seems you don't have enough money.\""; + close; + +L_no_room_for_rings: + mes "[Estard]"; + mes "\"You don't have enough room to carry these rings.\""; + close; + +L_Close: + close; + +S_give_rings: + if (Zeny < WEDDING_FEE) + goto L_not_enough_money; + getinventorylist; + if (@inventorylist_count > 98) + goto L_no_room_for_rings; + + set Zeny, Zeny - WEDDING_FEE; + getitem "WeddingRing", 1; + getitem "WeddingRing", 1; + return; +} + +// Guard +001-2.gat,22,21,0|script|Guard#govt_in|123 +{ + mes "[Guard]"; + mes "\"You can't come back here.\""; + close; +} diff --git a/world/map/npc/001-2/heathin.txt b/world/map/npc/001-2/heathin.txt new file mode 100644 index 00000000..113b1b7e --- /dev/null +++ b/world/map/npc/001-2/heathin.txt @@ -0,0 +1,360 @@ +//Items for NPC are incomplete. Makes "simple ring" which can be crafted into a useful ring by Inya and terranite armor. + +001-2.gat,23,55,0|script|Heathin|147 +{ + set @TARROW_REQ_TERRA_ORE, 1; + set @TARROW_REQ_COAL, 5; + set @TARROW_REQ_GP, 3000; + set @heathin_xp_bonus, (100 * BaseLevel); + + set @state, ((QUEST_NorthTulimshar & NIBBLE_6_MASK) >> NIBBLE_6_SHIFT); + + if (@state == 14) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows_Trade; + if (@state == 13) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows_Ready; + if (@state == 12) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows_Forge; + if (@state == 11) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows; + if (@state == 10) && (BaseLevel >= 80) goto L_Heathin_Terranite_Chest_Armor_Ready; + if (@state == 9) && (BaseLevel >= 80) goto L_Heathin_Terranite_Chest_Armor_Forge; + if (@state == 8) && (BaseLevel >= 80) goto L_Heathin_Terranite_Chest_Armor; + if (@state == 7) && (BaseLevel >= 80) goto L_Heathin_Terranite_Legs_Ready; + if (@state == 6) && (BaseLevel >= 80) goto L_Heathin_Terranite_Legs_Forge; + if (@state == 5) && (BaseLevel >= 80) goto L_Heathin_Terranite_Legs; + if (@state == 4) && (BaseLevel >= 80) goto L_Heathin_Terranite_Hood_Ready; + if (@state == 3) && (BaseLevel >= 80) goto L_Heathin_Terranite_Hood_Forge; + if (@state == 2) && (BaseLevel >= 80) goto L_Heathin_Terranite_Hood; + if (@state == 2) && (BaseLevel >= 60) goto L_Heathin_Forge_Thanks; + if (@state == 1) && (BaseLevel >= 60) goto L_Heathin_Forge_Award; + if (BaseLevel >= 60) goto L_Heathin_Start; + + mes "[Heathin]"; + mes "\"Hello, friend. I am Heathin, a smith of exotic metals. \""; + close; + +L_Heathin_Start: + mes "[Heathin]"; + mes "\"Hello, friend. I am Heathin, a smith of exotic metals. \""; + next; + mes "\"By the order of the Wizard's Council, I've been commissioned to forge armor for the upcoming expediation. However, I am but a simple smith and cannot complete all this effort by myself. I need individuals that can gather Coal to heat my forge.\""; + next; + mes "\"Perhaps you would be interested in helping me out? Would you be willing to help me gather Coal and help me fulfill my commission? I am asking any and all willing souls to get me 50 coal, as that would put a significant dint in my goal.\""; + menu + "Sure, I'll help!", L_Heathin_Help, + "I'd rather keep my Coal for my own purposes, thank you very much.", L_Heathin_No, + "Wait, what kind of award are we talking about?", L_Heathin_Interested; + +L_Heathin_Help: + set @state, 1; + callsub S_Update_Mask; + mes "[Heathin]"; + mes "\"Excellent! I am always glad when someone can be of service not just to me, but to all of Tulimshar. Please get me 50 Coal and you will be compensated for your efforts.\""; + close; + +L_Heathin_No: + mes "[Heathin]"; + mes "\"That is too bad. If you change your mind, I shall still be here, attempting to get my commission done.\""; + close; + +L_Heathin_Interested: + mes "[Heathin]"; + mes "\"Well, I can compensate you from the commision I getting from the council.\""; + next; + mes "\"How does 20,000 GP and I'll offer my smithing services for a discount?\""; + next; + mes "\"Does this sound like something you might be interested in?\""; + menu + "Sure, I'll help!", L_Heathin_Help, + "I'd rather keep my Coal.", L_Heathin_No, + "Can you repeat that again?", L_Heathin_Interested; + +L_Heathin_Forge_Award: + if (countitem ("Coal") < 50) goto L_Heathin_Forge_Wait; + getinventorylist; + set @state, 2; + callsub S_Update_Mask; + delitem "Coal", 50; + getexp @heathin_xp_bonus, 0; + set Zeny, Zeny + 20000; + mes "[Heathin]"; + mes "\"You have brought the Coal. This is most excellent! As promised, I have a reward for you. Hopefully you will find it useful.\""; + next; + mes "\"Time to make some armor. The Council will be pleased. Thank you for your efforts!\""; + close; + +L_Heathin_Forge_Wait: + mes "[Heathin]"; + mes "\"Hello again. Making armor keeps me pretty busy. I certainly hope I can fulfill my commission soon so that I can move on to bigger and better things.\""; + next; + mes "\"The pay is good, certainly, but I am a far better smith than this. If you can bring me 50 Coal, it would surely get me to my goal faster.\""; + next; + mes "\"I will be sure to provide an apt award once you are done.\""; + close; + +L_Heathin_Forge_Thanks: + mes "[Heathin]"; + mes "\"Thank you again for helping me fulfil my commission. It has made a signficant dint in what the Council requires of me. Perhaps I may be of service to you again one day!\""; + close; + +L_Heathin_Terranite_Hood: + mes "[Heathin]"; + mes "\"Hello again friend, I just found out about this great metal called terranite.\""; + next; + mes "\"This metal is almost as strong as steel, but is also very ductile.\""; + next; + mes "\"With some effort, I can make this metal form rings tighter than any chain mail. It isn't the prettiest in hue, but its uses can be many.\""; + next; + mes "\"Unfortunately, it seems to be difficult to gather. Most that have searched for Terranite Ore either cannot find it or have never returned...\""; + next; + mes "\"I may be an excellent smith, but I certainly am no combatant. However, I would enjoy turning this ore into something useful, perhaps some type of armor to help those that may be braver.\""; + next; + mes "\"So, what do you say? Are you interested?\""; + menu + "No, thank you. Maybe later.", L_Heathin_Terranite_No, + "Armor, you say? Definitely!", L_Heathin_Terranite_Yes; + +L_Heathin_Terranite_No: + mes "[Heathin]"; + mes "\"Ah, that is too bad. Come by again anytime.\""; + close; + +L_Heathin_Terranite_Yes: + set @state, 3; + callsub S_Update_Mask; + mes "[Heathin]"; + mes "\"Great, this is going to be fun! As I have not had much practice with this armor, I'd like to get started soon.\""; + next; + mes "Heathin thinks for a moment."; + next; + mes "\"Ah, I know! I will make a helm... Well, more like a hood, since it will be woven.\""; + next; + mes "\"It will require a great amount of heat, if the rumors are to be believed. For this, I will need 100 Coal to keep my forge burning hot. I will also need 10 Terranite Ore to make the armor. Of course, such work does not come cheap. While I may enjoy my work, my time and effort is very valuable. Since you have been a great help I will only need 20,000 gold pieces, well below my going rate. Please come back with the gold, Coal and ore and I'll make this hood for you.\""; + close; + +L_Heathin_Terranite_Hood_Forge: + if ( (Zeny < 20000) + || (countitem("Coal") < 100) + || (countitem("TerraniteOre") < 10) ) + goto L_Heathin_Terranite_Hood_Wait; + set @state, 4; + callsub S_Update_Mask; + delitem "Coal", 100; + delitem "TerraniteOre", 10; + getexp @heathin_xp_bonus, 0; + set Zeny, Zeny - 20000; + mes "[Heathin]"; + mes "\"Great, you brought everything! Come back later and I'll have the helm ready for you.\""; + close; + +L_Heathin_Terranite_Hood_Wait: + mes "[Heathin]"; + mes "\"I am very busy right now. If you could bring me 10 Terranite Ore, 100 Coal and 20,000 gold pieces, I will make that terranite hood for you.\""; + close; + +L_Heathin_Terranite_Hood_Ready: + getinventorylist; + if ((checkweight("TerraniteHelmet", 1) == 0) || (@inventorylist_count == 100)) + goto L_InventoryNoSpace; + set @state, 5; + callsub S_Update_Mask; + getitem "TerraniteHelmet", 1; + mes "[Heathin]"; + mes "\"I am all done with your terranite hood. I hope you enjoy it! I have some work to wrap up for the Council, but come back later and I might be able to assist you again.\""; + close; + +L_Heathin_Terranite_Legs: + set @state, 6; + callsub S_Update_Mask; + mes "[Heathin]"; + mes "\"I am glad you are back! I've just finished up some more of my commission. Now I can get back to making terranite armor for you. This time I will make some pants, but they need more ore, more Coal to heat my forge and of course, more gold for my efforts.\""; + next; + mes "\"To make terranite pants, I need 200 Coal, 30 Terranite Ore and 40,000 gold pieces. The faster you bring this to me, the faster I can have your terranite pants ready.\""; + close; + +L_Heathin_Terranite_Legs_Forge: + if ( (Zeny < 40000) + || (countitem("Coal") < 200) + || (countitem("TerraniteOre") < 30) ) + goto L_Heathin_Terranite_Legs_Wait; + set @state, 7; + callsub S_Update_Mask; + delitem "Coal", 200; + delitem "TerraniteOre", 30; + getexp @heathin_xp_bonus, 0; + set Zeny, Zeny - 40000; + mes "[Heathin]"; + mes "\"Great, you have brought everything! Come back later and I will have those terranite pants ready for you.\""; + close; + +L_Heathin_Terranite_Legs_Wait: + mes "[Heathin]"; + mes "\"I am very busy right now. If you could bring me 30 Terranite Ore, 200 Coal and 40,000 gold pieces, I will make those terranite pants for you.\""; + close; + +L_Heathin_Terranite_Legs_Ready: + getinventorylist; + if ((checkweight("TerraniteLegs", 1) == 0) || (@inventorylist_count == 100)) + goto L_InventoryNoSpace; + set @state, 8; + callsub S_Update_Mask; + getitem "TerraniteLegs", 1; + mes "[Heathin]"; + mes "\"I am all done with your terranite pants. Hope you enjoy them! I have some more work to complete for the Council. Come back later and I might be able to assist you again.\""; + close; + +L_Heathin_Terranite_Chest_Armor: + set @state, 9; + callsub S_Update_Mask; + mes "[Heathin]"; + mes "\"Good to see you again. I have just finished up some more of my commission. Now I can get back to making terranite armor for you. This time, I will make some terranite chest armor, but it needs more ore, more Coal for my forge and of course, more gold to compensate for my efforts.\""; + next; + mes "\"To make terranite chest armor, I need 250 Coal, 40 Terranite Ore and 50,000 gold pieces. The faster you bring this to me, the faster I can have your terranite armor ready.\""; + close; + +L_Heathin_Terranite_Chest_Armor_Forge: + if ( (Zeny < 50000) + || (countitem("Coal") < 250) + || (countitem("TerraniteOre") < 40) ) + goto L_Heathin_Terranite_Chest_Armor_Wait; + set @state, 10; + callsub S_Update_Mask; + delitem "Coal", 250; + delitem "TerraniteOre", 40; + getexp @heathin_xp_bonus, 0; + set Zeny, Zeny - 50000; + mes "[Heathin]"; + mes "\"Splendid, you have brought everything! Come back later and I will have the terranite chest armor ready for you.\""; + close; + +L_Heathin_Terranite_Chest_Armor_Wait: + mes "[Heathin]"; + mes "\"I am very busy right now. If you could bring me 40 Terranite Ore, 250 Coal and 50,000 gold pieces, I will make that chest armor for you.\""; + close; + +L_Heathin_Terranite_Chest_Armor_Ready: + getinventorylist; + if ((checkweight("TerraniteChestArmor", 1) == 0) || (@inventorylist_count == 100)) + goto L_InventoryNoSpace; + set @state, 11; + callsub S_Update_Mask; + getitem "TerraniteChestArmor", 1; + mes "[Heathin]"; + mes "\"I have completed your terranite chest armor. I hope you enjoy it! I have some work to wrap up for the Council again, but come back later and I might be able to assist you once more.\""; + close; + +L_Heathin_Terranite_Arrows: + mes "[Heathin]"; + mes "\"How good to see you. I have experimented a little with Terranite Ore to see what else can be done with it. It seems to have some qualities suitable for weapons, but I have only tested it with arrows. If you would like, I can make Terranite Arrows, but as as with the armor, I need Coal, Terranite Ore and payment for my efforts.\""; + next; + mes "\"Also, it might be a while until I have time to see what else I can make with terranite other than arrows, as right now the Council is keeping me rather busy with my commission. So, would you like some Terranite Arrows?\""; + menu + "No, thank you.", L_Heathin_Terranite_Arrows_No, + "Sure, I could use some arrows.", L_Heathin_Terranite_Arrows_Yes; + +L_Heathin_Terranite_Arrows_No: + mes "[Heathin]"; + mes "\"Well, if you change your mind, I'm not going anywhere.\""; + close; + +L_Heathin_Terranite_Arrows_Yes: + set @state, 12; + callsub S_Update_Mask; + mes "[Heathin]"; + mes "\"Good, good. I shall begin crafting these arrows as soon as you come back. However, I cannot just make small handfuls as it would not be worth my time and effort to have my concentration interrupted for small tasks. I will make 1,000 Terranite Arrows per request, for which I will need "+@TARROW_REQ_TERRA_ORE+" Terranite Ore, "+@TARROW_REQ_COAL+" Coal and "+@TARROW_REQ_GP+" gold pieces.\""; + next; + mes "\"See you soon!\""; + close; + +L_Heathin_Terranite_Arrows_Forge: + if ( (Zeny < @TARROW_REQ_GP) + || (countitem("Coal") < @TARROW_REQ_COAL) + || (countitem("TerraniteOre") < @TARROW_REQ_TERRA_ORE) ) + goto L_Heathin_Terranite_Arrows_Wait; + set @state, 13; + callsub S_Update_Mask; + delitem "Coal", @TARROW_REQ_COAL; + delitem "TerraniteOre", @TARROW_REQ_TERRA_ORE; + getexp @heathin_xp_bonus, 0; + set Zeny, Zeny - @TARROW_REQ_GP; + mes "[Heathin]"; + mes "\"Wonderful! You have everything I asked for. I will start working on the arrows right away.\""; + close; + +L_Heathin_Terranite_Arrows_Wait: + mes "[Heathin]"; + mes "\"If you want Terranite Arrows, please get me "+@TARROW_REQ_TERRA_ORE+" Terranite Ore, "+@TARROW_REQ_COAL+" Coal and "+@TARROW_REQ_GP+" gold pieces.\""; + close; + +L_Heathin_Terranite_Arrows_Ready: + getinventorylist; + if ((checkweight("TerraniteArrow", 1000) == 0) || (@inventorylist_count == 100)) + goto L_InventoryNoSpace; + set @state, 14; + callsub S_Update_Mask; + getitem "TerraniteArrow", 1000; + mes "[Heathin]"; + mes "\"All done, here you go! I hope you like them. I am still working on my commission, but if you ever need any more Terranite Arrows, just come on by with "+@TARROW_REQ_COAL+" Coal, "+@TARROW_REQ_TERRA_ORE+" Terranite Ore and "+@TARROW_REQ_GP+" gold pieces and I will make another 1,000 arrows for you. By now I have enough Terranite Ore in reserve that you can just trade me my requirements to keep my resources up. Thank you for all your efforts!\""; + close; + +L_Heathin_Terranite_Arrows_Trade: + mes "[Heathin]"; + mes "\"Hello, there. If you have "+@TARROW_REQ_COAL+" Coal, "+@TARROW_REQ_TERRA_ORE+" Terranite Ore and "+@TARROW_REQ_GP+" gold pieces, I will trade you 1,000 Terranite Arrows. Would you like some Terranite Arrows?\""; + menu + "No.", L_Heathin_Terranite_Arrows_Trade_No, + "Yes.", L_Heathin_Terranite_Arrows_Trade_Yes; + +L_Heathin_Terranite_Arrows_Trade_No: + mes "[Heathin]"; + mes "\"Come back again if you would like to get Terranite Arrows.\""; + close; + +L_Heathin_Terranite_Arrows_Trade_Yes: + if ( (Zeny < @TARROW_REQ_GP) + || (countitem("Coal") < @TARROW_REQ_COAL) + || (countitem("TerraniteOre") < @TARROW_REQ_TERRA_ORE) ) + goto L_Heathin_Terranite_Arrows_Trade_Wait; + getinventorylist; + if ((checkweight("TerraniteArrow", 1500) == 0) || (@inventorylist_count == 100)) + goto L_InventoryNoSpace; + delitem "Coal", @TARROW_REQ_COAL; + delitem "TerraniteOre", @TARROW_REQ_TERRA_ORE; + set Zeny, Zeny - @TARROW_REQ_GP; + set @lucky, 5 * rand(readparam(bLuk)); + getitem "TerraniteArrow", 1000 + @lucky; + mes "[Heathin]"; + mes "\"Here you go! You are lucky, I could forge "+@lucky+" more arrows than expected. Come back again if you want more Terranite Arrows.\""; + close; + +L_Heathin_Terranite_Arrows_Trade_Wait: + mes "[Heathin]"; + mes "\"It seems that you do not have the necessary resources for me to trade you. Please come back with "+@TARROW_REQ_COAL+" Coal, "+@TARROW_REQ_TERRA_ORE+" Terranite Ore and "+@TARROW_REQ_GP+" gold pieces if you want another 1,000 Terranite Arrows.\""; + close; + +L_InventoryNoSpace: + mes "[Heathin]"; + mes "\"Hm no. You can't carry this right now. Make some room and come back.\""; + close; + +S_Update_Mask: + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_6_MASK)) | (@state << NIBBLE_6_SHIFT); + return; +} +001-2.gat,25,55,0|script|HeathinDebug|147 +{ + mes "[Heathin Debug]"; + mes "Debug Action"; + menu + "Reset", L_Reset, + "Exit", L_End; + +L_Reset: + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_6_MASK) | (0 << NIBBLE_6_SHIFT)); + mes "Reset!"; + goto L_End; + +L_End: + end; + +OnInit: + if (!debug) + disablenpc "HeathinDebug"; + end; +} diff --git a/world/map/npc/001-2/jhedia.txt b/world/map/npc/001-2/jhedia.txt new file mode 100644 index 00000000..fdee36c9 --- /dev/null +++ b/world/map/npc/001-2/jhedia.txt @@ -0,0 +1,62 @@ +// Ingot maker takes iron ore, gives ingots for future crafting purposes. + +001-2.gat,23,50,0|script|Jhedia|160 +{ + set @Cost_Per_Ingot, 1000; + set @Iron_Ore_Per, 5; + set @Coal_Per, 10; + + mes "[Jhedia]"; + mes "\"I forge Iron Ore into ingots. Ingots are more useful for skilled smiths, like armorers, because the ore is refined and made into useful units which can be worked with. To make ingots, I need " + @Iron_Ore_Per + " Iron Ore and " + @Cost_Per_Ingot + " gp per ingot. I also need " + @Coal_Per + " Coal for my forge.\""; + next; + mes "[Jhedia]"; + mes "\"How many ingots would you like?\""; + input @ingot_count; + + if (@ingot_count == 0) + goto L_Jhedia_Bye; + set @Zeny_cost, @ingot_count * @Cost_Per_Ingot; + if (countitem("IronOre") < @Iron_Ore_Per * @ingot_count) + goto L_Jhedia_NotEnough_Ore; + if (countitem("Coal") < @Coal_Per * @ingot_count) + goto L_Jhedia_NotEnough_Coal; + if (Zeny < @Zeny_cost) + goto L_Jhedia_NotEnough_Zeny; + getinventorylist; + if (@inventorylist_count == 100 + && countitem("IronIngot") == 0 + && countitem("IronOre") > @ingot_count * @Iron_Ore_Per + | countitem("Coal") > @ingot_count * @Coal_Per) + goto L_Jhedia_NotEnoughSlots; + set Zeny, Zeny - @Zeny_cost; + delitem "IronOre", @ingot_count * @Iron_Ore_Per; + delitem "Coal", @ingot_count * @Coal_Per; + getitem "IronIngot", @ingot_count; + close; + +L_Jhedia_Bye: + mes "[Jhedia]"; + mes "\"Goodbye then.\""; + close; + +L_Jhedia_NotEnough_Ore: + mes "[Jhedia]"; + mes "\"You do not seem to have enough Iron Ore.\""; + close; + +L_Jhedia_NotEnough_Coal: + mes "[Jhedia]"; + mes "\"You do not seem to have enough Coal.\""; + close; + +L_Jhedia_NotEnough_Zeny: + mes "[Jhedia]"; + mes "\"You do not seem to have enough gold pieces.\""; + close; + +L_Jhedia_NotEnoughSlots: + mes "[Jhedia]"; + mes "\"You do not seem to have enough room to carry this many ingots.\""; + close; + +} diff --git a/world/map/npc/001-2/manakins.txt b/world/map/npc/001-2/manakins.txt new file mode 100644 index 00000000..23a59909 --- /dev/null +++ b/world/map/npc/001-2/manakins.txt @@ -0,0 +1,47 @@ +// Display Manakins. + +// Forge +001-2.gat,29,57,0|script|Terranite Armor#Female|401 +{ + mes "Terranite Armor complete set, made to order, inquire with Heathin"; + close; +} + +001-2.gat,34,57,0|script|Terranite Armor#Male|402 +{ + mes "Terranite Armor complete set, made to order, inquire with Heathin"; + close; +} + +001-2.gat,34,62,0|script|Terranite|403 +{ + mes "Ahhh! A Terranite! Wait it appears to just be a display model."; + close; +} + +// Museum + +001-2.gat,91,39,0|script|Talponian#Female|404 +{ + mes "A Female Talponian."; + close; +} + +001-2.gat,91,44,0|script|Talponian#Male|405 +{ + mes "A Male Talponian."; + close; +} + +001-2.gat,118,39,0|script|Gispaan#Female|406 +{ + mes "A Female Gispaan."; + close; +} + +001-2.gat,118,44,0|script|Gispaan#Male|407 +{ + mes "A Male Gispaan."; + close; +} + diff --git a/world/map/npc/001-2/mapflags.txt b/world/map/npc/001-2/mapflags.txt index 41bab423..3a1f27a7 100644 --- a/world/map/npc/001-2/mapflags.txt +++ b/world/map/npc/001-2/mapflags.txt @@ -1,2 +1,2 @@ 001-2.gat|mapflag|town -001-2.gat|mapflag|resave|001-1,57,71 +001-2.gat|mapflag|resave|001-1,60,105 diff --git a/world/map/npc/001-2/omar.txt b/world/map/npc/001-2/omar.txt deleted file mode 100644 index c67bd44f..00000000 --- a/world/map/npc/001-2/omar.txt +++ /dev/null @@ -1,335 +0,0 @@ -// -function|script|KadiyaSubquestConsts -{ - set @Q_kadiya_status, (QUEST_MAGIC2 & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT; - - set @Q_STATUS_NONE, 0; - set @Q_STATUS_KNOWS_MOPOX, 1; - set @Q_STATUS_MADE_MOPOX, 2; - set @Q_STATUS_DIDNT_DRINK, 3; - set @Q_STATUS_WANTS_CHOCOCAKE, 4; - set @Q_STATUS_WANTS_ORANGECUPCAKE, 5; - set @Q_STATUS_COMPLETED, 6; - set @Q_STATUS_COMPLETED_ELANORE, 7; - set @Q_STATUS_COMPLETED_NOELANORE, 8; - set @Q_STATUS_COMPLETED_POST_ELANORE, 9; - - if (((QUEST_MAGIC2 & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT) < 4) set @Q_kadiya_status, @Q_STATUS_NONE; - - if (((QUEST_MAGIC2 & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT) > 4) set @Q_kadiya_status, @Q_STATUS_COMPLETED_POST_ELANORE; - - return; -} - -001-2.gat,70,60,0|script|Omar|162 -{ - callfunc "ElanoreFix"; - callfunc "KadiyaSubquestConsts"; - - set @Q_status, @Q_kadiya_status; - - if (@Q_status >= @Q_STATUS_COMPLETED) goto L_cured; - - if (@Q_status == @Q_STATUS_DIDNT_DRINK) goto L_didnt_drink; - - if (@Q_status > @Q_STATUS_DIDNT_DRINK) goto L_make_food; - - mes "[Omar]"; - mes "\"Welcome to my humble abode.\""; - next; - menu - "Well met! May I ask who you are?", L_omar, - "What's wrong with your daughter?", L_kadiya_sick, - "Thank you!", L_Close; - -L_omar: - mes "[Omar]"; - mes "\"My name is Omar; I am a trader of oils and spices.\""; - goto L_Close; - -L_kadiya_sick: - mes "[Omar]"; - mes "\"Kadiya has caught Ponderpox, I fear.\""; - mes "He sighs."; - mes "\"She's has been feverish for many days now. I wish there were something I could do.\""; - next; - menu - "Have you asked Elanore the healer?", L_sick_elanore, - "How about the Hurnscald hospital?", L_sick_hospital, - "Can I help?", L_sick_self, - "I'm sorry to hear that.", L_Next; - -L_Next: - mes "[Omar]"; - mes "\"Well, she is a strong girl. I am sure that she will get over it eventually.\""; - mes "He smiles, but you see doubt in his eyes."; - goto L_Close; - -L_sick_elanore: - mes "[Omar]"; - mes "\"Elanore?\""; - mes "He frowns."; - mes "\"She knows nothing. I see no point in talking to her.\""; - goto L_Close; - -L_sick_hospital: - mes "[Omar]"; - mes "\"Hurnscald is too far away. I don't think that it would be good for her to go on such a long trip.\""; - goto L_Close; - -L_sick_self: - mes "[Omar]"; - mes "\"You are very kind, but I don't think there is anything you can do.\""; - goto L_Close; - -L_didnt_drink: - mes "[Omar]"; - mes "\"So she has Mopox, not Ponderpox, you say? Hmm. That is much harder to cure, I think.\""; - mes "\"I am grateful for the effort you put into brewing a potion for her. But it does smell vile...\""; - next; - mes "[Omar]"; - mes "\"I promised my dear wife that I would never make Kadiya eat or drink anything she doesn't like. So I won't force her to drink this.\""; - next; - mes "[Omar]"; - set @Q_status, (@Q_STATUS_WANTS_CHOCOCAKE + rand(2)); - callsub S_update_var; - if (@Q_status == @Q_STATUS_WANTS_ORANGECUPCAKE) - mes "\"If only we could make it smell and taste like orange cupcakes... she really loves those cupcakes.\""; - if (@Q_status == @Q_STATUS_WANTS_CHOCOCAKE) - mes "\"If only this were a chocolate cake and not a potion... she really loves chocolate cakes.\""; - goto L_Close; - -L_make_food: - mes "[Omar]"; - mes "\"I should stay here to watch over her. I wish I could think of a way to convince her to drink the potion...\""; - if (@Q_status == @Q_STATUS_WANTS_ORANGECUPCAKE) - mes "\"Alas, it is not an orange cupcake.\""; - if (@Q_status == @Q_STATUS_WANTS_CHOCOCAKE) - mes "\"If only it were to smell and taste like her favourite chocolate cake...\""; - goto L_Close; - -L_cured: - if (@Q_status == @Q_STATUS_COMPLETED) goto L_cured_choice; - mes "[Omar]"; - mes "\"She is sleeping now, but she seems to be much better. I am sure that she will be up and running around again soon.\""; - goto L_Close; - -L_cured_choice: - mes "[Omar]"; - mes "\"I am very grateful for your help. I really was sure that it was Ponderpox, not Mopox, that she had.\""; - next; - menu - "Oh, it was nothing.", L_cured_nothing, - "I didn't do it alone; Elanore helped.", L_cured_elanore, - "That will be 5000 GP.", L_Next1; - -L_Next1: - mes "[Omar]"; - mes "\"Ah, certainly.\""; - mes "He hands you a small bag of money."; - next; - set @Q_status, @Q_STATUS_COMPLETED_NOELANORE; - callsub S_update_var; - set Zeny, Zeny + 5000; - goto L_Close; - -L_cured_nothing: - mes "[Omar]"; - mes "\"No, this wasn't nothing. She is everything to me. Here, you deserve a reward.\""; - mes "He hands you a bag of money containing 10,000 GP and two pearls."; - mes "\"And feel free to drop by again whenever you would like!\""; - set @Q_status, @Q_STATUS_COMPLETED_NOELANORE; - callsub S_update_var; - getitem "Pearl", 2; - set Zeny, Zeny + 10000; - goto L_Close; - -L_cured_elanore: - mes "[Omar]"; - mes "Omar frowns."; - mes "\"That witch? You worked with her without telling me?\""; - mes "He looks over to his daughter, concern suddenly in his eyes."; - mes "\"She is looking better, though...\""; - next; - mes "[Omar]"; - mes "Omar shakes his head."; - mes "\"I will have to think about this. Please leave me alone.\""; - next; - set @Q_status, @Q_STATUS_COMPLETED_ELANORE; - callsub S_update_var; - goto L_Close; - -L_Close: - set @Q_STATUS_KNOWS_MOPOX, 0; - set @Q_STATUS_MADE_MOPOX, 0; - set @Q_STATUS_DIDNT_DRINK, 0; - set @Q_STATUS_WANTS_CHOCOCAKE, 0; - set @Q_STATUS_WANTS_ORANGECUPCAKE, 0; - set @Q_STATUS_COMPLETED, 0; - set @Q_STATUS_COMPLETED_ELANORE, 0; - set @Q_STATUS_COMPLETED_NOELANORE, 0; - set @Q_STATUS_COMPLETED_POST_ELANORE, 0; - set @Q_status, 0; - close; - - -S_update_var: - set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(NIBBLE_3_MASK) | (@Q_status << NIBBLE_3_SHIFT)); - return; -} - -001-2.gat,76,59,0|script|Kadiya|174 -{ - set @child_number, 7; - callfunc "XmasList"; - - callfunc "ElanoreFix"; - set @Q_MASK, NIBBLE_3_MASK; - set @Q_SHIFT, NIBBLE_3_SHIFT; - callfunc "KadiyaSubquestConsts"; - set @Q_status, @Q_kadiya_status; - if (@Q_status >= @Q_STATUS_COMPLETED) goto L_cured; - - mes "You see a young girl lying in bed. At first she doesn't seem to notice you approaching."; - mes "Finally, she turns her head towards you. Judging from the sweat on her forehead and look in her eyes, she is suffering from some kind of fever."; - next; - mes "[Kadiya]"; - mes "\"Hello,\" she says in a tiny voice."; - next; - set @M_NAME, 1; - set @M_CANDY, 2; - set @M_POTION, 3; - set @M_CHOCOCAKE, 4; - set @M_CUPCAKE, 5; - - setarray @choice$, "Hello! What's your name?", "Would you like some candy?", "", "", "", "", "", ""; - setarray @choice_idx, @M_NAME, @M_CANDY, 0, 0, 0, 0, 0, 0; - set @choices_nr, 2; - - if (countitem("MopoxCurePotion") == 0) goto L_M_no_cure; - - set @choice_idx[@choices_nr], @M_POTION; - set @choice$[@choices_nr], "This potion will cure your illness!"; - set @choices_nr, @choices_nr + 1; - goto L_M_no_cure; - -L_M_no_cure: - if ((countitem("LacedChocolateCake") == 0) || (@Q_status != @Q_STATUS_WANTS_CHOCOCAKE)) - goto L_M_no_chococake; - set @choice_idx[@choices_nr], @M_CHOCOCAKE; - set @choice$[@choices_nr], "Would you like special chocolate cake?"; - set @choices_nr, @choices_nr + 1; - goto L_M_no_chococake; - -L_M_no_chococake: - if ((countitem("LacedOrangeCupcake") == 0) || (@Q_status != @Q_STATUS_WANTS_ORANGECUPCAKE)) - goto L_M_no_cupcake; - set @choice_idx[@choices_nr], @M_CUPCAKE; - set @choice$[@choices_nr], "Would you like special orange cupcake?"; - set @choices_nr, @choices_nr + 1; - goto L_M_no_cupcake; - -L_M_no_cupcake: - set @choice_idx[@choices_nr], 0; - set @choice$[@choices_nr], "Goodbye."; - set @choices_nr, @choices_nr + 1; - - menu - @choice$[0], L_MenuItems, - @choice$[1], L_MenuItems, - @choice$[2], L_MenuItems, - @choice$[3], L_MenuItems, - @choice$[4], L_MenuItems, - @choice$[5], L_MenuItems; - -L_MenuItems: - set @choice, @choice_idx[@menu - 1]; - - if (@choice == @M_NAME) goto L_name; - if (@choice == @M_CANDY) goto L_no_candy; - if (@choice == @M_POTION) goto L_potion; - if (@choice == @M_CHOCOCAKE) goto L_chococake; - if (@choice == @M_CUPCAKE) goto L_cupcake; - goto L_Close; - -L_name: - mes "[Kadiya]"; - mes "She smiles a faint smile."; - mes "\"My name is Kadiya.\""; - goto L_Close; - -L_no_candy: - mes "[Kadiya]"; - mes "She hesitates for a moment."; - mes "\"No, thank you. I don't think I should.\""; - goto L_Close; - -L_potion: - mes "[Kadiya]"; - if (@Q_status < @Q_STATUS_DIDNT_DRINK) set @Q_status, @Q_STATUS_DIDNT_DRINK; - callsub S_update_var; - - mes "Kadiya grimaces and pushes the bottle away."; - mes "\"That smells terrible!\""; - next; - mes "[Kadiya]"; - mes "She pulls the sheets over her head."; - mes "\"I won't drink that!\""; - goto L_Close; - -L_chococake: - delitem "LacedChocolateCake", 1; - goto L_do_cure; - -L_cupcake: - delitem "LacedOrangeCupcake", 1; - goto L_do_cure; - -L_do_cure: - if (@Q_status < @Q_STATUS_COMPLETED) set @Q_status, @Q_STATUS_COMPLETED; - callsub S_update_var; - - mes "[Kadiya]"; - mes "Kadiya's eyes widen."; - mes "\"Oh! Daddy, is it okay if I eat this?\""; - mes "Omar nods and smiles. \"You should eat a bit to regain your strength, sweetheart.\""; - next; - mes "[Kadiya]"; - mes "Kadiya devours your gift in just a handful of bites."; - next; - mes "[Kadiya]"; - mes "She smiles. \"Thank you! I feel better already!\"."; - next; - mes "[Kadiya]"; - mes "She looks much healthier, too. Omar walks over and touches her forehead."; - mes "\"Now that is funny – your fever has gone down quite a bit!\""; - mes "He smiles at you. \"Thank you for your help!\""; - next; - mes "[Kadiya]"; - mes "\"You should get some sleep now, sweetheart. I'm sure that you will be better soon.\""; - goto L_Close; - -L_cured: - mes "[Kadiya]"; - mes "Kadiya seems to be sleeping calmly. She looks much less sweaty than earlier; unless you are very much mistaken, her fever has disappeared."; - goto L_Close; - -L_Close: - set @Q_status, 0; - set @Q_MASK, 0; - set @Q_SHIFT, 0; - set @M_NAME, 0; - set @M_CANDY, 0; - set @M_POTION, 0; - set @M_CHOCOCAKE, 0; - set @M_CUPCAKE, 0; - set @choice, 0; - set @choices_nr, 0; - cleararray @choice_idx[0], 0, 7; - cleararray @choice$[0], "", 7; - close; - -S_update_var: - set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Q_MASK) | (@Q_status << @Q_SHIFT)); - return; -} diff --git a/world/map/npc/001-2/pauline.txt b/world/map/npc/001-2/pauline.txt new file mode 100644 index 00000000..b8833251 --- /dev/null +++ b/world/map/npc/001-2/pauline.txt @@ -0,0 +1,307 @@ +//Author: tux9th +//This is the continuation of Astral Magic Level 2. +//This uses the QUEST_MAGIC2 variable Nibble 4. +//Quest States: +// @pauline_state 1: Got Magic, started to talk to her about Magic. +// @pauline_state 2: Finished Talking to her about new Astral Spells, learnt invocations. +// @pauline_state 3: Told her the correct ingredients to the Mouboo summon spell. +// @pauline_state 4: Told her the correct ingredients to the Pinkie summon spell. +// +//Variables: +// @pauline_ingredient1$ First ingredient input. +// @pauline_ingredient2$ Second ingredient input. +// @pauline_REWARD amount of XP gained for telling her ingredients for each spell. + +001-2.gat,77,78,0|script|Pauline|208 +{ + +//Bitmasking +// QUEST_MAGIC2 - Nibble4 + set @Pauline_MASK, NIBBLE_4_MASK; + set @Pauline_SHIFT, NIBBLE_4_SHIFT; + + set @pauline_state, ((QUEST_MAGIC2 & @Pauline_MASK) >> @Pauline_SHIFT); + +//Bitmasks END + + set @pauline_REWARD, 10000; + + if (@pauline_state == 4) goto L_MoreMagic; + if (@pauline_state == 3) goto L_KnowIngredientsPinkie; + if (@pauline_state == 2) goto L_Ingredients; + if (@pauline_state == 1) goto L_Back; + + if (getskilllv(SKILL_MAGIC_ASTRAL) > 0) + goto L_Magic; + mes "[Pauline]"; + mes "\"I've mastered several schools of magic and fought the Yeti in Kaizei.\""; + next; + mes "\"The path of magic is a long and difficult one.\""; + goto L_Close; + +L_Magic: + mes "[Pauline]"; + mes "\"Ah. I see you are skilled in the Art of Astral Magic.\""; + mes "\"Who taught you?\""; + menu + "I learnt it myself!", L_Next, + "Sagatha is my teacher.", L_Sagatha, + "You must be mistaken.", L_Close; + +L_Next: + mes "\"You did? Not bad. I guess then there is nothing I can teach you. Or are you interested in sharing knowledge?\""; + menu + "Yes, please.", L_Spells, + "No, thanks.", L_Close; + +L_Sagatha: + mes "[Pauline]"; + mes "\"Ah, that Witch!\""; + mes "\"Very well.\""; + next; + mes "\"Do you want me to teach you things Sagatha doesn't know yet?\""; + next; + menu + "Yes.", L_Spells, + "No.", L_Close; + +L_Back: + mes "[Pauline]"; + mes "\"So, you're back. Are you ready to share knowledge now?\""; + menu + "Yes.", L_Spells, + "No.", L_Close; + +L_Spells: + set @pauline_state, 1; + callsub S_Update_Mask; + mes "[Pauline]"; + mes "\"Okay.\""; + mes "\"Not long ago I discovered some new caves near Tulimshar. In an abandond chamber I found some paintings on the wall.\""; + next; + mes "\"They weren't typical for this region, so I examined them closely. I found some invocations I have never heard before.\""; + mes "\"I thought that they would fit better into the Woodland area. I could only decipher two invocations so far. Those are two spells used to summon creatures.\""; + next; + mes "\"One was for summoning Mouboos and the other one was for summoning Pinkies.\""; + mes "\"Have you ever heared about those?\""; + next; + menu + "Yes. I thought you had something new to tell. [Walk Away]", L_Close, + "No, tell me more.", L_Next1; + +L_Next1: + mes "[Pauline]"; + mes "\"Well I could only read the invocations. So I don't exactly know what kind of ingredients you are going to need.\""; + mes "\"The first one for the mouboo was " + getspellinvocation("summon-mouboo") + " and the one for the pinkie was " + getspellinvocation("summon-pinkie") +".\""; + next; + mes "\"For the pinkie spell my suggestion is to try similar ingredients to the other Astral spells. Try a root and some item typical for pinkies.\""; + mes "\"The mouboo spell might be more complicated. From what I could translate, one of the spell components is crafted by magic.\""; + next; + mes "\"When you find the right ingredients, come back and bring them to me to try those spells out.\""; + next; + mes "\"Goodbye.\""; + set @pauline_state, 2; + callsub S_Update_Mask; + goto L_Close; + +L_Ingredients: + mes "[Pauline]"; + mes "\"Hello, have you found out what ingredients to use yet?\""; + menu + "Yes.", L_KnowIngredientsMouboo, + "No.", L_Next2; + +L_Next2: + mes "\"Okay. Come back as soon as you know.\""; + goto L_Close; + +L_KnowIngredientsMouboo: + mes "\"Did you bring them?\""; + menu + "Yes." , L_Next3, + "No.", L_ComeBackLater; + +L_Next3: + mes "\"Then tell me the ingredients for the mouboo summoning spell and give them to me. Start with the first ingredient and then tell me the second one separately.\""; + next; + mes "This is case sensitive. Also do not enter whitespaces."; + next; + input @pauline_ingredient1$; + mes "Next ingredient."; + input @pauline_ingredient2$; + if (@pauline_ingredient1$ == "") + goto L_Wrong; + if (@pauline_ingredient2$ == "") + goto L_Wrong; + if (countitem(@pauline_ingredient1$) < 1) + goto L_NotEnough; + if (countitem(@pauline_ingredient2$) < 1) + goto L_NotEnough; + mes "\"Do you want to give me these items?\""; + menu + "No.", L_ComeBackLater, + "Yes.", L_Next4; + +L_Next4: + delitem @pauline_ingredient1$, 1; + delitem @pauline_ingredient2$, 1; + mes "\"Okay let me try this.\""; + if (@pauline_ingredient1$ == "Root") + goto L_Pass1Mouboo; + if (@pauline_ingredient1$ == "MoubooFigurine") + goto L_Pass2Mouboo; + goto L_DidNotWorkMouboo; + +L_DidNotWorkMouboo: + mes "The Witch takes " + @pauline_ingredient1$ + " and " + @pauline_ingredient2$ + " and puts them together calling " + getspellinvocation("summon-mouboo") + "."; + mes "Nothing happens."; + mes "[Pauline]"; + mes "\"It seems you did not tell me the correct ingredients. Come back when you find the correct ones.\""; + goto L_Close; + +L_Pass1Mouboo: + if (@pauline_ingredient2$ == "MoubooFigurine") + goto L_TrySpellMouboo; + goto L_DidNotWorkMouboo; + +L_Pass2Mouboo: + if (@pauline_ingredient2$ == "Root") + goto L_TrySpellMouboo; + goto L_DidNotWorkMouboo; + +L_TrySpellMouboo: + mes "The Witch takes " + @pauline_ingredient1$ + " and " + @pauline_ingredient2$ + " and puts them together calling " + getspellinvocation("summon-mouboo") + "."; + monster "001-1.gat", 55,68, "Good", 1028, 1; + mes "[Pauline]"; + mes "\"It worked!\""; + set @pauline_state, 3; + callsub S_Update_Mask; + getexp @pauline_REWARD, 0; + goto L_Close; + +L_KnowIngredientsPinkie: + mes "[Pauline]"; + mes "\"Now give me the ingredients for the pinkie spell.\""; + next; + mes "This is case sensitive. Also do not enter whitespaces."; + input @pauline_ingredient1$; + mes "Next ingredient."; + input @pauline_ingredient2$; + if (@pauline_ingredient1$ == "") + goto L_Wrong; + if (@pauline_ingredient2$ == "") + goto L_Wrong; + if (countitem(@pauline_ingredient1$) < 1) + goto L_NotEnough; + if (countitem(@pauline_ingredient2$) < 1) + goto L_NotEnough; + mes "\"Do you want to give me these items?\""; + menu + "No.", L_ComeBackLater, + "Yes.", L_Next5; + +L_Next5: + delitem @pauline_ingredient1$, 1; + delitem @pauline_ingredient2$, 1; + mes "\"Okay, let me try this.\""; + if (@pauline_ingredient1$ == "Root") + goto L_Pass1Pinkie; + if (@pauline_ingredient1$ == "PinkAntenna") + goto L_Pass2Pinkie; + goto L_DidNotWorkPinkie; + +L_DidNotWorkPinkie: + mes "The Witch takes " + @pauline_ingredient1$ + " and " + @pauline_ingredient2$ + " and puts them together calling " + getspellinvocation("summon-pinkie") + "."; + mes "Nothing happens."; + mes "[Pauline]"; + mes "\"It seems you did not tell me the correct ingredients. Come back when you find the correct ones.\""; + goto L_Close; + +L_Pass1Pinkie: + if (@pauline_ingredient2$ == "PinkAntenna") + goto L_TrySpellPinkie; + goto L_DidNotWorkPinkie; + +L_Pass2Pinkie: + if (@pauline_ingredient2$ == "Root") + goto L_TrySpellPinkie; + goto L_DidNotWorkPinkie; + +L_TrySpellPinkie: + mes "The Witch takes " + @pauline_ingredient1$ + " and " + @pauline_ingredient2$ + " and puts them together calling " + getspellinvocation("summon-pinkie") + "."; + monster "001-1.gat", 54,68, "Good", 1018, 1; + mes "[Pauline]"; + mes "\"It worked!\""; + set @pauline_state, 4; + callsub S_Update_Mask; + getexp @pauline_REWARD, 0; + goto L_Close; + +L_MoreMagic: + mes "[Pauline]"; + mes "\"Thanks for telling me the ingredients. As soon as I find out more about those wall paintings I will let you know.\""; + goto L_Close; + +L_Wrong: + mes "The Witch looks at you and snorts."; + mes "[Pauline]"; + mes "\"You told me the wrong ingredients. Come back as soon as you know the correct ones.\""; + goto L_Close; + +L_NotEnough: + mes "[Pauline]"; + mes "\"Hey, you don't have this with you!\""; + mes "\"Come back when you have the right ingredients.\""; + goto L_Close; + +L_ComeBackLater: + mes "[Pauline]"; + mes "\"Then come back later.\""; + goto L_Close; + +L_Close: + set @pauline_ingredient1$, ""; + set @pauline_ingredient2$, ""; + set @pauline_state, 0; + set @pauline_REWARD, 0; + close; + +//Bitmasks +S_Update_Mask: + set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Pauline_MASK)) | (@pauline_state << @Pauline_SHIFT); + return; +} + +001-2.gat,79,74,0|script|PaulineDebug|208 +{ +//load Bitmasks; + set @Pauline_MASK, NIBBLE_4_MASK; + set @Pauline_SHIFT, NIBBLE_4_SHIFT; + + set @pauline_state, ((QUEST_MAGIC2 & @Pauline_MASK) >> @Pauline_SHIFT); + + mes "Reset Quest State"; + mes @pauline_state; + menu + "Yes.", L_Next, + "No.", L_Close; + +L_Next: + set @pauline_state, 0; + callsub S_Update_Mask; + mes "Done"; + close; + +L_Close: + set @pauline_state, 0; + close; + +S_Update_Mask: + set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Pauline_MASK)) | (@pauline_state << @Pauline_SHIFT); + return; + +OnInit: + if (!debug) + disablenpc "PaulineDebug"; + end; +} diff --git a/world/map/npc/001-2/phaet.txt b/world/map/npc/001-2/phaet.txt deleted file mode 100644 index aa0c9848..00000000 --- a/world/map/npc/001-2/phaet.txt +++ /dev/null @@ -1,30 +0,0 @@ -// - -001-2.gat,132,25,0|script|Phaet|125,0,0 -{ - mes "[Phaet the Royal Guard]"; - mes "\"Hey, you seem tough enough! Would you like to prove your skills? I'll let you in the arena if you give me 50 gp. You can fight against other players there.\""; - next; - menu - "Yes", L_Sure, - "No", L_Next; - -L_Next: - mes "[Phaet the Royal Guard]"; - mes "\"Ha ha, coward.\""; - close; - -L_Sure: - if (Zeny < 50) goto L_NoMoney; - set Zeny, Zeny - 50; - - mes "[Phaet the Royal Guard]"; - mes "\"Get ready!\""; - next; - warp "001-3.gat", 0, 0; - close; - -L_NoMoney: - mes "\"Wait a second, you don't have enough money.\""; - close; -} diff --git a/world/map/npc/001-2/sandra.txt b/world/map/npc/001-2/sandra.txt new file mode 100644 index 00000000..48632e58 --- /dev/null +++ b/world/map/npc/001-2/sandra.txt @@ -0,0 +1,118 @@ +// Variables used: nibble 3 of QUEST_SouthTulimshar + +001-2.gat,98,88,0|script|Sandra|114 +{ + // This NPC previously used the variable TMW_Quest + callfunc "ClearVarTMW_Quest"; + + set @state, ((QUEST_SouthTulimshar & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); + + if (@state >= 2) goto L_Done; + if (@state == 1) goto L_Progress; + + mes "[Sandra]"; + mes "\"Hunting monsters for potion ingredients can sometimes be a difficult task.\""; + next; + + set @TEMP, rand(4); + if(@TEMP == 1) goto L_Opening1; + if(@TEMP == 2) goto L_Opening2; + if(@TEMP == 3) goto L_Opening3; + goto L_Opening0; + +L_Opening0: + mes "\"In the outskirts of Tulimshar, there are some scorpions... I need help! Will you help?\""; + next; + goto L_Ask; + +L_Opening1: + mes "\"When you venture to the outskirts of Tulimshar, you can spot scorpions. Will you help me kill some?\""; + next; + goto L_Ask; + +L_Opening2: + mes "\"The Scorpion Stinger carries many properties used in potions. Would you get some for me?\""; + next; + goto L_Ask; + +L_Opening3: + mes "\"You look sturdy enough, will you help me get something?\""; + next; + goto L_Ask; + +L_Ask: + menu + "Yes.", L_Yes, + "No.", L_Close; + +L_Yes: + set @TEMP, rand(3); + if(@TEMP == 1) goto L_Req1; + if(@TEMP == 2) goto L_Req2; + goto L_Req0; + +L_Req0: + mes "[Sandra]"; + mes "\"I need 5 Scorpion Stingers.\""; + next; + goto L_Set; + +L_Req1: + mes "[Sandra]"; + mes "\"I heard a while ago that stingers from scorpions can be used for medical purposes. I need you to help me get 5 Scorpion Stingers.\""; + next; + goto L_Set; + +L_Req2: + mes "[Sandra]"; + mes "\"Bring me 5 Scorpion Stingers. I'll give you something if you do!\""; + next; + goto L_Set; + +L_Set: + set @state, 1; + callsub S_Update_Var; + mes "\"Please get them for me!\""; + goto L_Close; + +L_Progress: + if (countitem("ScorpionStinger") < 5) + goto L_NotEnough; + mes "[Sandra]"; + mes "\"Excellent! You brought me 5 Scorpion Stingers!"; + mes "Here's something for you.\""; + getinventorylist; + if (@inventorylist_count + (countitem("ScorpionStinger") == 5) - (countitem("Arrow") == 0) > 99) + goto L_TooMany; + delitem "ScorpionStinger", 5; + getitem "Bow", 1; + getitem "Arrow", 100; + set @state, 2; + callsub S_Update_Var; + goto L_Close; + +L_NotEnough: + mes "[Sandra]"; + mes "\"Please hurry and bring me 5 Scorpion Stingers.\""; + goto L_Close; + +L_Done: + mes "[Sandra]"; + mes "\"Thank you for all your help!\""; + goto L_Close; + +L_Close: + set @TEMP, 0; + set @state, 0; + close; + +L_TooMany: + next; + mes "[Sandra]"; + mes "\"You don't have room for my reward. I'll wait until you do.\""; + goto L_Close; + +S_Update_Var: + set QUEST_SouthTulimshar, (QUEST_SouthTulimshar & ~(NIBBLE_3_MASK) | (@state << NIBBLE_3_SHIFT)); + return; +} diff --git a/world/map/npc/001-2/shops.txt b/world/map/npc/001-2/shops.txt deleted file mode 100644 index 9d71508d..00000000 --- a/world/map/npc/001-2/shops.txt +++ /dev/null @@ -1,3 +0,0 @@ -// Bartender - -001-2.gat,21,27,0|shop|Bartender#Casino|112,Beer:*175,Cake:*30,CherryCake:*100 diff --git a/world/map/npc/001-2/tathin.txt b/world/map/npc/001-2/tathin.txt new file mode 100644 index 00000000..491eb151 --- /dev/null +++ b/world/map/npc/001-2/tathin.txt @@ -0,0 +1,29 @@ +001-2.gat,28,21,0|script|Tathin|107 +{ + mes "[Tathin]"; + mes "\"Hello what Can I do for you?\""; + next; + + menu + "I'd like to join a party.", L_Give_Party, + "I'd like to create my own party.", L_Give_Make_Party, + "Nothing, I guess.", L_Close; + +L_Give_Party: + mes "[Tathin]"; + mes "\"You'll need to be invited by an existing member of a party to join it. You may also create your own party.\""; + next; + mes "[Tathin]"; + mes "\"Remember, parties cannot share experience if any members are more than 10 levels apart.\""; + menu + "I'd like to create my own party.", L_Give_Make_Party, + "Goodbye.", L_Close; + +L_Give_Make_Party: + mes "[Tathin]"; + mes "\"You can create parties with the 'new' or 'create' commands on the Party tab in the client. Parties need to have unique names.\""; + close; + +L_Close: + close; +} diff --git a/world/map/npc/001-2/tondar.txt b/world/map/npc/001-2/tondar.txt new file mode 100644 index 00000000..5c15dddb --- /dev/null +++ b/world/map/npc/001-2/tondar.txt @@ -0,0 +1,56 @@ +// A professor at Tulimshar's magic academy + +001-2.gat,95,79,0|script|Tondar|168 +{ + mes "[Tondar]"; + mes "\"We're not accepting any new students right now.\""; + if (getskilllv(SKILL_MAGIC) > 0) + goto L_may_ask; + goto L_end; + +L_may_ask: + next; + menu + "Can you teach me a spell?", L_askspell, + "Do you have a magic library?", L_library, + "Are you sure? I can pay well...", L_nopay, + "That's unfortunate.", L_end, + "Goodbye, then.", L_end; + +L_library: + mes "[Tondar]"; + mes "\"Of course we do. It is only for graduate students, alumni, and faculty.\""; + next; + menu + "Thank you, and goodbye.", L_end, + "Nobody else is allowed inside?", L_Next; + +L_Next: + mes "[Tondar]"; + mes "\"Well, it is possible to get a special permit from the headmaster. But he is currently on sabbatical.\""; + close; + +L_askspell: + mes "[Tondar]"; + mes "\"We only teach spells to students.\""; + next; + menu + "Oh, come on... just one little spell!", L_nopay, + "Pretty please?", L_spell, + "I can pay you, too...", L_nopay; + +L_spell: + mes "[Tondar]"; + mes "\"Well, all right; this one can't do much harm. Press your hands together and say `" + getspellinvocation("ask-magic-exp") + "'.\""; + mes "\"This will release a steady flow of magic within you. Focus and try to control it; it is a good meditative practice.\""; + close; + +L_nopay: + mes "[Tondar]"; + mes "The wizard frowns angrily."; + mes "\"Do not tempt me to teach you a different kind of lesson, young one! Begone!\""; + goto L_end; + +L_end: + close; +} diff --git a/world/map/npc/001-2/troupe_leader.txt b/world/map/npc/001-2/troupe_leader.txt deleted file mode 100644 index 64eef7b2..00000000 --- a/world/map/npc/001-2/troupe_leader.txt +++ /dev/null @@ -1,65 +0,0 @@ -// - -001-2.gat,34,23,0|script|Troupe Leader|165 -{ - callfunc "ClearVariables"; - - set @inspector, ((QUEST_Hurnscald & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); - - if (@inspector == 4) goto L_NohMask_Troupe; - if (@inspector == 13) goto L_NohMask_Found; - - mes "[Troupe Leader]"; - mes "\"Hello. I'm the leader of a traveling theater troupe. We'll be staying here in Tulimshar for a while.\""; - goto L_Close; - -L_NohMask_Troupe: - mes "[Troupe Leader]"; - mes "\"Yes, a mask was stolen from us the last night we were in Hurnscald.\""; - next; - menu - "Any ideas on who might have taken it?", L_NohMask_Idea, - "Are you sure one of your troupe members didn't hide it and commit those robberies?", L_NohMask_Accuse, - "Hmm...", L_Close; - -L_NohMask_Idea: - set @inspector, 5; - callsub S_Update_Mask; - mes "[Troupe Leader]"; - mes "\"Hm...I did see an old man hang out near the theater after our last show.\""; - goto L_Close; - -L_NohMask_Accuse: - mes "[Troupe Leader]"; - mes "\"I am absolutely positive. None of my troupe have left the city since we got here. Good day!\""; - goto L_Close; - -L_NohMask_Found: - mes "[Troupe Leader]"; - mes "\"Thank you for finding the mask. You did such a good job, you should keep it.\""; - getinventorylist; - if (@inventorylist_count == 100) goto L_NohMask_TooMany; - mes "[1500 experience points]"; - getexp 1500, 0; - set @inspector, 14; - callsub S_Update_Mask; - getitem "NohMask", 1; - next; - mes "[Troupe Leader]"; - mes "\"We don't need it anymore. We're doing different shows here.\""; - goto L_Close; - -L_NohMask_TooMany: - next; - mes "[Troupe Leader]"; - mes "\"Except, you don't seem to have any room for it. I'll hold onto it for you until you do have room.\""; - goto L_Close; - -L_Close: - set @inspector, 0; - close; - -S_Update_Mask: - set QUEST_Hurnscald, (QUEST_Hurnscald & ~(NIBBLE_3_MASK)) | (@inspector << NIBBLE_3_SHIFT); - return; -} diff --git a/world/map/npc/001-2/wizards.txt b/world/map/npc/001-2/wizards.txt new file mode 100644 index 00000000..587c999c --- /dev/null +++ b/world/map/npc/001-2/wizards.txt @@ -0,0 +1,60 @@ +// Council of Ruling Wizards Room + +// manaseed +001-2.gat,104,19,0|script|Desert Mana Seed#_M|166 +{ + end; +} + +// +001-2.gat,99,22,0|script|Wizard#1|355 +{ + end; +} + +// +001-2.gat,92,24,0|script|Wizard#2|356 +{ + end; +} + +// +001-2.gat,92,30,0|script|Wizard#3|357 +{ + end; +} + +// +001-2.gat,99,32,0|script|Wizard#4|358 +{ + end; +} + +// +001-2.gat,110,22,0|script|Wizard#5|359 +{ + end; +} + +// +001-2.gat,117,24,0|script|Wizard#6|360 +{ + end; +} + +// +001-2.gat,117,30,0|script|Wizard#7|361 +{ + end; +} + +// +001-2.gat,110,32,0|script|Wizard#8|362 +{ + end; +} +// +001-2.gat,104,27,0|script|Arch-Wizard#9|354 +{ + end; +} diff --git a/world/map/npc/001-2/yanis.txt b/world/map/npc/001-2/yanis.txt new file mode 100644 index 00000000..67175704 --- /dev/null +++ b/world/map/npc/001-2/yanis.txt @@ -0,0 +1,47 @@ +// Government official taking care about shop licenses +// involved in quest given by 021-1/imec.txt and 021-2/kylian.txt + +001-2.gat,31,21,0|script|Yanis|107 +{ + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@knowYanisNT; + set @kylian, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); + set @imec, ((QUEST_NorthTulimshar & TWOBIT_4_MASK) >> TWOBIT_4_SHIFT); + set @halloween_npc_id, $@halloween_npc_yanis; + callfunc "TrickOrTreat"; + + goto L_Base_Menu; + +L_Base_Menu: + + mes "[Yanis]"; + mes "\"Welcome. I'm handling issues with trading licenses for the shop owners in Tulimshar. Can I help you?\""; + if (@imec != 1) + menu + "Nothing right now.",L_BeforeClose; + menu + "Imec asked me to bring this petition.",L_Next, + "Nothing right now.",L_BeforeClose; + +L_Next: + mes "[Yanis]"; + mes "\"Imec? I see. Give it to me.\""; + mes "Yanis has a disapproving look on his face. He takes the letter and writes something on another paper."; + next; + mes "[Yanis]"; + mes "\"Here you have a letter of acknowledgement. You can bring that back to Imec. We will have a look at his case.\""; + set @imec, 2; + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_4_MASK)) | (@imec << TWOBIT_4_SHIFT); + goto L_BeforeClose; + +L_BeforeClose: + if (@kylian != 3) + goto L_Close; + next; + mes "You think that this is the person Kylian needs to talk to. You should tell him."; + goto L_Close; + +L_Close: + set @imec, 0; + set @kylian, 0; + close; +} diff --git a/world/map/npc/001-3/_warps.txt b/world/map/npc/001-3/_warps.txt index e8e35ee1..66eb5137 100644 --- a/world/map/npc/001-3/_warps.txt +++ b/world/map/npc/001-3/_warps.txt @@ -1,4 +1,4 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Tulimshar Arena warps -001-3.gat,73,28|warp|To Tulimshar Indoor|-1,-1,001-2.gat,23,24 +001-3.gat,73,28|warp|To Tulimshar Indoor|-1,-1,002-2.gat,74,59 diff --git a/world/map/npc/001-3/guards.txt b/world/map/npc/001-3/guards.txt index c02a9a17..e6b11a0f 100644 --- a/world/map/npc/001-3/guards.txt +++ b/world/map/npc/001-3/guards.txt @@ -16,7 +16,7 @@ L_Sure: mes "\"Ok.\""; next; if(DUELS & $@DuelPvpBit) goto L_FightClub; - warp "001-2.gat", 25, 23; + warp "002-2.gat", 74, 59; close; L_FightClub: diff --git a/world/map/npc/001-3/mapflags.txt b/world/map/npc/001-3/mapflags.txt index 75eb45d1..7f8170b1 100644 --- a/world/map/npc/001-3/mapflags.txt +++ b/world/map/npc/001-3/mapflags.txt @@ -1 +1,2 @@ -001-3.gat|mapflag|nosave|001-2,128,24 +001-3.gat|mapflag|nosave|002-2,74,59 +001-3.gat|mapflag|resave|002-2,74,59 diff --git a/world/map/npc/002-2/_import.txt b/world/map/npc/002-2/_import.txt index 0cccabbf..673ba2d1 100644 --- a/world/map/npc/002-2/_import.txt +++ b/world/map/npc/002-2/_import.txt @@ -3,5 +3,22 @@ map: 002-2.gat npc: npc/002-2/_mobs.txt npc: npc/002-2/_warps.txt +npc: npc/002-2/bakery.txt +npc: npc/002-2/barber.txt +npc: npc/002-2/bleacher.txt +npc: npc/002-2/casino.txt +npc: npc/002-2/dedication.txt +npc: npc/002-2/eurni.txt +npc: npc/002-2/hetchel.txt +npc: npc/002-2/imec.txt +npc: npc/002-2/inya.txt +npc: npc/002-2/kps.txt +npc: npc/002-2/kylian.txt +npc: npc/002-2/latoy.txt npc: npc/002-2/mapflags.txt -npc: npc/002-2/traveler.txt +npc: npc/002-2/omar.txt +npc: npc/002-2/phaet.txt +npc: npc/002-2/rebecca.txt +npc: npc/002-2/shops.txt +npc: npc/002-2/stranger.txt +npc: npc/002-2/troupe_leader.txt diff --git a/world/map/npc/002-2/_warps.txt b/world/map/npc/002-2/_warps.txt index e370ad8f..fc78534b 100644 --- a/world/map/npc/002-2/_warps.txt +++ b/world/map/npc/002-2/_warps.txt @@ -1,4 +1,22 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Sandstorm Desert Indoors warps -002-2.gat,28,30|warp|To Sand Storm|-1,-1,002-1.gat,104,93 +002-2.gat,44,34|warp|Outside|-1,-1,002-1.gat,73,36 +002-2.gat,44,20|warp|First Floor|0,-1,002-2.gat,45,78 +002-2.gat,46,79|warp|First Floor|0,-1,002-2.gat,43,21 +002-2.gat,46,55|warp|Penthouse|0,-1,002-2.gat,44,109 +002-2.gat,45,110|warp|Second Floor|0,-1,002-2.gat,45,56 +002-2.gat,23,110|warp|Outside|-1,-1,002-1.gat,67,30 +002-2.gat,34,20|warp|Casino|-1,-1,002-2.gat,79,69 +002-2.gat,37,20|warp|Theatre|-1,-1,002-2.gat,72,31 +002-2.gat,72,32|warp|First Floor|-1,-1,002-2.gat,37,21 +002-2.gat,79,70|warp|First Floor|-1,-1,002-2.gat,34,21 +002-2.gat,40,20|warp|Salon|-1,-1,002-2.gat,126,35 +002-2.gat,126,36|warp|First Floor|-1,-1,002-2.gat,40,21 +002-2.gat,75,101|warp|Outside|-1,-1,002-1.gat,109,46 +002-2.gat,83,101|warp|Outside|-1,-1,002-1.gat,115,46 +002-2.gat,78,132|warp|Outside|-1,-1,002-1.gat,114,36 +002-2.gat,68,121|warp|Outside|-1,-1,002-1.gat,110,28 +002-2.gat,120,67|warp|Outside|-1,-1,002-1.gat,99,44 +002-2.gat,120,95|warp|Outside|-1,-1,002-1.gat,57,36 +002-2.gat,119,132|warp|To Outside|-1,-1,002-1.gat,57,27 diff --git a/world/map/npc/002-2/bakery.txt b/world/map/npc/002-2/bakery.txt new file mode 100644 index 00000000..b97c41c1 --- /dev/null +++ b/world/map/npc/002-2/bakery.txt @@ -0,0 +1,158 @@ +// The bakery + +// The chef +002-2.gat,21,22,0|script|Riskim|148 +{ + mes "[Riskim]"; + mes ""; + mes "\"Welcome to our bakery!\""; + + callfunc "KadiyaSubquestConsts"; + if ((@Q_kadiya_status == @Q_STATUS_WANTS_CHOCOCAKE) + && (countitem ("MopoxCurePotion") > 0)) + goto L_lace_chococake; + + if ((@Q_kadiya_status == @Q_STATUS_WANTS_ORANGECUPCAKE) + && (countitem ("MopoxCurePotion") > 0)) + goto L_lace_cupcake; + + mes "\"Would you mind bringing me 6 acorns please? I need them to make flour for the chocolate cakes. I will be so delicious!\""; + next; + mes "\"Um, I mean, the cakes will be delicious...\""; + emotion EMOTE_BLUSH; + next; + + set @dq_level, 15; + set @dq_cost, 3; + set @dq_count, 6; + set @dq_name$, "Acorn"; + set @dq_friendly_name$, "acorns"; + set @dq_money, 250; + set @dq_exp, 50; + + callfunc "DailyQuest"; + + next; + mes "\"And don't forget, our bakery is the best!\""; + close; + +L_lace_chococake: + next; + menu + "Thanks! Let me have a look around...", L_End, + "Can you put this potion into a Chocolate Cake?", L_Next, + "Goodbye!", L_End; + +L_Next: + mes "[Riskim]"; + mes ""; + mes "As you show Riskim the potion, he leans back, away from it."; + mes "\"Ooooh, I remember that smell...\""; + mes "\"Elanore's Mopox potion, right? She made me drink that, too...\""; + mes "He chuckles."; + mes "\"Yes, well, you do want to hide that somehow.\""; + next; + mes "[Riskim]"; + mes ""; + mes "\"We'll need extra chocolate for that one. If you can give me ten pieces of chocolate and that potion, plus 400 GP, I will bake you a special Chocolate Cake that hides the taste.\""; + next; + menu + "I will get them for you.", L_End, + "Here you are!", L_Continue, + "Maybe later.", L_End; + +L_Continue: + if (countitem("ChocolateBar") < 10) + goto L_lacking_ingredients; + if (countitem("MopoxCurePotion") < 1) + goto L_lacking_ingredients; + if (Zeny < 400) + goto L_lacking_Zeny; + delitem "MopoxCurePotion", 1; + delitem "ChocolateBar", 10; + getitem "LacedChocolateCake", 1; + set Zeny, Zeny - 400; + + mes "[Riskim]"; + mes ""; + mes "\"Please have a seat!\""; + mes "You watch as Riskim melts the chocolate and stirs in the potion, then glazes a cake with the mixture."; + mes "\"It's a bit more chocolatey than your average chocolate cake, of course...\""; + next; + mes "[Riskim]"; + mes ""; + mes "Riskim hands you the cake."; + mes "\"Here you are. I hope that this works.\""; + close; + +L_lacking_Zeny: + mes "[Riskim]"; + mes ""; + mes "\"I'm sorry, but I have to charge 400 GP.\""; + close; + +L_lacking_ingredients: + mes "[Riskim]"; + mes ""; + mes "\"Sorry, but I need ten Chocolate Bars AND your cure potion for this. Please come back later when you have everything.\""; + close; + +L_lace_cupcake: + next; + menu + "Thanks! Let me have a look around...", L_End, + "Can you put this potion into an Orange Cupcake?", L_More, + "Goodbye!", L_End; + +L_More: + mes "[Riskim]"; + mes ""; + mes "\"Orange Cupcakes? Oh dear... I'm sorry, but I have a very bad orange allergy.\""; + next; + mes "[Riskim]"; + mes ""; + mes "\"Perhaps the Chef at Dimond's Cove can help you? We get all our cupcakes from him.\""; + next; + goto L_End; + +L_End: + close; +} + +// Server +002-2.gat,28,31,0|script|Sara|108 +{ + mes "[Sara]"; + mes ""; + mes "\"Hello!\""; + close; +} + +// The cashier +002-2.gat,25,22,0|shop|Drabur|112,WhiteCake:*500,ChocolateCake:*550,OrangeCake:*600,AppleCake:*600,Cake:*30,CherryCake:*100,OrangeCupcake:*270,Milk:*1500,XmasCake:*70 + +// Bus boy +002-2.gat,21,28,0|script|Iormo|160 +{ + mes "[Iormo]"; + mes ""; + mes "\"This room can get messy.\""; + close; +} + +// An old couple eating at the bakery +002-2.gat,24,27,0|script|Rynoh|159 +{ + mes "[Rynoh]"; + mes ""; + mes "\"The cakes may be expensive, but they sure are delicious!\""; + close; +} + +002-2.gat,26,27,0|script|Ontas|154 +{ + mes "[Ontas]"; + mes ""; + mes "\"We come here every week. This place has some of the best bread I've ever eaten!\""; + close; +} diff --git a/world/map/npc/002-2/barber.txt b/world/map/npc/002-2/barber.txt new file mode 100644 index 00000000..eb1a5821 --- /dev/null +++ b/world/map/npc/002-2/barber.txt @@ -0,0 +1,12 @@ +// A barber (later we can make it so certain styles need to come from him, for a price) +002-2.gat,117,30,0|script|Issay|156 +{ + mes "[Issay the Barber]"; + mes "\"Do you need a change of style?\""; + next; + callfunc "Barber"; + mes "[Issay the Barber]"; + mes "\"Come again!\""; + close; +} + diff --git a/world/map/npc/002-2/bleacher.txt b/world/map/npc/002-2/bleacher.txt new file mode 100644 index 00000000..3391a62c --- /dev/null +++ b/world/map/npc/002-2/bleacher.txt @@ -0,0 +1,293 @@ +// + +002-2.gat,72,92,0|script|Candide|156 +{ + mes "[Candide]"; + mes "\"I've figured out how that volcanic ash bleaches cloth."; + mes "I could do it for you, but I'll need three piles of ash and 5,000 GP for supplies per item.\""; + next; + + if (countitem("PileOfAsh") < 3) goto L_no_ash; + + if (Zeny < 5000) goto L_no_money; + + menu + "I'd like to bleach something.", L_bleach_menu, + "No thanks.", L_Close; + +L_bleach_menu: + mes "[Candide]"; + mes "\"What would you like to bleach?\""; + next; + + menu + "Cotton shirt.", L_cottonshirt, + "Contributor shirt.", L_contributor, + "V-Neck sweater.", L_vneck, + "Turtleneck sweater.", L_tneck, + "Cotton shorts.", L_shorts, + "Cotton trousers.", L_trousers, + "Cotton skirt.", L_skirt, + "Miniskirt.", L_miniskirt, + "Tank top .", L_tanktop, + "Short tank top.", L_tanktop_short, + "Silk robe.", L_robe, + "Cotton headband.", L_cotton_headband, + "Desert hat.", L_desert_hat, + "Cotton boots.", L_cotton_boots, + "Cotton gloves.", L_cotton_gloves, + "Rabbit ears.", L_rabbit_ears, + "Wizard hat.", L_wizard_hat, + "Bowler hat.", L_bowler_hat, + "Sorcerer robe.", L_sorcerer_robe, + "Bowler hat (brown).", L_bowler_hat_brown, + "Fine dress.", L_fine_dress, + "Cotton cloth.", L_cotton_cloth, + "Nevermind.", L_Close; + +L_contributor: + set @normal, 1178; + set @dyeBase, 5131; + goto L_choose_color; + +L_cottonshirt: + set @normal, 1202; + set @dyeBase, 2050; + goto L_choose_color; + +L_vneck: + set @normal, 624; + set @dyeBase, 2060; + goto L_choose_color; + +L_tneck: + set @normal, 564; + set @dyeBase, 2070; + goto L_choose_color; + +L_shorts: + set @normal, 586; + set @dyeBase, 2110; + goto L_choose_color; + +L_trousers: + set @normal, 648; + set @dyeBase, 2180; + goto L_choose_color; + +L_skirt: + set @normal, 632; + set @dyeBase, 2100; + goto L_choose_color; + +L_miniskirt: + set @normal, 771; + set @dyeBase, 2170; + goto L_choose_color; + +L_tanktop: + set @normal, 688; + set @dyeBase, 2090; + goto L_choose_color; + +L_tanktop_short: + set @normal, 689; + set @dyeBase, 2120; + goto L_choose_color; + +L_robe: + set @normal, 720; + set @dyeBase, 2080; + goto L_choose_color; + +L_cotton_headband: + set @normal, 724; + set @dyeBase, 2140; + goto L_choose_color; + +L_desert_hat: + set @normal, 723; + set @dyeBase, 2130; + goto L_choose_color; + +L_cotton_boots: + set @normal, 735; + set @dyeBase, 2150; + goto L_choose_color; + +L_cotton_gloves: + set @normal, 741; + set @dyeBase, 2160; + goto L_choose_color; + +L_rabbit_ears: + set @normal, 1255; + set @dyeBase, 2190; + goto L_choose_color; + +L_wizard_hat: + set @normal, 4028; + set @dyeBase, 2200; + goto L_choose_color; + +L_bowler_hat: + set @normal, 4030; + set @dyeBase, 2210; + goto L_choose_color; + +L_sorcerer_robe: + mes "[Candide]"; + mes "\"Which one?\""; + next; + menu + "A red lined one.", L_red_lined_sorcerer_robe, + "A green lined one.", L_green_lined_sorcerer_robe, + "A dark blue lined one.", L_dark_blue_lined_sorcerer_robe, + "A yellow lined one.", L_yellow_lined_sorcerer_robe, + "A light blue lined one.", L_light_blue_lined_sorcerer_robe, + "A pink lined one.", L_pink_lined_sorcerer_robe, + "A black lined one.", L_black_lined_sorcerer_robe, + "An orange lined one.", L_orange_lined_sorcerer_robe, + "A purple lined one.", L_purple_lined_sorcerer_robe, + "A dark green lined one.", L_dark_green_lined_sorcerer_robe, + "A white lined one.", L_white_lined_sorcerer_robe, + "Nevermind.", L_Close; + +L_red_lined_sorcerer_robe: + set @normal, 798; + set @dyeBase, 2220; + goto L_choose_color; + +L_green_lined_sorcerer_robe: + set @normal, 5010; + set @dyeBase, 5000; + goto L_choose_color; + +L_dark_blue_lined_sorcerer_robe: + set @normal, 5021; + set @dyeBase, 5011; + goto L_choose_color; + +L_yellow_lined_sorcerer_robe: + set @normal, 5032; + set @dyeBase, 5022; + goto L_choose_color; + +L_light_blue_lined_sorcerer_robe: + set @normal, 5043; + set @dyeBase, 5033; + goto L_choose_color; + +L_pink_lined_sorcerer_robe: + set @normal, 5054; + set @dyeBase, 5044; + goto L_choose_color; + +L_black_lined_sorcerer_robe: + set @normal, 5065; + set @dyeBase, 5055; + goto L_choose_color; + +L_orange_lined_sorcerer_robe: + set @normal, 5076; + set @dyeBase, 5066; + goto L_choose_color; + +L_purple_lined_sorcerer_robe: + set @normal, 5087; + set @dyeBase, 5077; + goto L_choose_color; + +L_dark_green_lined_sorcerer_robe: + set @normal, 5098; + set @dyeBase, 5088; + goto L_choose_color; + +L_white_lined_sorcerer_robe: + set @normal, 5109; + set @dyeBase, 5099; + goto L_choose_color; + +L_bowler_hat_brown: + set @normal, 800; + set @dyeBase, 2230; + goto L_choose_color; + +L_fine_dress: + set @normal, 870; + set @dyeBase, 2240; + goto L_choose_color; + +L_cotton_cloth: + set @normal, 660; + set @dyeBase, 2250; + goto L_choose_color; + +L_choose_color: + mes "[Candide]"; + mes "\"And the color?\""; + next; + + menu + "Red.", L_MenuItems, + "Green.", L_MenuItems, + "Dark Blue.", L_MenuItems, + "Yellow.", L_MenuItems, + "Light Blue.", L_MenuItems, + "Pink.", L_MenuItems, + "Black.", L_MenuItems, + "Orange.", L_MenuItems, + "Purple.", L_MenuItems, + "Dark Green.", L_MenuItems; + +L_MenuItems: + set @del, @dyeBase + @menu - 1; + + if (countitem(@del) == 0) goto L_no_item; + + if (countitem("PileOfAsh") < 3) goto L_no_ash; + + if (Zeny < 5000) goto L_no_money; + + delitem @del, 1; + getitem @normal, 1; + delitem "PileOfAsh", 3; + set Zeny, Zeny - 5000; + goto L_again; + +L_again: + mes "[Candide]"; + mes "\"Would you like to bleach something else?\""; + next; + + menu + "Yes.", L_bleach_menu, + "No.", L_Close; + +L_no_item: + mes "[Candide]"; + mes "\"You don't have one of those.\""; + next; + + goto L_again; + +L_no_ash: + mes "[Candide]"; + mes "\"You don't have enough ash for me to bleach anything."; + mes "I need three piles.\""; + goto L_Close; + +L_no_money: + mes "[Candide]"; + mes "\"You don't have enough gold for me to bleach anything."; + mes "I need 5,000 GP for supplies.\""; + goto L_Close; + +L_Close: + mes "[Candide]"; + mes "\"Come again.\""; + set @normal, 0; + set @dyeBase, 0; + set @del, 0; + close; +} diff --git a/world/map/npc/002-2/casino.txt b/world/map/npc/002-2/casino.txt new file mode 100644 index 00000000..4733bb63 --- /dev/null +++ b/world/map/npc/002-2/casino.txt @@ -0,0 +1,208 @@ +// Casino + +// takes part in quest given by 021-2/kylian.txt +002-2.gat,79,68,0|script|#CasinoEntrance|32767,13,0 +{ + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@knowCasinoNT; + set @kylian, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); + if (@kylian != 6) + goto L_End; + message strcharinfo(0), "You wonder if Kylian would like to visit the casino in the evening."; + goto L_End; + +L_End: + set @kylian, 0; + end; +} + +002-2.gat,86,29,0|script|Valdo|117 +{ + mes "[Valdo the Worker]"; + mes "\"Please let me work. I'm really in a hurry!\""; + close; +} + +002-2.gat,84,62,0|script|Slots#1|400 +{ + callfunc "SlotMachine"; + close; +} + +002-2.gat,86,62,0|script|Slots#2|400 +{ + callfunc "SlotMachine"; + close; +} + +002-2.gat,88,62,0|script|Slots#3|400 +{ + callfunc "SlotMachine"; + close; +} + +002-2.gat,78,56,0|shop|MoneyChanger|124,CasinoCoins:*10 + +002-2.gat,75,60,0|script|BlackJack|107 +{ + mes "[Croupier]"; + mes "\"Would you like to play Black Jack?"; + mes "You will need 15 casino coins.\""; + next; + menu + "Yes", L_Begin, + "No", L_Close; + +L_Begin: + if(countitem("CasinoCoins") < 15) goto L_NoCoin; + delitem "CasinoCoins", 15; + set @croupier, rand(0, 4); + set @croupier, @croupier + 17; + set @player, rand(4, 21); + mes "\"You got " + @player + " with your cards."; + if(@player == 21) goto L_End; + mes "Do you want another card?\""; + next; + menu + "Yes", L_Another, + "No", L_End; + +L_Another: + set @tempace, rand(2, 11); + if (@tempace == 11) goto L_Ace; + set @player, @player + @tempace; + if (@player > 21) goto L_Lost; + if (@player == 21) goto L_End; + mes "\"You got " + @player + " with your cards."; + mes "Do you want another card?\""; + next; + menu + "Yes", L_Another, + "No", L_End; + +L_End: + if (@player <= @croupier) goto L_Lost; + mes "\"Congratulations, you won!"; + mes "I had " + @croupier + "."; + mes "You get 45 casino coins.\""; + getitem "CasinoCoins", 45; + goto L_Close; + +L_NoCoin: + mes "\"You need at least 15 coins.\""; + goto L_Close; + +L_Lost: + mes "\"I'm sorry but you lost."; + mes "You got " + @player + " with your cards."; + mes "I had " + @croupier + ".\""; + goto L_Close; + +L_Ace: + set @player, @player + 11; + if (@player > 21) set @player, @player - 10; + if (@player > 21) goto L_Lost; + if (@player == 21) goto L_End; + mes "You got " + @player + " with your cards."; + mes "Do you want another card?"; + next; + menu + "Yes", L_Another, + "No", L_End; + +L_Close: + mes "\"As you wish.\""; + set @croupier, 0; + set @player, 0; + set @tempace, 0; + close; +} + +002-2.gat,69,67,0|script|Roulette|107 +{ + mes "[Croupier]"; + mes "\"Good evening monsieur..."; + mes "How much would you like to bet?\""; + next; + menu + "1 coin", L_b1, + "5 coins", L_b5, + "10 coins", L_b10, + "50 coins", L_b50, + "100 coins", L_b100, + "Maybe I'll play later", L_Close; + +L_b1: + set @bet, 1; + goto L_Check; + +L_b5: + set @bet, 5; + goto L_Check; + +L_b10: + set @bet, 10; + goto L_Check; + +L_b50: + set @bet, 50; + goto L_Check; + +L_b100: + set @bet, 100; + goto L_Check; + +L_Check: + if(countitem("CasinoCoins") < @bet) goto L_NoCoin; + delitem "CasinoCoins", @bet; + menu + "Choose a color", L_PickColor, + "Choose a number", L_Number; + +L_PickColor: + menu + "Black", L_Color, + "Red", L_Color; + +L_Color: + set @color,rand(2); + if(@color == 1) goto L_Lost; + mes "You won!"; + getitem "CasinoCoins", @bet * 2; + goto L_Close; + +L_Number: + menu + "0", L_Menuitems, "00", L_Menuitems, "1", L_Menuitems, "2", L_Menuitems, "3", L_Menuitems, "4", L_Menuitems, "5", L_Menuitems, "6", L_Menuitems, "7", L_Menuitems, "8", L_Menuitems, + "9", L_Menuitems, "10", L_Menuitems, "11", L_Menuitems, "12", L_Menuitems, "13", L_Menuitems, "14", L_Menuitems, "15", L_Menuitems, "16", L_Menuitems, "17", L_Menuitems, "18", L_Menuitems, + "19", L_Menuitems, "20", L_Menuitems, "21", L_Menuitems, "22", L_Menuitems, "23", L_Menuitems, "24", L_Menuitems, "25", L_Menuitems, "26", L_Menuitems, "27", L_Menuitems, "28", L_Menuitems, + "29", L_Menuitems, "30", L_Menuitems, "31", L_Menuitems, "32", L_Menuitems, "33", L_Menuitems, "34", L_Menuitems, "35", L_Menuitems, "36", L_Menuitems; + +L_Menuitems: + if (@menu == 1) set @number, 0; + if (@menu == 2) set @number, 37; + if (@menu >= 3) set @number, @menu - 2; + + set @roulette, rand(38); + if (@roulette == 37) mes "The ball stopped on 00"; + if (@roulette < 37) mes "The ball stopped on " + @roulette; + if (@number != @roulette) goto L_Lost; + mes "\"You won!\""; + getitem "CasinoCoins", @bet * 10; + goto L_Close; + +L_NoCoin: + mes "\"You don't have enough coins.\""; + goto L_Close; + +L_Lost: + mes "\"I'm sorry, you lost.\""; + goto L_Close; + +L_Close: + mes "Come again."; + set @number, 0; + set @roulette, 0; + set @color, 0; + set @bet, 50; + close; +} diff --git a/world/map/npc/002-2/dedication.txt b/world/map/npc/002-2/dedication.txt new file mode 100644 index 00000000..4ab9ba22 --- /dev/null +++ b/world/map/npc/002-2/dedication.txt @@ -0,0 +1,10 @@ +// Dedication to Irene Christina + +002-2.gat,116,123,0|script|#IreneDedication|400 +{ + mes "~ Irene Christina ~"; + mes "The song in this house is dedicated to Irene."; + next; + mes "She had seen only twenty hours of this world when she died in her father's arms."; + close; +} diff --git a/world/map/npc/002-2/eurni.txt b/world/map/npc/002-2/eurni.txt new file mode 100644 index 00000000..a084acbc --- /dev/null +++ b/world/map/npc/002-2/eurni.txt @@ -0,0 +1,45 @@ +// + +002-2.gat,22,77,0|script|Eurni|136 +{ + set @halloween_npc_id, $@halloween_npc_eurni; + callfunc "TrickOrTreat"; + + if (BaseLevel < 10) goto L_TooYoung; + if (Zeny < 10000) goto L_NoMoney; + + mes "[Eurni the Surgeon]"; + mes "\"Are you tired of being what you are?\""; + next; + + mes "[Eurni the Surgeon]"; + mes "\"Would you maybe be interested in a sex change?\""; + next; + + mes "[Server]"; + mes "Warning: All characters under this login will be changed. Once it's done, you will be kicked from the server. Don't panic, as everything is fine."; + next; + menu + "Please do, my dear...", L_Change, + "Leave alone my family treasure!", L_Close; + +L_Change: + if (Zeny < 10000) + goto L_NoMoney; + set Zeny, Zeny - 10000; + changesex; + close; + +L_TooYoung: + mes "[Eurni the Surgeon]"; + mes "\"Move along, kid.\""; + close; + +L_NoMoney: + mes "[Eurni the Surgeon]"; + mes "\"You don't have enough to pay for my services.\""; + close; + +L_Close: + close; +} diff --git a/world/map/npc/002-2/hetchel.txt b/world/map/npc/002-2/hetchel.txt new file mode 100644 index 00000000..b595bd88 --- /dev/null +++ b/world/map/npc/002-2/hetchel.txt @@ -0,0 +1,445 @@ +// Hetchel the Silk Weaver +// bh28 +// 2013-03, GPLv2. +// +// Hetchel is referred to by Lora Tay. +// She weaves and sells standard double elbow square silk sheets. +// She could also sell, dyed sheets, Silk robes from Lora Tay. +// (6000 with cocoons, 40000 (?) with no cocoons). +// +// @wg_state: variable indicating winter gloves status. +// Lora Tay proposes silk Robe if (@wg_state>= 11). +// @SHEET_COCOONS_NR:* Number of cocoons required per sheet. +// Might ne calculated from @ROBE_COCOONS_NR/@ROBE_SHEETS_NR +// Actually: 150∕6 = 25 +// @SHEET_ZENY :* Money to pay per sheet: A sixth of 10000-2*500-6000 +// @SheetCount Number of sheets to buy (variable). +// +// @silkpants_state: variable indicating silkpant quest status. + +002-2.gat,76,92,0|script|Hetchel|376 +{ + set @wg_state, ((QUEST_WG_state & BYTE_0_MASK) >> BYTE_0_SHIFT); + set @spants_state, ((QUEST_WG_state & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); + set @SHEET_COCOONS_NR, 25; + set @SHEET_ZENY, 500; + set @spants_minlvl, 45; + setarray @spants_req_hmn$, "Silk Cocoons", "Pieces of Cotton Cloth", "Silk Headbands"; + setarray @spants_req$, "SilkCocoon", "CottonCloth", "SilkHeadband"; + setarray @spants_req_amt, 154, 14, 2; + set @spants_reward, 45000; + set @spants_job_reward, 10000; + set @SheetCount, 0; + + if (@wg_state < 11) + goto L_WG_quest_not_done; + if ( BaseLevel > @spants_minlvl && @spants_state < 1 ) goto L_Spants_Cry; + if ( @spants_state == 1 ) goto L_Spants_Cry_2; + if ( @spants_state == 2 ) goto L_Spants_Start; + if ( @spants_state > 2 && @spants_state < 8 ) goto L_Spants_Steal; + if ( @spants_state == 8 ) goto L_Spants_Make; + + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; + menu + "Sorry to bother, I'm just visiting.", L_Close, + "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_main_menu; + +L_WG_quest_not_done: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Hello I am Hetchel, I weave fine textiles."; + mes "My best client is Lora Tay, at Dimond's."; + mes "What can I do for you?\""; + menu + "Sorry to bother, I'm new to this country, just visting.", L_Close, + "What are you selling?", L_main_menu; + +L_Spants_Cry: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; + menu + "Sorry to bother, I'm just visiting.", L_Close, + "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_Spants_Cry_Cont_1; + +L_Spants_Cry_2: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; + menu + "Sorry to bother, I'm just visiting.", L_Close, + "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_main_menu, + "Hey you have been crying so badly, can I help you somehow?", L_Spants_Reply_Cry, + "Give Hetchel something to dry her tears", L_Spants_Wipe_Tears; + +L_Spants_Start: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; + menu + "Sorry to bother, I'm just visiting.", L_Close, + "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_main_menu, + "So you are looking for new goals in your life?", L_Spants_No_Cry; + +L_Spants_Steal: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; + menu + "Sorry to bother, I'm just visiting.", L_Close, + "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_main_menu, + "About the Pants...", L_Spants_Steal_Cont; + +L_Spants_Make: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; + menu + "Sorry to bother, I'm just visiting.", L_Close, + "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_main_menu, + "Hey what about the Pants you were planning to make?", L_Spants_Make_Cont; + +L_Spants_Cry_Cont_1: + mes "You notice how the tiny woman blushes, she suddenly bursts into tears."; + next; + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Hello\""; + mes "Hetchel hides her face in her hands"; + mes ""; + mes ""; + menu + "\"Hey, what is the problem?\"", L_Spants_Reply_Cry, + "Give Hetchel something to dry her tears", L_Spants_Wipe_Tears, + "\"Oh really? Just sell me some Silk Sheets if you have them\"", L_main_menu; + +L_Spants_Wipe_Tears: + mes "Hand Hetchel a (please type the Item you want to give her)"; + next; + mes "This is case sensitive. Also do not enter whitespaces."; + input @spants_wipe_thingy$; + if (@spants_wipe_thingy$ == "") goto L_Spants_Wrong; + if (countitem(@spants_wipe_thingy$) < 1) goto L_Spants_No_Item; + if (@spants_wipe_thingy$ == "RedCottonCloth") goto L_Spants_Wipe_Tears_Cont; + if (@spants_wipe_thingy$ == "RedHitchhikersTowel") goto L_Spants_Wipe_Tears_Towel; + mes "Hetchel looks at you, then looks at the" + @spants_wipe_thingy$ + "."; + mes "She hangs her head and weeps more"; + mes "Red is the only color I have ever loved, bring me something red to dry my tears"; + goto L_Close; + +L_Spants_Wipe_Tears_Towel: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"No, I recognize this towel, it is one of those warping towels, are you trying to mess with me?\""; + goto L_Close; + +L_Spants_Wrong: + mes "It appears you forgot to type the item you want to give."; + goto L_Close; + +L_Spants_No_Item: + mes "Oh you do not have it."; + goto L_Close; + +L_Spants_Wipe_Tears_Cont: + mes "Hetchel dries her tears with the Red Piece of Cloth you gave her."; + mes "This seems to have consoled her."; + delitem "RedCottonCloth", 1; + set @spants_state, 2; + callsub S_Update_Spants; + goto L_Spants_No_Cry; + +L_Spants_No_Cry: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Oh thank you my dear friend."; + mes "Yes, to some extent."; + next; + mes "I am just so sad because I realized that this is going to be the thing I will be doing for the rest of my life\""; + menu + "\"You are still young, Hetchel, You can still accomplish things\"", L_Spants_Cry_Cont_2, + "\"Yes, you are probably correct.\"", L_Close; + +L_Spants_Cry_Cont_2: + mes "[Hetchel the weaver]"; + mes ""; + mes "Hetchel thinks for a while"; + mes ""; + mes "\"Oh my friend, I have been dreaming of making a garment of my own."; + mes "It always bothered me to see all those wizards and witches here being naked under their cloaks\""; + mes "\"They must be so embarrassed - they are true heroes to give up their dignity to be able to fight the perils of this world\""; + mes "Hetchel sobs"; + menu + "\"So you want to make pants for mages?\"", L_Spants_Cry_Cont_3, + "\"This sounds ridiculous. Good Bye.\"", L_Close; + +L_Spants_Cry_Cont_3: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Ok, so I figured I could make some trousers like Lora Tay makes but from the much finer Material the Silk Worms are making for us\""; + mes "\"But I really need the base plans for the trousers, otherwise I do not know how to attempt this."; + mes "Can you get me those plans from her?\""; + menu + "\"No, sorry I am too busy for that\"", L_Close, + "\"Of course!\"", L_Spants_Cry_Cont_4; + +L_Spants_Cry_Cont_4: + set @spants_state, 3; + callsub S_Update_Spants; + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Oh wait! I am not sure if it is such a good idea to ask her about that, I think she would not give the plans to you anyway."; + mes "Maybe you can find a way to get those plans on a different way?"; + mes "I think there are some people in Hurnscald who have their means of getting you every possible item there is\""; + next; + mes "[Hetchel the weaver]"; + mes ""; + mes "Please please please - I need those plans"; + goto L_Close; + +L_Spants_Reply_Cry: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"...\""; + set @spants_state, 1; + callsub S_Update_Spants; + goto L_Close; + + +L_Spants_Steal_Cont: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Have you gotten hold of the plans?\""; + menu + "Yes I have them somewhere here", L_Spants_Steal_Cont2, + "No, not yet", L_Close; + +L_Spants_Steal_Cont2: + if @spants_state < 7 goto L_Spants_No_Item; + set @spants_state, 8; + callsub S_Update_Spants; + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Oh this is miraculous\""; + mes ""; + mes "Hetchel sheds some tears of joy"; + next; + mes "You hand her the crumpled plans Crastur the Ugly gave you."; + next; + mes "[Hetchel the weaver]"; + mes ""; + mes "\"I need to figure out how to do this now... \""; + next; + mes "Hetchel adjusts her glasses and reads carefully"; + next; + mes "She seems to be very busy, maybe you should come back later."; + goto L_Close; + +L_Spants_Make_Cont: + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Yes, I already made a prototype but it cost me a lot of time and effort."; + mes "I can give it to you if you are willing to pay for my expenses though.\""; + menu + "What do you want for those silken pants?", L_Spants_Make_Cont_2, + "No, I am not particularly interested.", L_Close; + +L_Spants_Make_Cont_2: + if(getarraysize(@spants_req_amt) < 3 || getarraysize(@spants_req$) < 3 || getarraysize(@spants_req_hmn$) < 3) + goto L_Spants_Error; + mes "[Hetchel the weaver]"; + mes ""; + mes "\"I need you to bring me " + @spants_req_amt[0] +" "+ @spants_req_hmn$[0] + ", " + @spants_req_amt[1] +" "+ @spants_req_hmn$[1] + " and " + @spants_req_amt[2] +" "+ @spants_req_hmn$[2]; + next; + mes "You will not have to pay for my time, I am so proud to have accomplished this on my own!\""; + menu + "\"I have those items with me\"", L_Spants_Pay, + "\"I am still looking for them\"", L_Close, + "\"What do you need again?\"", L_Spants_Make_Cont_2; + +L_Spants_Pay: + if (countitem(@spants_req$[0]) < @spants_req_amt[0] || countitem(@spants_req$[1]) < @spants_req_amt[1] || countitem(@spants_req$[2]) < @spants_req_amt[2]) + goto L_Spants_No_Item; + getinventorylist; + if (inventorylist_count == 100) goto L_TooMany; + mes "Hetchel takes your items."; + delitem @spants_req$[0], @spants_req_amt[0]; + delitem @spants_req$[1], @spants_req_amt[1]; + delitem @spants_req$[2], @spants_req_amt[2]; + getitem "SilkPants", 1; + set @spants_state, 9; + callsub S_Update_Spants; + next; + mes "[Hetchel the weaver]"; + mes ""; + mes "\"Here are your pants my dear."; + mes "Keep them safe I do not know if I will ever try this again.\""; + getexp @spants_reward, @spants_job_reward; + goto L_Close; + +L_Spants_Error: + mes "Something went wrong in the script, please inform a developer about that"; + close; + +L_main_menu: + mes "[Hetchel]"; + mes "\"I have some silk sheets: double-elbow squares.\""; + menu + "I'm not interested at the moment, maybe later; thanks anyway.", L_Close, + "Can I buy some?", L_Next; +// "Do you have a silk robe I could buy?", L_robe, +// "Goodbye.", L_Close; + +L_Next: + mes "[Hetchel]"; + mes ""; + mes "\"Sure but you need to provide raw materials."; + mes "I'll need " + @SHEET_COCOONS_NR +" silk cocoons per sheet,"; + mes "and also " + @SHEET_ZENY +" GP per sheet for my work.\""; + next; + if (countitem("SilkCocoon") == 0) + goto L_sheet_no_cocoon; + goto L_sheet_menu; + +L_sheet_menu: + menu + "I have what you asked for.", L_Next1, + "Sorry I didn't pay attention enough, what do you need?", L_how_many_cocoons, + "Oops! Sorry, I'll come back soon with them.", L_Close; + +L_Next1: + mes "[Hetchel]"; + mes ""; + mes "\"How many would you like?\""; + input @SheetCount; + if (@SheetCount == 0) + goto L_zero_sheet; + if (countitem("SilkCocoon") < @SheetCount * @SHEET_COCOONS_NR) + goto L_sheet_missing_cocoons; + if (Zeny < @SheetCount * @SHEET_ZENY) + goto L_sheet_missing_Zeny; + getinventorylist; + if (@inventorylist_count == 100 && countitem("SilkSheet") < 1 && countitem("SilkCocoon") > @SheetCount * @SHEET_COCOONS_NR) + goto L_TooMany; + set Zeny, Zeny - @SheetCount * @SHEET_ZENY; + delitem "SilkCocoon", @SheetCount * @SHEET_COCOONS_NR; + getitem "SilkSheet", @SheetCount; + mes "[Hetchel]"; + mes ""; + mes "\"Thank you, I hope the sheets will fit your needs."; + mes "Please greet Lora for me when you see her.\""; + emotion EMOTE_HAPPY; + goto L_Close; + +L_sheet_missing_cocoons: + mes "[Hetchel]"; + mes ""; + mes "\"I'm sorry, but I need " + @SheetCount * @SHEET_COCOONS_NR + ", not " + countitem("SilkCocoon") + ".\""; + goto L_Close; + +L_sheet_missing_Zeny: + mes "[Hetchel]"; + mes ""; + mes "\"No, no no. The way this works is that you give me the GP first and I give you the sheets afterwards."; + mes "You're " + (@SheetCount * @SHEET_ZENY - Zeny) + " GP short, so come back when you can afford the sheets you asked for!\""; + goto L_Close; + +L_how_many_cocoons: + mes "[Hetchel]"; + mes ""; + mes "\"I need an average of " + @SHEET_COCOONS_NR + " cocoons per sheet"; + mes "and also " + @SHEET_ZENY + " GP per sheet for my work.\""; + next; + goto L_sheet_menu; + +L_sheet_no_cocoon: + mes "[Hetchel]"; + mes ""; + mes "\"You don't have any cocoon? I'm sorry I can't do anything for you.\""; + menu + "I'll seek for them.", L_Close, + "Where can I get cocoons?", L_Next2; + +L_Next2: + mes "[Hetchel]"; + mes "\"Silk cocoons come from Silkworms. Silkworms live in the woodland area around Hurnscald."; + mes "Silkworms like especially woods and dark areas. You can go there by ferry.\""; + goto L_Close; + +//L_robe: +// mes "[Hetchel]"; +// mes "\"I am not a seamstress but I have a few silk robes from Lora Tay left."; +// mes "It is not your size as Lora made them for me, but Tondar was kind enough"; +// mes "to cast a spell on it, so that it will fit to you as soon as you wear it."; +// mes "However his prices are not that low.\""; +// next; +// goto L_main_menu; + +L_zero_sheet: + mes "[Hetchel]"; + mes ""; + mes "\"It's the best way to get quickly served!\""; + goto L_Close; + +L_TooMany: + mes "[Hetchel]"; + mes ""; + mes "\"Your bag hasn't room enough. Store some things and come back.\""; + goto L_Close; + +S_Update_Spants: + set QUEST_WG_state, (QUEST_WG_state & ~(NIBBLE_2_MASK) | (@spants_state << NIBBLE_2_SHIFT)); + return; + +L_Close: + set QUEST_WG_state, (QUEST_WG_state & ~(NIBBLE_2_MASK) | (@spants_state << NIBBLE_2_SHIFT)); + set @wg_state, 0; + set @spants_state, 0; + set @spants_minlvl, 0; + set @spants_reward, 0; + set @spants_job_reward, 0; + set @spants_wipe_thingy, ""; + set @SHEET_COCOONS_NR, 0; + set @SHEET_ZENY, 0; + set @SheetCount, 0; + set @wg_state, 0; + close; +} + +002-2.gat,73,95,0|script|HetchelDebug|376 +{ +set @wg_state, ((QUEST_WG_state & BYTE_0_MASK) >> BYTE_0_SHIFT); +set @spants_state, ((QUEST_WG_state & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); + +mes "Lora Tay Quest State: "+ @wg_state; +mes "Silk Pants Quest State: "+ @spants_state; + +menu + "Set Lora Tay Quest State", L_Lora_Tay, + "Set Silk Pants Quest State", L_Spants, + "Close", L_Close; + +L_Lora_Tay: + mes "Set Lora Tay Visited State (0 - reset , 11 - enough for SilkPants Quest)"; + input @wg_state; + goto L_Close; + +L_Spants: + mes "Set SilkPants Quest State (0 - reset)"; + input @spants_state; + goto L_Close; + +L_Close: + set QUEST_WG_state, (QUEST_WG_state & ~(BYTE_0_MASK) | (@wg_state << BYTE_0_SHIFT)); + set @wg_state, 0; + set QUEST_WG_state, (QUEST_WG_state & ~(NIBBLE_2_MASK) | (@spants_state << NIBBLE_2_SHIFT)); + set @spants_state, 0; + close; + +OnInit: + if (!debug) + disablenpc "HetchelDebug"; + end; +} diff --git a/world/map/npc/002-2/imec.txt b/world/map/npc/002-2/imec.txt new file mode 100644 index 00000000..851dd49b --- /dev/null +++ b/world/map/npc/002-2/imec.txt @@ -0,0 +1,113 @@ +// Merchant got his shop shot down due to selling poison and asks the player for some errand +// after finishing this, daily quest with scorpion stingers +// Using bit 8 and 9 of QUEST_NorthTulimshar (first half of nibble 2) +// author: Jenalya +002-2.gat,36,75,0|script|Imec|162 +{ + set @state, ((QUEST_NorthTulimshar & TWOBIT_4_MASK) >> TWOBIT_4_SHIFT); + set @EXP, 90; + set @money, 500; + + if (@state >= 3) goto L_Stingers; + if (@state == 2) goto L_Return; + if (@state == 1) goto L_Bring; + + mes "[Imec]"; + mes "\"The Wizard's Council shut down my shop!"; + mes "They said I was selling illegal things, but what's so illegal about poison?\""; + next; + mes "\"Anyway, I hope to get a merchant's permit again... One of these days...\""; + mes "He looks at you."; + next; + mes "[Imec]"; + mes "\"You can do an errand for me. I just finished writing a petition to the Council about my shop."; + mes "If you bring it to the government building near the docks, I'll give you a small reward.\""; + goto L_Offer; + +L_Offer: + menu + "Where are the docks and what is the government building?",L_Explain, + "Ok, sounds good.",L_Next, + "No!",L_Close; + +L_Next: + mes "[Imec]"; + mes "\"Very good. Here is the paper.\""; + mes "Imec gives you a sealed letter. You put it away in a pocket separated from your inventory, so it won't get lost."; + set @state, 1; + callsub S_Update_Mask; + goto L_Close; + +L_Explain: + mes "[Imec]"; + mes "\"Follow the road to the north through the gate, then go west when you reach the docks. It's right before the castle mount.\""; + next; + mes "\"In the building there are several offices. If you want to join or form a party, you have to pay your taxes there first.\""; + next; + mes "\"So, will you bring my petition to the office in that building?\""; + if (@state == 0) + goto L_Offer; + goto L_Close; + +L_Bring: + mes "[Imec]"; + mes "\"What are you waiting for? Bring my petition to the government building.\""; + menu + "Where is it again?",L_Explain, + "I'm on my way.",L_Close; + +L_Return: + mes "[Imec]"; + mes "\"Ah, you're back.\""; + mes "You hand the letter of acknowledgement over to Imec."; + next; + mes "[Imec]"; + mes "\"Very well. I'm sure I'll be able to open my shop again soon.\""; + next; + mes "It seems Imec doesn't notice you anymore."; + menu + "You mentioned a reward.",L_Next1; + +L_Next1: + mes "[Imec]"; + mes "\"What? Ah, right. Here, have this.\""; + getexp @EXP, 0; + set Zeny, Zeny + @money; + set @state, 3; + callsub S_Update_Mask; + next; + mes "\"Actually, you could be of further help to me.\""; + next; + goto L_Stingers; + +L_Stingers: + mes "[Imec]"; + set @dq_level, 10; + set @dq_cost, 3; + set @dq_count, 3; + set @dq_name$, "ScorpionStinger"; + set @dq_friendly_name$, "Scorpion Stingers"; + set @dq_money, 200; + set @dq_exp, 40; + + callfunc "DailyQuest"; + goto L_Close; + +L_Close: + set @money, 0; + set @state, 0; + + set @dq_level, 0; + set @dq_cost, 0; + set @dq_count, 0; + set @dq_name$, ""; + set @dq_friendly_name$, ""; + set @dq_money, 0; + set @dq_exp, 0; + set @dq_return, 0; + close; + +S_Update_Mask: + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_4_MASK)) | (@state << TWOBIT_4_SHIFT); + return; +} diff --git a/world/map/npc/002-2/inya.txt b/world/map/npc/002-2/inya.txt new file mode 100644 index 00000000..322d0eb3 --- /dev/null +++ b/world/map/npc/002-2/inya.txt @@ -0,0 +1,209 @@ +//Gemstones: Diamond (white) , Ruby (red), Emerald (green), Sapphire (blue), Topaz (yellow), Amethyst (purple) +//The power of the gems is important to future balance of these rings. Are they related to stats, tiers of power, schools of magic? + +002-2.gat,116,61,0|shop|#InyaShop|127,SimpleRing:*100000 + +002-2.gat,116,61,0|script|Inya|106 +{ + mes "[Inya]"; + mes "\"I am Inya, a jeweler of fine rings. I sell and make rings.\""; + next; + mes "\"If you have a Simple Ring and a gem, I can set the gem in it for 100,000 gold pieces.\""; + next; + mes "\"Also, if you have a ring with gems on it, I can remove the gems and return the Simple Ring to you for 50,000 gold pieces.\""; + next; + mes "\"So, how can I help you?\""; + menu + "What jewelry do you have for sale?", L_Inya_Shop, + "I have a wedding ring, will that do?", L_Inya_Wedding_Ring, + "I'd like to remove a gem (50000 GP).", L_Inya_Remove_RingGem, + "I'd like to add a gem (100000 GP).", L_Inya_Add_RingGem, + "Not interested.", L_Inya_NotInterested; + +L_Inya_Shop: + close2; + shop "#InyaShop"; + +L_Inya_Wedding_Ring: + mes "[Inya]"; + mes "\"No, sorry. I do not alter wedding rings at this time.\""; + close; + +L_Inya_Remove_RingGem: + mes "[Inya]"; + mes "\"What kind of gem would you like to have removed?\""; + menu + "Diamond.", L_Inya_Remove_Diamond, + "Ruby.", L_Inya_Remove_Ruby, + "Emerald.", L_Inya_Remove_Emerald, + "Sapphire.", L_Inya_Remove_Sapphire, + "Topaz.", L_Inya_Remove_Topaz, + "Amethyst.", L_Inya_Remove_Amethyst, + "I've changed my mind.", L_Inya_NotInterested; + +L_Inya_Add_RingGem: + mes "[Inya]"; + mes "\"What kind of gem would you like to add?\""; + menu + "Diamond.", L_Inya_Add_Diamond, + "Ruby.", L_Inya_Add_Ruby, + "Emerald.", L_Inya_Add_Emerald, + "Sapphire.", L_Inya_Add_Sapphire, + "Topaz.", L_Inya_Add_Topaz, + "Amethyst.", L_Inya_Add_Amethyst, + "I've changed my mind.", L_Inya_NotInterested; + +L_Inya_Remove_Diamond: + if ( (Zeny < 50000) + | (countitem ("DiamondRing") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 50000; + delitem "DiamondRing", 1; + getitem "SimpleRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_Remove_Ruby: + if ( (Zeny < 50000) + | (countitem ("RubyRing") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 50000; + delitem "RubyRing", 1; + getitem "SimpleRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_Remove_Emerald: + if ( (Zeny < 50000) + | (countitem ("EmeraldRing") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 50000; + delitem "EmeraldRing", 1; + getitem "SimpleRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_Remove_Sapphire: + if ( (Zeny < 50000) + | (countitem ("SapphireRing") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 50000; + delitem "SapphireRing", 1; + getitem "SimpleRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_Remove_Topaz: + if ( (Zeny < 50000) + | (countitem ("TopazRing") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 50000; + delitem "TopazRing", 1; + getitem "SimpleRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_Remove_Amethyst: + if ( (Zeny < 50000) + | (countitem ("AmethystRing") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 50000; + delitem "AmethystRing", 1; + getitem "SimpleRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_Add_Diamond: + if ( (Zeny < 100000) + | (countitem ("SimpleRing") < 1) + | (countitem ("Diamond") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 100000; + delitem "SimpleRing", 1; + delitem "Diamond", 1; + getitem "DiamondRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_Add_Ruby: + if ( (Zeny < 100000) + | (countitem ("SimpleRing") < 1) + | (countitem ("Ruby") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 100000; + delitem "SimpleRing", 1; + delitem "Ruby", 1; + getitem "RubyRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_Add_Emerald: + if ( (Zeny < 100000) + | (countitem ("SimpleRing") < 1) + | (countitem ("Emerald") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 100000; + delitem "SimpleRing", 1; + delitem "Emerald", 1; + getitem "EmeraldRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_Add_Sapphire: + if ( (Zeny < 100000) + | (countitem ("SimpleRing") < 1) + | (countitem ("Sapphire") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 100000; + delitem "SimpleRing", 1; + delitem "Sapphire", 1; + getitem "SapphireRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_Add_Topaz: + if ( (Zeny < 100000) + | (countitem ("SimpleRing") < 1) + | (countitem ("Topaz") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 100000; + delitem "SimpleRing", 1; + delitem "Topaz", 1; + getitem "TopazRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_Add_Amethyst: + if ( (Zeny < 100000) + | (countitem ("SimpleRing") < 1) + | (countitem ("Amethyst") < 1) ) + goto L_Inya_Not_Enough; + set Zeny, Zeny - 100000; + delitem "SimpleRing", 1; + delitem "Amethyst", 1; + getitem "AmethystRing", 1; + mes "[Inya]"; + mes "\"Here you go.\""; + close; + +L_Inya_NotInterested: + mes "[Inya]"; + mes "\"Come back later and I will try to be of assistance.\""; + close; + +L_Inya_Not_Enough: + mes "[Inya]"; + mes "\"I am sorry, you simply do not seem to have the necessary items for me to help you. Please come back when you do, and I would be more than happy to help you out.\""; + close; +} diff --git a/world/map/npc/002-2/kps.txt b/world/map/npc/002-2/kps.txt new file mode 100644 index 00000000..a17df1a3 --- /dev/null +++ b/world/map/npc/002-2/kps.txt @@ -0,0 +1,164 @@ +// KPS (Killian Parcel Service) +// Author: Wushin +// Kylian_Timer denotes current quest time & holds last completed. +// reuse the 4 bits +// To Mark 4 Different NPCs. +// setarray $@kps_npc_bits, $@knowYanisNT, $@knowLatoyNT, $@knowWeellosNT, $@knowCasinoNT; +002-2.gat,120,89,0|script|KPS Manager|191 +{ + set @state, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); + set @run, ((QUEST_NorthTulimshar & TWOBIT_8_MASK) >> TWOBIT_8_SHIFT); + set @run_cnt, ((QUEST_NorthTulimshar & TWOBIT_9_MASK) >> TWOBIT_9_SHIFT); + if (@state == 15) + goto L_SeeKylian; + if (@state == 14) + goto L_RunComplete; + if (@state == 13) + goto L_RunStarted; + if (@state == 12) + goto L_JobSelect; + if (@state == 11) + goto L_AcceptJob; + if (@state == 10) + goto L_OfferJob; + goto L_Default; + +L_Default: + mes "[KPS Manager]"; + mes "\"Kylian staying at the Inn bought this shop recently.\""; + mes "\"I'm waiting for him to open the shop.\""; + next; + mes "\"I wonder if he needs any help?\""; + goto L_Close; + +L_OfferJob: + mes "[KPS Manager]"; + mes "\"Hello and what how can I help you today?\""; + menu + "My name is " + strcharinfo(0), L_MyName, + "Nothing.", L_Close; + +L_MyName: + set @state, 11; + callfunc "SetKylianQuest"; + mes "\"Ahhh, Kylian said you would be dropping by.\""; + next; + mes "\"I assume you are looking for some work?\""; + menu + "Yes.", L_StartJob, + "No.", L_Close; + +L_AcceptJob: + mes "[KPS Manager]"; + mes "\"Interested in some work?\""; + menu + "Yes.", L_StartJob, + "No.", L_Close; + +L_StartJob: + set @run, 0; + callfunc "SetKylianRun"; + set @run_cnt, 0; + callfunc "SetKylianRunCnt"; + set @state, 12; + callfunc "SetKylianQuest"; + goto L_JobSelect; + +L_StartJobAgain: + set @run, 0; + callfunc "SetKylianRun"; + set @state, 12; + callfunc "SetKylianQuest"; + goto L_JobSelect; + +L_JobSelect: + if ((gettimetick(2) - Kylian_Timer) < 86400) + goto L_NoPackages; + mes "[KPS Manager]"; + mes "\"We have a number of deliveries that need to go all over the world.\""; + next; + goto L_RandJob; + +L_RandJob: + set @rand_quest, rand(1,3); + goto L_JobInfo; + +L_JobInfo: + mes "\"We have a delivery for:* " + $@random_quests$[@rand_quest] + "\""; + menu + "Take It.", L_StartRun, + "Anything Else?", L_RandJob, + "I need a break.", L_Close; + +L_StartRun: + set @state, 13; + callfunc "SetKylianQuest"; + set @run, @rand_quest; + callfunc "SetKylianRun"; + set Kylian_Timer, gettimetick(2); + goto L_Close; + +L_RunStarted: + mes "Deliver this package to:* " + $@random_quests$[@run] + "\""; + goto L_Close; + +L_RunComplete: + set @elapsed_time, (gettimetick(2) - Kylian_Timer); + if (@elapsed_time > 600) + goto L_Failed; + set @run_cnt, (@run_cnt + 1); + callfunc "SetKylianRunCnt"; + // Set Kylian wants to see you reward state + if (@run_cnt > 3) + goto L_KylianReward; + goto L_RunAgain; + +L_SeeKylian: + mes "\"You need to go see Kylian before I can give you any more work.\""; + goto L_Close; + +L_Failed: + mes "\"You need to be faster next time to earn a bonus.\""; + next; + goto L_RunAgain; + +L_KylianReward: + set Zeny, Zeny + $@delivery_money; + getexp ($@delivery_exp_mod * BaseLevel), 0; + callfunc "SetKylianRun"; + set @state, 15; + callfunc "SetKylianQuest"; + mes "[" + $@delivery_money + " money]"; + mes "[" + ($@delivery_exp_mod * BaseLevel) + " experience points]"; + next; + mes "\"I have a message Kylian wants me to send you over right away.\""; + goto L_Close; + +L_RunAgain: + set Zeny, Zeny + $@delivery_money; + getexp ($@delivery_exp_mod * BaseLevel), 0; + callfunc "SetKylianRun"; + mes "[" + $@delivery_money + " money]"; + mes "[" + ($@delivery_exp_mod * BaseLevel) + " experience points]"; + next; + mes "\"Good job, keep up the nice work and I'm sure the bonus will give you a bonus.\""; + next; + goto L_StartJobAgain; + +L_NoPackages: + mes "\"Come back tomorrow, maybe we will have some more work.\""; + goto L_Close; + +L_Close: + close; +} +function|script|SetKylianRun +{ + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_8_MASK)) | (@run << TWOBIT_8_SHIFT); + return; +} +function|script|SetKylianRunCnt +{ + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_9_MASK)) | (@run_cnt << TWOBIT_9_SHIFT); + return; +} diff --git a/world/map/npc/002-2/kylian.txt b/world/map/npc/002-2/kylian.txt new file mode 100644 index 00000000..7f832b87 --- /dev/null +++ b/world/map/npc/002-2/kylian.txt @@ -0,0 +1,424 @@ +// Kylian is a businessman from Argeas who wants to eventually open a shop in Tulimshar +// asks the player for several information about the city +// Quest uses Nibble 4 and 5 of QUEST_NorthTulimshar +// Author: Jenalya + +// Nibble 4 is used as flags to indicate if the player knows certain places/persons +// Bit 0: player talked to Yanis in the government building +// Bit 1: player talked to Latoy on the market in North Tulimshar +// Bit 2: player talked to Weellos as the historic building +// Bit 3: player was in the casino rooms + +// Nibble 5 is used to save the quest progress with Kylian +// state 1: player has the task to get the luggage from the harbor +// state 2: Adrian gave the luggage to the player +// state 3: player gave luggage to Kylian and Kylian asks who to talk to for the shop license +// after the player answered this, @KylianNTLicense is set. +// the player can only continue the quest when logging out and therefore setting that value to 0 again +// state 4: Kylian asks for a historical building to get some cultural knowledge +// state 5: Kylian asks where to get some typical food +// after the player answered this, @KylianNTSightSeeing is set. +// the player can only continue the quest when logging out and therefore setting that value to 0 again +// state 6: Kylian asks where to go to have some fun in the evening (casino) +// state 7: Kylian asks where to get exquisite clothing before going out in the evening +// after the player answered this, @KylianNTSightSeeing is set. +// the player can only continue the quest when logging out and therefore setting that value to 0 again +// state 8: Kylian was in the casino and gives a desert hat as reward +// state 9: Shop approved, go talk Kylian's shopkeeper if you are looking for work. +// state 10: Meet Shop keeper +// state 11: Start Time Trial +// state 12: Return +// state 13: Start Daily Timed +// state 14: Return +// state 15: Completed +// Kylian_Timer is used to denote start time. + +// temporary variables used to check if the player logged out or left the building in the meanwhile +// this is to ensure some 'time in between' different actions of the quest +// @KylianNTLicense +// @KylianNTSightSeeing +// @KylianNTCasino + +-|script|#businessmanNTconfig|-1 +{ + end; + +OnInit: + // Nibble 4 + // Used in Random Quest later as a Nibble + set $@knowYanisNT, (1 << 16); + set $@knowLatoyNT, (1 << 17); + set $@knowWeellosNT, (1 << 18); + set $@knowCasinoNT, (1 << 19); + + // Random Quests for Later + setarray $@random_quests$, "None", "Falkurn", "Old Wizard", "Baktar"; + set $@delivery_money, 100; + set $@delivery_exp_mod, 10; + end; +} +002-2.gat,44,107,0|script|#KylianOut|32767,1,1 +{ + set @KylianNTLicense, 0; + set @KylianNTSightSeeing, 0; + set @KylianNTCasino, 0; + end; +} +002-2.gat,43,101,0|script|Kylian|193 +{ + set @state, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); + + set @acorn_amount, 12; + set @suitcase_money, 100; + set @suitcase_exp, 50; + set @license_money, 50; + set @license_exp, 20; + set @sightseeing_money, 50; + set @sightseeing_exp, 20; + set @food_money, 50; + set @food_exp, 20; + set @clothes_money, 50; + set @clothes_exp, 20; + set @fun_money, 50; + set @fun_exp, 20; + + // This NPC previously used the variable TMW_Quest + callfunc "ClearVarTMW_Quest"; + set @fieri, ((QUEST_SouthTulimshar & NIBBLE_6_MASK) >> NIBBLE_6_SHIFT); + + if (@state == 15) goto L_Done; + if (@state >= 11) goto L_Helping; + if (@state == 10) goto L_OfferedJob; + if (@state == 9) goto L_Shop; + if (@KylianNTCasino) goto L_CasinoDone; + if (@state == 8) goto L_DesertHat; + if (@state == 7) goto L_Clothes; + if (@KylianNTSightSeeing) goto L_SightSeeingDone; + if (@state == 6) goto L_Casino; + if (@state == 5) goto L_Food; + if (@KylianNTLicense) goto L_LicenseDone; + if (@state == 4) goto L_SightSeeing; + if (@state == 3) goto L_ShopLicense; + if (@state >= 1) goto L_Suitcase; + + mes "[Kylian]"; + mes "\"Ah, are you the room service? I've some requests.\""; + menu + "Sure, what can I do for you?",L_Luggage, + "No, I'm not!",L_Next; + +L_Next: + mes "[Kylian]"; + mes "\"Too bad. Would you be interested in earning some quick money with some errands regardless?\""; + menu + "I'm a great adventurer! I don't do errands.",L_Close, + "No, I'm busy.",L_Close, + "Mh, ok.",L_Luggage; + +L_Luggage: + mes "[Kylian]"; + mes "\"I need someone to get my luggage from the docks. Show this paper to the sailor who's watching the luggage.\""; + mes "He gives you his ticket which you store in your pocket, separated from your inventory."; + set @state, 1; + callfunc "SetKylianQuest"; + goto L_Close; + +L_Suitcase: // @state >= 1, but below 3 + mes "[Kylian]"; + mes "\"Did you already get my luggage from the docks?\""; + if (@state != 2) + goto L_Close; + menu + "Here it is.",L_Continue, + "I'm on my way, don't worry.",L_Close; + +L_Continue: + if (countitem("LeatherSuitcase") < 1) + goto L_NoItem; + delitem "LeatherSuitcase", 1; + set Zeny, Zeny + @suitcase_money; + getexp @suitcase_exp, 0; + set @state, 3; + callfunc "SetKylianQuest"; + mes "[Kylian]"; + mes "\"Ah, very good. I really need to have a look at some of my papers in there.\""; + mes "He gives you some money."; + next; + mes "[Kylian]"; + mes "\"Oh, and I have some acorns left, I had them with me as travelling fare. You can have them, they're tasty."; + mes "In case you don't like them, you could also bring them to the Tulimshar bakery. I heard they use them to make some special flour.\""; + getitem "Acorn", @acorn_amount; + next; + goto L_ShopLicense; + +L_ShopLicense: // @state == 3 + mes "[Kylian]"; + mes "\"I'm a salesman and came to Tulimshar because I'm thinking about establishing a shop here. While I'm going through my papers, could you find out who I have to talk to about opening a shop in this city?\""; + if (!(QUEST_NorthTulimshar & $@knowYanisNT)) + goto L_Close; + menu + "You need to talk to Yanis in the government building.",L_GovBuild, + "I'll see what I can do.",L_Close; + +L_GovBuild: + set Zeny, Zeny + @license_money; + getexp @license_exp, 0; + set @state, 4; + callfunc "SetKylianQuest"; + set @KylianNTLicense, 1; + mes "[Kylian]"; + mes "\"Ah, excellent. That's very helpful. Could you tell me how to get to that building?\""; + mes "You explain the way to the building."; + next; + goto L_LicenseDone; + +L_LicenseDone: // the player didn't log out yet after telling about Yanis + mes "[Kylian]"; + mes "\"I need to prepare my papers now. I might have some more questions later.\""; + goto L_Close; + +L_SightSeeing: // @state == 4 and logged out sometime between getting to that state and now + mes "[Kylian]"; + mes "\"You just came here the right moment. I have finished my business affairs. I think I should use my time here to also get a bit of cultural knowledge about the area. Can you tell me if there are any historical places to visit?\""; + if (!(QUEST_NorthTulimshar & $@knowWeellosNT)) + goto L_Close; + menu + "There is a very old historic building not far from here.",L_HistBuild, + "I don't know, but will have a look around.",L_Close; + +L_HistBuild: + set Zeny, Zeny + @sightseeing_money; + getexp @sightseeing_exp, 0; + set @state, 5; + callfunc "SetKylianQuest"; + mes "[Kylian]"; + mes "\"This sounds interesting. Please tell me the way.\""; + mes "You tell him how to get to the historic building."; + next; + goto L_Food; + +L_Food: // @state == 5 + mes "[Kylian]"; + mes "\"While I'm out, I could also get something to eat. Maybe some typical dish for this region. Do you have a good suggestion for that?\""; + if (@fieri < 4) // didn't yet help Fieri make Tonori Delight + goto L_Close; + menu + "Fieri at the castle makes great Tonori Delight.",L_SoupBer, + "No idea, I'll try to find out.",L_Close; + +L_SoupBer: + set Zeny, Zeny + @food_money; + getexp @food_exp, 0; + set @state, 6; + callfunc "SetKylianQuest"; + set @KylianNTSightSeeing, 1; + goto L_SightSeeingDone; + +L_SightSeeingDone: + mes "[Kylian]"; + mes "\"I'm going to see the historic building you told me about and try this local food at the castle. Thank you for the suggestions.\""; + goto L_Close; + +L_Casino: // @state == 6 and logged out sometime between getting to that state and now + mes "[Kylian]"; + mes "\"Hello. I just came back from my sight-seeing tour. And this Tonori Delight really was delicious. I wonder what it's made of...\""; + next; + mes "\"However, I was wondering if you know about a good place to spend the evening? Some place to have fun?\""; + if (!(QUEST_NorthTulimshar & $@knowCasinoNT)) + goto L_Close; + menu + "Of course! The casino!",L_CasinoFound, + "Not really.",L_Close; + +L_CasinoFound: + set Zeny, Zeny + @casino_money; + getexp @casino_exp, 0; + set @state, 7; + callfunc "SetKylianQuest"; + mes "[Kylian]"; + mes "\"Oh, there's a casino in this city? That's a wonderful thing. Where can I find it?\""; + mes "You explain how to get to the casino."; + next; + goto L_Clothes; + +L_Clothes: // @state == 7 + mes "[Kylian]"; + mes "\"I should get proper clothing before I go to the casino tonight. Do you know a reputable shop where clothing of high quality is sold?\""; + if (!(QUEST_NorthTulimshar & $@knowLatoyNT)) + goto L_Close; + menu + "Latoy's shop. On the west side of Tulimshar.",L_HarborDistrict, + "Mh, I don't know.",L_Close; + +L_HarborDistrict: + set Zeny, Zeny + @clothes_money; + getexp @clothes_exp, 0; + set @state, 8; + callfunc "SetKylianQuest"; + set @KylianNTCasino, 1; + mes "You explain about Latoy and the high quality shop."; + mes "[Kylian]"; + mes "\"This seems to be exactly what I need. Thanks a lot.\""; + goto L_Close; + +L_CasinoDone: + mes "[Kylian]"; + mes "\"I'm looking forward to going to the casino tonight. See me tomorrow.\""; + goto L_Close; + +L_DesertHat: // @state == 8 + mes "Kylian looks a bit tired."; + mes "[Kylian]"; + mes "\"That was an interesting night. Thanks for your suggestion to visit the casino.\""; + next; + getinventorylist; + mes "\"You helped me a lot, so I bought a souvenir for you while I was shopping.\""; + if ((checkweight("DesertHat", 1) == 0) || (@inventorylist_count == 100)) + goto L_Inventory; + getitem "DesertHat", 1; + set @state, 9; + callfunc "SetKylianQuest"; + next; + goto L_Close; + +L_Shop: + mes "[Kylian]"; + mes "\"The Council of Wizards approved my shop license!\""; + mes "\"I purchased a store just acorss the way from the hotel exit.\""; + next; + mes "\"If you are looking for work, go see the shop keeper I have working for me.\""; + mes "\"Mention your name and he will know I sent you.\""; + set @state, 10; + callfunc "SetKylianQuest"; + goto L_Close; + +L_OfferedJob: + mes "[Kylian]"; + mes "\"I spoke with the shopkeeper, They said you haven't stopped in yet.\""; + next; + mes "\"I wish you would consider working for KPS.\""; + next; + mes "\"KPS needs a well-traveled go getter like you.\""; + goto L_Close; + +L_Helping: + mes "[Kylian]"; + mes "\"I've heard you decided to come work for me. That is great news.\""; + mes "\"Keep up the good work and I might have something a little extra for you.\""; + goto L_Close; + +L_Done: + mes "[Kylian]"; + mes "\"Thanks a bunch, buisness is booming!\""; + mes "\"For your hard work take this.\""; + next; + set Zeny, Zeny + $@delivery_money; + getexp ($@delivery_exp_mod * BaseLevel), 0; + set @run_cnt, 0; + callfunc "SetKylianRunCnt"; + set @state, 12; + callfunc "SetKylianQuest"; + mes "[" + $@delivery_money + " money]"; + mes "[" + ($@delivery_exp_mod * BaseLevel) + " experience points]"; + next; + goto L_Close; + +L_Inventory: + mes "[Kylian]"; + mes "\"Oh, you're carrying a lot of things. Come back when you have more room.\""; + goto L_Close; + +L_NoItem: + mes "[Kylian]"; + mes "\"I don't see it! Are you trying to tease me? This is not funny!\""; + goto L_Close; + +L_Close: + set @acorn_amount, 0; + set @suitcase_money, 0; + set @suitcase_exp, 0; + set @license_money, 0; + set @license_exp, 0; + set @sightseeing_money, 0; + set @sightseeing_exp, 0; + set @food_money, 0; + set @food_exp, 0; + set @clothes_money, 0; + set @clothes_exp, 0; + set @fun_money, 0; + set @fun_exp, 0; + set @inventorylist_count, 0; + set @fieri, 0; + // NOT set to zero: @KylianNTLicense, @KylianNTSightSeeing and @KylianNTCasino + // those are used to check if the player logged out in the meanwhile + close; +} +function|script|SetKylianQuest +{ + set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_5_MASK)) | (@state << NIBBLE_5_SHIFT); + return; +} +function|script|KylianDebug +{ + set @state, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); + callfunc "ClearVarTMW_Quest"; + set @fieri, ((QUEST_SouthTulimshar & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); + set @run, ((QUEST_NorthTulimshar & TWOBIT_8_MASK) >> TWOBIT_8_SHIFT); + set @run_cnt, ((QUEST_NorthTulimshar & TWOBIT_9_MASK) >> TWOBIT_9_SHIFT); + goto L_Menu; + +L_Menu: + mes "[Kylian Debug]"; + menu + "Show Quest State", L_ShowState, + "Set Quest State", L_SetState, + "Reset Timer to now", L_WorkTimer, + "Reset Timer + 24 hours", L_MoreWorkTimer, + "Close.", L_Close; + +L_ShowState: + mes "State: " + @state; + mes "Timer: " + Kylian_Timer; + mes "Time: " + gettimetick(2); + mes "Elapsed Time: " + (gettimetick(2) - Kylian_Timer); + mes "Reset Timer: 86400 > " + (gettimetick(2) - Kylian_Timer); + mes "Run: " + @run; + mes "Run NPC: " + $@random_quests$[@run]; + mes "Run Count: " + @run_cnt; + goto L_Menu; + +L_SetState: + mes "\"Input the quest state desired.\""; + input @state; + callfunc "SetKylianQuest"; + goto L_Menu; + +L_WorkTimer: + set Kylian_Timer, gettimetick(2); + goto L_Menu; + +L_MoreWorkTimer: + set Kylian_Timer, (gettimetick(2) - 86401); + goto L_Menu; + +L_Close: + close; +} +002-2.gat,40,101,0|script|KylianDebug#1|193 +{ + callfunc "KylianDebug"; + end; +OnInit: + if (!debug) + disablenpc "KylianDebug#1"; + end; +} +002-2.gat,118,89,0|script|KylianDebug#2|193 +{ + callfunc "KylianDebug"; + end; +OnInit: + if (!debug) + disablenpc "KylianDebug#2"; + end; +} diff --git a/world/map/npc/002-2/latoy.txt b/world/map/npc/002-2/latoy.txt new file mode 100644 index 00000000..4c847af7 --- /dev/null +++ b/world/map/npc/002-2/latoy.txt @@ -0,0 +1,33 @@ +// A snobby store that won't sell to the player +// takes part in quest given by 021-2/kylian.txt + +002-2.gat,86,93,0|shop|#LatoyShop|127,SilkHeadband:*20000,SilkGloves:*20000,SilkPants:*30000,SilkRobe:*40000 + +002-2.gat,86,93,0|script|Latoy|106 +{ + set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@knowLatoyNT; + set @kylian, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); + + mes "[Latoy]"; + mes "\"Is there something I can help you with?\""; + if (@kylian != 7) + goto L_Shop; + next; + mes "Maybe this is the kind of shop Kylian is looking for?"; + goto L_Shop; + +L_Shop: + mes "[Latoy]"; + mes "\"How would you like to browse my wares?\""; + menu + "Yes.", L_LatoyShop, + "No.", L_Close; + +L_LatoyShop: + close2; + shop "#LatoyShop"; + +L_Close: + set @kylian, 0; + close; +} diff --git a/world/map/npc/002-2/mapflags.txt b/world/map/npc/002-2/mapflags.txt index c23a7f11..5448030e 100644 --- a/world/map/npc/002-2/mapflags.txt +++ b/world/map/npc/002-2/mapflags.txt @@ -1 +1 @@ -002-2.gat|mapflag|resave|001-1,57,71 +002-2.gat|mapflag|resave|001-1,60,105 diff --git a/world/map/npc/002-2/omar.txt b/world/map/npc/002-2/omar.txt new file mode 100644 index 00000000..048f129c --- /dev/null +++ b/world/map/npc/002-2/omar.txt @@ -0,0 +1,335 @@ +// +function|script|KadiyaSubquestConsts +{ + set @Q_kadiya_status, (QUEST_MAGIC2 & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT; + + set @Q_STATUS_NONE, 0; + set @Q_STATUS_KNOWS_MOPOX, 1; + set @Q_STATUS_MADE_MOPOX, 2; + set @Q_STATUS_DIDNT_DRINK, 3; + set @Q_STATUS_WANTS_CHOCOCAKE, 4; + set @Q_STATUS_WANTS_ORANGECUPCAKE, 5; + set @Q_STATUS_COMPLETED, 6; + set @Q_STATUS_COMPLETED_ELANORE, 7; + set @Q_STATUS_COMPLETED_NOELANORE, 8; + set @Q_STATUS_COMPLETED_POST_ELANORE, 9; + + if (((QUEST_MAGIC2 & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT) < 4) set @Q_kadiya_status, @Q_STATUS_NONE; + + if (((QUEST_MAGIC2 & NIBBLE_1_MASK) >> NIBBLE_1_SHIFT) > 4) set @Q_kadiya_status, @Q_STATUS_COMPLETED_POST_ELANORE; + + return; +} + +002-2.gat,117,126,0|script|Omar|162 +{ + callfunc "ElanoreFix"; + callfunc "KadiyaSubquestConsts"; + + set @Q_status, @Q_kadiya_status; + + if (@Q_status >= @Q_STATUS_COMPLETED) goto L_cured; + + if (@Q_status == @Q_STATUS_DIDNT_DRINK) goto L_didnt_drink; + + if (@Q_status > @Q_STATUS_DIDNT_DRINK) goto L_make_food; + + mes "[Omar]"; + mes "\"Welcome to my humble abode.\""; + next; + menu + "Well met! May I ask who you are?", L_omar, + "What's wrong with your daughter?", L_kadiya_sick, + "Thank you!", L_Close; + +L_omar: + mes "[Omar]"; + mes "\"My name is Omar; I am a trader of oils and spices.\""; + goto L_Close; + +L_kadiya_sick: + mes "[Omar]"; + mes "\"Kadiya has caught Ponderpox, I fear.\""; + mes "He sighs."; + mes "\"She's has been feverish for many days now. I wish there were something I could do.\""; + next; + menu + "Have you asked Elanore the healer?", L_sick_elanore, + "How about the Hurnscald hospital?", L_sick_hospital, + "Can I help?", L_sick_self, + "I'm sorry to hear that.", L_Next; + +L_Next: + mes "[Omar]"; + mes "\"Well, she is a strong girl. I am sure that she will get over it eventually.\""; + mes "He smiles, but you see doubt in his eyes."; + goto L_Close; + +L_sick_elanore: + mes "[Omar]"; + mes "\"Elanore?\""; + mes "He frowns."; + mes "\"She knows nothing. I see no point in talking to her.\""; + goto L_Close; + +L_sick_hospital: + mes "[Omar]"; + mes "\"Hurnscald is too far away. I don't think that it would be good for her to go on such a long trip.\""; + goto L_Close; + +L_sick_self: + mes "[Omar]"; + mes "\"You are very kind, but I don't think there is anything you can do.\""; + goto L_Close; + +L_didnt_drink: + mes "[Omar]"; + mes "\"So she has Mopox, not Ponderpox, you say? Hmm. That is much harder to cure, I think.\""; + mes "\"I am grateful for the effort you put into brewing a potion for her. But it does smell vile...\""; + next; + mes "[Omar]"; + mes "\"I promised my dear wife that I would never make Kadiya eat or drink anything she doesn't like. So I won't force her to drink this.\""; + next; + mes "[Omar]"; + set @Q_status, (@Q_STATUS_WANTS_CHOCOCAKE + rand(2)); + callsub S_update_var; + if (@Q_status == @Q_STATUS_WANTS_ORANGECUPCAKE) + mes "\"If only we could make it smell and taste like orange cupcakes... she really loves those cupcakes.\""; + if (@Q_status == @Q_STATUS_WANTS_CHOCOCAKE) + mes "\"If only this were a chocolate cake and not a potion... she really loves chocolate cakes.\""; + goto L_Close; + +L_make_food: + mes "[Omar]"; + mes "\"I should stay here to watch over her. I wish I could think of a way to convince her to drink the potion...\""; + if (@Q_status == @Q_STATUS_WANTS_ORANGECUPCAKE) + mes "\"Alas, it is not an orange cupcake.\""; + if (@Q_status == @Q_STATUS_WANTS_CHOCOCAKE) + mes "\"If only it were to smell and taste like her favourite chocolate cake...\""; + goto L_Close; + +L_cured: + if (@Q_status == @Q_STATUS_COMPLETED) goto L_cured_choice; + mes "[Omar]"; + mes "\"She is sleeping now, but she seems to be much better. I am sure that she will be up and running around again soon.\""; + goto L_Close; + +L_cured_choice: + mes "[Omar]"; + mes "\"I am very grateful for your help. I really was sure that it was Ponderpox, not Mopox, that she had.\""; + next; + menu + "Oh, it was nothing.", L_cured_nothing, + "I didn't do it alone; Elanore helped.", L_cured_elanore, + "That will be 5000 GP.", L_Next1; + +L_Next1: + mes "[Omar]"; + mes "\"Ah, certainly.\""; + mes "He hands you a small bag of money."; + next; + set @Q_status, @Q_STATUS_COMPLETED_NOELANORE; + callsub S_update_var; + set Zeny, Zeny + 5000; + goto L_Close; + +L_cured_nothing: + mes "[Omar]"; + mes "\"No, this wasn't nothing. She is everything to me. Here, you deserve a reward.\""; + mes "He hands you a bag of money containing 10,000 GP and two pearls."; + mes "\"And feel free to drop by again whenever you would like!\""; + set @Q_status, @Q_STATUS_COMPLETED_NOELANORE; + callsub S_update_var; + getitem "Pearl", 2; + set Zeny, Zeny + 10000; + goto L_Close; + +L_cured_elanore: + mes "[Omar]"; + mes "Omar frowns."; + mes "\"That witch? You worked with her without telling me?\""; + mes "He looks over to his daughter, concern suddenly in his eyes."; + mes "\"She is looking better, though...\""; + next; + mes "[Omar]"; + mes "Omar shakes his head."; + mes "\"I will have to think about this. Please leave me alone.\""; + next; + set @Q_status, @Q_STATUS_COMPLETED_ELANORE; + callsub S_update_var; + goto L_Close; + +L_Close: + set @Q_STATUS_KNOWS_MOPOX, 0; + set @Q_STATUS_MADE_MOPOX, 0; + set @Q_STATUS_DIDNT_DRINK, 0; + set @Q_STATUS_WANTS_CHOCOCAKE, 0; + set @Q_STATUS_WANTS_ORANGECUPCAKE, 0; + set @Q_STATUS_COMPLETED, 0; + set @Q_STATUS_COMPLETED_ELANORE, 0; + set @Q_STATUS_COMPLETED_NOELANORE, 0; + set @Q_STATUS_COMPLETED_POST_ELANORE, 0; + set @Q_status, 0; + close; + + +S_update_var: + set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(NIBBLE_3_MASK) | (@Q_status << NIBBLE_3_SHIFT)); + return; +} + +002-2.gat,124,124,0|script|Kadiya|174 +{ + set @child_number, 7; + callfunc "XmasList"; + + callfunc "ElanoreFix"; + set @Q_MASK, NIBBLE_3_MASK; + set @Q_SHIFT, NIBBLE_3_SHIFT; + callfunc "KadiyaSubquestConsts"; + set @Q_status, @Q_kadiya_status; + if (@Q_status >= @Q_STATUS_COMPLETED) goto L_cured; + + mes "You see a young girl lying in bed. At first she doesn't seem to notice you approaching."; + mes "Finally, she turns her head towards you. Judging from the sweat on her forehead and look in her eyes, she is suffering from some kind of fever."; + next; + mes "[Kadiya]"; + mes "\"Hello,\" she says in a tiny voice."; + next; + set @M_NAME, 1; + set @M_CANDY, 2; + set @M_POTION, 3; + set @M_CHOCOCAKE, 4; + set @M_CUPCAKE, 5; + + setarray @choice$, "Hello! What's your name?", "Would you like some candy?", "", "", "", "", "", ""; + setarray @choice_idx, @M_NAME, @M_CANDY, 0, 0, 0, 0, 0, 0; + set @choices_nr, 2; + + if (countitem("MopoxCurePotion") == 0) goto L_M_no_cure; + + set @choice_idx[@choices_nr], @M_POTION; + set @choice$[@choices_nr], "This potion will cure your illness!"; + set @choices_nr, @choices_nr + 1; + goto L_M_no_cure; + +L_M_no_cure: + if ((countitem("LacedChocolateCake") == 0) || (@Q_status != @Q_STATUS_WANTS_CHOCOCAKE)) + goto L_M_no_chococake; + set @choice_idx[@choices_nr], @M_CHOCOCAKE; + set @choice$[@choices_nr], "Would you like special chocolate cake?"; + set @choices_nr, @choices_nr + 1; + goto L_M_no_chococake; + +L_M_no_chococake: + if ((countitem("LacedOrangeCupcake") == 0) || (@Q_status != @Q_STATUS_WANTS_ORANGECUPCAKE)) + goto L_M_no_cupcake; + set @choice_idx[@choices_nr], @M_CUPCAKE; + set @choice$[@choices_nr], "Would you like special orange cupcake?"; + set @choices_nr, @choices_nr + 1; + goto L_M_no_cupcake; + +L_M_no_cupcake: + set @choice_idx[@choices_nr], 0; + set @choice$[@choices_nr], "Goodbye."; + set @choices_nr, @choices_nr + 1; + + menu + @choice$[0], L_MenuItems, + @choice$[1], L_MenuItems, + @choice$[2], L_MenuItems, + @choice$[3], L_MenuItems, + @choice$[4], L_MenuItems, + @choice$[5], L_MenuItems; + +L_MenuItems: + set @choice, @choice_idx[@menu - 1]; + + if (@choice == @M_NAME) goto L_name; + if (@choice == @M_CANDY) goto L_no_candy; + if (@choice == @M_POTION) goto L_potion; + if (@choice == @M_CHOCOCAKE) goto L_chococake; + if (@choice == @M_CUPCAKE) goto L_cupcake; + goto L_Close; + +L_name: + mes "[Kadiya]"; + mes "She smiles a faint smile."; + mes "\"My name is Kadiya.\""; + goto L_Close; + +L_no_candy: + mes "[Kadiya]"; + mes "She hesitates for a moment."; + mes "\"No, thank you. I don't think I should.\""; + goto L_Close; + +L_potion: + mes "[Kadiya]"; + if (@Q_status < @Q_STATUS_DIDNT_DRINK) set @Q_status, @Q_STATUS_DIDNT_DRINK; + callsub S_update_var; + + mes "Kadiya grimaces and pushes the bottle away."; + mes "\"That smells terrible!\""; + next; + mes "[Kadiya]"; + mes "She pulls the sheets over her head."; + mes "\"I won't drink that!\""; + goto L_Close; + +L_chococake: + delitem "LacedChocolateCake", 1; + goto L_do_cure; + +L_cupcake: + delitem "LacedOrangeCupcake", 1; + goto L_do_cure; + +L_do_cure: + if (@Q_status < @Q_STATUS_COMPLETED) set @Q_status, @Q_STATUS_COMPLETED; + callsub S_update_var; + + mes "[Kadiya]"; + mes "Kadiya's eyes widen."; + mes "\"Oh! Daddy, is it okay if I eat this?\""; + mes "Omar nods and smiles. \"You should eat a bit to regain your strength, sweetheart.\""; + next; + mes "[Kadiya]"; + mes "Kadiya devours your gift in just a handful of bites."; + next; + mes "[Kadiya]"; + mes "She smiles. \"Thank you! I feel better already!\"."; + next; + mes "[Kadiya]"; + mes "She looks much healthier, too. Omar walks over and touches her forehead."; + mes "\"Now that is funny – your fever has gone down quite a bit!\""; + mes "He smiles at you. \"Thank you for your help!\""; + next; + mes "[Kadiya]"; + mes "\"You should get some sleep now, sweetheart. I'm sure that you will be better soon.\""; + goto L_Close; + +L_cured: + mes "[Kadiya]"; + mes "Kadiya seems to be sleeping calmly. She looks much less sweaty than earlier; unless you are very much mistaken, her fever has disappeared."; + goto L_Close; + +L_Close: + set @Q_status, 0; + set @Q_MASK, 0; + set @Q_SHIFT, 0; + set @M_NAME, 0; + set @M_CANDY, 0; + set @M_POTION, 0; + set @M_CHOCOCAKE, 0; + set @M_CUPCAKE, 0; + set @choice, 0; + set @choices_nr, 0; + cleararray @choice_idx[0], 0, 7; + cleararray @choice$[0], "", 7; + close; + +S_update_var: + set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Q_MASK) | (@Q_status << @Q_SHIFT)); + return; +} diff --git a/world/map/npc/002-2/phaet.txt b/world/map/npc/002-2/phaet.txt new file mode 100644 index 00000000..eb464e1e --- /dev/null +++ b/world/map/npc/002-2/phaet.txt @@ -0,0 +1,30 @@ +// + +002-2.gat,75,56,0|script|Phaet|125,0,0 +{ + mes "[Phaet the Royal Guard]"; + mes "\"Hey, you seem tough enough! Would you like to prove your skills? I'll let you in the arena if you give me 50 gp. You can fight against other players there.\""; + next; + menu + "Yes", L_Sure, + "No", L_Next; + +L_Next: + mes "[Phaet the Royal Guard]"; + mes "\"Ha ha, coward.\""; + close; + +L_Sure: + if (Zeny < 50) goto L_NoMoney; + set Zeny, Zeny - 50; + + mes "[Phaet the Royal Guard]"; + mes "\"Get ready!\""; + next; + warp "001-3.gat", 0, 0; + close; + +L_NoMoney: + mes "\"Wait a second, you don't have enough money.\""; + close; +} diff --git a/world/map/npc/002-2/rebecca.txt b/world/map/npc/002-2/rebecca.txt new file mode 100644 index 00000000..54244115 --- /dev/null +++ b/world/map/npc/002-2/rebecca.txt @@ -0,0 +1,84 @@ +// + +002-2.gat,44,27,0|script|Rebecca|118 +{ + set @npcname$, "Rebecca the Inn Keeper"; + set @cost, 100; + mes "[" + @npcname$ + "]"; + mes "\"Welcome to 'The Wizard's Rest'\""; + goto L_MainMenu; + +L_MainMenu: + mes "\"How may I help you?\""; + menu + "Can I get a room?", L_Inn, + "Any interesting guests?", L_Guests, + "Bakery?", L_Bakery, + "Barber?", L_Barber, + "Casino?", L_Casino, + "Theatre?", L_Theatre, + "Pvp?", L_Pvp, + "I don't need any help, thanks.", L_Close; + +L_Guests: + mes "\"We had a very rich business man show up the other day.\""; + next; + mes "\"He caused quite a stir when he paid for the penthouse so far in advance."; + mes "I hear he is looking for help.\""; + next; + mes "\"Other then that feel free to mingle with the guests.\""; + next; + mes "\"You can find them in the door behind me.\""; + goto L_Close; + + +L_Bakery: + mes "\"Ahh yes, the World Famous Riskim's bakery.\""; + next; + mes "\"They only use the finest ingredients like Acorn Flour"; + mes "to make some of the tastest treats in Tonori.\""; + next; + mes "Second only to the Wizards' private chef, Fieri.\""; + goto L_MainMenu; + +L_Barber: + mes "\"Issay the barber of Tonori can be found through the door behind me\""; + next; + mes "\"The master stylist can do anything with anyones hair.\""; + next; + mes "\"He always welcomes walk ins.\""; + goto L_MainMenu; + +L_Casino: + mes "\"Games, Games, Games.\""; + next; + mes "\"Test your luck or skill in the Casino. From Blackjack to Pvp.\""; + next; + mes "\"Win or Lose, you'll still have fun!\""; + goto L_MainMenu; + +L_Theatre: + mes "\"A touring troop from Hurnscald just arrived.\""; + next; + mes "\"The are currently rehearsing for their next show.\""; + next; + mes "\"Feel free to talk to the troupe leader, they are in the theatre behind me.\""; + goto L_MainMenu; + +L_Pvp: + mes "\"Yes, our Casino has Pvp in the Casino behind me.\""; + next; + mes "\"Test your self against other players and gamble on the outcome.\""; + next; + mes "\"Fame and glory awaits you gladiator!\""; + goto L_MainMenu; + +L_Inn: + callfunc "Inn"; + goto L_Close; + +L_Close: + set @npcname$, ""; + set @cost, 0; + close; +} diff --git a/world/map/npc/002-2/shops.txt b/world/map/npc/002-2/shops.txt new file mode 100644 index 00000000..87986111 --- /dev/null +++ b/world/map/npc/002-2/shops.txt @@ -0,0 +1,3 @@ +// Bartender + +002-2.gat,68,25,0|shop|Bartender#Casino|112,Beer:*175,Cake:*30,CherryCake:*100 diff --git a/world/map/npc/002-2/stranger.txt b/world/map/npc/002-2/stranger.txt new file mode 100644 index 00000000..563af742 --- /dev/null +++ b/world/map/npc/002-2/stranger.txt @@ -0,0 +1,464 @@ +002-2.gat,38,57,0|script|Stranger|192 +{ + set @IRONINGOT, 5; + set @PINKANTENNA, 21; + set @Exp, 20000; + setarray @towelReq$, "WhiteHitchhikersTowel","RedHitchhikersTowel","GreenHitchhikersTowel","BlueHitchhikersTowel","YellowHitchhikersTowel","PurpleHitchhikersTowel","OrangeHitchhikersTowel","PinkHitchhikersTowel","TealHitchhikersTowel","LimeHitchhikersTowel","HitchhikersTowel"; + + if (FLAGS & FLAG_TOWEL_COMPLETED) goto L_Event_Done; + if ((gettimetick(2)-TUT_var < 6*7*86400) || (BaseLevel < 42)) //player must be created at least 6 weeks ago and at least level 42 + goto L_No_Event; + if (FLAGS & FLAG_TOWEL_HELPED) goto L_Towel; + + mes "[Stranger]"; + mes "\"Hello, hello! It's great to see you. Maybe you can help me with a little problem I have.\""; + next; + mes "\"I need some materials to repair my spacesh- ahm, it's not important why I need it.\""; + next; + mes "\"Anyway, I'd be really happy if you can give me " + @IRONINGOT + " Iron Ingots and " + @PINKANTENNA + " Pink Antennas.\""; + next; + mes "\"Do you have that for me?\""; + menu + "Yeah, sure.",L_Items, + "No.",L_Close; + +L_Items: + if (countitem("IronIngot") < @IRONINGOT) goto L_No_Item; + if (countitem("PinkAntenna") < @PINKANTENNA) goto L_No_Item; + delitem "IronIngot", @IRONINGOT; + delitem "PinkAntenna", @PINKANTENNA; + getexp @Exp, 0; + set FLAGS, FLAGS | FLAG_TOWEL_HELPED; + + mes "[Stranger]"; + mes "\"Great! Thank you!\""; + next; + mes "\"I have a lot of work to do now. But before you leave...\""; + next; + goto L_Towel; + +L_Towel: + getinventorylist; + if (@inventorylist_count == 100) goto L_Full_Inv; + mes "[Stranger]"; + mes "\"On May 25th it is a very special day - Towel Day.\""; + next; + mes "\"To celebrate this I'll ask you some questions about my favourite book, The Hitchhiker's Guide to the Galaxy. If you can answer them, I'll give you something very useful.\""; + next; + mes ""; + mes "[Server]"; + mes "The answers might need to have whitespaces."; + mes "If you're using a client which confirms your answer when pressing space, change this setting before continuing."; + mes ""; + next; + mes "[Stranger]"; + mes "\"The first one is easy.\""; + next; + + setarray @easy_questions$, + "What two words are written in big friendly letters on the back cover?", + "What's the name of the paranoid robot?", + "What is the answer to life, the universe and everything?", + "What is the first name of the author of the hitchhikers guide?", + "What is the last name of the author of the hitchhikers guide?", + "Who is the male human protagonist?", + "Who is the female human protagonist?", + "According to the Guide, space is ____?", + "What is the name of the spaceship which was stolen by the president of the universe?", + "How many heads does Zaphod Beeblebrox have?"; + + setarray @easy_answers_amount,2,2,2,2,2,4,4,2,4,2; + + set @random, rand(10); + mes "\"" + @easy_questions$[@random] + "\""; + input @answer$; + + if (@easy_answers_amount[@random] < 4) + goto L_Easy_Skip4; + set @quizparam$, "towelanswer0" + @random + "d"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Easy; + goto L_Easy_Skip4; + +L_Easy_Skip4: + if (@easy_answers_amount[@random] < 3) + goto L_Easy_Skip3; + set @quizparam$, "towelanswer0" + @random + "c"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Easy; + goto L_Easy_Skip3; + +L_Easy_Skip3: + set @quizparam$, "towelanswer0" + @random + "b"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Easy; + + set @quizparam$, "towelanswer0" + @random + "a"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Easy; + + goto L_Wrong_Answer; + +L_Right_Answer_Easy: + mes "[Stranger]"; + mes "\"You're absolutely right. The next one will be more tricky.\""; + next; + + setarray @medium_questions$, + "What is the name of the rock group claiming to be the loudest band in the universe?", + "What star is near Ford's home planet?", + "Which country does the human protagonist come from?", + "What is the name of the computer on The Heart of Gold?", + "What color is a Babel Fish?", + "What did the bowl of petunias think?", + "What body orifice should a babel fish be inserted in to work properly?", + "What is the name of the super computer?", + "What were the second most intelligent creatures on Earth?", + "What race creates the worst poetry in universe?", + "What is the name of the Vogon home planet?", + "What is the name of the Restaurant at the End of the Universe?"; + + setarray @medium_answers_amount,2,2,2,2,2,3,2,2,4,4,2,2; + + set @random, rand(12); + mes "\"" + @medium_questions$[@random] + "\""; + input @answer$; + + if (@medium_answers_amount[@random] < 4) + goto L_Medium_Skip4; + + set @quizparam$, "towelanswer1" + @random + "d"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Medium; + goto L_Medium_Skip4; + +L_Medium_Skip4: + if (@medium_answers_amount[@random] < 3) + goto L_Medium_Skip3; + set @quizparam$, "towelanswer1" + @random + "c"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Medium; + goto L_Medium_Skip3; + +L_Medium_Skip3: + set @quizparam$, "towelanswer1" + @random + "b"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Medium; + + set @quizparam$, "towelanswer1" + @random + "a"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Medium; + + goto L_Wrong_Answer; + +L_Right_Answer_Medium: + mes "[Stranger]"; + mes "\"Not bad, not bad. Let's see if you can answer an even more difficult one.\""; + next; + + setarray @hard_questions$, + "Drinking what drink is like having your brain smashed out by a slice of lemon wrapped round a large gold brick?", + "How many pints of beers should you drink before hitchhiking?", + "What initials are carved into Zaphod Beeblebrox's brain?", + "What is Ford Prefect's nickname?", + "Who is responsible for the fjords of Norway?", + "What game is played on earth as a relict of memories to an ancient war?", + "What is the name of the triple-breasted whore from Eroticon VI?", + "Who will insult every living being in the universe, because he is immortal and getting bored?", + "What is the name of the piteous creature that is continually reincarnated and subsequently killed, each time unknowingly, by Arthur Dent?"; + + setarray @hard_answers_amount,4,2,2,2,2,2,2,4,2; + + set @random, rand(9); + mes "\"" + @hard_questions$[@random] + "\""; + input @answer$; + + if (@hard_answers_amount[@random] < 4) + goto L_Hard_Skip4; + set @quizparam$, "towelanswer2" + @random + "d"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Hard; + goto L_Hard_Skip4; + +L_Hard_Skip4: + if (@hard_answers_amount[@random] < 3) + goto L_Hard_Skip3; + set @quizparam$, "towelanswer2" + @random + "c"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Hard; + goto L_Hard_Skip3; + +L_Hard_Skip3: + set @quizparam$, "towelanswer2" + @random + "b"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Hard; + + set @quizparam$, "towelanswer2" + @random + "a"; + callfunc "StrangerQuiz"; + if (("###" + @answer$ == @quizanswer$)) + goto L_Right_Answer_Hard; + + goto L_Wrong_Answer; + +L_Right_Answer_Hard: + mes "[Stranger]"; + mes "\"Unbelievable! You're really a wise person.\""; + next; + mes "\"One last question, but this shouldn't be a problem for you.\""; + next; + mes "\"What is the most important item for every hitchhiker to have?\""; + input @answer$; + if (@answer$ != "Towel" && @answer$ != "towel") + goto L_Wrong_Answer; + + mes "[Stranger]"; + mes "\"There you are! A towel is really the most important item for a hitchhiker to have.\""; + next; + mes "\"Please take this.\""; // no full inventory check, this is done before the game + set FLAGS, FLAGS | FLAG_TOWEL_COMPLETED; + next; + goto L_Explain; + +L_Explain: + mes "[Stranger]"; + mes "\"This towel is even more useful than usual towels are. If you change its color, it uses a special techno-, ahm, let's say, it can help you to get to other places.\""; + next; + mes "\"Bring me some powder made from gemstones and a bottle of water, and I can prepare it for you.\""; + next; + mes "\"Depending on the color it will bring you to different places. It might wear out after a while and it'll loose its color, but I can prepare it for you again.\""; + next; + mes "\"Since I'm not familar with this plane-, ahm, with this area, I can't tell which places you will end up in.\""; + goto L_Close; + +L_No_Event: + mes "[Stranger]"; + mes "\"Hello. Isn't this a beautiful place?\""; + next; + mes "\"And it really comes in handy that I have my towel with me. A towel is about the most massively useful thing an inte- ahm, a person can have.\""; + next; + mes "\"You can read more about that in my favourite book, 'The Hitchhiker's Guide to the Galaxy'.\""; + if (FLAGS & FLAG_TOWEL_COMPLETED) + menu + "Thanks for the advice.",L_Close, + "I have my towel with me too.",L_Dye; + goto L_Close; + +L_Dye: + mes "[Stranger]"; + mes "\"Wonderful! Let me have a look.\""; + mes "He's taking a very interested look at your towel."; + next; + mes "[Stranger]"; + mes "\"I'm impressed. This is not an usual towel.\""; + next; + menu + "Oh? Can you explain about it?",L_Explain, + "I know. Could you dye it for me?",L_StartDyeTowel, + "It's great, isn't it? I have to go now.",L_Close; + +L_No_Item: + mes "[Stranger]"; + mes "\"Hu? It seems you haven't.\""; + goto L_Close; + +L_Wrong_Answer: + mes "[Stranger]"; + mes "\"Nah, that's wrong. Come back if you want to try again.\""; + goto L_Close; + +L_Event_Done: + mes "[Stranger]"; + mes "\"Ah, welcome back. Thanks again for your help.\""; + next; + mes "\"Shall I dye your towel?\""; + menu + "That would be great!", L_StartDyeTowel, + "No, thanks.", L_Close; + +L_StartDyeTowel: + mes "[Stranger]"; + mes "\"Alright, which color do you want?\""; +// the other colors should be added when more places are released + menu + "Red",L_Red, + "Yellow",L_Yellow, + "White",L_White, + "Blue",L_Blue, + "Green",L_Green, + "Purple",L_Purple, + "Orange",L_Orange, + "Pink",L_Pink, + "Lime",L_Lime, + "Teal",L_Teal, + "I changed my mind.", L_Close; + +L_White: + // Koga + set @warpTowelName$, "WhiteHitchhikersTowel"; + setarray @towelPowder$, "DiamondPowder"; + setarray @towelPowderCnt, 2; + goto L_DyeChecks; + +L_Red: + // Barbarians + set @warpTowelName$, "RedHitchhikersTowel"; + setarray @towelPowder$, "RubyPowder"; + setarray @towelPowderCnt, 2; + goto L_DyeChecks; + +L_Green: + // Candor + set @warpTowelName$, "GreenHitchhikersTowel"; + setarray @towelPowder$, "EmeraldPowder"; + setarray @towelPowderCnt, 2; + goto L_DyeChecks; + +L_Blue: + // Blue Sages + set @warpTowelName$, "BlueHitchhikersTowel"; + setarray @towelPowder$, "SapphirePowder"; + setarray @towelPowderCnt, 2; + goto L_DyeChecks; + +L_Yellow: + // Tulimshar Mines + set @warpTowelName$, "YellowHitchhikersTowel"; + setarray @towelPowder$, "TopazPowder"; + setarray @towelPowderCnt, 2; + goto L_DyeChecks; + +L_Purple: + // Dimonds Inn + set @warpTowelName$, "PurpleHitchhikersTowel"; + setarray @towelPowder$, "AmethystPowder"; + setarray @towelPowderCnt, 2; + goto L_DyeChecks; + +L_Orange: + // Graveyard + set @warpTowelName$, "OrangeHitchhikersTowel"; + setarray @towelPowder$, "RubyPowder", "TopazPowder"; + setarray @towelPowderCnt, 1, 1; + goto L_DyeChecks; + +L_Pink: + // Terranite Cave + set @warpTowelName$, "PinkHitchhikersTowel"; + setarray @towelPowder$, "RubyPowder", "DiamondPowder"; + setarray @towelPowderCnt, 1, 1; + goto L_DyeChecks; + +L_Teal: + // Mana Seed + set @warpTowelName$, "TealHitchhikersTowel"; + setarray @towelPowder$, "EmeraldPowder", "SapphirePowder"; + setarray @towelPowderCnt, 1, 1; + goto L_DyeChecks; + +L_Lime: + // Panchua + set @warpTowelName$, "LimeHitchhikersTowel"; + setarray @towelPowder$, "EmeraldPowder", "TopazPowder"; + setarray @towelPowderCnt, 1, 1; + goto L_DyeChecks; + +L_DyeChecks: + mes "[Stranger]"; + mes "\"Ok, I'll need a bottle of water first.\""; + next; + getinventorylist; + if (@inventorylist_count == 100) goto L_Full_Inv; + if (countitem("BottleOfWater") < 1) goto L_No_Water; + set @powderCheckCount, 0; + goto L_PowderChecks; + +L_PowderCheckAgain: + mes "[Stranger]"; + mes "\"Now I need " + @towelPowderCnt[@powderCheckCount] + " " + @towelPowder$[@powderCheckCount] + ".\""; + next; + if((@powderCheckCount + 1) == getarraysize(@towelPowder$)) + goto L_TowelChecks; + set @powderCheckCount, (@powderCheckCount + 1); + goto L_PowderChecks; + +L_PowderChecks: + if (countitem(@towelPowder$[@powderCheckCount]) < @towelPowderCnt[@powderCheckCount]) + goto L_No_Powder; + goto L_PowderCheckAgain; + +L_TowelCheckAgain: + set @towelCheckCount, (@towelCheckCount + 1); + if(@towelCheckCount >= getarraysize(@towelReq$)) + goto L_No_Towel; + goto L_TowelChecks; + +L_TowelChecks: + if (countitem(@towelReq$[@towelCheckCount]) > 0) + goto L_DeletePowder; + goto L_TowelCheckAgain; + +L_DeleteAgain: + set @powderCheckCount, (@powderCheckCount - 1); + goto L_DeletePowder; + +L_DeletePowder: + delitem @towelPowder$[@powderCheckCount], @towelPowderCnt[@powderCheckCount]; + if (@powderCheckCount) + goto L_DeleteAgain; + goto L_DyeTowel; + +L_DyeTowel: + delitem @towelReq$[@towelCheckCount], 1; + callfunc "MultiWarpTowel"; + delitem "BottleOfWater", 1; + getitem @warpTowelName$, 1; + mes "He takes your towel, the water and the gem powder, then he turns away and does something you can't see. After a few minutes, he turns to you again."; + next; + mes "[Stranger]"; + mes "\"Done! It'll use its color after being used, but just come back and I can dye it again for you.\""; + goto L_Close; + +L_No_Water: + mes "[Stranger]"; + mes "\"You don't have water.\""; + goto L_Close; + +L_No_Powder: + mes "[Stranger]"; + mes "\"You need to bring me enough gem powder in that color. Maybe someone used to mining can help you with that.\""; + goto L_Close; + +L_No_Towel: + mes "[Stranger]"; + mes "\"Where's your towel? It is really useful, you should always keep it with you.\""; + goto L_Close; + +L_Full_Inv: + mes "[Stranger]"; + mes "\"You carry a lot of stuff with you, don't you? Maybe you should get rid of something.\""; + goto L_Close; + +L_Close: + set @IRONINGOT, 0; + set @PINKANTENNA, 0; + set @Exp, 0; + set @random, 0; + set @quizparam$, ""; + set @warpTowelName$, ""; + set @powderCheckCount, 0; + set @towelCheckCount, 0; + cleararray @towelPowder$, "", getarraysize(@towelPowder$); + cleararray @towelPowderCnt, "", getarraysize(@towelPowderCnt); + close; +} diff --git a/world/map/npc/002-2/traveler.txt b/world/map/npc/002-2/traveler.txt deleted file mode 100644 index 945bc82e..00000000 --- a/world/map/npc/002-2/traveler.txt +++ /dev/null @@ -1,11 +0,0 @@ -// This is a teleportation (warp) NPC. Its purpose is to offer expensive, fast trips throughout the world. -// Author: Wombat, wushin -// cost depending on level and adapted to new scripting guidelines: Jenalya - -002-2.gat,25,28,0|script|Jena the Traveler|103 -{ - set @NpcName$, "Jena"; - set @NpcTravelBit, $@tul_mine_bit; - callfunc "Traveler"; - end; -} diff --git a/world/map/npc/002-2/troupe_leader.txt b/world/map/npc/002-2/troupe_leader.txt new file mode 100644 index 00000000..c736899d --- /dev/null +++ b/world/map/npc/002-2/troupe_leader.txt @@ -0,0 +1,65 @@ +// + +002-2.gat,81,21,0|script|Troupe Leader|165 +{ + callfunc "ClearVariables"; + + set @inspector, ((QUEST_Hurnscald & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); + + if (@inspector == 4) goto L_NohMask_Troupe; + if (@inspector == 13) goto L_NohMask_Found; + + mes "[Troupe Leader]"; + mes "\"Hello. I'm the leader of a traveling theater troupe. We'll be staying here in Tulimshar for a while.\""; + goto L_Close; + +L_NohMask_Troupe: + mes "[Troupe Leader]"; + mes "\"Yes, a mask was stolen from us the last night we were in Hurnscald.\""; + next; + menu + "Any ideas on who might have taken it?", L_NohMask_Idea, + "Are you sure one of your troupe members didn't hide it and commit those robberies?", L_NohMask_Accuse, + "Hmm...", L_Close; + +L_NohMask_Idea: + set @inspector, 5; + callsub S_Update_Mask; + mes "[Troupe Leader]"; + mes "\"Hm...I did see an old man hang out near the theater after our last show.\""; + goto L_Close; + +L_NohMask_Accuse: + mes "[Troupe Leader]"; + mes "\"I am absolutely positive. None of my troupe have left the city since we got here. Good day!\""; + goto L_Close; + +L_NohMask_Found: + mes "[Troupe Leader]"; + mes "\"Thank you for finding the mask. You did such a good job, you should keep it.\""; + getinventorylist; + if (@inventorylist_count == 100) goto L_NohMask_TooMany; + mes "[1500 experience points]"; + getexp 1500, 0; + set @inspector, 14; + callsub S_Update_Mask; + getitem "NohMask", 1; + next; + mes "[Troupe Leader]"; + mes "\"We don't need it anymore. We're doing different shows here.\""; + goto L_Close; + +L_NohMask_TooMany: + next; + mes "[Troupe Leader]"; + mes "\"Except, you don't seem to have any room for it. I'll hold onto it for you until you do have room.\""; + goto L_Close; + +L_Close: + set @inspector, 0; + close; + +S_Update_Mask: + set QUEST_Hurnscald, (QUEST_Hurnscald & ~(NIBBLE_3_MASK)) | (@inspector << NIBBLE_3_SHIFT); + return; +} diff --git a/world/map/npc/002-3/_import.txt b/world/map/npc/002-3/_import.txt index 47aab35a..bab4c837 100644 --- a/world/map/npc/002-3/_import.txt +++ b/world/map/npc/002-3/_import.txt @@ -7,3 +7,4 @@ npc: npc/002-3/mapflags.txt npc: npc/002-3/merchant.txt npc: npc/002-3/mining_camp_barrier.txt npc: npc/002-3/nathan.txt +npc: npc/002-3/traveler.txt diff --git a/world/map/npc/002-3/_warps.txt b/world/map/npc/002-3/_warps.txt index e7ed3d83..b4f2078d 100644 --- a/world/map/npc/002-3/_warps.txt +++ b/world/map/npc/002-3/_warps.txt @@ -1,6 +1,6 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Tulimshar Mining Camp warps -002-3.gat,22,87|warp|To Beach|-1,-1,043-1.gat,85,55 -002-3.gat,85,51|warp|To Sand Storm Upper|-1,-1,002-1.gat,79,101 -002-3.gat,51,36|warp|To Sand Storm|-1,-1,002-1.gat,20,96 +002-3.gat,22,87|warp|Deep Caves|-1,-1,043-3.gat,31,27 +002-3.gat,85,51|warp|To Sand Storm Upper|-1,-1,002-1.gat,92,115 +002-3.gat,51,36|warp|To Sand Storm|-1,-1,002-1.gat,33,110 diff --git a/world/map/npc/002-3/traveler.txt b/world/map/npc/002-3/traveler.txt new file mode 100644 index 00000000..ff53af8f --- /dev/null +++ b/world/map/npc/002-3/traveler.txt @@ -0,0 +1,11 @@ +// This is a teleportation (warp) NPC. Its purpose is to offer expensive, fast trips throughout the world. +// Author: Wombat, wushin +// cost depending on level and adapted to new scripting guidelines: Jenalya + +002-3.gat,25,28,0|script|Jena the Traveler|103 +{ + set @NpcName$, "Jena"; + set @NpcTravelBit, $@tul_mine_bit; + callfunc "Traveler"; + end; +} diff --git a/world/map/npc/003-2/_import.txt b/world/map/npc/003-2/_import.txt deleted file mode 100644 index 8f9dba48..00000000 --- a/world/map/npc/003-2/_import.txt +++ /dev/null @@ -1,6 +0,0 @@ -// Map 003-2: Beach House -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 003-2.gat -npc: npc/003-2/_mobs.txt -npc: npc/003-2/_warps.txt -npc: npc/003-2/mapflags.txt diff --git a/world/map/npc/003-2/_mobs.txt b/world/map/npc/003-2/_mobs.txt deleted file mode 100644 index 7a08ce43..00000000 --- a/world/map/npc/003-2/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Beach House mobs - - - -003-2.gat,0,0,0|script|Mob003-2|-1 -{ - end; -} diff --git a/world/map/npc/003-2/_warps.txt b/world/map/npc/003-2/_warps.txt deleted file mode 100644 index 56865f1e..00000000 --- a/world/map/npc/003-2/_warps.txt +++ /dev/null @@ -1,5 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Beach House warps - -003-2.gat,22,29|warp|To Outside|-1,-1,003-1.gat,48,37 -003-2.gat,56,29|warp|To Outside|-1,-1,003-1.gat,59,30 diff --git a/world/map/npc/003-2/mapflags.txt b/world/map/npc/003-2/mapflags.txt deleted file mode 100644 index be495b87..00000000 --- a/world/map/npc/003-2/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -003-2.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/004-2/_import.txt b/world/map/npc/004-2/_import.txt deleted file mode 100644 index f4d7ac2b..00000000 --- a/world/map/npc/004-2/_import.txt +++ /dev/null @@ -1,7 +0,0 @@ -// Map 004-2: Buccaneer's Den -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 004-2.gat -npc: npc/004-2/_mobs.txt -npc: npc/004-2/_warps.txt -npc: npc/004-2/mapflags.txt -npc: npc/004-2/pirate_cave_exit.txt diff --git a/world/map/npc/004-2/_mobs.txt b/world/map/npc/004-2/_mobs.txt deleted file mode 100644 index 8d94f675..00000000 --- a/world/map/npc/004-2/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Buccaneer's Den mobs - - - -004-2.gat,0,0,0|script|Mob004-2|-1 -{ - end; -} diff --git a/world/map/npc/004-2/_warps.txt b/world/map/npc/004-2/_warps.txt deleted file mode 100644 index 99d99a88..00000000 --- a/world/map/npc/004-2/_warps.txt +++ /dev/null @@ -1,11 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Buccaneer's Den warps - -004-2.gat,75,30|warp|To Entrance|0,-1,004-2.gat,38,21 -004-2.gat,39,20|warp|To Room|0,-1,004-2.gat,74,29 -004-2.gat,21,29|warp|To Outside|-1,-1,004-1.gat,80,32 -004-2.gat,62,28|warp|To Basement|-1,-1,004-2.gat,21,61 -004-2.gat,20,62|warp|To First Floor|-1,-1,004-2.gat,63,27 -004-2.gat,68,66|warp|To First Floor|0,-1,004-2.gat,35,19 -004-2.gat,36,18|warp|To Second Floor|0,-1,004-2.gat,67,65 -004-2.gat,57,66|warp|To Roof|-1,-1,004-1.gat,86,28 diff --git a/world/map/npc/004-2/mapflags.txt b/world/map/npc/004-2/mapflags.txt deleted file mode 100644 index 8424c17f..00000000 --- a/world/map/npc/004-2/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -004-2.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/004-2/pirate_cave_exit.txt b/world/map/npc/004-2/pirate_cave_exit.txt deleted file mode 100644 index c5149098..00000000 --- a/world/map/npc/004-2/pirate_cave_exit.txt +++ /dev/null @@ -1,18 +0,0 @@ -// The Secret Pirate Cave Entrance - -004-2.gat,33,62,0|script|#piratecave1|45,1,1 -{ - mes "[Trapdoor]"; - mes "\"Descend into the caves?\""; - next; - menu - "Yes.", L_PirateCave, - "Nevermind", L_Close; - -L_PirateCave: - warp "004-3",80,23; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/004-3/_warps.txt b/world/map/npc/004-3/_warps.txt index 507b3d9d..dfdfa8be 100644 --- a/world/map/npc/004-3/_warps.txt +++ b/world/map/npc/004-3/_warps.txt @@ -1,10 +1,10 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Pirate Caves First Floor warps -004-3.gat,24,95|warp|To West Beach|-1,-1,004-1.gat,63,98 +004-3.gat,24,95|warp|To West Beach|-1,-1,002-1.gat,49,21 004-3.gat,49,80|warp|To Pirate Caves|-1,-1,004-4.gat,49,83 004-3.gat,31,73|warp|To Pirate Caves|-1,-1,004-4.gat,31,70 004-3.gat,49,56|warp|To Pirate Caves|-1,-1,004-4.gat,49,51 004-3.gat,90,64|warp|To Pirate Caves|-1,-1,004-4.gat,90,68 -004-3.gat,80,22|warp|To West Beach House|-1,-1,004-2.gat,30,61 +004-3.gat,80,22|warp|To West Beach House|-1,-1,021-3.gat,44,142 004-3.gat,77,40|warp|To Pirate Caves|-1,-1,004-4.gat,78,34 diff --git a/world/map/npc/004-3/mapflags.txt b/world/map/npc/004-3/mapflags.txt index 736aefe5..a6af2bfc 100644 --- a/world/map/npc/004-3/mapflags.txt +++ b/world/map/npc/004-3/mapflags.txt @@ -1 +1 @@ -004-3.gat|mapflag|resave|001-1,57,71 +004-3.gat|mapflag|resave|001-1,60,105 diff --git a/world/map/npc/004-4/mapflags.txt b/world/map/npc/004-4/mapflags.txt index 47d2d4fc..5a8e7b9e 100644 --- a/world/map/npc/004-4/mapflags.txt +++ b/world/map/npc/004-4/mapflags.txt @@ -1 +1 @@ -004-4.gat|mapflag|resave|001-1,57,71 +004-4.gat|mapflag|resave|001-1,60,105 diff --git a/world/map/npc/004-5/mapflags.txt b/world/map/npc/004-5/mapflags.txt index 34d312dc..4bdc0a1b 100644 --- a/world/map/npc/004-5/mapflags.txt +++ b/world/map/npc/004-5/mapflags.txt @@ -1 +1 @@ -004-5.gat|mapflag|resave|001-1,57,71 +004-5.gat|mapflag|resave|001-1,60,105 diff --git a/world/map/npc/005-1/_import.txt b/world/map/npc/005-1/_import.txt deleted file mode 100644 index 1b386a11..00000000 --- a/world/map/npc/005-1/_import.txt +++ /dev/null @@ -1,10 +0,0 @@ -// Map 005-1: Snake Desert -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 005-1.gat -npc: npc/005-1/_mobs.txt -npc: npc/005-1/_warps.txt -npc: npc/005-1/mapflags.txt -npc: npc/005-1/npcs.txt -npc: npc/005-1/spirit.txt -npc: npc/005-1/traveler.txt -npc: npc/005-1/tree.txt diff --git a/world/map/npc/005-1/_mobs.txt b/world/map/npc/005-1/_mobs.txt deleted file mode 100644 index 22f80e0f..00000000 --- a/world/map/npc/005-1/_mobs.txt +++ /dev/null @@ -1,45 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Snake Desert mobs - -005-1.gat,0,0,0,0|monster|Maggot|1002,1,100000ms,30000ms,Mob005-1::On1002 -005-1.gat,0,0,0,0|monster|Snake|1010,1,100000ms,30000ms,Mob005-1::On1010 -005-1.gat,71,77,9,6|monster|Snake|1010,2,40000ms,50000ms,Mob005-1::On1010 -005-1.gat,92,25,8,5|monster|Snake|1010,3,40000ms,50000ms,Mob005-1::On1010 -005-1.gat,99,68,95,52|monster|GiantMaggot|1006,20,100000ms,30000ms,Mob005-1::On1006 -005-1.gat,91,15,66,23|monster|BlackScorpion|1009,7,100000ms,30000ms,Mob005-1::On1009 -005-1.gat,99,87,85,32|monster|BlackScorpion|1009,8,100000ms,30000ms,Mob005-1::On1009 -005-1.gat,30,43,21,25|monster|GreenSlime|1005,3,100000ms,30000ms,Mob005-1::On1005 -005-1.gat,118,70,3,2|monster|GreenSlime|1005,2,100000ms,30000ms,Mob005-1::On1005 -005-1.gat,163,71,32,65|monster|Snake|1010,8,100000ms,30000ms,Mob005-1::On1010 -005-1.gat,122,52,77,84|monster|Maggot|1002,20,100000ms,30000ms,Mob005-1::On1002 - - -005-1.gat,0,0,0|script|Mob005-1|-1 -{ - end; - -On1002: - set @mobID, 1002; - callfunc "MobPoints"; - end; - -On1005: - set @mobID, 1005; - callfunc "MobPoints"; - end; - -On1006: - set @mobID, 1006; - callfunc "MobPoints"; - end; - -On1009: - set @mobID, 1009; - callfunc "MobPoints"; - end; - -On1010: - set @mobID, 1010; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/005-1/_warps.txt b/world/map/npc/005-1/_warps.txt deleted file mode 100644 index a4622df6..00000000 --- a/world/map/npc/005-1/_warps.txt +++ /dev/null @@ -1,21 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Snake Desert warps - -005-1.gat,19,41|warp|To Sandstorm Desert|-1,2,002-1.gat,107,79 -005-1.gat,89,23|warp|To Snake Pit|-1,-1,005-3.gat,52,35 -005-1.gat,71,75|warp|To Snake Pit|-1,-1,005-3.gat,33,84 -005-1.gat,167,108|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,168,107|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,169,106|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,170,105|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,171,104|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,172,103|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,173,102|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,174,101|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,175,100|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,176,99|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,177,98|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,178,97|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,179,96|warp|To Desert Mountains|-1,-1,006-1.gat,25,26 -005-1.gat,74,48|warp|To Druid Tree|-1,-1,005-1.gat,74,39 -005-1.gat,74,40|warp|To Druid Tree|-1,-1,005-1.gat,74,49 diff --git a/world/map/npc/005-1/mapflags.txt b/world/map/npc/005-1/mapflags.txt deleted file mode 100644 index 3ede3802..00000000 --- a/world/map/npc/005-1/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -005-1.gat|mapflag|resave|005-1,80,30 diff --git a/world/map/npc/005-1/npcs.txt b/world/map/npc/005-1/npcs.txt deleted file mode 100644 index 6eed9735..00000000 --- a/world/map/npc/005-1/npcs.txt +++ /dev/null @@ -1,18 +0,0 @@ -// - - -//005-1.gat,66,75,0|script|Kieron|132 -//{ -// mes "[Kieron]"; -// mes "\"Be careful if you're going in that cave,"; -// mes "it's packed full of monsters.\""; -// close; -//} - -005-1.gat,91,23,0|script|William|131 -{ - mes "[William]"; - mes "\"Going in the cave?"; - mes "You better watch your step, last time I checked it was full of monsters!\""; - close; -} diff --git a/world/map/npc/005-1/spirit.txt b/world/map/npc/005-1/spirit.txt deleted file mode 100644 index 6e2784d2..00000000 --- a/world/map/npc/005-1/spirit.txt +++ /dev/null @@ -1,299 +0,0 @@ -function|script|EarthImpTouch -{ - if (getskilllv(SKILL_MAGIC)) goto L_message; - - mes "[Well]"; - mes "You hear noises from within the well."; - close; - -L_message: - set @Q_MASK, NIBBLE_0_MASK; - set @Q_SHIFT, NIBBLE_0_SHIFT; - set @Q_status, (QUEST_MAGIC2 & @Q_MASK) >> @Q_SHIFT; - - // Set up SkillUp function - set @SUP_id, SKILL_MAGIC_NATURE; - set @SUP_name$, "Nature Magic"; - set @Q_STATUS_INITIAL, 0; - set @Q_STATUS_ONQUEST, 1; - set @Q_STATUS_STUDENT0, 2; - set @Q_STATUS_STUDENT1, 3; - set @Q_STATUS_STUDENT2, 4; - set @Q_STATUS_STUDENT3, 5; - - set @s$, "girl"; - if (Sex) set @s$, "boy"; - - if (MAGIC_FLAGS & MFLAG_KNOWS_IMP) goto L_wb; - - mes "[Well]"; - mes "Something is inside that well, and now that you have turned your attention towards it, it seems to be talking to you!"; - next; - - mes "[Well]"; - mes "\"Hey! You there! Yes, I'm talking to you!\""; - mes "That strange voice seems to be coming from inside your head!"; - next; - menu - "Who, me?", L_Next, - "Leave me alone!", L_Close, - "Aaah! I'm hearing voices!", L_silly_close; - -L_Next: - mes "[Well]"; - mes "\"I'm in here, in the well, talking to you! If I'm not very mistaken, you are a powerful wizard-to-be, except that nobody has showed you how to properly do magic yet!\""; - next; - menu - "Who are you?", L_Next1, - "Aaaah! The voices are after me!", L_silly_close, - "Whatever it is, I'm not interested.", L_Close; - -L_Next1: - mes "[Earth Spirit]"; - mes "\"I'm an earth spirit; my name isn't important... all that matters is that I like you, and that I will help you become a powerful wizard if you help me. Just a fair deal, no more than that...\""; - next; - set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_KNOWS_IMP; - goto L_main; - -L_wb: - mes "[Earth Spirit]"; - mes "\"It's excellent to see you again!\""; - next; - goto L_main; - -L_main: - menu - "How did you get trapped?", L_Q_trapped, - "Can you teach me magic and spells?", L_Q_magic, - "What do you know about...", L_Q, - "Goodbye!", L_Close; - -L_Q_trapped: - mes "[Earth Spirit]"; - mes "\"Oh, a wicked witch grew jealous of my power and locked me up in this well.\""; - next; - goto L_main; - -L_Q: - mes "[Earth Spirit]"; - mes "\"Stop bothering me with your questions, will you? I'm trying to make you a powerful wizard, after all!\""; - next; - goto L_main; - -L_Q_magic: - if (@Q_status == @Q_STATUS_ONQUEST) goto L_Q_magic_1; - if (@Q_status == @Q_STATUS_STUDENT0) goto L_Q_magic_2; - if (@Q_status == @Q_STATUS_STUDENT1) goto L_Q_magic_3; - if (@Q_status == @Q_STATUS_STUDENT2) goto L_Q_magic_4; - - mes "[Earth Spirit]"; - mes "\"Good, good... that's the right attitude! Yes, I can teach you magic, but first you must prove that you are worthy to be my student!\""; - next; - mes "[Earth Spirit]"; - mes "\"North-west of here sits and old, dead tree. Well, not completely dead, not yet, but almost. It's nothing special. Well, maybe a little, but not really. I want you to cut off one of its branches.\""; - next; - menu - "No way.", L_silly_close, - "Sure.", L_Q_tree_ok, - "Why that particular tree?", L_Next2; - -L_Next2: - mes "[Earth Spirit]"; - mes "\"Oh, you and your questions! Well, that tree was a druid once, so the branches contain a bit of its lifeforce. And that's useful.\""; - next; - menu - "Yuck.", L_silly_close, - "Sure, whatever.", L_Q_tree_ok, - "Isn't that like cutting off someone's arm?", L_Next3; - -L_Next3: - mes "[Earth Spirit]"; - mes "\"Oooh... now come on! Don't be so sentimental. He turned himself into a tree, he can hardly expect everyone to leave him alone.\""; - next; - mes "[Earth Spirit]"; - mes "\"Who knows if he can even feel anything anymore? I'm sure he can't, being wooden and all. Besides, it's only a measly tree. Not like I'm asking you to cut him down!.\""; - next; - menu - "No way.", L_silly_close, - "Alright, that makes sense.", L_Q_tree_ok; - -L_Q_tree_ok: - mes "[Earth Spirit]"; - mes "\"Good, good, good! Yes, that will be very good! So, come back when you have the branch. Oh, and bring 100,000 GP, too, as an enrollment fee.\""; - set @Q_status, @Q_STATUS_ONQUEST; - callsub S_update_var; - set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_KNOWS_CUTTREE; - next; - goto L_main; - -L_Q_magic_1: - mes "[Earth Spirit]"; - mes "\"Yes, yes, if you bring me the branch and the money, then I will!\""; - next; - menu - "Here are the branch and the money.", L_Next4, - "How much money did you want again?", L_Q_tree_howmuch, - "How can I cut it?", L_Q_tree_how, - "Where was the tree again?", L_Q_tree_where, - "What is that tree?", L_Q_tree_what; - -L_Next4: - if (countitem("DruidTreeBranch") < 1) goto L_Q_tree_none; - if (!(MAGIC_FLAGS & MFLAG_DID_CUTTREE)) goto L_Q_tree_dry; - if (Zeny < 100000) goto L_Q_tree_nomoney; - - set Zeny, Zeny - 100000; - delitem "DruidTreeBranch", 1; - mes "[Earth Spirit]"; - mes "Following the earth sprite's instructions, you throw branch and GP into the well."; - next; - mes "[Earth Spirit]"; - mes "\"Well done, very well done! Consider yourself my student now.\""; - set @SUP_xp, 5000; - set @SUP_lvl, 2; - callfunc "SkillUp"; - next; - set @Q_status, @Q_STATUS_STUDENT0; - callsub S_update_var; - goto L_main; - -L_Q_magic_finish: - mes "[1000 experience points]"; - set @Q_status, @Q_status + 1; - callsub S_update_var; - getexp 1000,0; - next; - goto L_main; - -L_Q_magic_2: - mes "[Earth Spirit]"; - mes "\"Yes, of course! For just 20,000 GP I will teach you your first spell!\""; - next; - menu - "Here you are.", L_Next5, - "No.", L_main; - -L_Next5: - if (Zeny < 20000) goto L_no20k; - - set Zeny, Zeny - 20000; - mes "[Earth Spirit]"; - mes "\"Kekeke... excellent! Yes, here goes your first spell, the flying backpack! If you are overloaded, it will take the load off your shoulders.\""; - next; - mes "[Earth Spirit]"; - mes "\"Take a cocoon, living or dead, and suffuse it in magic. Whisper '" + getspellinvocation("flying-backpack") + "', and feel it float!\""; - goto L_Q_magic_finish; - -L_Q_magic_3: - mes "[Earth Spirit]"; - mes "\"But yes, yes! Only 20,000 GP, once again, and I will teach you a far more useful spell!\""; - next; - menu - "Here you are.", L_Next6, - "No.", L_main; - -L_Next6: - if (Zeny < 20000) goto L_no20k; - set Zeny, Zeny - 20000; - mes "[Earth Spirit]"; - mes "\"Yeees, good! This one is a protection spell, making your skin harder. You need a hard spike for it, though. Hold that spike in your hands, and focus on it.\""; - next; - mes "[Earth Spirit]"; - mes "\"Next, say '" + getspellinvocation("protect") + "', and feel your skin grow rigid! Very useful against stings and stabs and pokes and pricks and that sort of stuff.\""; - goto L_Q_magic_finish; - -L_Q_magic_4: - mes "[Earth Spirit]"; - mes "\"Naah, you're too weak now! Come back later when you have grown!\""; - next; - goto L_main; - -L_no20k: - mes "[Earth Spirit]"; - mes "\"You can't pay me 20,000 if you don't have that much!\""; - next; - goto L_main; - -L_Q_tree_none: - mes "[Earth Spirit]"; - mes "\"Where is your branch?\""; - next; - goto L_main; - -L_Q_tree_dry: - mes "[Earth Spirit]"; - mes "\"That won't do. This branch is completely dead; you'll have to get another.\""; - next; - goto L_main; - -L_Q_tree_nomoney: - mes "[Earth Spirit]"; - mes "\"No, you don't have enough money! Come back when you have 100,000.\""; - next; - goto L_main; - -L_Q_tree_howmuch: - mes "[Earth Spirit]"; - mes "\"It's only 100,000 GP to become my student.\""; - next; - goto L_main; - -L_Q_tree_how: - mes "[Earth Spirit]"; - mes "\"Oh... right, the tree might be protected. Only a bone knife will cut that. No idea where you can find one, but I'm sure you will manage!\""; - next; - goto L_main; - -L_Q_tree_where: - mes "[Earth Spirit]"; - mes "\"North-west of here.\""; - next; - goto L_main; - -L_Q_tree_what: - mes "[Earth Spirit]"; - mes "\"Just some silly druid who turned himself into a tree; nothing important.\""; - next; - goto L_main; - -L_silly_close: - if (MAGIC_FLAGS & MFLAG_KNOWS_IMP) - mes "[Earth Spirit]"; - if (!(MAGIC_FLAGS & MFLAG_KNOWS_IMP)) - mes "[Well]"; - mes "\"Silly " + @s$ + ".\""; - goto L_Close; - -L_Close: - set @Q_MASK, 0; - set @Q_SHIFT, 0; - set @Q_status, 0; - set @SUP_id, 0; - set @SUP_name$, ""; - set @SUP_xp, 0; - set @SUP_lvl, 0; - set @Q_STATUS_INITIAL, 0; - set @Q_STATUS_ONQUEST, 0; - set @Q_STATUS_STUDENT0, 0; - set @Q_STATUS_STUDENT1, 0; - set @Q_STATUS_STUDENT2, 0; - set @Q_STATUS_STUDENT3, 0; - set @s$, ""; - close; - -S_update_var: - set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Q_MASK) | (@Q_status << @Q_SHIFT)); - return; -} - -005-1.gat,118,70,0|script|#EarthImp0#_M|400 -{ - callfunc "EarthImpTouch"; - end; -} - -005-1.gat,119,70,0|script|#EarthImp1#_M|400 -{ - callfunc "EarthImpTouch"; - end; -} diff --git a/world/map/npc/005-1/traveler.txt b/world/map/npc/005-1/traveler.txt deleted file mode 100644 index 0d6f2eee..00000000 --- a/world/map/npc/005-1/traveler.txt +++ /dev/null @@ -1,11 +0,0 @@ -// This is a teleportation (warp) NPC. Its purpose is to offer expensive, fast trips throughout the world. -// Author: Wombat, wushin -// cost depending on level and adapted to new scripting guidelines: Jenalya - -005-1.gat,73,36,0|script|Kieron the Traveler|103 -{ - set @NpcName$, "Kieron"; - set @NpcTravelBit, $@druid_tree_bit; - callfunc "Traveler"; - end; -} diff --git a/world/map/npc/005-1/tree.txt b/world/map/npc/005-1/tree.txt deleted file mode 100644 index 27840370..00000000 --- a/world/map/npc/005-1/tree.txt +++ /dev/null @@ -1,168 +0,0 @@ -function|script|QuestTreeTrigger -{ - set @Q_MASK, NIBBLE_2_MASK; - set @Q_SHIFT, NIBBLE_2_SHIFT; - - set @Q_status, (QUEST_MAGIC & @Q_MASK) >> @Q_SHIFT; - set @Q_status_lower, @Q_status & 3; - set @Q_status, (@Q_status & 12) >> 2; - - if (@Q_status & @flag) goto L_Close; // already did that - - if (@flag == 2) goto L_hug; - goto L_cont; - -L_cont: - set @Q_status, @Q_status | @flag; - callsub S_update_var; - - if (@Q_status != 3) goto L_Close; - - if (MAGIC_FLAGS & MFLAG_DID_CUTTREE) goto L_Close; - - mes "Maybe it is just a trick of the light, but you can't help but think that the tree looks different... healthier, almost younger."; - mes "[20000 experience points]"; - getexp 20000, 0; - set @value, 15; - callfunc "QuestSagathaHappy"; - goto L_Close; - -L_hug: - mes "You hug the tree."; - next; - goto L_cont; - -L_Close: - set @Q_MASK, 0; - set @Q_SHIFT, 0; - set @Q_status, 0; - set @Q_status_lower, 0; - set @Q_wr_status, 0; - set @value, 0; - close; - -S_update_var: - set @Q_wr_status, (@Q_status << 2) | @Q_status_lower; - set QUEST_MAGIC, (QUEST_MAGIC & ~(@Q_MASK) | (@Q_wr_status << @Q_SHIFT)); - return; -} - -function|script|QuestTreeTouch -{ - set @Q_MASK, NIBBLE_2_MASK; - set @Q_SHIFT, NIBBLE_2_SHIFT; - - set @Q_status, (QUEST_MAGIC & @Q_MASK) >> @Q_SHIFT; - set @Q_status, (@Q_status & 12) >> 2; - - if (@Q_status == 3) goto L_happy; - - if ((MAGIC_FLAGS & (MFLAG_KNOWS_DRUIDTREE | MFLAG_KNOWS_CUTTREE)) == MFLAG_KNOWS_CUTTREE) goto L_cut; - - if ((MAGIC_FLAGS & (MFLAG_KNOWS_DRUIDTREE | MFLAG_KNOWS_CUTTREE)) == MFLAG_KNOWS_DRUIDTREE) goto L_water; - - if ((MAGIC_FLAGS & (MFLAG_KNOWS_DRUIDTREE | MFLAG_KNOWS_CUTTREE)) > 0) //i.e., both are set - goto L_both; - - mes "[Dying Tree]"; - mes "You see a strange tree."; - goto L_Close; - -L_cut: - mes "[Dying Tree]"; - mes "This must be the tree that the earth spirit was referring to."; - next; - menu - "Cut off a branch", L_do_cut, - "Leave it alone", L_Close; - -L_water: - mes "[Dying Tree]"; - mes "This must be the druid tree."; - next; - menu - "Water the tree", L_givewater, - "Kiss tree", L_kiss, - "Leave it alone", L_Close; - -L_both: - mes "[Dying Tree]"; - mes "This must be the druid tree that Wyara and the earth spirit were talking about."; - next; - menu - "Water the tree", L_givewater, - "Kiss tree", L_kiss, - "Cut off a branch", L_do_cut, - "Leave it alone", L_Close; - -L_givewater: - if (countitem("BottleOfWater") < 1) goto L_no_water; - delitem "BottleOfWater", 1; - getitem "EmptyBottle", 1; - - mes "[Dying Tree]"; - mes "You pour a bottle of water into the sand. The water dissipates quickly, without any effect."; - goto L_Close; - -L_no_water: - mes "[Dying Tree]"; - mes "You don't have any water."; - goto L_Close; - -L_kiss: - mes "[Dying Tree]"; - mes "You pluck out a splinter from your lip."; - mes "Somehow, you don't think that this helped."; - goto L_Close; - -L_do_cut: - if (countitem("BoneKnife") < 1) goto L_no_boneknife; - - if (MAGIC_FLAGS & MFLAG_DID_CUTTREE) goto L_really_cut; - - mes "[Dying Tree]"; - mes "You find a suitable branch and put your bone knife in position."; - mes "Holding the branch, you have an uneasy feeling – as if something inside the tree were trying to resist you..."; - mes "Do you want to continue cutting?"; - next; - menu - "Nah... better not.", L_Close, - "Yes, let's cut!", L_really_cut; - -L_really_cut: - set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_DID_CUTTREE; - getitem "DruidTreeBranch", 1; - mes "[Dying Tree]"; - mes "You cut off a branch from the tree."; - mes "For an instant, you have an uneasy feeling, as if the branch were writhing in your hand..."; - goto L_Close; - -L_no_boneknife: - mes "[Dying Tree]"; - mes "Try as you might, you can't seem to find a way to cut off a branch. Perhaps you need a different tool for cutting?"; - goto L_Close; - -L_happy: - mes "[Druid Tree]"; - mes "The tree looks younger and healthier now."; - goto L_Close; - -L_Close: - set @Q_MASK, 0; - set @Q_SHIFT, 0; - set @Q_status, 0; - close; - -} - -005-1.gat,79,41,0|script|#DruidTree0#_M|400 -{ - callfunc "QuestTreeTouch"; - end; -} - -005-1.gat,80,41,0|script|#DruidTree1#_M|400 -{ - callfunc "QuestTreeTouch"; - end; -} diff --git a/world/map/npc/005-3/_mobs.txt b/world/map/npc/005-3/_mobs.txt index f275f267..d13405f5 100644 --- a/world/map/npc/005-3/_mobs.txt +++ b/world/map/npc/005-3/_mobs.txt @@ -1,13 +1,25 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Snake Pit mobs -005-3.gat,0,0,0,0|monster|Snake|1010,175,0ms,0ms,Mob005-3::On1010 +005-3.gat,58,57,62,57|monster|Snake|1010,50,100000ms,30000ms,Mob005-3::On1010 +005-3.gat,58,57,62,57|monster|BlackScorpion|1009,15,100000ms,30000ms,Mob005-3::On1009 +005-3.gat,58,57,62,57|monster|GiantMaggot|1006,20,100000ms,30000ms,Mob005-3::On1006 005-3.gat,0,0,0|script|Mob005-3|-1 { end; +On1006: + set @mobID, 1006; + callfunc "MobPoints"; + end; + +On1009: + set @mobID, 1009; + callfunc "MobPoints"; + end; + On1010: set @mobID, 1010; callfunc "MobPoints"; diff --git a/world/map/npc/005-3/_warps.txt b/world/map/npc/005-3/_warps.txt index 2f757add..b49daa39 100644 --- a/world/map/npc/005-3/_warps.txt +++ b/world/map/npc/005-3/_warps.txt @@ -1,5 +1,10 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Snake Pit warps -005-3.gat,52,33|warp|To Outside|-1,-1,005-1.gat,89,25 -005-3.gat,33,82|warp|To Outside|-1,-1,005-1.gat,71,77 +005-3.gat,52,33|warp|To Outside|-1,-1,002-1.gat,113,109 +005-3.gat,63,46|warp|Snake Mountain|-1,-1,006-3.gat,89,45 +005-3.gat,85,49|warp|Snake Mountain|-1,-1,006-3.gat,125,65 +005-3.gat,86,30|warp|To Outside|-1,-1,006-1.gat,55,47 +005-3.gat,73,60|warp|To Outside|-1,-1,006-1.gat,51,69 +005-3.gat,78,88|warp|Sandy Dungeon|-1,-1,043-3.gat,116,37 +005-3.gat,33,82|warp|Sandy Dungeon|-1,-1,043-3.gat,31,35 diff --git a/world/map/npc/005-3/mapflags.txt b/world/map/npc/005-3/mapflags.txt index 65920d4d..8916c392 100644 --- a/world/map/npc/005-3/mapflags.txt +++ b/world/map/npc/005-3/mapflags.txt @@ -1 +1 @@ -005-3.gat|mapflag|resave|005-1,80,30 +005-3.gat|mapflag|resave|006-1,36,18 diff --git a/world/map/npc/005-4/_import.txt b/world/map/npc/005-4/_import.txt deleted file mode 100644 index d48c6a1c..00000000 --- a/world/map/npc/005-4/_import.txt +++ /dev/null @@ -1,5 +0,0 @@ -// Map 005-4: Electricity Boss Cave -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 005-4.gat -npc: npc/005-4/_mobs.txt -npc: npc/005-4/_warps.txt diff --git a/world/map/npc/005-4/_mobs.txt b/world/map/npc/005-4/_mobs.txt deleted file mode 100644 index cc3a7de8..00000000 --- a/world/map/npc/005-4/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Electricity Boss Cave mobs - - - -005-4.gat,0,0,0|script|Mob005-4|-1 -{ - end; -} diff --git a/world/map/npc/005-4/_warps.txt b/world/map/npc/005-4/_warps.txt deleted file mode 100644 index 6d2cb2de..00000000 --- a/world/map/npc/005-4/_warps.txt +++ /dev/null @@ -1,4 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Electricity Boss Cave warps - -005-4.gat,37,36|warp|To Snake Pit|0,-1,005-3.gat,85,50 diff --git a/world/map/npc/006-1/_import.txt b/world/map/npc/006-1/_import.txt index 492ddf7d..b3f17a58 100644 --- a/world/map/npc/006-1/_import.txt +++ b/world/map/npc/006-1/_import.txt @@ -5,5 +5,8 @@ npc: npc/006-1/_mobs.txt npc: npc/006-1/_warps.txt npc: npc/006-1/mapflags.txt npc: npc/006-1/mika.txt +npc: npc/006-1/miriam.txt npc: npc/006-1/pachua.txt +npc: npc/006-1/spirit.txt npc: npc/006-1/traveler.txt +npc: npc/006-1/tree.txt diff --git a/world/map/npc/006-1/_mobs.txt b/world/map/npc/006-1/_mobs.txt index 7b5aaf95..9a376631 100644 --- a/world/map/npc/006-1/_mobs.txt +++ b/world/map/npc/006-1/_mobs.txt @@ -1,32 +1,48 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Desert Mountains mobs -006-1.gat,25,34,12,31|monster|Snake|1010,3,100000ms,30000ms,Mob006-1::On1010 -006-1.gat,36,29,9,16|monster|Snake|1010,1,100000ms,30000ms,Mob006-1::On1010 -006-1.gat,34,41,4,6|monster|MountainSnake|1026,1,30000ms,75000ms,Mob006-1::On1026 -006-1.gat,55,37,27,23|monster|MountainSnake|1026,3,150000ms,10000ms,Mob006-1::On1026 +006-1.gat,49,52,7,3|monster|Snake|1010,1,100000ms,30000ms,Mob006-1::On1010 +006-1.gat,53,36,16,13|monster|MountainSnake|1026,3,150000ms,10000ms,Mob006-1::On1026 006-1.gat,89,26,33,13|monster|MountainSnake|1026,5,15000ms,75000ms,Mob006-1::On1026 -006-1.gat,118,43,22,40|monster|MountainSnake|1026,8,15000ms,75000ms,Mob006-1::On1026 -006-1.gat,115,49,6,3|monster|MountainSnake|1026,3,15000ms,75000ms,Mob006-1::On1026 -006-1.gat,88,47,36,11|monster|MountainSnake|1026,3,15000ms,75000ms,Mob006-1::On1026 -006-1.gat,105,72,25,16|monster|MountainSnake|1026,3,15000ms,75000ms,Mob006-1::On1026 -006-1.gat,75,106,16,22|monster|MountainSnake|1026,4,15000ms,75000ms,Mob006-1::On1026 -006-1.gat,102,97,36,29|monster|MountainSnake|1026,8,15000ms,75000ms,Mob006-1::On1026 -006-1.gat,65,65,49,30|monster|MountainSnake|1026,8,15000ms,75000ms,Mob006-1::On1026 -006-1.gat,95,120,38,13|monster|MountainSnake|1026,5,15000ms,75000ms,Mob006-1::On1026 -006-1.gat,54,120,29,7|monster|MountainSnake|1026,4,15000ms,75000ms,Mob006-1::On1026 -006-1.gat,36,98,33,35|monster|Scorpion|1003,10,100000ms,30000ms,Mob006-1::On1003 +006-1.gat,113,41,12,37|monster|MountainSnake|1026,8,15000ms,75000ms,Mob006-1::On1026 +006-1.gat,113,51,6,3|monster|MountainSnake|1026,3,15000ms,75000ms,Mob006-1::On1026 +006-1.gat,86,46,29,5|monster|MountainSnake|1026,3,15000ms,75000ms,Mob006-1::On1026 +006-1.gat,105,73,21,14|monster|MountainSnake|1026,3,15000ms,75000ms,Mob006-1::On1026 +006-1.gat,73,102,8,13|monster|MountainSnake|1026,4,15000ms,75000ms,Mob006-1::On1026 +006-1.gat,104,100,11,15|monster|MountainSnake|1026,8,15000ms,75000ms,Mob006-1::On1026 +006-1.gat,82,72,25,16|monster|MountainSnake|1026,8,15000ms,75000ms,Mob006-1::On1026 +006-1.gat,95,114,17,4|monster|MountainSnake|1026,5,15000ms,75000ms,Mob006-1::On1026 +006-1.gat,57,119,18,2|monster|MountainSnake|1026,4,15000ms,75000ms,Mob006-1::On1026 +006-1.gat,33,97,27,33|monster|Scorpion|1003,10,100000ms,30000ms,Mob006-1::On1003 +006-1.gat,58,49,3,3|monster|GreenSlime|1005,3,100000ms,30000ms,Mob006-1::On1005 +006-1.gat,34,50,5,4|monster|Snake|1010,2,40000ms,50000ms,Mob006-1::On1010 +006-1.gat,96,92,20,48|monster|Snake|1010,2,40000ms,50000ms,Mob006-1::On1010 +006-1.gat,35,97,28,29|monster|Maggot|1002,20,100000ms,30000ms,Mob006-1::On1002 +006-1.gat,28,73,3,2|monster|GreenSlime|1005,2,100000ms,30000ms,Mob006-1::On1005 +006-1.gat,33,59,3,2|monster|GreenSlime|1005,2,100000ms,30000ms,Mob006-1::On1005 +006-1.gat,37,73,7,3|monster|Snake|1010,1,100000ms,30000ms,Mob006-1::On1010 +006-1.gat,100,36,38,24|monster|Snake|1010,2,40000ms,50000ms,Mob006-1::On1010 006-1.gat,0,0,0|script|Mob006-1|-1 { end; +On1002: + set @mobID, 1002; + callfunc "MobPoints"; + end; + On1003: set @mobID, 1003; callfunc "MobPoints"; end; +On1005: + set @mobID, 1005; + callfunc "MobPoints"; + end; + On1010: set @mobID, 1010; callfunc "MobPoints"; diff --git a/world/map/npc/006-1/_warps.txt b/world/map/npc/006-1/_warps.txt index 91459352..551d74a2 100644 --- a/world/map/npc/006-1/_warps.txt +++ b/world/map/npc/006-1/_warps.txt @@ -1,42 +1,32 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Desert Mountains warps -006-1.gat,18,31|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,40,26|warp|To Desert Mountains Cav|-1,-1,006-3.gat,40,28 -006-1.gat,60,58|warp|To Desert Mountains Cav|-1,-1,006-3.gat,60,70 -006-1.gat,62,30|warp|To Desert Mountains Cav|-1,-1,006-3.gat,62,32 -006-1.gat,55,27|warp|To Desert Mountains Cav|-1,-1,006-3.gat,55,29 -006-1.gat,77,44|warp|To Desert Mountains Cav|-1,-1,006-3.gat,77,46 -006-1.gat,86,24|warp|To Desert Mountains Cav|-1,-1,006-3.gat,86,26 -006-1.gat,91,24|warp|To Desert Mountains Cav|-1,-1,006-3.gat,91,26 -006-1.gat,104,44|warp|To Desert Mountains Cav|-1,-1,006-3.gat,104,46 -006-1.gat,122,24|warp|To Desert Mountains Cav|-1,-1,006-3.gat,122,26 -006-1.gat,114,49|warp|To Desert Mountains Cav|-1,-1,006-3.gat,114,51 -006-1.gat,110,56|warp|To Desert Mountains Cav|-1,-1,006-3.gat,110,58 -006-1.gat,125,59|warp|To Desert Mountains Cav|-1,-1,006-3.gat,125,61 -006-1.gat,92,63|warp|To Desert Mountains Cav|-1,-1,006-3.gat,92,65 -006-1.gat,112,74|warp|To Desert Mountains Cav|-1,-1,006-3.gat,112,76 -006-1.gat,121,110|warp|To Desert Mountains Cav|-1,-1,006-3.gat,121,112 -006-1.gat,79,120|warp|To Desert Mountains Cav|-1,-1,006-3.gat,79,122 -006-1.gat,38,121|warp|To Desert Mountains Cav|-1,-1,006-3.gat,38,123 -006-1.gat,74,90|warp|To Desert Mountains Cav|-1,-1,006-3.gat,74,92 -006-1.gat,51,90|warp|To Desert Mountains Cav|-1,-1,006-3.gat,51,92 +006-1.gat,40,26|warp|To Desert Mountain Cave|-1,-1,006-3.gat,40,28 +006-1.gat,60,58|warp|To Desert Mountain Cave|-1,-1,006-3.gat,60,70 +006-1.gat,62,30|warp|To Desert Mountain Cave|-1,-1,006-3.gat,62,32 +006-1.gat,55,27|warp|To Desert Mountain Cave|-1,-1,006-3.gat,55,29 +006-1.gat,77,44|warp|To Desert Mountain Cave|-1,-1,006-3.gat,77,46 +006-1.gat,86,24|warp|To Desert Mountain Cave|-1,-1,006-3.gat,86,26 +006-1.gat,91,24|warp|To Desert Mountain Cave|-1,-1,006-3.gat,91,26 +006-1.gat,98,46|warp|To Desert Mountain Cave|-1,-1,006-3.gat,104,46 +006-1.gat,114,22|warp|To Desert Mountain Cave|-1,-1,006-3.gat,122,26 +006-1.gat,114,49|warp|To Desert Mountain Cave|-1,-1,006-3.gat,114,51 +006-1.gat,102,53|warp|To Desert Mountain Cave|-1,-1,006-3.gat,110,58 +006-1.gat,117,57|warp|To Desert Mountain Cave|-1,-1,006-3.gat,125,61 +006-1.gat,92,63|warp|To Desert Mountain Cave|-1,-1,006-3.gat,92,65 +006-1.gat,112,74|warp|To Desert Mountain Cave|-1,-1,006-3.gat,112,76 +006-1.gat,111,110|warp|To Desert Mountain Cave|-1,-1,032-3.gat,56,60 +006-1.gat,83,117|warp|To Desert Mountain Cave|-1,-1,006-3.gat,79,121 +006-1.gat,38,121|warp|To Desert Mountain Cave|-1,-1,006-3.gat,38,123 +006-1.gat,74,90|warp|To Desert Mountain Cave|-1,-1,006-3.gat,74,92 +006-1.gat,51,90|warp|To Desert Mountain Cave|-1,-1,006-3.gat,51,92 006-1.gat,30,123|warp|To Outback Cave|-1,-1,032-3.gat,128,33 -006-1.gat,19,30|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,20,29|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,21,28|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,22,27|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,23,26|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,24,25|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,25,24|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,26,23|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,27,22|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,28,21|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,29,20|warp|To Snake Desert|-1,-1,005-1.gat,172,101 -006-1.gat,30,19|warp|To Snake Desert|-1,-1,005-1.gat,172,101 006-1.gat,33,85|warp|To Pachua's Village|-1,-1,006-2.gat,58,43 006-1.gat,23,85|warp|To Pachua's Village|-1,-1,006-2.gat,48,43 006-1.gat,23,100|warp|To Pachua's Village|-1,-1,006-2.gat,67,64 006-1.gat,21,108|warp|To Pachua's Village|-1,-1,006-2.gat,65,72 006-1.gat,37,26|warp|To Desert Mountains|-1,-1,006-1.gat,37,23 006-1.gat,37,24|warp|To Desert Mountains|-1,-1,006-1.gat,37,27 +006-1.gat,55,46|warp|Snake Cave|-1,-1,005-3.gat,86,31 +006-1.gat,20,48|warp|To Sandstorm Desert|-1,0,002-1.gat,118,95 +006-1.gat,51,68|warp|Snake Cave|-1,-1,005-3.gat,73,59 diff --git a/world/map/npc/006-1/miriam.txt b/world/map/npc/006-1/miriam.txt new file mode 100644 index 00000000..4279e3d5 --- /dev/null +++ b/world/map/npc/006-1/miriam.txt @@ -0,0 +1,340 @@ +//############################################# +// author: alastrim, PjotrOrial +//############################################# +// This npc teaches you the speed skill. +// used variables: +// QUEST_MIRIAM: +// 0 either fully completed the quests in here, or not started. +// 1 you said the wrong words, she is insulted. (so you excuse and goto 2) +// 2 waiting for the ingredients +// 3 you brought the needed stuff. if you meet other criteria (BaseLevel, agi) you will be taught the skill +// 4 you have met the criteria of 3, but declined to take the speed test. +// 5 you tried the quest but you failed +// QUEST_MIRIAM_start +// a time in ticks. This is only !=0 if you started running to pachua. +// QUEST_MIRIAM_run +// when you reach pachua, he stores the difference of start and arrival in here. +//############################################# +// after you gained the speed skill, all variables are reset to zero. +//############################################# + +006-1.gat,115,111,0|script|Miriam|175 +{ + setarray @npc_loc, 115, 111, 2; + callfunc "PCtoNPCRange"; + if (@npc_check) + goto L_Close; + + if (getskilllv(SKILL_SPEED)) goto L_fast; + if (getequipid(equip_torso) < 0) goto L_naked; + if (QUEST_MIRIAM == 0) goto L_intro; + if (QUEST_MIRIAM == 1) goto L_ask1; + if (QUEST_MIRIAM == 2) goto L_ask2; + if (QUEST_MIRIAM == 3) goto L_teach; + if (QUEST_MIRIAM == 4) goto L_testoffer; + if (QUEST_MIRIAM_run != 0) goto L_checktime; + if (QUEST_MIRIAM_start != 0) goto L_wasting; + if (QUEST_MIRIAM == 5) goto L_testoffer; + goto L_intro; + +L_intro: + mes "You see a woman sitting in the hot sand with eyes wide open... But she does not seem to be looking at something in particular..."; + next; + menu + "Ehr... Hi, my name is " +strcharinfo(0)+ ". Are you OK?",L_Next; + +L_Next: + mes "[Miriam]"; + mes "\"..."; + next; + menu + "Hello?",L_Continue; + +L_Continue: + mes "[Miriam]"; + mes "\"Yes, I am. Why? Do you think I am not OK? I am OK. You interrupted my meditation. Now I will need hours to calm down and stay quiet! Yes, yes, I know, I'm a fast talker!\""; + next; + mes "\"In fact, I am fast in everything I do! I can kill a Mountain Snake before it even starts to think about attacking me! Yes my friend, in a battle, speed is power!"; + next; + menu + "Wow! Very impressi...",L_More; + +L_More: + mes "[Miriam]"; + mes "\"Yes, yes, I know. But if there is one thing I am NOT good at, it is meditation! My master said I need to meditate, but... Ohh! So difficult to stay quiet! And when you FINALLY do, someone INTERRUPTS you, asking if you are 'OK'...\""; + next; + menu + "Oh, I am sorry! I didn't know you were meditating...",L_WallText; + +L_WallText: + mes "[Miriam]"; + mes "\"You are really sorry? Ok, but that is not enough... I need you to do something for me. As you can imagine, I will need a lot of time to concentrate and get back to the state I was when you interrupted me.\""; + next; + mes "\"But the problem is that I wasn't expecting to be here for so long, so I will need some food and something to drink.\""; + next; + mes "\"So, if you really want to prove that you are sorry, bring me 5 Concentration Potions and 10 Snake Tongues.\""; + next; + menu + "Ok, but those potions will not help with your mental concent...",L_MoreTalking, + "Sorry, but I can't help you right now.",L_canthelp; + +L_MoreTalking: + mes "[Miriam]"; + mes "\"ah, ah, ah... I know what I am doing! Now run and get what I asked.\""; + set QUEST_MIRIAM, 2; + close; + +L_canthelp: + mes "[Miriam]"; + mes "\"Oh, really? So you better pray to not need my help in the future!\""; + set QUEST_MIRIAM, 1; + close; + +L_canthelp2: + mes "[Miriam]"; + mes "\"...\""; + next; + mes "\"...\""; + next; + mes "\"Well, if you don't have time to help, at least don't make things difficult for me!\""; + close; + +L_ask1: + mes "[Miriam]"; + mes "\"So, you are back... have you changed your mind about my request?\""; + next; + menu + "Yes, I will get what you want!",L_WillGetItems, + "No, I have no time right now.",L_canthelp2; + +L_WillGetItems: + set QUEST_MIRIAM, 2; + mes "\"Good. So, run and get it!\""; + close; + +L_ask2: + mes "[Miriam]"; + mes "\"Did you get what I asked for?\""; + next; + menu + "Yes, here it is!",L_getitems, + "What was that again?", L_ask3, + "No, not yet.",L_Hurry; + +L_Hurry: + mes "\"So please hurry up!\""; + close; + +L_ask3: + mes "[Miriam]"; + mes "\"You have a small mind, haven't you? I am meditating here and I asked you to bring me stuff, so I can concentrate better.\""; + next; + mes "\"And stop asking such silly questions in the future.\""; + next; + mes "\"So, if you really want to help me now, bring me 5 Concentration Potions and 10 Snake Tongues.\""; + close; + +L_getitems: + if (countitem("SnakeTongue") < 10 + || countitem("ConcentrationPotion") < 5) + goto L_notenough; + delitem "SnakeTongue", 10; + delitem "ConcentrationPotion", 5; + set QUEST_MIRIAM, 3; + mes "[Miriam]"; + mes "\"Good job! Now I have enough food to stay in this desert for days!\""; + next; + mes "\"Now, since you helped me, maybe I can teach you a basic skill, but only if you prove yourself to be a fast runner! Come back and talk to me when you think you are prepared to learn.\""; + close; + +L_notenough: + mes "[Miriam]"; + mes "\"Hey, you don't have all that I asked. Come back when you have everything.\""; + close; + +L_teach: + mes "[Miriam]"; + mes "\"Hmm... do you think you can learn the special Speed skill?\""; + next; + menu + "Yes, I am prepared...", L_Prepared, + "I am already fast.", L_notfast; + +L_Prepared: + set @agi, readparam(bAgi); + set @torso$, getitemname(getequipid(equip_torso)); + set @weight, MaxWeight/Weight; + if (@weight < 3) + goto L_heavyweight; + if (@agi < 60) + goto L_slow; + if (BaseLevel < 60) + goto L_lowlevel; + if (countitem("SteelShield") > 0 + || countitem("WarlordHelmet") > 0 + || countitem("CrusadeHelmet") > 0 + || countitem("WarlordPlate") > 0 + || countitem("KnightsHelmet") > 0 + || countitem("InfantryHelmet") > 0 + || countitem("ChainmailShirt") > 0 + || countitem("WarlordBoots") > 0 + || countitem("LightPlatemail") > 0 + || countitem("CandleHelmet") > 0) + goto L_heavymetal; + goto L_offer; + +L_heavyweight: + mes "[Miriam]"; + mes "\"Wow... Why do you bring so many things with you? You must be carrying more than one third of your own weight! I won't teach you unless you get rid of some stuff... \""; + close; + +L_heavymetal: + mes "[Miriam]"; + mes "\"Hmm... I see... You want to be one of those lazy slow warriors... wasting all their strength carrying kilos of metal clothes... Why does no one see the great advantages of a beautiful, flexible, lightweight armor nowadays?\""; + next; + mes "\"Come back here when you get rid of this junk...\""; + close; + +L_slow: + mes "[Miriam]"; + mes "Oh, wait, wait... " +@agi+ " Agility? Are you serious? What do you do with all your Character points? Put them all to 'Strength'? Really... I don't even want to know... Come back here when you have a decent character points distribution!\""; + close; + +L_lowlevel: + mes "[Miriam]"; + mes "\"Come back here when you are old enough. I even wonder how you could get here so unexperienced as you are.\""; + close; + +L_offer: + mes "[Miriam]"; + mes "\"Hmm! You look great in these clothes! They look very comfortable too... And it seems like you are not carrying too much weight.\""; + next; + if (!(getskilllv(SKILL_POOL))) + goto L_noskill; + menu + "Yes, I look really good in this " +@torso$+ ".",L_TorsoNext; + +L_TorsoNext: + mes "[Miriam]"; + mes "\"I see. I like the way you distributed your Character Points too... " +@agi+ " points to Agility! You really know how to prepare yourself for a good fight!\""; + next; + mes "\"Well... Even if you have a potential to be a good fighter, moving the way you do will not help. You need to be fast to avoid the monsters. \""; + next; + mes "\"So, if you pass a small test I can teach you a skill that will increase your walking speed! You will not be as fast as I am, but I am sure it will be useful.\""; + next; + menu + "I'm in! What kind of test is it?",L_test, + "I don't think I need more speed right now",L_giveup; + +L_test: + mes "[Miriam]"; + mes "\"Great! The test is simple. You need to run as fast as you can from the place where I am sitting to the mountains and talk to Pachua, the chief. When you get there and talk to Pachua, he will send a special smoke signal to me, so I can know how much time it took for you to get there.\""; + next; + mes "\"If you make it in a good time, I will teach you the special speeding skill. If not, you can always try again. So, are you ready?\""; + next; + menu + "Yes, let's do it!",L_LetsDoThis, + "No, I need to stretch my muscles first!",L_stretch; + +L_LetsDoThis: + close2; + message strcharinfo(0), "Miriam quickly grabs your arm and pull you to the place where she is sitting."; + // Warp the player to the place where the NPC is defined, so he can't cheat. + warp "032-1.gat",55,21; + npctalk "Run " +strcharinfo(0)+ ", run!"; + set QUEST_MIRIAM, 5; + set QUEST_MIRIAM_start, gettimetick(2); + set QUEST_MIRIAM_cheat, 0; + end; + +L_naked: + mes "[Miriam]"; + mes "\"Hmmm?! Please put on some clothes before talking to me.\""; + close; + +L_notfast: + mes "[Miriam]"; + mes "\"Hah! If you think so...\""; + close; + +L_noskill: + mes "[Miriam]"; + mes "\"For a person like you, I could even teach a useful skill! Too bad you don't have the basic abillities to learn it...\""; + close; + +L_giveup: + mes "[Miriam]"; + mes "\"Oh, that is too bad... But if you change your mind, come back!\""; + set QUEST_MIRIAM, 4; + close; + +L_testoffer: + mes "[Miriam]"; + mes "\"Are you ready for the test now?\""; + next; + menu + "Yes!",L_test, + "Not yet.",L_Close; + +L_Close: + close; + +L_warning: + mes "[Miriam]"; + mes "\"I know very well what you tried to do. I will not teach you the speed skill if you keep trying this kind of trick!\""; + next; + goto L_testoffer; + +L_stretch: + mes "[Miriam]"; + mes "\"Ok. Good idea... Stretching exercises can increase your flexibility and even prevent injuries!\""; + set QUEST_MIRIAM, 4; + close; + +L_wasting: + mes "[Miriam]"; + mes "\"Don't waste your time talking to me! RUN and talk to Pachua!\""; + close; + +L_checktime: + if (QUEST_MIRIAM_cheat != 0) + goto L_warning; + if (QUEST_MIRIAM_run <= 210) + goto L_goodjob; + goto L_tryagain; + +L_tryagain: + mes "[Miriam]"; + mes "\"You needed " + QUEST_MIRIAM_run + " seconds to reach Pachua. It is not enough.\""; + set QUEST_MIRIAM_run, 0; + close; + +L_goodjob: + mes "[Miriam]"; + mes "\"Great job! You needed " + QUEST_MIRIAM_run + " seconds to reach Pachua. Very impressive for a person like you.\""; + next; + mes "\"Now I need you to relax. Do NOT move. This teaching process can be painful sometimes.\""; + next; + mes "Miriam stares into your eyes and starts to scream some strange words very close to your ears."; + next; + mes "You feel dizzy and as soon as you move your head and look to the ground, Miriam pushes you hard, sending you meters away from her."; + close2; + warp "032-1.gat",55,22; + // free all used player variables. This can be done, since there is a conditional on the speedskill at the beginning. + set QUEST_MIRIAM_start, 0; + set QUEST_MIRIAM_run, 0; + set QUEST_MIRIAM, 0; + message strcharinfo(0), "[You gain 2500 experience points]"; + message strcharinfo(0), "[You learned Speed Skill]"; + setskill SKILL_SPEED, 1; + getexp 2500, 0; + set QUEST_MIRIAM_cheat, 0; // reset just in case it is still set. + close; + +L_fast: + mes "[Miriam]"; + mes "\"I hope you make a good use of your new skill... Take care!\""; + set QUEST_MIRIAM_cheat, 0; // reset just in case it is still set. + close; + +} diff --git a/world/map/npc/006-1/spirit.txt b/world/map/npc/006-1/spirit.txt new file mode 100644 index 00000000..5f7d06fb --- /dev/null +++ b/world/map/npc/006-1/spirit.txt @@ -0,0 +1,299 @@ +function|script|EarthImpTouch +{ + if (getskilllv(SKILL_MAGIC)) goto L_message; + + mes "[Well]"; + mes "You hear noises from within the well."; + close; + +L_message: + set @Q_MASK, NIBBLE_0_MASK; + set @Q_SHIFT, NIBBLE_0_SHIFT; + set @Q_status, (QUEST_MAGIC2 & @Q_MASK) >> @Q_SHIFT; + + // Set up SkillUp function + set @SUP_id, SKILL_MAGIC_NATURE; + set @SUP_name$, "Nature Magic"; + set @Q_STATUS_INITIAL, 0; + set @Q_STATUS_ONQUEST, 1; + set @Q_STATUS_STUDENT0, 2; + set @Q_STATUS_STUDENT1, 3; + set @Q_STATUS_STUDENT2, 4; + set @Q_STATUS_STUDENT3, 5; + + set @s$, "girl"; + if (Sex) set @s$, "boy"; + + if (MAGIC_FLAGS & MFLAG_KNOWS_IMP) goto L_wb; + + mes "[Well]"; + mes "Something is inside that well, and now that you have turned your attention towards it, it seems to be talking to you!"; + next; + + mes "[Well]"; + mes "\"Hey! You there! Yes, I'm talking to you!\""; + mes "That strange voice seems to be coming from inside your head!"; + next; + menu + "Who, me?", L_Next, + "Leave me alone!", L_Close, + "Aaah! I'm hearing voices!", L_silly_close; + +L_Next: + mes "[Well]"; + mes "\"I'm in here, in the well, talking to you! If I'm not very mistaken, you are a powerful wizard-to-be, except that nobody has showed you how to properly do magic yet!\""; + next; + menu + "Who are you?", L_Next1, + "Aaaah! The voices are after me!", L_silly_close, + "Whatever it is, I'm not interested.", L_Close; + +L_Next1: + mes "[Earth Spirit]"; + mes "\"I'm an earth spirit; my name isn't important... all that matters is that I like you, and that I will help you become a powerful wizard if you help me. Just a fair deal, no more than that...\""; + next; + set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_KNOWS_IMP; + goto L_main; + +L_wb: + mes "[Earth Spirit]"; + mes "\"It's excellent to see you again!\""; + next; + goto L_main; + +L_main: + menu + "How did you get trapped?", L_Q_trapped, + "Can you teach me magic and spells?", L_Q_magic, + "What do you know about...", L_Q, + "Goodbye!", L_Close; + +L_Q_trapped: + mes "[Earth Spirit]"; + mes "\"Oh, a wicked witch grew jealous of my power and locked me up in this well.\""; + next; + goto L_main; + +L_Q: + mes "[Earth Spirit]"; + mes "\"Stop bothering me with your questions, will you? I'm trying to make you a powerful wizard, after all!\""; + next; + goto L_main; + +L_Q_magic: + if (@Q_status == @Q_STATUS_ONQUEST) goto L_Q_magic_1; + if (@Q_status == @Q_STATUS_STUDENT0) goto L_Q_magic_2; + if (@Q_status == @Q_STATUS_STUDENT1) goto L_Q_magic_3; + if (@Q_status == @Q_STATUS_STUDENT2) goto L_Q_magic_4; + + mes "[Earth Spirit]"; + mes "\"Good, good... that's the right attitude! Yes, I can teach you magic, but first you must prove that you are worthy to be my student!\""; + next; + mes "[Earth Spirit]"; + mes "\"North-east of here sits and old, dead tree. Well, not completely dead, not yet, but almost. It's nothing special. Well, maybe a little, but not really. I want you to cut off one of its branches.\""; + next; + menu + "No way.", L_silly_close, + "Sure.", L_Q_tree_ok, + "Why that particular tree?", L_Next2; + +L_Next2: + mes "[Earth Spirit]"; + mes "\"Oh, you and your questions! Well, that tree was a druid once, so the branches contain a bit of its lifeforce. And that's useful.\""; + next; + menu + "Yuck.", L_silly_close, + "Sure, whatever.", L_Q_tree_ok, + "Isn't that like cutting off someone's arm?", L_Next3; + +L_Next3: + mes "[Earth Spirit]"; + mes "\"Oooh... now come on! Don't be so sentimental. He turned himself into a tree, he can hardly expect everyone to leave him alone.\""; + next; + mes "[Earth Spirit]"; + mes "\"Who knows if he can even feel anything anymore? I'm sure he can't, being wooden and all. Besides, it's only a measly tree. Not like I'm asking you to cut him down!.\""; + next; + menu + "No way.", L_silly_close, + "Alright, that makes sense.", L_Q_tree_ok; + +L_Q_tree_ok: + mes "[Earth Spirit]"; + mes "\"Good, good, good! Yes, that will be very good! So, come back when you have the branch. Oh, and bring 100,000 GP, too, as an enrollment fee.\""; + set @Q_status, @Q_STATUS_ONQUEST; + callsub S_update_var; + set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_KNOWS_CUTTREE; + next; + goto L_main; + +L_Q_magic_1: + mes "[Earth Spirit]"; + mes "\"Yes, yes, if you bring me the branch and the money, then I will!\""; + next; + menu + "Here are the branch and the money.", L_Next4, + "How much money did you want again?", L_Q_tree_howmuch, + "How can I cut it?", L_Q_tree_how, + "Where was the tree again?", L_Q_tree_where, + "What is that tree?", L_Q_tree_what; + +L_Next4: + if (countitem("DruidTreeBranch") < 1) goto L_Q_tree_none; + if (!(MAGIC_FLAGS & MFLAG_DID_CUTTREE)) goto L_Q_tree_dry; + if (Zeny < 100000) goto L_Q_tree_nomoney; + + set Zeny, Zeny - 100000; + delitem "DruidTreeBranch", 1; + mes "[Earth Spirit]"; + mes "Following the earth sprite's instructions, you throw branch and GP into the well."; + next; + mes "[Earth Spirit]"; + mes "\"Well done, very well done! Consider yourself my student now.\""; + set @SUP_xp, 5000; + set @SUP_lvl, 2; + callfunc "SkillUp"; + next; + set @Q_status, @Q_STATUS_STUDENT0; + callsub S_update_var; + goto L_main; + +L_Q_magic_finish: + mes "[1000 experience points]"; + set @Q_status, @Q_status + 1; + callsub S_update_var; + getexp 1000,0; + next; + goto L_main; + +L_Q_magic_2: + mes "[Earth Spirit]"; + mes "\"Yes, of course! For just 20,000 GP I will teach you your first spell!\""; + next; + menu + "Here you are.", L_Next5, + "No.", L_main; + +L_Next5: + if (Zeny < 20000) goto L_no20k; + + set Zeny, Zeny - 20000; + mes "[Earth Spirit]"; + mes "\"Kekeke... excellent! Yes, here goes your first spell, the flying backpack! If you are overloaded, it will take the load off your shoulders.\""; + next; + mes "[Earth Spirit]"; + mes "\"Take a cocoon, living or dead, and suffuse it in magic. Whisper '" + getspellinvocation("flying-backpack") + "', and feel it float!\""; + goto L_Q_magic_finish; + +L_Q_magic_3: + mes "[Earth Spirit]"; + mes "\"But yes, yes! Only 20,000 GP, once again, and I will teach you a far more useful spell!\""; + next; + menu + "Here you are.", L_Next6, + "No.", L_main; + +L_Next6: + if (Zeny < 20000) goto L_no20k; + set Zeny, Zeny - 20000; + mes "[Earth Spirit]"; + mes "\"Yeees, good! This one is a protection spell, making your skin harder. You need a hard spike for it, though. Hold that spike in your hands, and focus on it.\""; + next; + mes "[Earth Spirit]"; + mes "\"Next, say '" + getspellinvocation("protect") + "', and feel your skin grow rigid! Very useful against stings and stabs and pokes and pricks and that sort of stuff.\""; + goto L_Q_magic_finish; + +L_Q_magic_4: + mes "[Earth Spirit]"; + mes "\"Naah, you're too weak now! Come back later when you have grown!\""; + next; + goto L_main; + +L_no20k: + mes "[Earth Spirit]"; + mes "\"You can't pay me 20,000 if you don't have that much!\""; + next; + goto L_main; + +L_Q_tree_none: + mes "[Earth Spirit]"; + mes "\"Where is your branch?\""; + next; + goto L_main; + +L_Q_tree_dry: + mes "[Earth Spirit]"; + mes "\"That won't do. This branch is completely dead; you'll have to get another.\""; + next; + goto L_main; + +L_Q_tree_nomoney: + mes "[Earth Spirit]"; + mes "\"No, you don't have enough money! Come back when you have 100,000.\""; + next; + goto L_main; + +L_Q_tree_howmuch: + mes "[Earth Spirit]"; + mes "\"It's only 100,000 GP to become my student.\""; + next; + goto L_main; + +L_Q_tree_how: + mes "[Earth Spirit]"; + mes "\"Oh... right, the tree might be protected. Only a bone knife will cut that. No idea where you can find one, but I'm sure you will manage!\""; + next; + goto L_main; + +L_Q_tree_where: + mes "[Earth Spirit]"; + mes "\"North-east of here.\""; + next; + goto L_main; + +L_Q_tree_what: + mes "[Earth Spirit]"; + mes "\"Just some silly druid who turned himself into a tree; nothing important.\""; + next; + goto L_main; + +L_silly_close: + if (MAGIC_FLAGS & MFLAG_KNOWS_IMP) + mes "[Earth Spirit]"; + if (!(MAGIC_FLAGS & MFLAG_KNOWS_IMP)) + mes "[Well]"; + mes "\"Silly " + @s$ + ".\""; + goto L_Close; + +L_Close: + set @Q_MASK, 0; + set @Q_SHIFT, 0; + set @Q_status, 0; + set @SUP_id, 0; + set @SUP_name$, ""; + set @SUP_xp, 0; + set @SUP_lvl, 0; + set @Q_STATUS_INITIAL, 0; + set @Q_STATUS_ONQUEST, 0; + set @Q_STATUS_STUDENT0, 0; + set @Q_STATUS_STUDENT1, 0; + set @Q_STATUS_STUDENT2, 0; + set @Q_STATUS_STUDENT3, 0; + set @s$, ""; + close; + +S_update_var: + set QUEST_MAGIC2, (QUEST_MAGIC2 & ~(@Q_MASK) | (@Q_status << @Q_SHIFT)); + return; +} + +006-1.gat,63,79,0|script|#EarthImp0#_M|400 +{ + callfunc "EarthImpTouch"; + end; +} + +006-1.gat,64,79,0|script|#EarthImp1#_M|400 +{ + callfunc "EarthImpTouch"; + end; +} diff --git a/world/map/npc/006-1/tree.txt b/world/map/npc/006-1/tree.txt new file mode 100644 index 00000000..dbef23f2 --- /dev/null +++ b/world/map/npc/006-1/tree.txt @@ -0,0 +1,168 @@ +function|script|QuestTreeTrigger +{ + set @Q_MASK, NIBBLE_2_MASK; + set @Q_SHIFT, NIBBLE_2_SHIFT; + + set @Q_status, (QUEST_MAGIC & @Q_MASK) >> @Q_SHIFT; + set @Q_status_lower, @Q_status & 3; + set @Q_status, (@Q_status & 12) >> 2; + + if (@Q_status & @flag) goto L_Close; // already did that + + if (@flag == 2) goto L_hug; + goto L_cont; + +L_cont: + set @Q_status, @Q_status | @flag; + callsub S_update_var; + + if (@Q_status != 3) goto L_Close; + + if (MAGIC_FLAGS & MFLAG_DID_CUTTREE) goto L_Close; + + mes "Maybe it is just a trick of the light, but you can't help but think that the tree looks different... healthier, almost younger."; + mes "[20000 experience points]"; + getexp 20000, 0; + set @value, 15; + callfunc "QuestSagathaHappy"; + goto L_Close; + +L_hug: + mes "You hug the tree."; + next; + goto L_cont; + +L_Close: + set @Q_MASK, 0; + set @Q_SHIFT, 0; + set @Q_status, 0; + set @Q_status_lower, 0; + set @Q_wr_status, 0; + set @value, 0; + close; + +S_update_var: + set @Q_wr_status, (@Q_status << 2) | @Q_status_lower; + set QUEST_MAGIC, (QUEST_MAGIC & ~(@Q_MASK) | (@Q_wr_status << @Q_SHIFT)); + return; +} + +function|script|QuestTreeTouch +{ + set @Q_MASK, NIBBLE_2_MASK; + set @Q_SHIFT, NIBBLE_2_SHIFT; + + set @Q_status, (QUEST_MAGIC & @Q_MASK) >> @Q_SHIFT; + set @Q_status, (@Q_status & 12) >> 2; + + if (@Q_status == 3) goto L_happy; + + if ((MAGIC_FLAGS & (MFLAG_KNOWS_DRUIDTREE | MFLAG_KNOWS_CUTTREE)) == MFLAG_KNOWS_CUTTREE) goto L_cut; + + if ((MAGIC_FLAGS & (MFLAG_KNOWS_DRUIDTREE | MFLAG_KNOWS_CUTTREE)) == MFLAG_KNOWS_DRUIDTREE) goto L_water; + + if ((MAGIC_FLAGS & (MFLAG_KNOWS_DRUIDTREE | MFLAG_KNOWS_CUTTREE)) > 0) //i.e., both are set + goto L_both; + + mes "[Dying Tree]"; + mes "You see a strange tree."; + goto L_Close; + +L_cut: + mes "[Dying Tree]"; + mes "This must be the tree that the earth spirit was referring to."; + next; + menu + "Cut off a branch", L_do_cut, + "Leave it alone", L_Close; + +L_water: + mes "[Dying Tree]"; + mes "This must be the druid tree."; + next; + menu + "Water the tree", L_givewater, + "Kiss tree", L_kiss, + "Leave it alone", L_Close; + +L_both: + mes "[Dying Tree]"; + mes "This must be the druid tree that Wyara and the earth spirit were talking about."; + next; + menu + "Water the tree", L_givewater, + "Kiss tree", L_kiss, + "Cut off a branch", L_do_cut, + "Leave it alone", L_Close; + +L_givewater: + if (countitem("BottleOfWater") < 1) goto L_no_water; + delitem "BottleOfWater", 1; + getitem "EmptyBottle", 1; + + mes "[Dying Tree]"; + mes "You pour a bottle of water into the sand. The water dissipates quickly, without any effect."; + goto L_Close; + +L_no_water: + mes "[Dying Tree]"; + mes "You don't have any water."; + goto L_Close; + +L_kiss: + mes "[Dying Tree]"; + mes "You pluck out a splinter from your lip."; + mes "Somehow, you don't think that this helped."; + goto L_Close; + +L_do_cut: + if (countitem("BoneKnife") < 1) goto L_no_boneknife; + + if (MAGIC_FLAGS & MFLAG_DID_CUTTREE) goto L_really_cut; + + mes "[Dying Tree]"; + mes "You find a suitable branch and put your bone knife in position."; + mes "Holding the branch, you have an uneasy feeling – as if something inside the tree were trying to resist you..."; + mes "Do you want to continue cutting?"; + next; + menu + "Nah... better not.", L_Close, + "Yes, let's cut!", L_really_cut; + +L_really_cut: + set MAGIC_FLAGS, MAGIC_FLAGS | MFLAG_DID_CUTTREE; + getitem "DruidTreeBranch", 1; + mes "[Dying Tree]"; + mes "You cut off a branch from the tree."; + mes "For an instant, you have an uneasy feeling, as if the branch were writhing in your hand..."; + goto L_Close; + +L_no_boneknife: + mes "[Dying Tree]"; + mes "Try as you might, you can't seem to find a way to cut off a branch. Perhaps you need a different tool for cutting?"; + goto L_Close; + +L_happy: + mes "[Druid Tree]"; + mes "The tree looks younger and healthier now."; + goto L_Close; + +L_Close: + set @Q_MASK, 0; + set @Q_SHIFT, 0; + set @Q_status, 0; + close; + +} + +006-1.gat,82,59,0|script|#DruidTree0#_M|400 +{ + callfunc "QuestTreeTouch"; + end; +} + +006-1.gat,83,59,0|script|#DruidTree1#_M|400 +{ + callfunc "QuestTreeTouch"; + end; +} diff --git a/world/map/npc/006-3/_warps.txt b/world/map/npc/006-3/_warps.txt index c0744946..5c130a60 100644 --- a/world/map/npc/006-3/_warps.txt +++ b/world/map/npc/006-3/_warps.txt @@ -6,17 +6,18 @@ 006-3.gat,62,30|warp|To Desert Mountains|-1,-1,006-1.gat,62,32 006-3.gat,86,24|warp|To Desert Mountains|-1,-1,006-1.gat,86,26 006-3.gat,91,24|warp|To Desert Mountains|-1,-1,006-1.gat,91,26 -006-3.gat,122,24|warp|To Desert Mountains|-1,-1,006-1.gat,122,26 +006-3.gat,122,24|warp|To Desert Mountains|-1,-1,006-1.gat,114,24 006-3.gat,114,49|warp|To Desert Mountains|-1,-1,006-1.gat,114,51 -006-3.gat,104,44|warp|To Desert Mountains|-1,-1,006-1.gat,104,46 +006-3.gat,104,44|warp|To Desert Mountains|-1,-1,006-1.gat,98,48 006-3.gat,77,44|warp|To Desert Mountains|-1,-1,006-1.gat,77,46 006-3.gat,60,68|warp|To Desert Mountains|-1,-1,006-1.gat,60,60 006-3.gat,92,63|warp|To Desert Mountains|-1,-1,006-1.gat,92,65 006-3.gat,112,74|warp|To Desert Mountains|-1,-1,006-1.gat,112,76 -006-3.gat,110,56|warp|To Desert Mountains|-1,-1,006-1.gat,110,58 -006-3.gat,125,59|warp|To Desert Mountains|-1,-1,006-1.gat,125,61 +006-3.gat,110,56|warp|To Desert Mountains|-1,-1,006-1.gat,102,55 +006-3.gat,125,59|warp|To Desert Mountains|-1,-1,006-1.gat,117,59 006-3.gat,74,90|warp|To Desert Mountains|-1,-1,006-1.gat,74,92 006-3.gat,51,90|warp|To Desert Mountains|-1,-1,006-1.gat,51,92 006-3.gat,38,121|warp|To Desert Mountains|-1,-1,006-1.gat,38,123 -006-3.gat,79,120|warp|To Desert Mountains|-1,-1,006-1.gat,79,122 -006-3.gat,121,110|warp|To Desert Mountains|-1,-1,006-1.gat,121,112 +006-3.gat,79,120|warp|To Desert Mountains|-1,-1,006-1.gat,83,119 +006-3.gat,125,66|warp|Snake Cave|-1,-1,005-3.gat,85,50 +006-3.gat,89,46|warp|Snake Cave|-1,-1,005-3.gat,63,47 diff --git a/world/map/npc/009-3/_mobs.txt b/world/map/npc/009-3/_mobs.txt index 2ccde6e5..3e0430fd 100644 --- a/world/map/npc/009-3/_mobs.txt +++ b/world/map/npc/009-3/_mobs.txt @@ -2,8 +2,9 @@ // Hurnscald Cave mobs 009-3.gat,0,0,0,0|monster|YellowSlime|1007,20,0ms,0ms,Mob009-3::On1007 -009-3.gat,0,0,0,0|monster|BlackScorpion|1009,25,0ms,0ms,Mob009-3::On1009 -009-3.gat,0,0,0,0|monster|RedSlime|1008,35,0ms,0ms,Mob009-3::On1008 +009-3.gat,62,75,125,150|monster|BlackScorpion|1009,25,0ms,0ms,Mob009-3::On1009 +009-3.gat,63,75,126,150|monster|RedSlime|1008,35,0ms,0ms,Mob009-3::On1008 +009-3.gat,145,75,110,151|monster|CaveMaggot|1056,20,100000ms,30000ms,Mob009-3::On1056 009-3.gat,0,0,0|script|Mob009-3|-1 @@ -24,4 +25,9 @@ On1009: set @mobID, 1009; callfunc "MobPoints"; end; + +On1056: + set @mobID, 1056; + callfunc "MobPoints"; + end; } diff --git a/world/map/npc/011-1/_mobs.txt b/world/map/npc/011-1/_mobs.txt index e209acea..156afe85 100644 --- a/world/map/npc/011-1/_mobs.txt +++ b/world/map/npc/011-1/_mobs.txt @@ -13,12 +13,19 @@ 011-1.gat,0,0,0,0|monster|Squirrel|1038,25,30ms,20ms,Mob011-1::On1038 011-1.gat,0,0,0,0|monster|Butterfly|1055,10,30ms,20ms,Mob011-1::On1055 011-1.gat,0,0,0,0|monster|Mouboo|1028,5,0ms,10ms,Mob011-1::On1028 +011-1.gat,1,1,0,0|monster|ManaBug|1131,18,30ms,0ms,Mob011-1::On1131 +011-1.gat,92,44,35,28|monster|Maggot|1002,10,30ms,0ms,Mob011-1::On1002 011-1.gat,0,0,0|script|Mob011-1|-1 { end; +On1002: + set @mobID, 1002; + callfunc "MobPoints"; + end; + On1013: set @mobID, 1013; callfunc "MobPoints"; @@ -73,4 +80,9 @@ On1055: set @mobID, 1055; callfunc "MobPoints"; end; + +On1131: + set @mobID, 1131; + callfunc "MobPoints"; + end; } diff --git a/world/map/npc/011-4/_mobs.txt b/world/map/npc/011-4/_mobs.txt index fa887b14..79bac221 100644 --- a/world/map/npc/011-4/_mobs.txt +++ b/world/map/npc/011-4/_mobs.txt @@ -5,12 +5,20 @@ 011-4.gat,93,114,39,39|monster|CaveSnake|1021,1,100000ms,30000ms,Mob011-4::On1021 011-4.gat,0,0,0,0|monster|CaveSnake|1021,40,0ms,0ms,Mob011-4::On1021 011-4.gat,0,0,0,0|monster|SpikyMushroom|1019,15,0ms,0ms,Mob011-4::On1019 +011-4.gat,60,78,56,75|monster|CaveMaggot|1056,10,100000ms,30000ms,Mob011-4::On1056 +011-4.gat,63,21,110,35|monster|CaveMaggot|1056,10,100000ms,30000ms,Mob011-4::On1056 +011-4.gat,0,0,0,0|monster|Bat|1017,20,180000ms,40000ms,Mob011-4::On1017 011-4.gat,0,0,0|script|Mob011-4|-1 { end; +On1017: + set @mobID, 1017; + callfunc "MobPoints"; + end; + On1019: set @mobID, 1019; callfunc "MobPoints"; @@ -20,4 +28,9 @@ On1021: set @mobID, 1021; callfunc "MobPoints"; end; + +On1056: + set @mobID, 1056; + callfunc "MobPoints"; + end; } diff --git a/world/map/npc/013-2/notes.txt b/world/map/npc/013-2/notes.txt index 37014a76..20ce05c1 100644 --- a/world/map/npc/013-2/notes.txt +++ b/world/map/npc/013-2/notes.txt @@ -72,6 +72,19 @@ L_Close: next; mes "You feel the floor disappear below your feet..."; next; + if (QUEST_MIRIAM_start != 0) + goto L_cheat; + goto L_Warp; + +// If you try to use the notes to warp to pachua the quest will fail. +L_cheat: + set QUEST_MIRIAM_cheat, 1; + set QUEST_MIRIAM_run, gettimetick(2) - QUEST_MIRIAM_start; + set QUEST_MIRIAM_start, 0; + message strcharinfo(0), "You were supposed to actually run to this place. You are not sure if this is going to work for Miriam..."; + goto L_Warp; + +L_Warp: set @dest, rand(BaseLevel); if (@dest < 10) goto L_PlaceOne; @@ -80,24 +93,15 @@ L_Close: goto L_PlaceThree; L_PlaceOne: - warp "006-1.gat",125,111; + warp "006-1.gat",83,60; goto L_Close; L_PlaceTwo: - warp "032-1.gat",77,22; + warp "006-1.gat",77,22; goto L_Close; L_PlaceThree: warp "006-1.gat",33,93; - if (QUEST_MIRIAM_start != 0) goto L_cheat; - goto L_Close; - -// If you try to use the notes to warp to pachua the quest will fail. -L_cheat: - set QUEST_MIRIAM_cheat, 1; - set QUEST_MIRIAM_run, gettimetick(2) - QUEST_MIRIAM_start; - set QUEST_MIRIAM_start, 0; - message strcharinfo(0), "You were supposed to actually run to this place. You are not sure if this is going to work for Miriam..."; goto L_Close; L_Close: diff --git a/world/map/npc/017-9/_warps.txt b/world/map/npc/017-9/_warps.txt index 1a89c0b0..03859972 100644 --- a/world/map/npc/017-9/_warps.txt +++ b/world/map/npc/017-9/_warps.txt @@ -3,6 +3,6 @@ 017-9.gat,22,20|warp|To Nivalis|-1,-1,020-1.gat,60,75 017-9.gat,26,21|warp|To Hurnscald|-1,-1,009-1.gat,43,45 -017-9.gat,30,20|warp|To Tumlishar|-1,-1,001-1.gat,33,65 +017-9.gat,30,20|warp|To Tumlishar|-1,-1,001-1.gat,55,118 017-9.gat,26,28|warp|To second warpzone|-1,-1,017-2.gat,26,23 017-9.gat,31,28|warp|To Crypt|-1,-1,027-2.gat,118,109 diff --git a/world/map/npc/017-9/secret.txt b/world/map/npc/017-9/secret.txt index 050773a6..49261537 100644 --- a/world/map/npc/017-9/secret.txt +++ b/world/map/npc/017-9/secret.txt @@ -18,7 +18,7 @@ L_close: close; } -001-1.gat,32,65,0|script|#SecretDoor3|127,0,0 +001-1.gat,54,118,0|script|#SecretDoor3|127,0,0 { if (getgmlevel() < 40 && !debug) goto L_close; warp "017-9.gat", 30, 22; diff --git a/world/map/npc/018-1/_mobs.txt b/world/map/npc/018-1/_mobs.txt index d2aa5d7d..3536b5b6 100644 --- a/world/map/npc/018-1/_mobs.txt +++ b/world/map/npc/018-1/_mobs.txt @@ -2,7 +2,7 @@ // Woodland Mining Camp mobs 018-1.gat,136,79,9,41|monster|SeaSlime|1033,10,100000ms,30000ms,Mob018-1::On1033 -018-1.gat,108,87,53,25|monster|LogHead|1025,10,100000ms,30000ms,Mob018-1::On1025 +018-1.gat,108,87,53,25|monster|ManaBug|1131,10,100000ms,30000ms,Mob018-1::On1131 018-1.gat,116,44,6,7|monster|SeaSlime|1033,3,100000ms,30000ms,Mob018-1::On1033 018-1.gat,119,56,13,6|monster|PinkFlower|1014,2,100000ms,30000ms,Mob018-1::On1014 018-1.gat,175,28,17,19|monster|JackO|1022,1,180000ms,120000ms,Mob018-1::On1022 @@ -27,12 +27,18 @@ 018-1.gat,160,31,11,18|monster|RedSlime|1008,5,100000ms,50000ms,Mob018-1::On1008 018-1.gat,0,0,0,0|monster|CloverPatch|1037,2,0ms,1000ms,Mob018-1::On1037 018-1.gat,0,0,0,0|monster|Butterfly|1055,20,30ms,20ms,Mob018-1::On1055 +018-1.gat,134,80,14,39|monster|Maggot|1002,15,30ms,0ms,Mob018-1::On1002 018-1.gat,0,0,0|script|Mob018-1|-1 { end; +On1002: + set @mobID, 1002; + callfunc "MobPoints"; + end; + On1007: set @mobID, 1007; callfunc "MobPoints"; @@ -58,11 +64,6 @@ On1022: callfunc "MobPoints"; end; -On1025: - set @mobID, 1025; - callfunc "MobPoints"; - end; - On1030: set @mobID, 1030; callfunc "MobPoints"; @@ -92,4 +93,9 @@ On1055: set @mobID, 1055; callfunc "MobPoints"; end; + +On1131: + set @mobID, 1131; + callfunc "MobPoints"; + end; } diff --git a/world/map/npc/018-3/_mobs.txt b/world/map/npc/018-3/_mobs.txt index e80abda4..64b7c42d 100644 --- a/world/map/npc/018-3/_mobs.txt +++ b/world/map/npc/018-3/_mobs.txt @@ -7,25 +7,23 @@ 018-3.gat,28,157,3,2|monster|PinkFlower|1014,1,60000ms,30000ms,Mob018-3::On1014 018-3.gat,99,111,17,41|monster|YellowSlime|1007,10,90000ms,30000ms,Mob018-3::On1007 018-3.gat,134,140,12,8|monster|Maggot|1002,3,80000ms,40000ms,Mob018-3::On1002 -018-3.gat,132,137,15,25|monster|Spider|1012,8,300000ms,120000ms,Mob018-3::On1012 +018-3.gat,82,149,73,26|monster|Spider|1012,8,300000ms,120000ms,Mob018-3::On1012 018-3.gat,102,172,131,13|monster|BlackScorpion|1009,20,60000ms,10000ms,Mob018-3::On1009 018-3.gat,174,37,10,31|monster|YellowSlime|1007,5,180000ms,120000ms,Mob018-3::On1007 -018-3.gat,87,153,78,22|monster|Snake|1010,10,60000ms,10000ms,Mob018-3::On1010 018-3.gat,148,148,13,24|monster|Bat|1017,3,180000ms,40000ms,Mob018-3::On1017 -018-3.gat,153,97,18,22|monster|YellowSlime|1007,6,80000ms,40000ms,Mob018-3::On1007 +018-3.gat,136,87,21,7|monster|YellowSlime|1007,6,80000ms,40000ms,Mob018-3::On1007 018-3.gat,81,77,27,21|monster|RedSlime|1008,15,80000ms,40000ms,Mob018-3::On1008 018-3.gat,111,80,5,6|monster|BlackScorpion|1009,10,80000ms,40000ms,Mob018-3::On1009 018-3.gat,175,122,5,40|monster|Snake|1010,15,40000ms,20000ms,Mob018-3::On1010 -018-3.gat,98,75,1,2|monster|FireSkull|1023,1,120000ms,30000ms,Mob018-3::On1023 -018-3.gat,100,75,1,2|monster|PoisonSkull|1024,1,120000ms,30000ms,Mob018-3::On1024 -018-3.gat,171,95,15,19|monster|BlackScorpion|1009,5,60000ms,30000ms,Mob018-3::On1009 -018-3.gat,134,87,17,7|monster|RedSlime|1008,10,60000ms,30000ms,Mob018-3::On1008 +018-3.gat,172,94,17,17|monster|RedSlime|1008,10,60000ms,30000ms,Mob018-3::On1008 018-3.gat,59,95,11,8|monster|Spider|1012,15,60000ms,30000ms,Mob018-3::On1012 018-3.gat,77,92,23,7|monster|BlackScorpion|1009,15,60000ms,30000ms,Mob018-3::On1009 018-3.gat,94,55,16,8|monster|Snake|1010,5,60000ms,30000ms,Mob018-3::On1010 018-3.gat,133,39,12,17|monster|Spider|1012,10,60000ms,30000ms,Mob018-3::On1012 018-3.gat,111,33,30,16|monster|Snake|1010,15,60000ms,30000ms,Mob018-3::On1010 -018-3.gat,68,101,5,4|monster|Snake|1010,4,60000ms,30000ms,Mob018-3::On1010 +018-3.gat,68,101,5,4|monster|CaveSnake|1021,4,60000ms,30000ms,Mob018-3::On1021 +018-3.gat,153,96,18,17|monster|CaveMaggot|1056,4,100000ms,30000ms,Mob018-3::On1056 +018-3.gat,99,99,17,17|monster|CaveMaggot|1056,4,100000ms,30000ms,Mob018-3::On1056 018-3.gat,0,0,0|script|Mob018-3|-1 @@ -77,13 +75,13 @@ On1017: callfunc "MobPoints"; end; -On1023: - set @mobID, 1023; +On1021: + set @mobID, 1021; callfunc "MobPoints"; end; -On1024: - set @mobID, 1024; +On1056: + set @mobID, 1056; callfunc "MobPoints"; end; } diff --git a/world/map/npc/021-2/_import.txt b/world/map/npc/021-2/_import.txt deleted file mode 100644 index 67974f1a..00000000 --- a/world/map/npc/021-2/_import.txt +++ /dev/null @@ -1,17 +0,0 @@ -// Map 021-2: North Tulimshar Indoor -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 021-2.gat -npc: npc/021-2/_mobs.txt -npc: npc/021-2/_warps.txt -npc: npc/021-2/bakery.txt -npc: npc/021-2/barber.txt -npc: npc/021-2/forge_shops.txt -npc: npc/021-2/government_building.txt -npc: npc/021-2/heathin.txt -npc: npc/021-2/jhedia.txt -npc: npc/021-2/kps.txt -npc: npc/021-2/kylian.txt -npc: npc/021-2/manakins.txt -npc: npc/021-2/mapflags.txt -npc: npc/021-2/rebecca.txt -npc: npc/021-2/yanis.txt diff --git a/world/map/npc/021-2/_mobs.txt b/world/map/npc/021-2/_mobs.txt deleted file mode 100644 index 6feaf1ea..00000000 --- a/world/map/npc/021-2/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// North Tulimshar Indoor mobs - - - -021-2.gat,0,0,0|script|Mob021-2|-1 -{ - end; -} diff --git a/world/map/npc/021-2/_warps.txt b/world/map/npc/021-2/_warps.txt deleted file mode 100644 index 9eb18a2a..00000000 --- a/world/map/npc/021-2/_warps.txt +++ /dev/null @@ -1,29 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// North Tulimshar Indoor warps - -021-2.gat,46,97|warp|To Lobby|0,-1,021-2.gat,44,55 -021-2.gat,46,155|warp|To Second Floor|0,-1,021-2.gat,92,62 -021-2.gat,92,64|warp|To Suites|0,-1,021-2.gat,46,158 -021-2.gat,44,53|warp|To Common Beds|0,-1,021-2.gat,46,96 -021-2.gat,46,179|warp|To Common Beds|0,-1,021-2.gat,46,91 -021-2.gat,46,90|warp|To Suites|0,-1,021-2.gat,46,178 -021-2.gat,71,179|warp|To Outside|0,-1,021-1.gat,128,121 -021-2.gat,90,179|warp|To Outside|-1,-1,021-1.gat,135,121 -021-2.gat,27,30|warp|To Outside|-1,-1,021-1.gat,53,135 -021-2.gat,39,30|warp|To Outside|-1,-1,021-1.gat,57,135 -021-2.gat,91,28|warp|To Outside|-1,-1,021-1.gat,103,101 -021-2.gat,122,24|warp|To Roof|-1,-1,021-1.gat,103,97 -021-2.gat,118,24|warp|To First Floor|0,-1,021-2.gat,79,23 -021-2.gat,80,22|warp|To Second Floor|0,-1,021-2.gat,117,23 -021-2.gat,70,64|warp|To Roof|-1,-1,021-1.gat,52,96 -021-2.gat,25,67|warp|To Outside|-1,-1,021-1.gat,53,100 -021-2.gat,46,97|warp|To First Floor|0,-1,021-2.gat,46,58 -021-2.gat,28,130|warp|To Outside|-1,-1,021-1.gat,43,111 -021-2.gat,28,130|warp|To Outside|-1,-1,021-1.gat,43,111 -021-2.gat,84,93|warp|To First Floor|-1,0,021-2.gat,80,125 -021-2.gat,84,123|warp|To Second Floor|-1,0,021-2.gat,81,95 -021-2.gat,79,139|warp|To Outside|-1,-1,021-1.gat,132,32 -021-2.gat,72,139|warp|To Outside|-1,-1,021-1.gat,125,32 -021-2.gat,124,69|warp|To Outside|-1,-1,021-1.gat,125,28 -021-2.gat,75,93|warp|To Outside|-1,-1,021-1.gat,133,25 -021-2.gat,33,30|warp|To Outside|-1,-1,021-1.gat,55,135 diff --git a/world/map/npc/021-2/bakery.txt b/world/map/npc/021-2/bakery.txt deleted file mode 100644 index acde18f2..00000000 --- a/world/map/npc/021-2/bakery.txt +++ /dev/null @@ -1,158 +0,0 @@ -// The bakery - -// The chef -021-2.gat,95,21,0|script|Riskim|148 -{ - mes "[Riskim]"; - mes ""; - mes "\"Welcome to our bakery!\""; - - callfunc "KadiyaSubquestConsts"; - if ((@Q_kadiya_status == @Q_STATUS_WANTS_CHOCOCAKE) - && (countitem ("MopoxCurePotion") > 0)) - goto L_lace_chococake; - - if ((@Q_kadiya_status == @Q_STATUS_WANTS_ORANGECUPCAKE) - && (countitem ("MopoxCurePotion") > 0)) - goto L_lace_cupcake; - - mes "\"Would you mind bringing me 6 acorns please? I need them to make flour for the chocolate cakes. I will be so delicious!\""; - next; - mes "\"Um, I mean, the cakes will be delicious...\""; - emotion EMOTE_BLUSH; - next; - - set @dq_level, 15; - set @dq_cost, 3; - set @dq_count, 6; - set @dq_name$, "Acorn"; - set @dq_friendly_name$, "acorns"; - set @dq_money, 250; - set @dq_exp, 50; - - callfunc "DailyQuest"; - - next; - mes "\"And don't forget, our bakery is the best!\""; - close; - -L_lace_chococake: - next; - menu - "Thanks! Let me have a look around...", L_End, - "Can you put this potion into a Chocolate Cake?", L_Next, - "Goodbye!", L_End; - -L_Next: - mes "[Riskim]"; - mes ""; - mes "As you show Riskim the potion, he leans back, away from it."; - mes "\"Ooooh, I remember that smell...\""; - mes "\"Elanore's Mopox potion, right? She made me drink that, too...\""; - mes "He chuckles."; - mes "\"Yes, well, you do want to hide that somehow.\""; - next; - mes "[Riskim]"; - mes ""; - mes "\"We'll need extra chocolate for that one. If you can give me ten pieces of chocolate and that potion, plus 400 GP, I will bake you a special Chocolate Cake that hides the taste.\""; - next; - menu - "I will get them for you.", L_End, - "Here you are!", L_Continue, - "Maybe later.", L_End; - -L_Continue: - if (countitem("ChocolateBar") < 10) - goto L_lacking_ingredients; - if (countitem("MopoxCurePotion") < 1) - goto L_lacking_ingredients; - if (Zeny < 400) - goto L_lacking_Zeny; - delitem "MopoxCurePotion", 1; - delitem "ChocolateBar", 10; - getitem "LacedChocolateCake", 1; - set Zeny, Zeny - 400; - - mes "[Riskim]"; - mes ""; - mes "\"Please have a seat!\""; - mes "You watch as Riskim melts the chocolate and stirs in the potion, then glazes a cake with the mixture."; - mes "\"It's a bit more chocolatey than your average chocolate cake, of course...\""; - next; - mes "[Riskim]"; - mes ""; - mes "Riskim hands you the cake."; - mes "\"Here you are. I hope that this works.\""; - close; - -L_lacking_Zeny: - mes "[Riskim]"; - mes ""; - mes "\"I'm sorry, but I have to charge 400 GP.\""; - close; - -L_lacking_ingredients: - mes "[Riskim]"; - mes ""; - mes "\"Sorry, but I need ten Chocolate Bars AND your cure potion for this. Please come back later when you have everything.\""; - close; - -L_lace_cupcake: - next; - menu - "Thanks! Let me have a look around...", L_End, - "Can you put this potion into an Orange Cupcake?", L_More, - "Goodbye!", L_End; - -L_More: - mes "[Riskim]"; - mes ""; - mes "\"Orange Cupcakes? Oh dear... I'm sorry, but I have a very bad orange allergy.\""; - next; - mes "[Riskim]"; - mes ""; - mes "\"Perhaps the Chef at Dimond's Cove can help you? We get all our cupcakes from him.\""; - next; - goto L_End; - -L_End: - close; -} - -// Server -021-2.gat,82,23,0|script|Sara|108 -{ - mes "[Sara]"; - mes ""; - mes "\"Hello!\""; - close; -} - -// The cashier -021-2.gat,89,21,0|shop|Drabur|112,WhiteCake:*500,ChocolateCake:*550,OrangeCake:*600,AppleCake:*600,Cake:*30,CherryCake:*100,OrangeCupcake:*270,Milk:*1500,XmasCake:*70 - -// Stockroom boy -021-2.gat,133,21,0|script|Iormo|160 -{ - mes "[Iormo]"; - mes ""; - mes "\"This stock room can get messy.\""; - close; -} - -// An old couple eating at the bakery -021-2.gat,71,22,0|script|Rynoh|159 -{ - mes "[Rynoh]"; - mes ""; - mes "\"The cakes may be expensive, but they sure are delicious!\""; - close; -} - -021-2.gat,73,22,0|script|Ontas|154 -{ - mes "[Ontas]"; - mes ""; - mes "\"We come here every week. This place has some of the best bread I've ever eaten!\""; - close; -} diff --git a/world/map/npc/021-2/barber.txt b/world/map/npc/021-2/barber.txt deleted file mode 100644 index d057786d..00000000 --- a/world/map/npc/021-2/barber.txt +++ /dev/null @@ -1,12 +0,0 @@ -// A barber (later we can make it so certain styles need to come from him, for a price) -021-2.gat,72,101,0|script|Issay|156 -{ - mes "[Issay the Barber]"; - mes "\"Do you need a change of style?\""; - next; - callfunc "Barber"; - mes "[Issay the Barber]"; - mes "\"Come again!\""; - close; -} - diff --git a/world/map/npc/021-2/forge_shops.txt b/world/map/npc/021-2/forge_shops.txt deleted file mode 100644 index 4e30fe50..00000000 --- a/world/map/npc/021-2/forge_shops.txt +++ /dev/null @@ -1,4 +0,0 @@ -// Forge Shops - -021-2.gat,77,134,0|shop|Gungnir|311,SlingShot:*500,SlingBullet:*1,ShortBow:*8000,Arrow:*1,IronArrow:*4 -021-2.gat,71,133,0|shop|Mjolnir|377,Knife:*50,SharpKnife:*100,Dagger:*1000,LeatherShirt:*2000,LeatherShield:*2000 diff --git a/world/map/npc/021-2/government_building.txt b/world/map/npc/021-2/government_building.txt deleted file mode 100644 index 441b77a0..00000000 --- a/world/map/npc/021-2/government_building.txt +++ /dev/null @@ -1,180 +0,0 @@ -// The government builing in the south west - -// A clerk -021-2.gat,27,17,0|script|Estard|107 -{ - mes "[Estard]"; - mes "\"Hello what can I do for you?\""; - next; - if (getpartnerid2()) - goto L_main_married; - - menu - "I'm looking at getting married.", L_marry, - "Nothing, I guess.", L_Close; - -L_main_married: - menu - "I'd like a divorce.", L_divorce, - "Nothing, I guess.", L_Close; - -L_marry: - if (BaseLevel < WEDDING_MIN_LEVEL) - goto L_marry_too_young; - if (Zeny < WEDDING_FEE) - goto L_marry_too_poor; - - mes "[Estard]"; - mes "\"Are you sure you want to get married? It'll cost " + WEDDING_FEE + " GP.\""; - menu - "Yes", L_marry_do, - "No", L_Close; - -L_marry_do: - callsub S_give_rings; - - mes "[Estard]"; - mes "\"Here are your rings. You can get married by standing in one of the designated places (like that small rug over there) with your partner, give them their ring, and say 'marry (their name here)'. You both need to have your rings on.\""; - close; - -L_marry_too_young: - mes "[Estard]"; - mes "\"I'm sorry, but you are too young to get married. You must be atleast " + WEDDING_MIN_LEVEL + " levels old.\""; - next; - - menu - "Can I at least get wedding rings?", L_get_rings, - "Thanks anyways.", L_Close; - -L_marry_too_poor: - mes "[Estard]"; - mes "\"You need " + WEDDING_FEE + " GP to get married. That covers all administrative fees for the marriage and provides two wedding rings.\""; - close; - -L_get_rings: - mes "[Estard]"; - mes "\"Yes. They are " + WEDDING_FEE + " GP. That covers all administrative fees for the marriage.\""; - - if (Zeny < WEDDING_FEE) - menu - "Thanks anyways. I don't have enough with me.", L_Close; - if (Zeny >= WEDDING_FEE) - menu - "I'll buy a pair.", L_get_rings_pay, - "Thanks anyways.", L_Close; - goto L_get_rings_pay; - -L_get_rings_pay: - callsub S_give_rings; - - mes "[Estard]"; - mes "\"There you go. Come again.\""; - close; - -L_divorce: - set @divorce_cost, DIVORCE_FEE_PER_LEVEL * BaseLevel; - - if (Zeny < @divorce_cost) - goto L_divorce_not_enough; - - mes "[Estard]"; - mes "\"If you're sure you want a divorce, it'll cost you " + @divorce_cost + " GP.\""; - next; - menu - "I am sure I want it.", L_do_divorce, - "I don't want it.", L_Close; - -L_do_divorce: - if (Zeny < @divorce_cost) - goto L_not_enough_money; - - if (divorce()) - goto L_divorce_done; - - mes "[Estard]"; - mes "\"I'm having trouble finding the record. \""; - mes "[Server]"; - mes "Try again when your partner is online too."; - close; - -L_divorce_done: - set Zeny, Zeny - @divorce_cost; - - mes "[Estard]"; - mes "\"You have been divorced. Come again.\""; - close; - -L_divorce_not_enough: - mes "[Estard]"; - mes "\"I'm sorry , but you don't have enough money to get a divorce. You need " + @divorce_cost + " GP.\""; - close; - -L_not_enough_money: - mes "[Estard]"; - mes "\"Seems you don't have enough money.\""; - close; - -L_no_room_for_rings: - mes "[Estard]"; - mes "\"You don't have enough room to carry these rings.\""; - close; - -L_Close: - close; - -S_give_rings: - if (Zeny < WEDDING_FEE) - goto L_not_enough_money; - getinventorylist; - if (@inventorylist_count > 98) - goto L_no_room_for_rings; - - set Zeny, Zeny - WEDDING_FEE; - getitem "WeddingRing", 1; - getitem "WeddingRing", 1; - return; -} - -021-2.gat,36,17,0|script|Tathin|107 -{ - mes "[Tathin]"; - mes "\"Hello what Can I do for you?\""; - next; - - set @halloween_npc_id, $@halloween_npc_tathin; - callfunc "TrickOrTreat"; - - goto L_Base_Menu; - -L_Base_Menu: - menu - "I'd like to join a party.", L_Give_Party, - "I'd like to create my own party.", L_Give_Make_Party, - "Nothing, I guess.", L_Close; - -L_Give_Party: - mes "[Tathin]"; - mes "\"You'll need to be invited by an existing member of a party to join it. You may also create your own party.\""; - next; - mes "[Tathin]"; - mes "\"Remember, parties cannot share experience if any members are more than 10 levels apart.\""; - menu - "I'd like to create my own party.", L_Give_Make_Party, - "Goodbye.", L_Close; - -L_Give_Make_Party: - mes "[Tathin]"; - mes "\"You can create parties with the 'new' or 'create' commands on the Party tab in the client. Parties need to have unique names.\""; - close; - -L_Close: - close; -} - -// Guard -021-2.gat,20,19,0|script|Guard#govt_in|123,1,1 -{ - mes "[Guard]"; - mes "\"You can't come back here.\""; - close; -} diff --git a/world/map/npc/021-2/heathin.txt b/world/map/npc/021-2/heathin.txt deleted file mode 100644 index 4bd9aae7..00000000 --- a/world/map/npc/021-2/heathin.txt +++ /dev/null @@ -1,360 +0,0 @@ -//Items for NPC are incomplete. Makes "simple ring" which can be crafted into a useful ring by Inya and terranite armor. - -021-2.gat,70,129,0|script|Heathin|147 -{ - set @TARROW_REQ_TERRA_ORE, 1; - set @TARROW_REQ_COAL, 5; - set @TARROW_REQ_GP, 3000; - set @heathin_xp_bonus, (100 * BaseLevel); - - set @state, ((QUEST_NorthTulimshar & NIBBLE_6_MASK) >> NIBBLE_6_SHIFT); - - if (@state == 14) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows_Trade; - if (@state == 13) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows_Ready; - if (@state == 12) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows_Forge; - if (@state == 11) && (BaseLevel >= 80) goto L_Heathin_Terranite_Arrows; - if (@state == 10) && (BaseLevel >= 80) goto L_Heathin_Terranite_Chest_Armor_Ready; - if (@state == 9) && (BaseLevel >= 80) goto L_Heathin_Terranite_Chest_Armor_Forge; - if (@state == 8) && (BaseLevel >= 80) goto L_Heathin_Terranite_Chest_Armor; - if (@state == 7) && (BaseLevel >= 80) goto L_Heathin_Terranite_Legs_Ready; - if (@state == 6) && (BaseLevel >= 80) goto L_Heathin_Terranite_Legs_Forge; - if (@state == 5) && (BaseLevel >= 80) goto L_Heathin_Terranite_Legs; - if (@state == 4) && (BaseLevel >= 80) goto L_Heathin_Terranite_Hood_Ready; - if (@state == 3) && (BaseLevel >= 80) goto L_Heathin_Terranite_Hood_Forge; - if (@state == 2) && (BaseLevel >= 80) goto L_Heathin_Terranite_Hood; - if (@state == 2) && (BaseLevel >= 60) goto L_Heathin_Forge_Thanks; - if (@state == 1) && (BaseLevel >= 60) goto L_Heathin_Forge_Award; - if (BaseLevel >= 60) goto L_Heathin_Start; - - mes "[Heathin]"; - mes "\"Hello, friend. I am Heathin, a smith of exotic metals. \""; - close; - -L_Heathin_Start: - mes "[Heathin]"; - mes "\"Hello, friend. I am Heathin, a smith of exotic metals. \""; - next; - mes "\"By the order of the Wizard's Council, I've been commissioned to forge armor for the upcoming expediation. However, I am but a simple smith and cannot complete all this effort by myself. I need individuals that can gather Coal to heat my forge.\""; - next; - mes "\"Perhaps you would be interested in helping me out? Would you be willing to help me gather Coal and help me fulfill my commission? I am asking any and all willing souls to get me 50 coal, as that would put a significant dint in my goal.\""; - menu - "Sure, I'll help!", L_Heathin_Help, - "I'd rather keep my Coal for my own purposes, thank you very much.", L_Heathin_No, - "Wait, what kind of award are we talking about?", L_Heathin_Interested; - -L_Heathin_Help: - set @state, 1; - callsub S_Update_Mask; - mes "[Heathin]"; - mes "\"Excellent! I am always glad when someone can be of service not just to me, but to all of Tulimshar. Please get me 50 Coal and you will be compensated for your efforts.\""; - close; - -L_Heathin_No: - mes "[Heathin]"; - mes "\"That is too bad. If you change your mind, I shall still be here, attempting to get my commission done.\""; - close; - -L_Heathin_Interested: - mes "[Heathin]"; - mes "\"Well, I can compensate you from the commision I getting from the council.\""; - next; - mes "\"How does 20,000 GP and I'll offer my smithing services for a discount?\""; - next; - mes "\"Does this sound like something you might be interested in?\""; - menu - "Sure, I'll help!", L_Heathin_Help, - "I'd rather keep my Coal.", L_Heathin_No, - "Can you repeat that again?", L_Heathin_Interested; - -L_Heathin_Forge_Award: - if (countitem ("Coal") < 50) goto L_Heathin_Forge_Wait; - getinventorylist; - set @state, 2; - callsub S_Update_Mask; - delitem "Coal", 50; - getexp @heathin_xp_bonus, 0; - set Zeny, Zeny + 20000; - mes "[Heathin]"; - mes "\"You have brought the Coal. This is most excellent! As promised, I have a reward for you. Hopefully you will find it useful.\""; - next; - mes "\"Time to make some armor. The Council will be pleased. Thank you for your efforts!\""; - close; - -L_Heathin_Forge_Wait: - mes "[Heathin]"; - mes "\"Hello again. Making armor keeps me pretty busy. I certainly hope I can fulfill my commission soon so that I can move on to bigger and better things.\""; - next; - mes "\"The pay is good, certainly, but I am a far better smith than this. If you can bring me 50 Coal, it would surely get me to my goal faster.\""; - next; - mes "\"I will be sure to provide an apt award once you are done.\""; - close; - -L_Heathin_Forge_Thanks: - mes "[Heathin]"; - mes "\"Thank you again for helping me fulfil my commission. It has made a signficant dint in what the Council requires of me. Perhaps I may be of service to you again one day!\""; - close; - -L_Heathin_Terranite_Hood: - mes "[Heathin]"; - mes "\"Hello again friend, I just found out about this great metal called terranite.\""; - next; - mes "\"This metal is almost as strong as steel, but is also very ductile.\""; - next; - mes "\"With some effort, I can make this metal form rings tighter than any chain mail. It isn't the prettiest in hue, but its uses can be many.\""; - next; - mes "\"Unfortunately, it seems to be difficult to gather. Most that have searched for Terranite Ore either cannot find it or have never returned...\""; - next; - mes "\"I may be an excellent smith, but I certainly am no combatant. However, I would enjoy turning this ore into something useful, perhaps some type of armor to help those that may be braver.\""; - next; - mes "\"So, what do you say? Are you interested?\""; - menu - "No, thank you. Maybe later.", L_Heathin_Terranite_No, - "Armor, you say? Definitely!", L_Heathin_Terranite_Yes; - -L_Heathin_Terranite_No: - mes "[Heathin]"; - mes "\"Ah, that is too bad. Come by again anytime.\""; - close; - -L_Heathin_Terranite_Yes: - set @state, 3; - callsub S_Update_Mask; - mes "[Heathin]"; - mes "\"Great, this is going to be fun! As I have not had much practice with this armor, I'd like to get started soon.\""; - next; - mes "Heathin thinks for a moment."; - next; - mes "\"Ah, I know! I will make a helm... Well, more like a hood, since it will be woven.\""; - next; - mes "\"It will require a great amount of heat, if the rumors are to be believed. For this, I will need 100 Coal to keep my forge burning hot. I will also need 10 Terranite Ore to make the armor. Of course, such work does not come cheap. While I may enjoy my work, my time and effort is very valuable. Since you have been a great help I will only need 20,000 gold pieces, well below my going rate. Please come back with the gold, Coal and ore and I'll make this hood for you.\""; - close; - -L_Heathin_Terranite_Hood_Forge: - if ( (Zeny < 20000) - || (countitem("Coal") < 100) - || (countitem("TerraniteOre") < 10) ) - goto L_Heathin_Terranite_Hood_Wait; - set @state, 4; - callsub S_Update_Mask; - delitem "Coal", 100; - delitem "TerraniteOre", 10; - getexp @heathin_xp_bonus, 0; - set Zeny, Zeny - 20000; - mes "[Heathin]"; - mes "\"Great, you brought everything! Come back later and I'll have the helm ready for you.\""; - close; - -L_Heathin_Terranite_Hood_Wait: - mes "[Heathin]"; - mes "\"I am very busy right now. If you could bring me 10 Terranite Ore, 100 Coal and 20,000 gold pieces, I will make that terranite hood for you.\""; - close; - -L_Heathin_Terranite_Hood_Ready: - getinventorylist; - if ((checkweight("TerraniteHelmet", 1) == 0) || (@inventorylist_count == 100)) - goto L_InventoryNoSpace; - set @state, 5; - callsub S_Update_Mask; - getitem "TerraniteHelmet", 1; - mes "[Heathin]"; - mes "\"I am all done with your terranite hood. I hope you enjoy it! I have some work to wrap up for the Council, but come back later and I might be able to assist you again.\""; - close; - -L_Heathin_Terranite_Legs: - set @state, 6; - callsub S_Update_Mask; - mes "[Heathin]"; - mes "\"I am glad you are back! I've just finished up some more of my commission. Now I can get back to making terranite armor for you. This time I will make some pants, but they need more ore, more Coal to heat my forge and of course, more gold for my efforts.\""; - next; - mes "\"To make terranite pants, I need 200 Coal, 30 Terranite Ore and 40,000 gold pieces. The faster you bring this to me, the faster I can have your terranite pants ready.\""; - close; - -L_Heathin_Terranite_Legs_Forge: - if ( (Zeny < 40000) - || (countitem("Coal") < 200) - || (countitem("TerraniteOre") < 30) ) - goto L_Heathin_Terranite_Legs_Wait; - set @state, 7; - callsub S_Update_Mask; - delitem "Coal", 200; - delitem "TerraniteOre", 30; - getexp @heathin_xp_bonus, 0; - set Zeny, Zeny - 40000; - mes "[Heathin]"; - mes "\"Great, you have brought everything! Come back later and I will have those terranite pants ready for you.\""; - close; - -L_Heathin_Terranite_Legs_Wait: - mes "[Heathin]"; - mes "\"I am very busy right now. If you could bring me 30 Terranite Ore, 200 Coal and 40,000 gold pieces, I will make those terranite pants for you.\""; - close; - -L_Heathin_Terranite_Legs_Ready: - getinventorylist; - if ((checkweight("TerraniteLegs", 1) == 0) || (@inventorylist_count == 100)) - goto L_InventoryNoSpace; - set @state, 8; - callsub S_Update_Mask; - getitem "TerraniteLegs", 1; - mes "[Heathin]"; - mes "\"I am all done with your terranite pants. Hope you enjoy them! I have some more work to complete for the Council. Come back later and I might be able to assist you again.\""; - close; - -L_Heathin_Terranite_Chest_Armor: - set @state, 9; - callsub S_Update_Mask; - mes "[Heathin]"; - mes "\"Good to see you again. I have just finished up some more of my commission. Now I can get back to making terranite armor for you. This time, I will make some terranite chest armor, but it needs more ore, more Coal for my forge and of course, more gold to compensate for my efforts.\""; - next; - mes "\"To make terranite chest armor, I need 250 Coal, 40 Terranite Ore and 50,000 gold pieces. The faster you bring this to me, the faster I can have your terranite armor ready.\""; - close; - -L_Heathin_Terranite_Chest_Armor_Forge: - if ( (Zeny < 50000) - || (countitem("Coal") < 250) - || (countitem("TerraniteOre") < 40) ) - goto L_Heathin_Terranite_Chest_Armor_Wait; - set @state, 10; - callsub S_Update_Mask; - delitem "Coal", 250; - delitem "TerraniteOre", 40; - getexp @heathin_xp_bonus, 0; - set Zeny, Zeny - 50000; - mes "[Heathin]"; - mes "\"Splendid, you have brought everything! Come back later and I will have the terranite chest armor ready for you.\""; - close; - -L_Heathin_Terranite_Chest_Armor_Wait: - mes "[Heathin]"; - mes "\"I am very busy right now. If you could bring me 40 Terranite Ore, 250 Coal and 50,000 gold pieces, I will make that chest armor for you.\""; - close; - -L_Heathin_Terranite_Chest_Armor_Ready: - getinventorylist; - if ((checkweight("TerraniteChestArmor", 1) == 0) || (@inventorylist_count == 100)) - goto L_InventoryNoSpace; - set @state, 11; - callsub S_Update_Mask; - getitem "TerraniteChestArmor", 1; - mes "[Heathin]"; - mes "\"I have completed your terranite chest armor. I hope you enjoy it! I have some work to wrap up for the Council again, but come back later and I might be able to assist you once more.\""; - close; - -L_Heathin_Terranite_Arrows: - mes "[Heathin]"; - mes "\"How good to see you. I have experimented a little with Terranite Ore to see what else can be done with it. It seems to have some qualities suitable for weapons, but I have only tested it with arrows. If you would like, I can make Terranite Arrows, but as as with the armor, I need Coal, Terranite Ore and payment for my efforts.\""; - next; - mes "\"Also, it might be a while until I have time to see what else I can make with terranite other than arrows, as right now the Council is keeping me rather busy with my commission. So, would you like some Terranite Arrows?\""; - menu - "No, thank you.", L_Heathin_Terranite_Arrows_No, - "Sure, I could use some arrows.", L_Heathin_Terranite_Arrows_Yes; - -L_Heathin_Terranite_Arrows_No: - mes "[Heathin]"; - mes "\"Well, if you change your mind, I'm not going anywhere.\""; - close; - -L_Heathin_Terranite_Arrows_Yes: - set @state, 12; - callsub S_Update_Mask; - mes "[Heathin]"; - mes "\"Good, good. I shall begin crafting these arrows as soon as you come back. However, I cannot just make small handfuls as it would not be worth my time and effort to have my concentration interrupted for small tasks. I will make 1,000 Terranite Arrows per request, for which I will need "+@TARROW_REQ_TERRA_ORE+" Terranite Ore, "+@TARROW_REQ_COAL+" Coal and "+@TARROW_REQ_GP+" gold pieces.\""; - next; - mes "\"See you soon!\""; - close; - -L_Heathin_Terranite_Arrows_Forge: - if ( (Zeny < @TARROW_REQ_GP) - || (countitem("Coal") < @TARROW_REQ_COAL) - || (countitem("TerraniteOre") < @TARROW_REQ_TERRA_ORE) ) - goto L_Heathin_Terranite_Arrows_Wait; - set @state, 13; - callsub S_Update_Mask; - delitem "Coal", @TARROW_REQ_COAL; - delitem "TerraniteOre", @TARROW_REQ_TERRA_ORE; - getexp @heathin_xp_bonus, 0; - set Zeny, Zeny - @TARROW_REQ_GP; - mes "[Heathin]"; - mes "\"Wonderful! You have everything I asked for. I will start working on the arrows right away.\""; - close; - -L_Heathin_Terranite_Arrows_Wait: - mes "[Heathin]"; - mes "\"If you want Terranite Arrows, please get me "+@TARROW_REQ_TERRA_ORE+" Terranite Ore, "+@TARROW_REQ_COAL+" Coal and "+@TARROW_REQ_GP+" gold pieces.\""; - close; - -L_Heathin_Terranite_Arrows_Ready: - getinventorylist; - if ((checkweight("TerraniteArrow", 1000) == 0) || (@inventorylist_count == 100)) - goto L_InventoryNoSpace; - set @state, 14; - callsub S_Update_Mask; - getitem "TerraniteArrow", 1000; - mes "[Heathin]"; - mes "\"All done, here you go! I hope you like them. I am still working on my commission, but if you ever need any more Terranite Arrows, just come on by with "+@TARROW_REQ_COAL+" Coal, "+@TARROW_REQ_TERRA_ORE+" Terranite Ore and "+@TARROW_REQ_GP+" gold pieces and I will make another 1,000 arrows for you. By now I have enough Terranite Ore in reserve that you can just trade me my requirements to keep my resources up. Thank you for all your efforts!\""; - close; - -L_Heathin_Terranite_Arrows_Trade: - mes "[Heathin]"; - mes "\"Hello, there. If you have "+@TARROW_REQ_COAL+" Coal, "+@TARROW_REQ_TERRA_ORE+" Terranite Ore and "+@TARROW_REQ_GP+" gold pieces, I will trade you 1,000 Terranite Arrows. Would you like some Terranite Arrows?\""; - menu - "No.", L_Heathin_Terranite_Arrows_Trade_No, - "Yes.", L_Heathin_Terranite_Arrows_Trade_Yes; - -L_Heathin_Terranite_Arrows_Trade_No: - mes "[Heathin]"; - mes "\"Come back again if you would like to get Terranite Arrows.\""; - close; - -L_Heathin_Terranite_Arrows_Trade_Yes: - if ( (Zeny < @TARROW_REQ_GP) - || (countitem("Coal") < @TARROW_REQ_COAL) - || (countitem("TerraniteOre") < @TARROW_REQ_TERRA_ORE) ) - goto L_Heathin_Terranite_Arrows_Trade_Wait; - getinventorylist; - if ((checkweight("TerraniteArrow", 1500) == 0) || (@inventorylist_count == 100)) - goto L_InventoryNoSpace; - delitem "Coal", @TARROW_REQ_COAL; - delitem "TerraniteOre", @TARROW_REQ_TERRA_ORE; - set Zeny, Zeny - @TARROW_REQ_GP; - set @lucky, 5 * rand(readparam(bLuk)); - getitem "TerraniteArrow", 1000 + @lucky; - mes "[Heathin]"; - mes "\"Here you go! You are lucky, I could forge "+@lucky+" more arrows than expected. Come back again if you want more Terranite Arrows.\""; - close; - -L_Heathin_Terranite_Arrows_Trade_Wait: - mes "[Heathin]"; - mes "\"It seems that you do not have the necessary resources for me to trade you. Please come back with "+@TARROW_REQ_COAL+" Coal, "+@TARROW_REQ_TERRA_ORE+" Terranite Ore and "+@TARROW_REQ_GP+" gold pieces if you want another 1,000 Terranite Arrows.\""; - close; - -L_InventoryNoSpace: - mes "[Heathin]"; - mes "\"Hm no. You can't carry this right now. Make some room and come back.\""; - close; - -S_Update_Mask: - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_6_MASK)) | (@state << NIBBLE_6_SHIFT); - return; -} -021-2.gat,72,129,0|script|HeathinDebug|147 -{ - mes "[Heathin Debug]"; - mes "Debug Action"; - menu - "Reset", L_Reset, - "Exit", L_End; - -L_Reset: - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_6_MASK) | (0 << NIBBLE_6_SHIFT)); - mes "Reset!"; - goto L_End; - -L_End: - end; - -OnInit: - if (!debug) - disablenpc "HeathinDebug"; - end; -} diff --git a/world/map/npc/021-2/jhedia.txt b/world/map/npc/021-2/jhedia.txt deleted file mode 100644 index cc2f9165..00000000 --- a/world/map/npc/021-2/jhedia.txt +++ /dev/null @@ -1,62 +0,0 @@ -// Ingot maker takes iron ore, gives ingots for future crafting purposes. - -021-2.gat,70,124,0|script|Jhedia|160 -{ - set @Cost_Per_Ingot, 1000; - set @Iron_Ore_Per, 5; - set @Coal_Per, 10; - - mes "[Jhedia]"; - mes "\"I forge Iron Ore into ingots. Ingots are more useful for skilled smiths, like armorers, because the ore is refined and made into useful units which can be worked with. To make ingots, I need " + @Iron_Ore_Per + " Iron Ore and " + @Cost_Per_Ingot + " gp per ingot. I also need " + @Coal_Per + " Coal for my forge.\""; - next; - mes "[Jhedia]"; - mes "\"How many ingots would you like?\""; - input @ingot_count; - - if (@ingot_count == 0) - goto L_Jhedia_Bye; - set @Zeny_cost, @ingot_count * @Cost_Per_Ingot; - if (countitem("IronOre") < @Iron_Ore_Per * @ingot_count) - goto L_Jhedia_NotEnough_Ore; - if (countitem("Coal") < @Coal_Per * @ingot_count) - goto L_Jhedia_NotEnough_Coal; - if (Zeny < @Zeny_cost) - goto L_Jhedia_NotEnough_Zeny; - getinventorylist; - if (@inventorylist_count == 100 - && countitem("IronIngot") == 0 - && countitem("IronOre") > @ingot_count * @Iron_Ore_Per - | countitem("Coal") > @ingot_count * @Coal_Per) - goto L_Jhedia_NotEnoughSlots; - set Zeny, Zeny - @Zeny_cost; - delitem "IronOre", @ingot_count * @Iron_Ore_Per; - delitem "Coal", @ingot_count * @Coal_Per; - getitem "IronIngot", @ingot_count; - close; - -L_Jhedia_Bye: - mes "[Jhedia]"; - mes "\"Goodbye then.\""; - close; - -L_Jhedia_NotEnough_Ore: - mes "[Jhedia]"; - mes "\"You do not seem to have enough Iron Ore.\""; - close; - -L_Jhedia_NotEnough_Coal: - mes "[Jhedia]"; - mes "\"You do not seem to have enough Coal.\""; - close; - -L_Jhedia_NotEnough_Zeny: - mes "[Jhedia]"; - mes "\"You do not seem to have enough gold pieces.\""; - close; - -L_Jhedia_NotEnoughSlots: - mes "[Jhedia]"; - mes "\"You do not seem to have enough room to carry this many ingots.\""; - close; - -} diff --git a/world/map/npc/021-2/kps.txt b/world/map/npc/021-2/kps.txt deleted file mode 100644 index fb6ce235..00000000 --- a/world/map/npc/021-2/kps.txt +++ /dev/null @@ -1,164 +0,0 @@ -// KPS (Killian Parcel Service) -// Author: Wushin -// Kylian_Timer denotes current quest time & holds last completed. -// reuse the 4 bits -// To Mark 4 Different NPCs. -// setarray $@kps_npc_bits, $@knowYanisNT, $@knowLatoyNT, $@knowWeellosNT, $@knowCasinoNT; -021-2.gat,27,124,0|script|KPS Manager|191 -{ - set @state, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - set @run, ((QUEST_NorthTulimshar & TWOBIT_8_MASK) >> TWOBIT_8_SHIFT); - set @run_cnt, ((QUEST_NorthTulimshar & TWOBIT_9_MASK) >> TWOBIT_9_SHIFT); - if (@state == 15) - goto L_SeeKylian; - if (@state == 14) - goto L_RunComplete; - if (@state == 13) - goto L_RunStarted; - if (@state == 12) - goto L_JobSelect; - if (@state == 11) - goto L_AcceptJob; - if (@state == 10) - goto L_OfferJob; - goto L_Default; - -L_Default: - mes "[KPS Manager]"; - mes "\"Kylian staying at the Inn bought this shop recently.\""; - mes "\"I'm waiting for him to open the shop.\""; - next; - mes "\"I wonder if he needs any help?\""; - goto L_Close; - -L_OfferJob: - mes "[KPS Manager]"; - mes "\"Hello and what how can I help you today?\""; - menu - "My name is " + strcharinfo(0), L_MyName, - "Nothing.", L_Close; - -L_MyName: - set @state, 11; - callfunc "SetKylianQuest"; - mes "\"Ahhh, Kylian said you would be dropping by.\""; - next; - mes "\"I assume you are looking for some work?\""; - menu - "Yes.", L_StartJob, - "No.", L_Close; - -L_AcceptJob: - mes "[KPS Manager]"; - mes "\"Interested in some work?\""; - menu - "Yes.", L_StartJob, - "No.", L_Close; - -L_StartJob: - set @run, 0; - callfunc "SetKylianRun"; - set @run_cnt, 0; - callfunc "SetKylianRunCnt"; - set @state, 12; - callfunc "SetKylianQuest"; - goto L_JobSelect; - -L_StartJobAgain: - set @run, 0; - callfunc "SetKylianRun"; - set @state, 12; - callfunc "SetKylianQuest"; - goto L_JobSelect; - -L_JobSelect: - if ((gettimetick(2) - Kylian_Timer) < 86400) - goto L_NoPackages; - mes "[KPS Manager]"; - mes "\"We have a number of deliveries that need to go all over the world.\""; - next; - goto L_RandJob; - -L_RandJob: - set @rand_quest, rand(1,3); - goto L_JobInfo; - -L_JobInfo: - mes "\"We have a delivery for:* " + $@random_quests$[@rand_quest] + "\""; - menu - "Take It.", L_StartRun, - "Anything Else?", L_RandJob, - "I need a break.", L_Close; - -L_StartRun: - set @state, 13; - callfunc "SetKylianQuest"; - set @run, @rand_quest; - callfunc "SetKylianRun"; - set Kylian_Timer, gettimetick(2); - goto L_Close; - -L_RunStarted: - mes "Deliver this package to:* " + $@random_quests$[@run] + "\""; - goto L_Close; - -L_RunComplete: - set @elapsed_time, (gettimetick(2) - Kylian_Timer); - if (@elapsed_time > 600) - goto L_Failed; - set @run_cnt, (@run_cnt + 1); - callfunc "SetKylianRunCnt"; - // Set Kylian wants to see you reward state - if (@run_cnt > 3) - goto L_KylianReward; - goto L_RunAgain; - -L_SeeKylian: - mes "\"You need to go see Kylian before I can give you any more work.\""; - goto L_Close; - -L_Failed: - mes "\"You need to be faster next time to earn a bonus.\""; - next; - goto L_RunAgain; - -L_KylianReward: - set Zeny, Zeny + $@delivery_money; - getexp ($@delivery_exp_mod * BaseLevel), 0; - callfunc "SetKylianRun"; - set @state, 15; - callfunc "SetKylianQuest"; - mes "[" + $@delivery_money + " money]"; - mes "[" + ($@delivery_exp_mod * BaseLevel) + " experience points]"; - next; - mes "\"I have a message Kylian wants me to send you over right away.\""; - goto L_Close; - -L_RunAgain: - set Zeny, Zeny + $@delivery_money; - getexp ($@delivery_exp_mod * BaseLevel), 0; - callfunc "SetKylianRun"; - mes "[" + $@delivery_money + " money]"; - mes "[" + ($@delivery_exp_mod * BaseLevel) + " experience points]"; - next; - mes "\"Good job, keep up the nice work and I'm sure the bonus will give you a bonus.\""; - next; - goto L_StartJobAgain; - -L_NoPackages: - mes "\"Come back tomorrow, maybe we will have some more work.\""; - goto L_Close; - -L_Close: - close; -} -function|script|SetKylianRun -{ - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_8_MASK)) | (@run << TWOBIT_8_SHIFT); - return; -} -function|script|SetKylianRunCnt -{ - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_9_MASK)) | (@run_cnt << TWOBIT_9_SHIFT); - return; -} diff --git a/world/map/npc/021-2/kylian.txt b/world/map/npc/021-2/kylian.txt deleted file mode 100644 index 5a162242..00000000 --- a/world/map/npc/021-2/kylian.txt +++ /dev/null @@ -1,424 +0,0 @@ -// Kylian is a businessman from Argeas who wants to eventually open a shop in Tulimshar -// asks the player for several information about the city -// Quest uses Nibble 4 and 5 of QUEST_NorthTulimshar -// Author: Jenalya - -// Nibble 4 is used as flags to indicate if the player knows certain places/persons -// Bit 0: player talked to Yanis in the government building -// Bit 1: player talked to Latoy on the market in North Tulimshar -// Bit 2: player talked to Weellos as the historic building -// Bit 3: player was in the casino rooms - -// Nibble 5 is used to save the quest progress with Kylian -// state 1: player has the task to get the luggage from the harbor -// state 2: Adrian gave the luggage to the player -// state 3: player gave luggage to Kylian and Kylian asks who to talk to for the shop license -// after the player answered this, @KylianNTLicense is set. -// the player can only continue the quest when logging out and therefore setting that value to 0 again -// state 4: Kylian asks for a historical building to get some cultural knowledge -// state 5: Kylian asks where to get some typical food -// after the player answered this, @KylianNTSightSeeing is set. -// the player can only continue the quest when logging out and therefore setting that value to 0 again -// state 6: Kylian asks where to go to have some fun in the evening (casino) -// state 7: Kylian asks where to get exquisite clothing before going out in the evening -// after the player answered this, @KylianNTSightSeeing is set. -// the player can only continue the quest when logging out and therefore setting that value to 0 again -// state 8: Kylian was in the casino and gives a desert hat as reward -// state 9: Shop approved, go talk Kylian's shopkeeper if you are looking for work. -// state 10: Meet Shop keeper -// state 11: Start Time Trial -// state 12: Return -// state 13: Start Daily Timed -// state 14: Return -// state 15: Completed -// Kylian_Timer is used to denote start time. - -// temporary variables used to check if the player logged out or left the building in the meanwhile -// this is to ensure some 'time in between' different actions of the quest -// @KylianNTLicense -// @KylianNTSightSeeing -// @KylianNTCasino - --|script|#businessmanNTconfig|-1 -{ - end; - -OnInit: - // Nibble 4 - // Used in Random Quest later as a Nibble - set $@knowYanisNT, (1 << 16); - set $@knowLatoyNT, (1 << 17); - set $@knowWeellosNT, (1 << 18); - set $@knowCasinoNT, (1 << 19); - - // Random Quests for Later - setarray $@random_quests$, "None", "Falkurn", "Old Wizard", "Baktar"; - set $@delivery_money, 100; - set $@delivery_exp_mod, 10; - end; -} -021-2.gat,25,67,0|script|#KylianOut|32767,1,1 -{ - set @KylianNTLicense, 0; - set @KylianNTSightSeeing, 0; - set @KylianNTCasino, 0; - end; -} -021-2.gat,89,55,0|script|Kylian|193 -{ - set @state, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - - set @acorn_amount, 12; - set @suitcase_money, 100; - set @suitcase_exp, 50; - set @license_money, 50; - set @license_exp, 20; - set @sightseeing_money, 50; - set @sightseeing_exp, 20; - set @food_money, 50; - set @food_exp, 20; - set @clothes_money, 50; - set @clothes_exp, 20; - set @fun_money, 50; - set @fun_exp, 20; - - // This NPC previously used the variable TMW_Quest - callfunc "ClearVarTMW_Quest"; - set @bernard, ((QUEST_SouthTulimshar & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); - - if (@state == 15) goto L_Done; - if (@state >= 11) goto L_Helping; - if (@state == 10) goto L_OfferedJob; - if (@state == 9) goto L_Shop; - if (@KylianNTCasino) goto L_CasinoDone; - if (@state == 8) goto L_DesertHat; - if (@state == 7) goto L_Clothes; - if (@KylianNTSightSeeing) goto L_SightSeeingDone; - if (@state == 6) goto L_Casino; - if (@state == 5) goto L_Food; - if (@KylianNTLicense) goto L_LicenseDone; - if (@state == 4) goto L_SightSeeing; - if (@state == 3) goto L_ShopLicense; - if (@state >= 1) goto L_Suitcase; - - mes "[Kylian]"; - mes "\"Ah, are you the room service? I've some requests.\""; - menu - "Sure, what can I do for you?",L_Luggage, - "No, I'm not!",L_Next; - -L_Next: - mes "[Kylian]"; - mes "\"Too bad. Would you be interested in earning some quick money with some errands regardless?\""; - menu - "I'm a great adventurer! I don't do errands.",L_Close, - "No, I'm busy.",L_Close, - "Mh, ok.",L_Luggage; - -L_Luggage: - mes "[Kylian]"; - mes "\"I need someone to get my luggage from the docks. Show this paper to the sailor who's watching the luggage.\""; - mes "He gives you his ticket which you store in your pocket, separated from your inventory."; - set @state, 1; - callfunc "SetKylianQuest"; - goto L_Close; - -L_Suitcase: // @state >= 1, but below 3 - mes "[Kylian]"; - mes "\"Did you already get my luggage from the docks?\""; - if (@state != 2) - goto L_Close; - menu - "Here it is.",L_Continue, - "I'm on my way, don't worry.",L_Close; - -L_Continue: - if (countitem("LeatherSuitcase") < 1) - goto L_NoItem; - delitem "LeatherSuitcase", 1; - set Zeny, Zeny + @suitcase_money; - getexp @suitcase_exp, 0; - set @state, 3; - callfunc "SetKylianQuest"; - mes "[Kylian]"; - mes "\"Ah, very good. I really need to have a look at some of my papers in there.\""; - mes "He gives you some money."; - next; - mes "[Kylian]"; - mes "\"Oh, and I have some acorns left, I had them with me as travelling fare. You can have them, they're tasty."; - mes "In case you don't like them, you could also bring them to the Tulimshar bakery. I heard they use them to make some special flour.\""; - getitem "Acorn", @acorn_amount; - next; - goto L_ShopLicense; - -L_ShopLicense: // @state == 3 - mes "[Kylian]"; - mes "\"I'm a salesman and came to Tulimshar because I'm thinking about establishing a shop here. While I'm going through my papers, could you find out who I have to talk to about opening a shop in this city?\""; - if (!(QUEST_NorthTulimshar & $@knowYanisNT)) - goto L_Close; - menu - "You need to talk to Yanis in the government building.",L_GovBuild, - "I'll see what I can do.",L_Close; - -L_GovBuild: - set Zeny, Zeny + @license_money; - getexp @license_exp, 0; - set @state, 4; - callfunc "SetKylianQuest"; - set @KylianNTLicense, 1; - mes "[Kylian]"; - mes "\"Ah, excellent. That's very helpful. Could you tell me how to get to that building?\""; - mes "You explain the way to the building."; - next; - goto L_LicenseDone; - -L_LicenseDone: // the player didn't log out yet after telling about Yanis - mes "[Kylian]"; - mes "\"I need to prepare my papers now. I might have some more questions later.\""; - goto L_Close; - -L_SightSeeing: // @state == 4 and logged out sometime between getting to that state and now - mes "[Kylian]"; - mes "\"You just came here the right moment. I have finished my business affairs. I think I should use my time here to also get a bit of cultural knowledge about the area. Can you tell me if there are any historical places to visit?\""; - if (!(QUEST_NorthTulimshar & $@knowWeellosNT)) - goto L_Close; - menu - "There is a very old historic building not far from here.",L_HistBuild, - "I don't know, but will have a look around.",L_Close; - -L_HistBuild: - set Zeny, Zeny + @sightseeing_money; - getexp @sightseeing_exp, 0; - set @state, 5; - callfunc "SetKylianQuest"; - mes "[Kylian]"; - mes "\"This sounds interesting. Please tell me the way.\""; - mes "You tell him how to get to the historic building."; - next; - goto L_Food; - -L_Food: // @state == 5 - mes "[Kylian]"; - mes "\"While I'm out, I could also get something to eat. Maybe some typical dish for this region. Do you have a good suggestion for that?\""; - if (@bernard < 4) // didn't yet help Bernard to make his soup - goto L_Close; - menu - "Bernard on the bazaar makes a great soup.",L_SoupBer, - "No idea, I'll try to find out.",L_Close; - -L_SoupBer: - set Zeny, Zeny + @food_money; - getexp @food_exp, 0; - set @state, 6; - callfunc "SetKylianQuest"; - set @KylianNTSightSeeing, 1; - goto L_SightSeeingDone; - -L_SightSeeingDone: - mes "[Kylian]"; - mes "\"I'm going to see the historic building you told me about and try this local soup on the bazaar. Thank you for the suggestions.\""; - goto L_Close; - -L_Casino: // @state == 6 and logged out sometime between getting to that state and now - mes "[Kylian]"; - mes "\"Hello. I just came back from my sight-seeing tour. And this soup from Bernard really was delicious. I wonder what it's made of...\""; - next; - mes "\"However, I was wondering if you know about a good place to spend the evening? Some place to have fun?\""; - if (!(QUEST_NorthTulimshar & $@knowCasinoNT)) - goto L_Close; - menu - "Of course! The casino!",L_CasinoFound, - "Not really.",L_Close; - -L_CasinoFound: - set Zeny, Zeny + @casino_money; - getexp @casino_exp, 0; - set @state, 7; - callfunc "SetKylianQuest"; - mes "[Kylian]"; - mes "\"Oh, there's a casino in this city? That's a wonderful thing. Where can I find it?\""; - mes "You explain how to get to the casino."; - next; - goto L_Clothes; - -L_Clothes: // @state == 7 - mes "[Kylian]"; - mes "\"I should get proper clothing before I go to the casino tonight. Do you know a reputable shop where clothing of high quality is sold?\""; - if (!(QUEST_NorthTulimshar & $@knowLatoyNT)) - goto L_Close; - menu - "At the market near the harbor district...",L_HarborDistrict, - "Mh, I don't know.",L_Close; - -L_HarborDistrict: - set Zeny, Zeny + @clothes_money; - getexp @clothes_exp, 0; - set @state, 8; - callfunc "SetKylianQuest"; - set @KylianNTCasino, 1; - mes "You explain about Latoy and his high quality shop."; - mes "[Kylian]"; - mes "\"This seems to be exactly what I need. Thanks a lot.\""; - goto L_Close; - -L_CasinoDone: - mes "[Kylian]"; - mes "\"I'm looking forward to going to the casino tonight. See me tomorrow.\""; - goto L_Close; - -L_DesertHat: // @state == 8 - mes "Kylian looks a bit tired."; - mes "[Kylian]"; - mes "\"That was an interesting night. Thanks for your suggestion to visit the casino.\""; - next; - getinventorylist; - mes "\"You helped me a lot, so I bought a souvenir for you while I was shopping.\""; - if ((checkweight("DesertHat", 1) == 0) || (@inventorylist_count == 100)) - goto L_Inventory; - getitem "DesertHat", 1; - set @state, 9; - callfunc "SetKylianQuest"; - next; - goto L_Close; - -L_Shop: - mes "[Kylian]"; - mes "\"The Council of Wizards approved my shop license!\""; - mes "\"I purchased a store just acorss the way from the hotel exit.\""; - next; - mes "\"If you are looking for work, go see the shop keeper I have working for me.\""; - mes "\"Mention your name and he will know I sent you.\""; - set @state, 10; - callfunc "SetKylianQuest"; - goto L_Close; - -L_OfferedJob: - mes "[Kylian]"; - mes "\"I spoke with the shopkeeper, They said you haven't stopped in yet.\""; - next; - mes "\"I wish you would consider working for KPS.\""; - next; - mes "\"KPS needs a well-traveled go getter like you.\""; - goto L_Close; - -L_Helping: - mes "[Kylian]"; - mes "\"I've heard you decided to come work for me. That is great news.\""; - mes "\"Keep up the good work and I might have something a little extra for you.\""; - goto L_Close; - -L_Done: - mes "[Kylian]"; - mes "\"Thanks a bunch, buisness is booming!\""; - mes "\"For your hard work take this.\""; - next; - set Zeny, Zeny + $@delivery_money; - getexp ($@delivery_exp_mod * BaseLevel), 0; - set @run_cnt, 0; - callfunc "SetKylianRunCnt"; - set @state, 12; - callfunc "SetKylianQuest"; - mes "[" + $@delivery_money + " money]"; - mes "[" + ($@delivery_exp_mod * BaseLevel) + " experience points]"; - next; - goto L_Close; - -L_Inventory: - mes "[Kylian]"; - mes "\"Oh, you're carrying a lot of things. Come back when you have more room.\""; - goto L_Close; - -L_NoItem: - mes "[Kylian]"; - mes "\"I don't see it! Are you trying to tease me? This is not funny!\""; - goto L_Close; - -L_Close: - set @acorn_amount, 0; - set @suitcase_money, 0; - set @suitcase_exp, 0; - set @license_money, 0; - set @license_exp, 0; - set @sightseeing_money, 0; - set @sightseeing_exp, 0; - set @food_money, 0; - set @food_exp, 0; - set @clothes_money, 0; - set @clothes_exp, 0; - set @fun_money, 0; - set @fun_exp, 0; - set @inventorylist_count, 0; - set @bernard, 0; - // NOT set to zero: @KylianNTLicense, @KylianNTSightSeeing and @KylianNTCasino - // those are used to check if the player logged out in the meanwhile - close; -} -function|script|SetKylianQuest -{ - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(NIBBLE_5_MASK)) | (@state << NIBBLE_5_SHIFT); - return; -} -function|script|KylianDebug -{ - set @state, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - callfunc "ClearVarTMW_Quest"; - set @bernard, ((QUEST_SouthTulimshar & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT); - set @run, ((QUEST_NorthTulimshar & TWOBIT_8_MASK) >> TWOBIT_8_SHIFT); - set @run_cnt, ((QUEST_NorthTulimshar & TWOBIT_9_MASK) >> TWOBIT_9_SHIFT); - goto L_Menu; - -L_Menu: - mes "[Kylian Debug]"; - menu - "Show Quest State", L_ShowState, - "Set Quest State", L_SetState, - "Reset Timer to now", L_WorkTimer, - "Reset Timer + 24 hours", L_MoreWorkTimer, - "Close.", L_Close; - -L_ShowState: - mes "State: " + @state; - mes "Timer: " + Kylian_Timer; - mes "Time: " + gettimetick(2); - mes "Elapsed Time: " + (gettimetick(2) - Kylian_Timer); - mes "Reset Timer: 86400 > " + (gettimetick(2) - Kylian_Timer); - mes "Run: " + @run; - mes "Run NPC: " + $@random_quests$[@run]; - mes "Run Count: " + @run_cnt; - goto L_Menu; - -L_SetState: - mes "\"Input the quest state desired.\""; - input @state; - callfunc "SetKylianQuest"; - goto L_Menu; - -L_WorkTimer: - set Kylian_Timer, gettimetick(2); - goto L_Menu; - -L_MoreWorkTimer: - set Kylian_Timer, (gettimetick(2) - 86401); - goto L_Menu; - -L_Close: - close; -} -021-2.gat,87,55,0|script|KylianDebug#1|193 -{ - callfunc "KylianDebug"; - end; -OnInit: - if (!debug) - disablenpc "KylianDebug#1"; - end; -} -021-2.gat,29,124,0|script|KylianDebug#2|193 -{ - callfunc "KylianDebug"; - end; -OnInit: - if (!debug) - disablenpc "KylianDebug#2"; - end; -} diff --git a/world/map/npc/021-2/manakins.txt b/world/map/npc/021-2/manakins.txt deleted file mode 100644 index 85f757a5..00000000 --- a/world/map/npc/021-2/manakins.txt +++ /dev/null @@ -1,47 +0,0 @@ -// Display Manakins. - -// Forge -021-2.gat,76,131,0|script|Terranite Armor#Female|401 -{ - mes "Terranite Armor complete set, made to order, inquire with Heathin"; - close; -} - -021-2.gat,81,131,0|script|Terranite Armor#Male|402 -{ - mes "Terranite Armor complete set, made to order, inquire with Heathin"; - close; -} - -021-2.gat,81,136,0|script|Terranite|403 -{ - mes "Ahhh! A Terranite! Wait it appears to just be a display model."; - close; -} - -// Museum - -021-2.gat,71,161,0|script|Talponian#Female|404 -{ - mes "A Female Talponian."; - close; -} - -021-2.gat,77,161,0|script|Talponian#Male|405 -{ - mes "A Male Talponian."; - close; -} - -021-2.gat,83,161,0|script|Gispaan#Female|406 -{ - mes "A Female Gispaan."; - close; -} - -021-2.gat,89,161,0|script|Gispaan#Male|407 -{ - mes "A Male Gispaan."; - close; -} - diff --git a/world/map/npc/021-2/mapflags.txt b/world/map/npc/021-2/mapflags.txt deleted file mode 100644 index d3dd0e16..00000000 --- a/world/map/npc/021-2/mapflags.txt +++ /dev/null @@ -1,2 +0,0 @@ -021-2.gat|mapflag|town -021-2.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/021-2/rebecca.txt b/world/map/npc/021-2/rebecca.txt deleted file mode 100644 index 37df8d65..00000000 --- a/world/map/npc/021-2/rebecca.txt +++ /dev/null @@ -1,11 +0,0 @@ -// - -021-2.gat,26,54,0|script|Rebecca|118 -{ - set @npcname$, "Rebecca the Inn Keeper"; - set @cost, 100; - callfunc "Inn"; - set @npcname$, ""; - set @cost, 0; - close; -} diff --git a/world/map/npc/021-2/yanis.txt b/world/map/npc/021-2/yanis.txt deleted file mode 100644 index 0cc28962..00000000 --- a/world/map/npc/021-2/yanis.txt +++ /dev/null @@ -1,41 +0,0 @@ -// Government official taking care about shop licenses -// involved in quest given by 021-1/imec.txt and 021-2/kylian.txt - -021-2.gat,33,17,0|script|Yanis|107 -{ - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@knowYanisNT; - set @kylian, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - set @imec, ((QUEST_NorthTulimshar & TWOBIT_4_MASK) >> TWOBIT_4_SHIFT); - - mes "[Yanis]"; - mes "\"Welcome. I'm handling issues with trading licenses for the shop owners in Tulimshar. Can I help you?\""; - if (@imec != 1) - menu - "Nothing right now.",L_BeforeClose; - menu - "Imec asked me to bring this petition.",L_Next, - "Nothing right now.",L_BeforeClose; - -L_Next: - mes "[Yanis]"; - mes "\"Imec? I see. Give it to me.\""; - mes "Yanis has a disapproving look on his face. He takes the letter and writes something on another paper."; - next; - mes "[Yanis]"; - mes "\"Here you have a letter of acknowledgement. You can bring that back to Imec. We will have a look at his case.\""; - set @imec, 2; - set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~(TWOBIT_4_MASK)) | (@imec << TWOBIT_4_SHIFT); - goto L_BeforeClose; - -L_BeforeClose: - if (@kylian != 3) - goto L_Close; - next; - mes "You think that this is the person Kylian needs to talk to. You should tell him."; - goto L_Close; - -L_Close: - set @imec, 0; - set @kylian, 0; - close; -} diff --git a/world/map/npc/021-3/_mobs.txt b/world/map/npc/021-3/_mobs.txt index 78b2ad47..d4d62bef 100644 --- a/world/map/npc/021-3/_mobs.txt +++ b/world/map/npc/021-3/_mobs.txt @@ -7,21 +7,23 @@ 021-3.gat,129,82,8,3|monster|CaveMaggot|1056,5,100000ms,30000ms,Mob021-3::On1056 021-3.gat,140,38,16,8|monster|AngryFireGoblin|1108,3,100000ms,30000ms,Mob021-3::On1108 021-3.gat,79,98,33,31|monster|BlackScorpion|1009,4,100000ms,1800000ms,Mob021-3::On1009 -021-3.gat,52,53,2,17|monster|Snake|1010,2,40000ms,50000ms,Mob021-3::On1010 +021-3.gat,52,53,2,17|monster|GreenSlime|1005,4,40000ms,50000ms,Mob021-3::On1005 021-3.gat,93,31,28,22|monster|SeaSlime|1033,6,100000ms,30000ms,Mob021-3::On1033 +021-3.gat,121,128,8,3|monster|CaveMaggot|1056,5,100000ms,30000ms,Mob021-3::On1056 +021-3.gat,47,139,8,3|monster|CaveMaggot|1056,5,100000ms,30000ms,Mob021-3::On1056 021-3.gat,0,0,0|script|Mob021-3|-1 { end; -On1009: - set @mobID, 1009; +On1005: + set @mobID, 1005; callfunc "MobPoints"; end; -On1010: - set @mobID, 1010; +On1009: + set @mobID, 1009; callfunc "MobPoints"; end; diff --git a/world/map/npc/021-3/_warps.txt b/world/map/npc/021-3/_warps.txt index 192f6c95..1abe90e3 100644 --- a/world/map/npc/021-3/_warps.txt +++ b/world/map/npc/021-3/_warps.txt @@ -1,6 +1,7 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Central Tulimshar Sewers warps -021-3.gat,143,127|warp|To Central Tulimshar|-1,-1,021-1.gat,147,137 -021-3.gat,125,33|warp|To Central Tulimshar|-1,-1,021-1.gat,124,39 -021-3.gat,57,99|warp|To Central Tulimshar|-1,-1,021-1.gat,50,105 +021-3.gat,143,127|warp|To Central Tulimshar|-1,-1,001-1.gat,117,109 +021-3.gat,57,99|warp|To Central Tulimshar|-1,-1,001-1.gat,60,84 +021-3.gat,29,62|warp|To Beach|-1,-1,001-1.gat,28,45 +021-3.gat,44,143|warp|To Sea Cave|-1,-1,004-3.gat,80,23 diff --git a/world/map/npc/021-3/mapflags.txt b/world/map/npc/021-3/mapflags.txt index d02af5d8..07afc1c8 100644 --- a/world/map/npc/021-3/mapflags.txt +++ b/world/map/npc/021-3/mapflags.txt @@ -1 +1 @@ -021-3.gat|mapflag|resave|001-1,57,71 +021-3.gat|mapflag|resave|001-1,60,105 diff --git a/world/map/npc/023-2/_import.txt b/world/map/npc/023-2/_import.txt deleted file mode 100644 index ceb63a25..00000000 --- a/world/map/npc/023-2/_import.txt +++ /dev/null @@ -1,6 +0,0 @@ -// Map 023-2: Lighthouse -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 023-2.gat -npc: npc/023-2/_mobs.txt -npc: npc/023-2/_warps.txt -npc: npc/023-2/mapflags.txt diff --git a/world/map/npc/023-2/_mobs.txt b/world/map/npc/023-2/_mobs.txt deleted file mode 100644 index 89768e20..00000000 --- a/world/map/npc/023-2/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Lighthouse mobs - - - -023-2.gat,0,0,0|script|Mob023-2|-1 -{ - end; -} diff --git a/world/map/npc/023-2/_warps.txt b/world/map/npc/023-2/_warps.txt deleted file mode 100644 index 1c25c857..00000000 --- a/world/map/npc/023-2/_warps.txt +++ /dev/null @@ -1,5 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Lighthouse warps - -023-2.gat,31,40|warp|To Lighthouse Beach|-1,-1,023-1.gat,36,35 -023-2.gat,31,31|warp|To Lighthouse Beach|-1,-1,023-1.gat,36,23 diff --git a/world/map/npc/023-2/mapflags.txt b/world/map/npc/023-2/mapflags.txt deleted file mode 100644 index 84596948..00000000 --- a/world/map/npc/023-2/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -023-2.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/023-3/_import.txt b/world/map/npc/023-3/_import.txt deleted file mode 100644 index b9b116f0..00000000 --- a/world/map/npc/023-3/_import.txt +++ /dev/null @@ -1,6 +0,0 @@ -// Map 023-3: Tulimshar Beach Caves -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 023-3.gat -npc: npc/023-3/_mobs.txt -npc: npc/023-3/_warps.txt -npc: npc/023-3/mapflags.txt diff --git a/world/map/npc/023-3/_mobs.txt b/world/map/npc/023-3/_mobs.txt deleted file mode 100644 index 26b0f4f8..00000000 --- a/world/map/npc/023-3/_mobs.txt +++ /dev/null @@ -1,25 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Beach Caves mobs - -023-3.gat,91,77,7,7|monster|Thug|1119,1,100000ms,30000ms,Mob023-3::On1119 -023-3.gat,127,85,7,7|monster|Swashbuckler|1120,1,100000ms,30000ms,Mob023-3::On1120 -023-3.gat,98,28,7,7|monster|Swashbuckler|1120,1,100000ms,30000ms,Mob023-3::On1120 -023-3.gat,120,45,7,7|monster|Thug|1119,1,100000ms,30000ms,Mob023-3::On1119 -023-3.gat,51,107,12,5|monster|Swashbuckler|1120,1,100000ms,30000ms,Mob023-3::On1120 -023-3.gat,69,52,66,8|monster|Thug|1119,1,100000ms,30000ms,Mob023-3::On1119 - - -023-3.gat,0,0,0|script|Mob023-3|-1 -{ - end; - -On1119: - set @mobID, 1119; - callfunc "MobPoints"; - end; - -On1120: - set @mobID, 1120; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/023-3/_warps.txt b/world/map/npc/023-3/_warps.txt deleted file mode 100644 index 3c95fb55..00000000 --- a/world/map/npc/023-3/_warps.txt +++ /dev/null @@ -1,11 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Beach Caves warps - -023-3.gat,75,134|warp|To Lighthouse Beach|-1,-1,023-1.gat,75,136 -023-3.gat,71,117|warp|To Lighthouse Beach|-1,-1,023-1.gat,71,119 -023-3.gat,83,114|warp|To Lighthouse Beach|-1,-1,023-1.gat,83,116 -023-3.gat,106,120|warp|To Lighthouse Beach|-1,-1,023-1.gat,107,122 -023-3.gat,106,112|warp|To Lighthouse Beach|-1,-1,023-1.gat,105,112 -023-3.gat,70,95|warp|To Lighthouse Beach|-1,-1,023-1.gat,70,97 -023-3.gat,48,80|warp|To Lighthouse Beach|-1,-1,023-1.gat,48,82 -023-3.gat,61,36|warp|To Lighthouse Beach|-1,-1,023-1.gat,61,34 diff --git a/world/map/npc/023-3/mapflags.txt b/world/map/npc/023-3/mapflags.txt deleted file mode 100644 index 8d7ca6b9..00000000 --- a/world/map/npc/023-3/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -023-3.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/024-2/_import.txt b/world/map/npc/024-2/_import.txt deleted file mode 100644 index 685cb331..00000000 --- a/world/map/npc/024-2/_import.txt +++ /dev/null @@ -1,9 +0,0 @@ -// Map 024-2: Tulimshar Magic School -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 024-2.gat -npc: npc/024-2/_mobs.txt -npc: npc/024-2/_warps.txt -npc: npc/024-2/barrier.txt -npc: npc/024-2/mapflags.txt -npc: npc/024-2/tyer.txt -npc: npc/024-2/tyer_trigger.txt diff --git a/world/map/npc/024-2/_mobs.txt b/world/map/npc/024-2/_mobs.txt deleted file mode 100644 index 14ac77bc..00000000 --- a/world/map/npc/024-2/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Magic School mobs - - - -024-2.gat,0,0,0|script|Mob024-2|-1 -{ - end; -} diff --git a/world/map/npc/024-2/_warps.txt b/world/map/npc/024-2/_warps.txt deleted file mode 100644 index b6e41de6..00000000 --- a/world/map/npc/024-2/_warps.txt +++ /dev/null @@ -1,5 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Magic School warps - -024-2.gat,26,27|warp|To Tulimshar Canyon|0,-1,024-1.gat,80,49 -024-2.gat,42,28|warp|To Outside|-1,-1,024-1.gat,86,49 diff --git a/world/map/npc/024-2/barrier.txt b/world/map/npc/024-2/barrier.txt deleted file mode 100644 index 84405447..00000000 --- a/world/map/npc/024-2/barrier.txt +++ /dev/null @@ -1,16 +0,0 @@ -// A barrier in the magic school to keep less experienced players out of the canyon - -024-2.gat,31,24,0|script|#MagicSchoolBarrier1#M|127,1,1 -{ - callfunc "MorganState"; - if (@morgan >= 4) - goto L_End; - goto L_PushBack; - -L_PushBack: - warp "024-2.gat", 34, 24; - goto L_End; - -L_End: - end; -} diff --git a/world/map/npc/024-2/mapflags.txt b/world/map/npc/024-2/mapflags.txt deleted file mode 100644 index 03190692..00000000 --- a/world/map/npc/024-2/mapflags.txt +++ /dev/null @@ -1,2 +0,0 @@ -024-2.gat|mapflag|town -024-2.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/024-2/tyer.txt b/world/map/npc/024-2/tyer.txt deleted file mode 100644 index 21868e96..00000000 --- a/world/map/npc/024-2/tyer.txt +++ /dev/null @@ -1,8 +0,0 @@ -// A man in the magic school - -024-2.gat,36,21,0|script|Tyer|157 -{ - mes "[Tyer]"; - mes "\"Hello. Welcome to the Magic Insitute of Tulimshar.\""; - close; -} diff --git a/world/map/npc/024-2/tyer_trigger.txt b/world/map/npc/024-2/tyer_trigger.txt deleted file mode 100644 index 6c532b62..00000000 --- a/world/map/npc/024-2/tyer_trigger.txt +++ /dev/null @@ -1,24 +0,0 @@ -// A man in the magic school - -024-2.gat,33,24,0|script|#Tyer_Trigger|127,0,1 -{ - callfunc "MorganState"; - if (@morgan >= 4) - goto L_Close; - - mes "[Tyer]"; - mes "\"You're not allowed to go in there.\""; - menu - "What do you mean I'm not allowed to go in there?", L_Explain, - "Ah, right.", L_Close; - -L_Explain: - mes "[Tyer]"; - mes "\"Access to those areas are for students of magic only.\""; - next; - mes "\"That barrier was made to keep those that are not students out.\""; - goto L_Close; - -L_Close: - close; -} diff --git a/world/map/npc/024-3/_import.txt b/world/map/npc/024-3/_import.txt deleted file mode 100644 index 306ec8ee..00000000 --- a/world/map/npc/024-3/_import.txt +++ /dev/null @@ -1,5 +0,0 @@ -// Map 024-3: Entry Ancient Amulets -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 024-3.gat -npc: npc/024-3/_mobs.txt -npc: npc/024-3/_warps.txt diff --git a/world/map/npc/024-3/_mobs.txt b/world/map/npc/024-3/_mobs.txt deleted file mode 100644 index c9456ee3..00000000 --- a/world/map/npc/024-3/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Entry Ancient Amulets mobs - - - -024-3.gat,0,0,0|script|Mob024-3|-1 -{ - end; -} diff --git a/world/map/npc/024-3/_warps.txt b/world/map/npc/024-3/_warps.txt deleted file mode 100644 index eb326a51..00000000 --- a/world/map/npc/024-3/_warps.txt +++ /dev/null @@ -1,3 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Entry Ancient Amulets warps - diff --git a/world/map/npc/024-4/_import.txt b/world/map/npc/024-4/_import.txt deleted file mode 100644 index e76b609b..00000000 --- a/world/map/npc/024-4/_import.txt +++ /dev/null @@ -1,5 +0,0 @@ -// Map 024-4: Giant Maze -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 024-4.gat -npc: npc/024-4/_mobs.txt -npc: npc/024-4/_warps.txt diff --git a/world/map/npc/024-4/_mobs.txt b/world/map/npc/024-4/_mobs.txt deleted file mode 100644 index bcb4d487..00000000 --- a/world/map/npc/024-4/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Giant Maze mobs - - - -024-4.gat,0,0,0|script|Mob024-4|-1 -{ - end; -} diff --git a/world/map/npc/024-4/_warps.txt b/world/map/npc/024-4/_warps.txt deleted file mode 100644 index cd46789f..00000000 --- a/world/map/npc/024-4/_warps.txt +++ /dev/null @@ -1,3 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Giant Maze warps - diff --git a/world/map/npc/029-3/barrier.txt b/world/map/npc/029-3/barrier.txt index 27b472cf..e1d2c399 100644 --- a/world/map/npc/029-3/barrier.txt +++ b/world/map/npc/029-3/barrier.txt @@ -1,7 +1,7 @@ -029-3.gat,46,21,0|script|#FightCaveBarrier|45,0,0 +029-3.gat,49,54,0|script|#FightCaveBarrier|45,0,0 { if ($@FIGHT_CAVE_STATUS == 1) goto L_Block; - warp "029-1.gat", 54, 39; + warp "029-1.gat", 69, 62; end; L_Block: diff --git a/world/map/npc/029-3/mapflags.txt b/world/map/npc/029-3/mapflags.txt index 549377f1..f7cfbcaf 100644 --- a/world/map/npc/029-3/mapflags.txt +++ b/world/map/npc/029-3/mapflags.txt @@ -1,2 +1,2 @@ -029-3.gat|mapflag|nosave|029-1,69,69 -029-3.gat|mapflag|resave|029-1,69,69 +029-3.gat|mapflag|nosave|029-1,39,102 +029-3.gat|mapflag|resave|029-1,39,102 diff --git a/world/map/npc/031-1/frozenbeard.txt b/world/map/npc/031-1/frozenbeard.txt index e05b3d67..ba656244 100644 --- a/world/map/npc/031-1/frozenbeard.txt +++ b/world/map/npc/031-1/frozenbeard.txt @@ -16,16 +16,7 @@ L_Explain: mes "[Frozenbeard]"; mes "\"Arrr mate! I pioneered the trade routes between Nivalis and the rest of the World, so now merchants and adventurers can travel to and fro without any hassle other than the harsh weather up here, yarr.\""; next; - mes "\"You wait on the dock for the ship to come in. You'll be given a chance to board the boat when it comes into port.\""; - mes "\"It lingers in port to allow you some time to board in case you are running behind.\""; - mes "\"Once on the ship, it will sail to different ports and annouce where it is docking.\""; - next; - mes "\"There are 2 Ferrys, both ferrys are free to ride.\""; - mes "\"The Main ferry travels from Argeas, Kaizei and Tonori. It docks in the major ports Hurnscald, Nivalis and the Tulimshar South Dock.\""; - mes "\"The Candor Ferry only travels betwen Candor and the Tulimshar North Dock.\""; - next; - mes "\"Refreshments and supplies are offered aboard both ships during the voyage.\""; - mes "\"We also have some slot machines in case you get bored.\""; + callfunc "FerryHelp"; goto L_Main; L_Close: diff --git a/world/map/npc/032-1/_import.txt b/world/map/npc/032-1/_import.txt deleted file mode 100644 index 00df1589..00000000 --- a/world/map/npc/032-1/_import.txt +++ /dev/null @@ -1,7 +0,0 @@ -// Map 032-1: Outback -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 032-1.gat -npc: npc/032-1/_mobs.txt -npc: npc/032-1/_warps.txt -npc: npc/032-1/mapflags.txt -npc: npc/032-1/miriam.txt diff --git a/world/map/npc/032-1/_mobs.txt b/world/map/npc/032-1/_mobs.txt deleted file mode 100644 index 5c41b90a..00000000 --- a/world/map/npc/032-1/_mobs.txt +++ /dev/null @@ -1,24 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Outback mobs - -032-1.gat,47,64,27,15|monster|BlackScorpion|1009,5,30000ms,100000ms,Mob032-1::On1009 -032-1.gat,24,72,27,24|monster|BlackScorpion|1009,5,30000ms,100000ms,Mob032-1::On1009 -032-1.gat,24,48,25,21|monster|BlackScorpion|1009,5,30000ms,100000ms,Mob032-1::On1009 -032-1.gat,57,44,23,18|monster|Snake|1010,13,30000ms,100000ms,Mob032-1::On1010 -032-1.gat,77,76,34,27|monster|Snake|1010,13,30000ms,100000ms,Mob032-1::On1010 - - -032-1.gat,0,0,0|script|Mob032-1|-1 -{ - end; - -On1009: - set @mobID, 1009; - callfunc "MobPoints"; - end; - -On1010: - set @mobID, 1010; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/032-1/_warps.txt b/world/map/npc/032-1/_warps.txt deleted file mode 100644 index bdef5c3f..00000000 --- a/world/map/npc/032-1/_warps.txt +++ /dev/null @@ -1,4 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Outback warps - -032-1.gat,64,52|warp|To Outback Cave|-1,-1,032-3.gat,56,60 diff --git a/world/map/npc/032-1/mapflags.txt b/world/map/npc/032-1/mapflags.txt deleted file mode 100644 index 534224b6..00000000 --- a/world/map/npc/032-1/mapflags.txt +++ /dev/null @@ -1 +0,0 @@ -032-1.gat|mapflag|resave|032-1,77,23 diff --git a/world/map/npc/032-1/miriam.txt b/world/map/npc/032-1/miriam.txt deleted file mode 100644 index d4daaafd..00000000 --- a/world/map/npc/032-1/miriam.txt +++ /dev/null @@ -1,335 +0,0 @@ -//############################################# -// author: alastrim, PjotrOrial -//############################################# -// This npc teaches you the speed skill. -// used variables: -// QUEST_MIRIAM: -// 0 either fully completed the quests in here, or not started. -// 1 you said the wrong words, she is insulted. (so you excuse and goto 2) -// 2 waiting for the ingredients -// 3 you brought the needed stuff. if you meet other criteria (BaseLevel, agi) you will be taught the skill -// 4 you have met the criteria of 3, but declined to take the speed test. -// 5 you tried the quest but you failed -// QUEST_MIRIAM_start -// a time in ticks. This is only !=0 if you started running to pachua. -// QUEST_MIRIAM_run -// when you reach pachua, he stores the difference of start and arrival in here. -//############################################# -// after you gained the speed skill, all variables are reset to zero. -//############################################# - -032-1.gat,55,20,0|script|Miriam|175 -{ - if (getskilllv(SKILL_SPEED)) goto L_fast; - if (getequipid(equip_torso) < 0) goto L_naked; - if (QUEST_MIRIAM == 0) goto L_intro; - if (QUEST_MIRIAM == 1) goto L_ask1; - if (QUEST_MIRIAM == 2) goto L_ask2; - if (QUEST_MIRIAM == 3) goto L_teach; - if (QUEST_MIRIAM == 4) goto L_testoffer; - if (QUEST_MIRIAM_run != 0) goto L_checktime; - if (QUEST_MIRIAM_start != 0) goto L_wasting; - if (QUEST_MIRIAM == 5) goto L_testoffer; - goto L_intro; - -L_intro: - mes "You see a woman sitting in the hot sand with eyes wide open... But she does not seem to be looking at something in particular..."; - next; - menu - "Ehr... Hi, my name is " +strcharinfo(0)+ ". Are you OK?",L_Next; - -L_Next: - mes "[Miriam]"; - mes "\"..."; - next; - menu - "Hello?",L_Continue; - -L_Continue: - mes "[Miriam]"; - mes "\"Yes, I am. Why? Do you think I am not OK? I am OK. You interrupted my meditation. Now I will need hours to calm down and stay quiet! Yes, yes, I know, I'm a fast talker!\""; - next; - mes "\"In fact, I am fast in everything I do! I can kill a Mountain Snake before it even starts to think about attacking me! Yes my friend, in a battle, speed is power!"; - next; - menu - "Wow! Very impressi...",L_More; - -L_More: - mes "[Miriam]"; - mes "\"Yes, yes, I know. But if there is one thing I am NOT good at, it is meditation! My master said I need to meditate, but... Ohh! So difficult to stay quiet! And when you FINALLY do, someone INTERRUPTS you, asking if you are 'OK'...\""; - next; - menu - "Oh, I am sorry! I didn't know you were meditating...",L_WallText; - -L_WallText: - mes "[Miriam]"; - mes "\"You are really sorry? Ok, but that is not enough... I need you to do something for me. As you can imagine, I will need a lot of time to concentrate and get back to the state I was when you interrupted me.\""; - next; - mes "\"But the problem is that I wasn't expecting to be here for so long, so I will need some food and something to drink.\""; - next; - mes "\"So, if you really want to prove that you are sorry, bring me 5 Concentration Potions and 10 Snake Tongues.\""; - next; - menu - "Ok, but those potions will not help with your mental concent...",L_MoreTalking, - "Sorry, but I can't help you right now.",L_canthelp; - -L_MoreTalking: - mes "[Miriam]"; - mes "\"ah, ah, ah... I know what I am doing! Now run and get what I asked.\""; - set QUEST_MIRIAM, 2; - close; - -L_canthelp: - mes "[Miriam]"; - mes "\"Oh, really? So you better pray to not need my help in the future!\""; - set QUEST_MIRIAM, 1; - close; - -L_canthelp2: - mes "[Miriam]"; - mes "\"...\""; - next; - mes "\"...\""; - next; - mes "\"Well, if you don't have time to help, at least don't make things difficult for me!\""; - close; - -L_ask1: - mes "[Miriam]"; - mes "\"So, you are back... have you changed your mind about my request?\""; - next; - menu - "Yes, I will get what you want!",L_WillGetItems, - "No, I have no time right now.",L_canthelp2; - -L_WillGetItems: - set QUEST_MIRIAM, 2; - mes "\"Good. So, run and get it!\""; - close; - -L_ask2: - mes "[Miriam]"; - mes "\"Did you get what I asked for?\""; - next; - menu - "Yes, here it is!",L_getitems, - "What was that again?", L_ask3, - "No, not yet.",L_Hurry; - -L_Hurry: - mes "\"So please hurry up!\""; - close; - -L_ask3: - mes "[Miriam]"; - mes "\"You have a small mind, haven't you? I am meditating here and I asked you to bring me stuff, so I can concentrate better.\""; - next; - mes "\"And stop asking such silly questions in the future.\""; - next; - mes "\"So, if you really want to help me now, bring me 5 Concentration Potions and 10 Snake Tongues.\""; - close; - -L_getitems: - if (countitem("SnakeTongue") < 10 - || countitem("ConcentrationPotion") < 5) - goto L_notenough; - delitem "SnakeTongue", 10; - delitem "ConcentrationPotion", 5; - set QUEST_MIRIAM, 3; - mes "[Miriam]"; - mes "\"Good job! Now I have enough food to stay in this desert for days!\""; - next; - mes "\"Now, since you helped me, maybe I can teach you a basic skill, but only if you prove yourself to be a fast runner! Come back and talk to me when you think you are prepared to learn.\""; - close; - -L_notenough: - mes "[Miriam]"; - mes "\"Hey, you don't have all that I asked. Come back when you have everything.\""; - close; - -L_teach: - mes "[Miriam]"; - mes "\"Hmm... do you think you can learn the special Speed skill?\""; - next; - menu - "Yes, I am prepared...", L_Prepared, - "I am already fast.", L_notfast; - -L_Prepared: - set @agi, readparam(bAgi); - set @torso$, getitemname(getequipid(equip_torso)); - set @weight, MaxWeight/Weight; - if (@weight < 3) - goto L_heavyweight; - if (@agi < 60) - goto L_slow; - if (BaseLevel < 60) - goto L_lowlevel; - if (countitem("SteelShield") > 0 - || countitem("WarlordHelmet") > 0 - || countitem("CrusadeHelmet") > 0 - || countitem("WarlordPlate") > 0 - || countitem("KnightsHelmet") > 0 - || countitem("InfantryHelmet") > 0 - || countitem("ChainmailShirt") > 0 - || countitem("WarlordBoots") > 0 - || countitem("LightPlatemail") > 0 - || countitem("CandleHelmet") > 0) - goto L_heavymetal; - goto L_offer; - -L_heavyweight: - mes "[Miriam]"; - mes "\"Wow... Why do you bring so many things with you? You must be carrying more than one third of your own weight! I won't teach you unless you get rid of some stuff... \""; - close; - -L_heavymetal: - mes "[Miriam]"; - mes "\"Hmm... I see... You want to be one of those lazy slow warriors... wasting all their strength carrying kilos of metal clothes... Why does no one see the great advantages of a beautiful, flexible, lightweight armor nowadays?\""; - next; - mes "\"Come back here when you get rid of this junk...\""; - close; - -L_slow: - mes "[Miriam]"; - mes "Oh, wait, wait... " +@agi+ " Agility? Are you serious? What do you do with all your Character points? Put them all to 'Strength'? Really... I don't even want to know... Come back here when you have a decent character points distribution!\""; - close; - -L_lowlevel: - mes "[Miriam]"; - mes "\"Come back here when you are old enough. I even wonder how you could get here so unexperienced as you are.\""; - close; - -L_offer: - mes "[Miriam]"; - mes "\"Hmm! You look great in these clothes! They look very comfortable too... And it seems like you are not carrying too much weight.\""; - next; - if (!(getskilllv(SKILL_POOL))) - goto L_noskill; - menu - "Yes, I look really good in this " +@torso$+ ".",L_TorsoNext; - -L_TorsoNext: - mes "[Miriam]"; - mes "\"I see. I like the way you distributed your Character Points too... " +@agi+ " points to Agility! You really know how to prepare yourself for a good fight!\""; - next; - mes "\"Well... Even if you have a potential to be a good fighter, moving the way you do will not help. You need to be fast to avoid the monsters. \""; - next; - mes "\"So, if you pass a small test I can teach you a skill that will increase your walking speed! You will not be as fast as I am, but I am sure it will be useful.\""; - next; - menu - "I'm in! What kind of test is it?",L_test, - "I don't think I need more speed right now",L_giveup; - -L_test: - mes "[Miriam]"; - mes "\"Great! The test is simple. You need to run as fast as you can from the place where I am sitting to the mountains and talk to Pachua, the chief. When you get there and talk to Pachua, he will send a special smoke signal to me, so I can know how much time it took for you to get there.\""; - next; - mes "\"If you make it in a good time, I will teach you the special speeding skill. If not, you can always try again. So, are you ready?\""; - next; - menu - "Yes, let's do it!",L_LetsDoThis, - "No, I need to stretch my muscles first!",L_stretch; - -L_LetsDoThis: - close2; - message strcharinfo(0), "Miriam quickly grabs your arm and pull you to the place where she is sitting."; - // Warp the player to the place where the NPC is defined, so he can't cheat. - warp "032-1.gat",55,21; - npctalk "Run " +strcharinfo(0)+ ", run!"; - set QUEST_MIRIAM, 5; - set QUEST_MIRIAM_start, gettimetick(2); - set QUEST_MIRIAM_cheat, 0; - end; - -L_naked: - mes "[Miriam]"; - mes "\"Hmmm?! Please put on some clothes before talking to me.\""; - close; - -L_notfast: - mes "[Miriam]"; - mes "\"Hah! If you think so...\""; - close; - -L_noskill: - mes "[Miriam]"; - mes "\"For a person like you, I could even teach a useful skill! Too bad you don't have the basic abillities to learn it...\""; - close; - -L_giveup: - mes "[Miriam]"; - mes "\"Oh, that is too bad... But if you change your mind, come back!\""; - set QUEST_MIRIAM, 4; - close; - -L_testoffer: - mes "[Miriam]"; - mes "\"Are you ready for the test now?\""; - next; - menu - "Yes!",L_test, - "Not yet.",L_Close; - -L_Close: - close; - -L_warning: - mes "[Miriam]"; - mes "\"I know very well what you tried to do. I will not teach you the speed skill if you keep trying this kind of trick!\""; - next; - goto L_testoffer; - -L_stretch: - mes "[Miriam]"; - mes "\"Ok. Good idea... Stretching exercises can increase your flexibility and even prevent injuries!\""; - set QUEST_MIRIAM, 4; - close; - -L_wasting: - mes "[Miriam]"; - mes "\"Don't waste your time talking to me! RUN and talk to Pachua!\""; - close; - -L_checktime: - if (QUEST_MIRIAM_cheat != 0) - goto L_warning; - if (QUEST_MIRIAM_run <= 210) - goto L_goodjob; - goto L_tryagain; - -L_tryagain: - mes "[Miriam]"; - mes "\"You needed " + QUEST_MIRIAM_run + " seconds to reach Pachua. It is not enough.\""; - set QUEST_MIRIAM_run, 0; - close; - -L_goodjob: - mes "[Miriam]"; - mes "\"Great job! You needed " + QUEST_MIRIAM_run + " seconds to reach Pachua. Very impressive for a person like you.\""; - next; - mes "\"Now I need you to relax. Do NOT move. This teaching process can be painful sometimes.\""; - next; - mes "Miriam stares into your eyes and starts to scream some strange words very close to your ears."; - next; - mes "You feel dizzy and as soon as you move your head and look to the ground, Miriam pushes you hard, sending you meters away from her."; - close2; - warp "032-1.gat",55,22; - // free all used player variables. This can be done, since there is a conditional on the speedskill at the beginning. - set QUEST_MIRIAM_start, 0; - set QUEST_MIRIAM_run, 0; - set QUEST_MIRIAM, 0; - message strcharinfo(0), "[You gain 2500 experience points]"; - message strcharinfo(0), "[You learned Speed Skill]"; - setskill SKILL_SPEED, 1; - getexp 2500, 0; - set QUEST_MIRIAM_cheat, 0; // reset just in case it is still set. - close; - -L_fast: - mes "[Miriam]"; - mes "\"I hope you make a good use of your new skill... Take care!\""; - set QUEST_MIRIAM_cheat, 0; // reset just in case it is still set. - close; - -} diff --git a/world/map/npc/032-3/_warps.txt b/world/map/npc/032-3/_warps.txt index b84c4e2c..f4569169 100644 --- a/world/map/npc/032-3/_warps.txt +++ b/world/map/npc/032-3/_warps.txt @@ -2,4 +2,4 @@ // Outback Cave warps 032-3.gat,128,34|warp|To Desert Mountains|-1,-1,006-1.gat,30,124 -032-3.gat,56,61|warp|To Outback|-1,-1,032-1.gat,64,53 +032-3.gat,56,61|warp|To Desert Mountains|-1,-1,006-1.gat,111,111 diff --git a/world/map/npc/032-3/mapflags.txt b/world/map/npc/032-3/mapflags.txt index 3c28a3a0..d619bf99 100644 --- a/world/map/npc/032-3/mapflags.txt +++ b/world/map/npc/032-3/mapflags.txt @@ -1 +1 @@ -032-3.gat|mapflag|resave|032-1,77,23 +032-3.gat|mapflag|resave|006-1,36,18 diff --git a/world/map/npc/035-2/koga.txt b/world/map/npc/035-2/koga.txt index c38221a4..616de0f3 100644 --- a/world/map/npc/035-2/koga.txt +++ b/world/map/npc/035-2/koga.txt @@ -17,7 +17,7 @@ L_Leave: goto L_Close; L_Tulimshar: - warp "022-1.gat", 76, 72; + warp "001-1.gat", 63, 73; goto L_Close; L_Hurnscald: diff --git a/world/map/npc/036-2/emblems.txt b/world/map/npc/036-2/emblems.txt index ed73729b..1c8bad11 100644 --- a/world/map/npc/036-2/emblems.txt +++ b/world/map/npc/036-2/emblems.txt @@ -1,11 +1,11 @@ -036-2.gat,29,27,0|script|#k2city1e|410 +036-2.gat,29,27,0|script|#k2city1e|412 { end; OnInit: disablenpc "#k2city1e"; end; } -036-2.gat,29,27,0|script|#k2city1d|411 +036-2.gat,29,27,0|script|#k2city1d|413 { end; } diff --git a/world/map/npc/036-2/koga-candor.txt b/world/map/npc/036-2/koga-candor.txt index 555fbec5..3b9fd932 100644 --- a/world/map/npc/036-2/koga-candor.txt +++ b/world/map/npc/036-2/koga-candor.txt @@ -11,15 +11,15 @@ L_Leave: if ($@CandorCurrentDock == 0) goto L_Candor; if ($@CandorCurrentDock == 1) - goto L_Tulimshar; + goto L_Hurnscald; goto L_Close; -L_Tulimshar: - warp "022-1.gat", 60, 33; +L_Hurnscald: + warp "008-1.gat", 137, 75; goto L_Close; L_Candor: - warp "029-1.gat", 25, 37; + warp "029-1.gat", 46, 109; goto L_Close; L_Close: diff --git a/world/map/npc/043-3/_warps.txt b/world/map/npc/043-3/_warps.txt index 11506fb8..5decf57c 100644 --- a/world/map/npc/043-3/_warps.txt +++ b/world/map/npc/043-3/_warps.txt @@ -1,5 +1,7 @@ // This file is generated automatically. All manually changes will be removed when running the Converter. // Sandy Dungeon Level 1 warps -043-3.gat,32,36|warp|To Beach|0,-1,043-1.gat,52,39 +043-3.gat,31,26|warp|Mine Camp|-1,-1,002-3.gat,22,86 043-3.gat,77,30|warp|To Lower Level|-1,-1,043-4.gat,47,67 +043-3.gat,116,36|warp|To Snake Cave|-1,-1,005-3.gat,78,87 +043-3.gat,32,37|warp|To Snake Cave|0,-1,005-3.gat,33,83 diff --git a/world/map/npc/068-2/_import.txt b/world/map/npc/068-2/_import.txt deleted file mode 100644 index 38ad884b..00000000 --- a/world/map/npc/068-2/_import.txt +++ /dev/null @@ -1,10 +0,0 @@ -// Map 068-2: Tulimshar Noble Indoors -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 068-2.gat -npc: npc/068-2/_mobs.txt -npc: npc/068-2/_warps.txt -npc: npc/068-2/bank.txt -npc: npc/068-2/hetchel.txt -npc: npc/068-2/inya.txt -npc: npc/068-2/latoy.txt -npc: npc/068-2/mapflags.txt diff --git a/world/map/npc/068-2/_mobs.txt b/world/map/npc/068-2/_mobs.txt deleted file mode 100644 index c0b6cd10..00000000 --- a/world/map/npc/068-2/_mobs.txt +++ /dev/null @@ -1,15 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Noble Indoors mobs - -068-2.gat,94,54,5,6|monster|Silkworm|1035,4,10000ms,85000ms,Mob068-2::On1035 - - -068-2.gat,0,0,0|script|Mob068-2|-1 -{ - end; - -On1035: - set @mobID, 1035; - callfunc "MobPoints"; - end; -} diff --git a/world/map/npc/068-2/_warps.txt b/world/map/npc/068-2/_warps.txt deleted file mode 100644 index 3776ed28..00000000 --- a/world/map/npc/068-2/_warps.txt +++ /dev/null @@ -1,13 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Noble Indoors warps - -068-2.gat,89,92|warp|To Noble Quarter|-1,-1,068-1.gat,56,97 -068-2.gat,61,92|warp|To Noble Quarter|-1,-1,068-1.gat,50,97 -068-2.gat,94,61|warp|To Noble Quarter|-1,-1,068-1.gat,42,97 -068-2.gat,62,61|warp|To Noble Quarter|-1,-1,068-1.gat,47,39 -068-2.gat,31,92|warp|To Noble Quarter|-1,-1,068-1.gat,30,97 -068-2.gat,31,61|warp|To Noble Quarter|-1,-1,068-1.gat,29,85 -068-2.gat,76,30|warp|To Noble Quarter|-1,-1,068-1.gat,40,80 -068-2.gat,36,30|warp|To Noble Quarter|-1,-1,068-1.gat,52,49 -068-2.gat,84,50|warp|To Garden|-1,-1,068-1.gat,38,89 -068-2.gat,58,51|warp|To Noble Quarter|-1,-1,068-1.gat,47,30 diff --git a/world/map/npc/068-2/bank.txt b/world/map/npc/068-2/bank.txt deleted file mode 100644 index 328d98ae..00000000 --- a/world/map/npc/068-2/bank.txt +++ /dev/null @@ -1,8 +0,0 @@ -// Another banker -068-2.gat,29,83,0|script|Hydusun|149 -{ - set @npcname$, "Hydusun"; - callfunc "Banker"; - close; -} - diff --git a/world/map/npc/068-2/hetchel.txt b/world/map/npc/068-2/hetchel.txt deleted file mode 100644 index c81d0cf1..00000000 --- a/world/map/npc/068-2/hetchel.txt +++ /dev/null @@ -1,445 +0,0 @@ -// Hetchel the Silk Weaver -// bh28 -// 2013-03, GPLv2. -// -// Hetchel is referred to by Lora Tay. -// She weaves and sells standard double elbow square silk sheets. -// She could also sell, dyed sheets, Silk robes from Lora Tay. -// (6000 with cocoons, 40000 (?) with no cocoons). -// -// @wg_state: variable indicating winter gloves status. -// Lora Tay proposes silk Robe if (@wg_state>= 11). -// @SHEET_COCOONS_NR:* Number of cocoons required per sheet. -// Might ne calculated from @ROBE_COCOONS_NR/@ROBE_SHEETS_NR -// Actually: 150∕6 = 25 -// @SHEET_ZENY :* Money to pay per sheet: A sixth of 10000-2*500-6000 -// @SheetCount Number of sheets to buy (variable). -// -// @silkpants_state: variable indicating silkpant quest status. - -068-2.gat,62,83,0|script|Hetchel|376 -{ - set @wg_state, ((QUEST_WG_state & BYTE_0_MASK) >> BYTE_0_SHIFT); - set @spants_state, ((QUEST_WG_state & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); - set @SHEET_COCOONS_NR, 25; - set @SHEET_ZENY, 500; - set @spants_minlvl, 45; - setarray @spants_req_hmn$, "Silk Cocoons", "Pieces of Cotton Cloth", "Silk Headbands"; - setarray @spants_req$, "SilkCocoon", "CottonCloth", "SilkHeadband"; - setarray @spants_req_amt, 154, 14, 2; - set @spants_reward, 45000; - set @spants_job_reward, 10000; - set @SheetCount, 0; - - if (@wg_state < 11) - goto L_WG_quest_not_done; - if ( BaseLevel > @spants_minlvl && @spants_state < 1 ) goto L_Spants_Cry; - if ( @spants_state == 1 ) goto L_Spants_Cry_2; - if ( @spants_state == 2 ) goto L_Spants_Start; - if ( @spants_state > 2 && @spants_state < 8 ) goto L_Spants_Steal; - if ( @spants_state == 8 ) goto L_Spants_Make; - - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; - menu - "Sorry to bother, I'm just visiting.", L_Close, - "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_main_menu; - -L_WG_quest_not_done: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Hello I am Hetchel, I weave fine textiles."; - mes "My best client is Lora Tay, at Dimond's."; - mes "What can I do for you?\""; - menu - "Sorry to bother, I'm new to this country, just visting.", L_Close, - "What are you selling?", L_main_menu; - -L_Spants_Cry: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; - menu - "Sorry to bother, I'm just visiting.", L_Close, - "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_Spants_Cry_Cont_1; - -L_Spants_Cry_2: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; - menu - "Sorry to bother, I'm just visiting.", L_Close, - "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_main_menu, - "Hey you have been crying so badly, can I help you somehow?", L_Spants_Reply_Cry, - "Give Hetchel something to dry her tears", L_Spants_Wipe_Tears; - -L_Spants_Start: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; - menu - "Sorry to bother, I'm just visiting.", L_Close, - "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_main_menu, - "So you are looking for new goals in your life?", L_Spants_No_Cry; - -L_Spants_Steal: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; - menu - "Sorry to bother, I'm just visiting.", L_Close, - "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_main_menu, - "About the Pants...", L_Spants_Steal_Cont; - -L_Spants_Make: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Hello I am Hetchel, I weave fine textiles, what can I do for you?\""; - menu - "Sorry to bother, I'm just visiting.", L_Close, - "I am looking for silk sheets, Lora Tay told me that I could find some in this market. Can you help?", L_main_menu, - "Hey what about the Pants you were planning to make?", L_Spants_Make_Cont; - -L_Spants_Cry_Cont_1: - mes "You notice how the tiny woman blushes, she suddenly bursts into tears."; - next; - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Hello\""; - mes "Hetchel hides her face in her hands"; - mes ""; - mes ""; - menu - "\"Hey, what is the problem?\"", L_Spants_Reply_Cry, - "Give Hetchel something to dry her tears", L_Spants_Wipe_Tears, - "\"Oh really? Just sell me some Silk Sheets if you have them\"", L_main_menu; - -L_Spants_Wipe_Tears: - mes "Hand Hetchel a (please type the Item you want to give her)"; - next; - mes "This is case sensitive. Also do not enter whitespaces."; - input @spants_wipe_thingy$; - if (@spants_wipe_thingy$ == "") goto L_Spants_Wrong; - if (countitem(@spants_wipe_thingy$) < 1) goto L_Spants_No_Item; - if (@spants_wipe_thingy$ == "RedCottonCloth") goto L_Spants_Wipe_Tears_Cont; - if (@spants_wipe_thingy$ == "RedHitchhikersTowel") goto L_Spants_Wipe_Tears_Towel; - mes "Hetchel looks at you, then looks at the" + @spants_wipe_thingy$ + "."; - mes "She hangs her head and weeps more"; - mes "Red is the only color I have ever loved, bring me something red to dry my tears"; - goto L_Close; - -L_Spants_Wipe_Tears_Towel: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"No, I recognize this towel, it is one of those warping towels, are you trying to mess with me?\""; - goto L_Close; - -L_Spants_Wrong: - mes "It appears you forgot to type the item you want to give."; - goto L_Close; - -L_Spants_No_Item: - mes "Oh you do not have it."; - goto L_Close; - -L_Spants_Wipe_Tears_Cont: - mes "Hetchel dries her tears with the Red Piece of Cloth you gave her."; - mes "This seems to have consoled her."; - delitem "RedCottonCloth", 1; - set @spants_state, 2; - callsub S_Update_Spants; - goto L_Spants_No_Cry; - -L_Spants_No_Cry: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Oh thank you my dear friend."; - mes "Yes, to some extent."; - next; - mes "I am just so sad because I realized that this is going to be the thing I will be doing for the rest of my life\""; - menu - "\"You are still young, Hetchel, You can still accomplish things\"", L_Spants_Cry_Cont_2, - "\"Yes, you are probably correct.\"", L_Close; - -L_Spants_Cry_Cont_2: - mes "[Hetchel the weaver]"; - mes ""; - mes "Hetchel thinks for a while"; - mes ""; - mes "\"Oh my friend, I have been dreaming of making a garment of my own."; - mes "It always bothered me to see all those wizards and witches here being naked under their cloaks\""; - mes "\"They must be so embarrassed - they are true heroes to give up their dignity to be able to fight the perils of this world\""; - mes "Hetchel sobs"; - menu - "\"So you want to make pants for mages?\"", L_Spants_Cry_Cont_3, - "\"This sounds ridiculous. Good Bye.\"", L_Close; - -L_Spants_Cry_Cont_3: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Ok, so I figured I could make some trousers like Lora Tay makes but from the much finer Material the Silk Worms are making for us\""; - mes "\"But I really need the base plans for the trousers, otherwise I do not know how to attempt this."; - mes "Can you get me those plans from her?\""; - menu - "\"No, sorry I am too busy for that\"", L_Close, - "\"Of course!\"", L_Spants_Cry_Cont_4; - -L_Spants_Cry_Cont_4: - set @spants_state, 3; - callsub S_Update_Spants; - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Oh wait! I am not sure if it is such a good idea to ask her about that, I think she would not give the plans to you anyway."; - mes "Maybe you can find a way to get those plans on a different way?"; - mes "I think there are some people in Hurnscald who have their means of getting you every possible item there is\""; - next; - mes "[Hetchel the weaver]"; - mes ""; - mes "Please please please - I need those plans"; - goto L_Close; - -L_Spants_Reply_Cry: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"...\""; - set @spants_state, 1; - callsub S_Update_Spants; - goto L_Close; - - -L_Spants_Steal_Cont: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Have you gotten hold of the plans?\""; - menu - "Yes I have them somewhere here", L_Spants_Steal_Cont2, - "No, not yet", L_Close; - -L_Spants_Steal_Cont2: - if @spants_state < 7 goto L_Spants_No_Item; - set @spants_state, 8; - callsub S_Update_Spants; - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Oh this is miraculous\""; - mes ""; - mes "Hetchel sheds some tears of joy"; - next; - mes "You hand her the crumpled plans Crastur the Ugly gave you."; - next; - mes "[Hetchel the weaver]"; - mes ""; - mes "\"I need to figure out how to do this now... \""; - next; - mes "Hetchel adjusts her glasses and reads carefully"; - next; - mes "She seems to be very busy, maybe you should come back later."; - goto L_Close; - -L_Spants_Make_Cont: - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Yes, I already made a prototype but it cost me a lot of time and effort."; - mes "I can give it to you if you are willing to pay for my expenses though.\""; - menu - "What do you want for those silken pants?", L_Spants_Make_Cont_2, - "No, I am not particularly interested.", L_Close; - -L_Spants_Make_Cont_2: - if(getarraysize(@spants_req_amt) < 3 || getarraysize(@spants_req$) < 3 || getarraysize(@spants_req_hmn$) < 3) - goto L_Spants_Error; - mes "[Hetchel the weaver]"; - mes ""; - mes "\"I need you to bring me " + @spants_req_amt[0] +" "+ @spants_req_hmn$[0] + ", " + @spants_req_amt[1] +" "+ @spants_req_hmn$[1] + " and " + @spants_req_amt[2] +" "+ @spants_req_hmn$[2]; - next; - mes "You will not have to pay for my time, I am so proud to have accomplished this on my own!\""; - menu - "\"I have those items with me\"", L_Spants_Pay, - "\"I am still looking for them\"", L_Close, - "\"What do you need again?\"", L_Spants_Make_Cont_2; - -L_Spants_Pay: - if (countitem(@spants_req$[0]) < @spants_req_amt[0] || countitem(@spants_req$[1]) < @spants_req_amt[1] || countitem(@spants_req$[2]) < @spants_req_amt[2]) - goto L_Spants_No_Item; - getinventorylist; - if (inventorylist_count == 100) goto L_TooMany; - mes "Hetchel takes your items."; - delitem @spants_req$[0], @spants_req_amt[0]; - delitem @spants_req$[1], @spants_req_amt[1]; - delitem @spants_req$[2], @spants_req_amt[2]; - getitem "SilkPants", 1; - set @spants_state, 9; - callsub S_Update_Spants; - next; - mes "[Hetchel the weaver]"; - mes ""; - mes "\"Here are your pants my dear."; - mes "Keep them safe I do not know if I will ever try this again.\""; - getexp @spants_reward, @spants_job_reward; - goto L_Close; - -L_Spants_Error: - mes "Something went wrong in the script, please inform a developer about that"; - close; - -L_main_menu: - mes "[Hetchel]"; - mes "\"I have some silk sheets: double-elbow squares.\""; - menu - "I'm not interested at the moment, maybe later; thanks anyway.", L_Close, - "Can I buy some?", L_Next; -// "Do you have a silk robe I could buy?", L_robe, -// "Goodbye.", L_Close; - -L_Next: - mes "[Hetchel]"; - mes ""; - mes "\"Sure but you need to provide raw materials."; - mes "I'll need " + @SHEET_COCOONS_NR +" silk cocoons per sheet,"; - mes "and also " + @SHEET_ZENY +" GP per sheet for my work.\""; - next; - if (countitem("SilkCocoon") == 0) - goto L_sheet_no_cocoon; - goto L_sheet_menu; - -L_sheet_menu: - menu - "I have what you asked for.", L_Next1, - "Sorry I didn't pay attention enough, what do you need?", L_how_many_cocoons, - "Oops! Sorry, I'll come back soon with them.", L_Close; - -L_Next1: - mes "[Hetchel]"; - mes ""; - mes "\"How many would you like?\""; - input @SheetCount; - if (@SheetCount == 0) - goto L_zero_sheet; - if (countitem("SilkCocoon") < @SheetCount * @SHEET_COCOONS_NR) - goto L_sheet_missing_cocoons; - if (Zeny < @SheetCount * @SHEET_ZENY) - goto L_sheet_missing_Zeny; - getinventorylist; - if (@inventorylist_count == 100 && countitem("SilkSheet") < 1 && countitem("SilkCocoon") > @SheetCount * @SHEET_COCOONS_NR) - goto L_TooMany; - set Zeny, Zeny - @SheetCount * @SHEET_ZENY; - delitem "SilkCocoon", @SheetCount * @SHEET_COCOONS_NR; - getitem "SilkSheet", @SheetCount; - mes "[Hetchel]"; - mes ""; - mes "\"Thank you, I hope the sheets will fit your needs."; - mes "Please greet Lora for me when you see her.\""; - emotion EMOTE_HAPPY; - goto L_Close; - -L_sheet_missing_cocoons: - mes "[Hetchel]"; - mes ""; - mes "\"I'm sorry, but I need " + @SheetCount * @SHEET_COCOONS_NR + ", not " + countitem("SilkCocoon") + ".\""; - goto L_Close; - -L_sheet_missing_Zeny: - mes "[Hetchel]"; - mes ""; - mes "\"No, no no. The way this works is that you give me the GP first and I give you the sheets afterwards."; - mes "You're " + (@SheetCount * @SHEET_ZENY - Zeny) + " GP short, so come back when you can afford the sheets you asked for!\""; - goto L_Close; - -L_how_many_cocoons: - mes "[Hetchel]"; - mes ""; - mes "\"I need an average of " + @SHEET_COCOONS_NR + " cocoons per sheet"; - mes "and also " + @SHEET_ZENY + " GP per sheet for my work.\""; - next; - goto L_sheet_menu; - -L_sheet_no_cocoon: - mes "[Hetchel]"; - mes ""; - mes "\"You don't have any cocoon? I'm sorry I can't do anything for you.\""; - menu - "I'll seek for them.", L_Close, - "Where can I get cocoons?", L_Next2; - -L_Next2: - mes "[Hetchel]"; - mes "\"Silk cocoons come from Silkworms. Silkworms live in the woodland area around Hurnscald."; - mes "Silkworms like especially woods and dark areas. You can go there by ferry.\""; - goto L_Close; - -//L_robe: -// mes "[Hetchel]"; -// mes "\"I am not a seamstress but I have a few silk robes from Lora Tay left."; -// mes "It is not your size as Lora made them for me, but Tondar was kind enough"; -// mes "to cast a spell on it, so that it will fit to you as soon as you wear it."; -// mes "However his prices are not that low.\""; -// next; -// goto L_main_menu; - -L_zero_sheet: - mes "[Hetchel]"; - mes ""; - mes "\"It's the best way to get quickly served!\""; - goto L_Close; - -L_TooMany: - mes "[Hetchel]"; - mes ""; - mes "\"Your bag hasn't room enough. Store some things and come back.\""; - goto L_Close; - -S_Update_Spants: - set QUEST_WG_state, (QUEST_WG_state & ~(NIBBLE_2_MASK) | (@spants_state << NIBBLE_2_SHIFT)); - return; - -L_Close: - set QUEST_WG_state, (QUEST_WG_state & ~(NIBBLE_2_MASK) | (@spants_state << NIBBLE_2_SHIFT)); - set @wg_state, 0; - set @spants_state, 0; - set @spants_minlvl, 0; - set @spants_reward, 0; - set @spants_job_reward, 0; - set @spants_wipe_thingy, ""; - set @SHEET_COCOONS_NR, 0; - set @SHEET_ZENY, 0; - set @SheetCount, 0; - set @wg_state, 0; - close; -} - -068-2.gat,60,83,0|script|HetchelDebug|376 -{ -set @wg_state, ((QUEST_WG_state & BYTE_0_MASK) >> BYTE_0_SHIFT); -set @spants_state, ((QUEST_WG_state & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); - -mes "Lora Tay Quest State: "+ @wg_state; -mes "Silk Pants Quest State: "+ @spants_state; - -menu - "Set Lora Tay Quest State", L_Lora_Tay, - "Set Silk Pants Quest State", L_Spants, - "Close", L_Close; - -L_Lora_Tay: - mes "Set Lora Tay Visited State (0 - reset , 11 - enough for SilkPants Quest)"; - input @wg_state; - goto L_Close; - -L_Spants: - mes "Set SilkPants Quest State (0 - reset)"; - input @spants_state; - goto L_Close; - -L_Close: - set QUEST_WG_state, (QUEST_WG_state & ~(BYTE_0_MASK) | (@wg_state << BYTE_0_SHIFT)); - set @wg_state, 0; - set QUEST_WG_state, (QUEST_WG_state & ~(NIBBLE_2_MASK) | (@spants_state << NIBBLE_2_SHIFT)); - set @spants_state, 0; - close; - -OnInit: - if (!debug) - disablenpc "HetchelDebug"; - end; -} diff --git a/world/map/npc/068-2/inya.txt b/world/map/npc/068-2/inya.txt deleted file mode 100644 index 1958478c..00000000 --- a/world/map/npc/068-2/inya.txt +++ /dev/null @@ -1,209 +0,0 @@ -//Gemstones: Diamond (white) , Ruby (red), Emerald (green), Sapphire (blue), Topaz (yellow), Amethyst (purple) -//The power of the gems is important to future balance of these rings. Are they related to stats, tiers of power, schools of magic? - -068-2.gat,29,56,0|shop|#InyaShop|127,SimpleRing:*100000 - -068-2.gat,29,56,0|script|Inya|106 -{ - mes "[Inya]"; - mes "\"I am Inya, a jeweler of fine rings. I sell and make rings.\""; - next; - mes "\"If you have a Simple Ring and a gem, I can set the gem in it for 100,000 gold pieces.\""; - next; - mes "\"Also, if you have a ring with gems on it, I can remove the gems and return the Simple Ring to you for 50,000 gold pieces.\""; - next; - mes "\"So, how can I help you?\""; - menu - "What jewelry do you have for sale?", L_Inya_Shop, - "I have a wedding ring, will that do?", L_Inya_Wedding_Ring, - "I'd like to remove a gem (50000 GP).", L_Inya_Remove_RingGem, - "I'd like to add a gem (100000 GP).", L_Inya_Add_RingGem, - "Not interested.", L_Inya_NotInterested; - -L_Inya_Shop: - close2; - shop "#InyaShop"; - -L_Inya_Wedding_Ring: - mes "[Inya]"; - mes "\"No, sorry. I do not alter wedding rings at this time.\""; - close; - -L_Inya_Remove_RingGem: - mes "[Inya]"; - mes "\"What kind of gem would you like to have removed?\""; - menu - "Diamond.", L_Inya_Remove_Diamond, - "Ruby.", L_Inya_Remove_Ruby, - "Emerald.", L_Inya_Remove_Emerald, - "Sapphire.", L_Inya_Remove_Sapphire, - "Topaz.", L_Inya_Remove_Topaz, - "Amethyst.", L_Inya_Remove_Amethyst, - "I've changed my mind.", L_Inya_NotInterested; - -L_Inya_Add_RingGem: - mes "[Inya]"; - mes "\"What kind of gem would you like to add?\""; - menu - "Diamond.", L_Inya_Add_Diamond, - "Ruby.", L_Inya_Add_Ruby, - "Emerald.", L_Inya_Add_Emerald, - "Sapphire.", L_Inya_Add_Sapphire, - "Topaz.", L_Inya_Add_Topaz, - "Amethyst.", L_Inya_Add_Amethyst, - "I've changed my mind.", L_Inya_NotInterested; - -L_Inya_Remove_Diamond: - if ( (Zeny < 50000) - | (countitem ("DiamondRing") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 50000; - delitem "DiamondRing", 1; - getitem "SimpleRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_Remove_Ruby: - if ( (Zeny < 50000) - | (countitem ("RubyRing") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 50000; - delitem "RubyRing", 1; - getitem "SimpleRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_Remove_Emerald: - if ( (Zeny < 50000) - | (countitem ("EmeraldRing") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 50000; - delitem "EmeraldRing", 1; - getitem "SimpleRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_Remove_Sapphire: - if ( (Zeny < 50000) - | (countitem ("SapphireRing") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 50000; - delitem "SapphireRing", 1; - getitem "SimpleRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_Remove_Topaz: - if ( (Zeny < 50000) - | (countitem ("TopazRing") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 50000; - delitem "TopazRing", 1; - getitem "SimpleRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_Remove_Amethyst: - if ( (Zeny < 50000) - | (countitem ("AmethystRing") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 50000; - delitem "AmethystRing", 1; - getitem "SimpleRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_Add_Diamond: - if ( (Zeny < 100000) - | (countitem ("SimpleRing") < 1) - | (countitem ("Diamond") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 100000; - delitem "SimpleRing", 1; - delitem "Diamond", 1; - getitem "DiamondRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_Add_Ruby: - if ( (Zeny < 100000) - | (countitem ("SimpleRing") < 1) - | (countitem ("Ruby") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 100000; - delitem "SimpleRing", 1; - delitem "Ruby", 1; - getitem "RubyRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_Add_Emerald: - if ( (Zeny < 100000) - | (countitem ("SimpleRing") < 1) - | (countitem ("Emerald") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 100000; - delitem "SimpleRing", 1; - delitem "Emerald", 1; - getitem "EmeraldRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_Add_Sapphire: - if ( (Zeny < 100000) - | (countitem ("SimpleRing") < 1) - | (countitem ("Sapphire") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 100000; - delitem "SimpleRing", 1; - delitem "Sapphire", 1; - getitem "SapphireRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_Add_Topaz: - if ( (Zeny < 100000) - | (countitem ("SimpleRing") < 1) - | (countitem ("Topaz") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 100000; - delitem "SimpleRing", 1; - delitem "Topaz", 1; - getitem "TopazRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_Add_Amethyst: - if ( (Zeny < 100000) - | (countitem ("SimpleRing") < 1) - | (countitem ("Amethyst") < 1) ) - goto L_Inya_Not_Enough; - set Zeny, Zeny - 100000; - delitem "SimpleRing", 1; - delitem "Amethyst", 1; - getitem "AmethystRing", 1; - mes "[Inya]"; - mes "\"Here you go.\""; - close; - -L_Inya_NotInterested: - mes "[Inya]"; - mes "\"Come back later and I will try to be of assistance.\""; - close; - -L_Inya_Not_Enough: - mes "[Inya]"; - mes "\"I am sorry, you simply do not seem to have the necessary items for me to help you. Please come back when you do, and I would be more than happy to help you out.\""; - close; -} diff --git a/world/map/npc/068-2/latoy.txt b/world/map/npc/068-2/latoy.txt deleted file mode 100644 index ee28555b..00000000 --- a/world/map/npc/068-2/latoy.txt +++ /dev/null @@ -1,33 +0,0 @@ -// A snobby store that won't sell to the player -// takes part in quest given by 021-2/kylian.txt - -068-2.gat,92,83,0|shop|#LatoyShop|127,DesertShirt:*2000,SilkRobe:*40000,SerfHat:*500,DesertHat:*9600 - -068-2.gat,92,83,0|script|Latoy|106 -{ - set QUEST_NorthTulimshar, QUEST_NorthTulimshar | $@knowLatoyNT; - set @kylian, ((QUEST_NorthTulimshar & NIBBLE_5_MASK) >> NIBBLE_5_SHIFT); - - mes "[Latoy]"; - mes "\"Is there something I can help you with?\""; - if (@kylian != 7) - goto L_Shop; - next; - mes "Maybe this is the kind of shop Kylian is looking for?"; - goto L_Shop; - -L_Shop: - mes "[Latoy]"; - mes "\"How would you like to browse my wares?\""; - menu - "Yes.", L_LatoyShop, - "No.", L_Close; - -L_LatoyShop: - close2; - shop "#LatoyShop"; - -L_Close: - set @kylian, 0; - close; -} diff --git a/world/map/npc/068-2/mapflags.txt b/world/map/npc/068-2/mapflags.txt deleted file mode 100644 index 4968bf61..00000000 --- a/world/map/npc/068-2/mapflags.txt +++ /dev/null @@ -1,2 +0,0 @@ -068-2.gat|mapflag|town -068-2.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/069-2/_import.txt b/world/map/npc/069-2/_import.txt deleted file mode 100644 index 250938b3..00000000 --- a/world/map/npc/069-2/_import.txt +++ /dev/null @@ -1,7 +0,0 @@ -// Map 069-2: Tulimshar Castle Indoors -// This file is generated automatically. All manually changes will be removed when running the Converter. -map: 069-2.gat -npc: npc/069-2/_mobs.txt -npc: npc/069-2/_warps.txt -npc: npc/069-2/mapflags.txt -npc: npc/069-2/wizards.txt diff --git a/world/map/npc/069-2/_mobs.txt b/world/map/npc/069-2/_mobs.txt deleted file mode 100644 index 561eec94..00000000 --- a/world/map/npc/069-2/_mobs.txt +++ /dev/null @@ -1,9 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Castle Indoors mobs - - - -069-2.gat,0,0,0|script|Mob069-2|-1 -{ - end; -} diff --git a/world/map/npc/069-2/_warps.txt b/world/map/npc/069-2/_warps.txt deleted file mode 100644 index c556dd8e..00000000 --- a/world/map/npc/069-2/_warps.txt +++ /dev/null @@ -1,17 +0,0 @@ -// This file is generated automatically. All manually changes will be removed when running the Converter. -// Tulimshar Castle Indoors warps - -069-2.gat,24,31|warp|to Tulmishar Castle Out|-1,-1,069-1.gat,90,101 -069-2.gat,55,31|warp|to Tulmishar Castle Out|-1,-1,069-1.gat,98,80 -069-2.gat,86,31|warp|to Tulmishar Castle Out|-1,-1,069-1.gat,98,58 -069-2.gat,117,31|warp|to Tulmishar Castle Out|-1,-1,069-1.gat,90,41 -069-2.gat,24,62|warp|to Tulmishar Castle Out|-1,-1,069-1.gat,44,41 -069-2.gat,55,62|warp|to Tulmishar Castle Out|-1,-1,069-1.gat,35,58 -069-2.gat,86,62|warp|to Tulmishar Castle Out|-1,-1,069-1.gat,35,80 -069-2.gat,117,62|warp|to Tulmishar Castle Out|-1,-1,069-1.gat,43,100 -069-2.gat,45,127|warp|to Tulmishar Castle Out|2,-1,069-1.gat,66,57 -069-2.gat,45,83|warp|to Tulmishar Castle Thr|2,-1,069-2.gat,106,116 -069-2.gat,107,117|warp|to Tulmishar Castle Mai|2,-1,069-2.gat,44,84 -069-2.gat,107,117|warp|to Tulmishar Castle Mai|2,-1,069-2.gat,44,84 -069-2.gat,116,127|warp|to Tulmishar Castle Par|1,-1,069-1.gat,69,42 -069-2.gat,97,127|warp|to Tulmishar Castle Par|1,-1,069-1.gat,64,42 diff --git a/world/map/npc/069-2/mapflags.txt b/world/map/npc/069-2/mapflags.txt deleted file mode 100644 index 7c8e2695..00000000 --- a/world/map/npc/069-2/mapflags.txt +++ /dev/null @@ -1,2 +0,0 @@ -069-2.gat|mapflag|town -069-2.gat|mapflag|resave|001-1,57,71 diff --git a/world/map/npc/069-2/wizards.txt b/world/map/npc/069-2/wizards.txt deleted file mode 100644 index 1d827d18..00000000 --- a/world/map/npc/069-2/wizards.txt +++ /dev/null @@ -1,60 +0,0 @@ -// Council of Ruling Wizards Room - -// manaseed -069-2.gat,106,82,0|script|Desert Mana Seed#_M|166 -{ - end; -} - -// -069-2.gat,101,85,0|script|Wizard#1|355 -{ - end; -} - -// -069-2.gat,94,87,0|script|Wizard#2|356 -{ - end; -} - -// -069-2.gat,94,93,0|script|Wizard#3|357 -{ - end; -} - -// -069-2.gat,101,95,0|script|Wizard#4|358 -{ - end; -} - -// -069-2.gat,112,85,0|script|Wizard#5|359 -{ - end; -} - -// -069-2.gat,119,87,0|script|Wizard#6|360 -{ - end; -} - -// -069-2.gat,119,93,0|script|Wizard#7|361 -{ - end; -} - -// -069-2.gat,112,95,0|script|Wizard#8|362 -{ - end; -} -// -069-2.gat,106,90,0|script|Arch-Wizard#9|354 -{ - end; -} diff --git a/world/map/npc/_import.txt b/world/map/npc/_import.txt index 71a3e3c5..2c9758ca 100644 --- a/world/map/npc/_import.txt +++ b/world/map/npc/_import.txt @@ -8,16 +8,10 @@ import: npc/002-2/_import.txt import: npc/002-3/_import.txt import: npc/002-4/_import.txt import: npc/002-5/_import.txt -import: npc/003-1/_import.txt -import: npc/003-2/_import.txt -import: npc/004-1/_import.txt -import: npc/004-2/_import.txt import: npc/004-3/_import.txt import: npc/004-4/_import.txt import: npc/004-5/_import.txt -import: npc/005-1/_import.txt import: npc/005-3/_import.txt -import: npc/005-4/_import.txt import: npc/006-1/_import.txt import: npc/006-2/_import.txt import: npc/006-3/_import.txt @@ -61,17 +55,7 @@ import: npc/019-4/_import.txt import: npc/020-1/_import.txt import: npc/020-2/_import.txt import: npc/020-3/_import.txt -import: npc/021-1/_import.txt -import: npc/021-2/_import.txt import: npc/021-3/_import.txt -import: npc/022-1/_import.txt -import: npc/023-1/_import.txt -import: npc/023-2/_import.txt -import: npc/023-3/_import.txt -import: npc/024-1/_import.txt -import: npc/024-2/_import.txt -import: npc/024-3/_import.txt -import: npc/024-4/_import.txt import: npc/025-1/_import.txt import: npc/025-3/_import.txt import: npc/025-4/_import.txt @@ -87,6 +71,7 @@ import: npc/027-8/_import.txt import: npc/028-1/_import.txt import: npc/028-3/_import.txt import: npc/029-1/_import.txt +import: npc/029-2/_import.txt import: npc/029-3/_import.txt import: npc/030-1/_import.txt import: npc/030-2/_import.txt @@ -96,18 +81,12 @@ import: npc/031-1/_import.txt import: npc/031-2/_import.txt import: npc/031-3/_import.txt import: npc/031-4/_import.txt -import: npc/032-1/_import.txt import: npc/032-3/_import.txt import: npc/033-1/_import.txt import: npc/034-1/_import.txt import: npc/034-2/_import.txt import: npc/035-2/_import.txt import: npc/036-2/_import.txt -import: npc/041-1/_import.txt -import: npc/042-1/_import.txt -import: npc/042-2/_import.txt -import: npc/042-3/_import.txt -import: npc/043-1/_import.txt import: npc/043-3/_import.txt import: npc/043-4/_import.txt import: npc/044-1/_import.txt @@ -127,8 +106,4 @@ import: npc/055-3/_import.txt import: npc/056-1/_import.txt import: npc/056-2/_import.txt import: npc/057-1/_import.txt -import: npc/068-1/_import.txt -import: npc/068-2/_import.txt -import: npc/069-1/_import.txt -import: npc/069-2/_import.txt import: npc/botcheck/_import.txt diff --git a/world/map/npc/scripts.conf b/world/map/npc/scripts.conf index af6ea91f..77e9c8a8 100644 --- a/world/map/npc/scripts.conf +++ b/world/map/npc/scripts.conf @@ -24,6 +24,7 @@ npc: npc/functions/default_npc_checks.txt npc: npc/functions/undead_debug.txt npc: npc/functions/headstyles.txt npc: npc/functions/global_event_handler.txt +npc: npc/functions/stat_reset.txt // Item Functions npc: npc/items/magic_gm_top_hat.txt -- cgit v1.2.3-60-g2f50