WIP: feat: Creature of Fenkenstrain

maps/m54_54.jm2

@@ -7673,3 +7673,6 @@
 1 34 16: 1028
 1 42 16: 1026
 1 43 18: 1027
+
+==== OBJ ====
+0 36 18: 4199 1

scripts/_unpack/377/all.loc

@@ -39550,14 +39550,6 @@ multiloc=6,fenk_table
 multiloc=7,fenk_table
 multiloc=8,fenk_table
 
-[fenk_door]
-name=Door
-desc=Looks wooden. Feels wooden. I wonder is it wooden?
-model=loc_4487
-hillskew=yes
-ambient=20
-op1=Open
-
 [fenk_door_arch]
 model=loc_4488
 hillskew=yes
@@ -39575,32 +39567,6 @@ blockwalk=no
 mirror=yes
 active=no
 
-[fenk_door_mirror]
-name=Door
-desc=Looks wooden. Feels wooden. I wonder is it wooden?
-model=loc_4487
-hillskew=yes
-ambient=20
-mirror=yes
-op1=Open
-
-[fenk_door_open]
-name=Door
-desc=Looks wooden. Feels wooden. I wonder is it wooden?
-model=loc_4487
-hillskew=yes
-ambient=20
-op1=Close
-
-[fenk_door_open_mirror]
-name=Door
-desc=Looks wooden. Feels wooden. I wonder is it wooden?
-model=loc_4487
-hillskew=yes
-ambient=20
-mirror=yes
-op1=Close
-
 [fenk_skewsteps]
 model=skewsteps1
 recol1s=15855

scripts/_unpack/377/all.varp

@@ -826,9 +826,6 @@ transmit=yes
 
 [varp_398]
 
-[fenk_quest]
-transmit=yes
-
 [fenk_flags]
 transmit=yes
 

scripts/general/configs/quest.constant

@@ -49,6 +49,7 @@
 ^priestperil_complete = 60
 ^death_complete = 80
 ^golem_complete = 10
+^fenk_complete = 8
 
 ^blackarmgang_questpoints = 1
 ^blackknight_questpoints = 3
@@ -106,3 +107,4 @@
 
 ^death_questpoints = 1
 ^golem_questpoints = 1
+^fenk_questpoints = 1

scripts/ladders+stairs/scripts/stairs.rs2

@@ -789,16 +789,10 @@ switch_coord (loc_coord) {
 }
 
 [oploc1,fenk_stairs_lv1]
-// arrive delay?
-switch_coord (loc_coord) {
-    case default : @unhandled_stairs(loc_coord);
-}
+p_telejump(movecoord(coord, 0, 1, 4));
 
 [oploc1,fenk_stairs_lv1_top]
-// arrive delay?
-switch_coord (loc_coord) {
-    case default : @unhandled_stairs(loc_coord);
-}
+p_telejump(movecoord(coord, 0, -1, -4));
 
 [oploc1,ahoy_cavern_stairs]
 // arrive delay?

scripts/quests/quest_fenk/configs/fenk.constant

@@ -0,0 +1,9 @@
+^fenk_not_started = 0
+^fenk_started = 1
+^fenk_passed_interview = 2
+^fenk_brough_bodyparts = 3
+^fenk_brought_needle_threads = 4
+^fenk_repaired_lightning_conductor = 5
+^fenk_spoke_again = 6
+^fenk_creature_convince = 7
+

scripts/quests/quest_fenk/configs/fenk.loc

@@ -0,0 +1,42 @@
+[fenk_door]
+name=Door
+desc=Looks wooden. Feels wooden. I wonder is it wooden?
+model=loc_4487
+hillskew=yes
+ambient=20
+op1=Open
+category=door_left_closed
+param=next_loc_stage,fenk_door_open
+
+[fenk_door_mirror]
+name=Door
+desc=Looks wooden. Feels wooden. I wonder is it wooden?
+model=loc_4487
+hillskew=yes
+ambient=20
+mirror=yes
+op1=Open
+category=door_right_closed
+param=next_loc_stage,fenk_door_open_mirror
+
+[fenk_door_open]
+name=Door
+desc=Looks wooden. Feels wooden. I wonder is it wooden?
+model=loc_4487
+hillskew=yes
+ambient=20
+op1=Close
+category=door_left_opened
+param=next_loc_stage,fenk_door
+
+
+[fenk_door_open_mirror]
+name=Door
+desc=Looks wooden. Feels wooden. I wonder is it wooden?
+model=loc_4487
+hillskew=yes
+ambient=20
+mirror=yes
+op1=Close
+category=door_right_opened
+param=next_loc_stage,fenk_door_mirror

scripts/quests/quest_fenk/configs/fenk.obj

@@ -0,0 +1 @@
+

scripts/quests/quest_fenk/configs/fenk.varp

@@ -0,0 +1,3 @@
+[fenk_quest]
+transmit=yes
+scope=perm

scripts/quests/quest_fenk/scripts/fenk.rs2

@@ -0,0 +1,61 @@
+// Signpost
+[oploc1,fenk_signpost]
+
+if (%fenk_quest = ^fenk_not_started) {
+    ~mesbox("The signpost has a note pinned onto it. The note says:|'---- Braindead Butler Wanted ----|Gravedigging skills essential - Hunchback advantageous|See Dr Fenkenstrain at the castle NE of Canifis'");
+     %fenk_quest = ^fenk_started;
+} else if (%fenk_quest = ^fenk_started) {
+    ~mesbox("The signpost has a note pinned onto it. The note says:|'---- Braindead Butler Wanted ----|Gravedigging skills essential - Hunchback advantageous|See Dr Fenkenstrain at the castle NE of Canifis'");
+} else if(%fenk_quest < ^fenk_complete) {
+    // youtu.be/CVq0ooYzxJY
+    ~mesbox("The signpost has a note pinned onto it. The note says:|'---- Braindead Butler Position Filled ----|****No Further Applicants Please****'");
+} else {
+    ~mesbox("The signpost has a note pinned onto it. The note says:|'AAARRGGGHHHHH!!!!!'");
+}
+
+// Tower Door
+[oploc1,fenk_tower_door]
+if (%fenk_quest < ^fenk_complete) {
+} else {
+    ~mesbox("The signpost has a note pinned onto it. The note says:|'AAARRGGGHHHHH!!!!!'");
+}
+
+[opnpcu,fenk_fenkenstrain]
+
+[opobj3,fenk_brain]
+if (distance(0_54_54_36_18, obj_coord) = 0 & npc_find(coord, werewolfinnkeeper, 20, 0) = true) {
+    if (%fenk_quest = ^fenk_not_started) {
+        ~chatnpc("<p,angry>Hey! Don't touch that.");
+    } else {
+        if (inv_total(inv, fenk_brain) = 0) {
+            ~chatnpc("<p,neutral>You're interested in our speciality, I see. Would you like to buy some?");
+            ~chatplayer("<p,neutral>What exactly is in the jar?");
+            @buy_pickled_brain;
+        } else {
+            ~chatnpc("<p,angry>You can leave that alone, my friend. I've already sold you one of your own - eat that. I can't afford to give away freebies in this business!");
+        }
+    }
+} else {
+    @pickup_obj;
+}
+
+[label,buy_pickled_brain]
+~chatnpc("<p,neutral>Pickled brain, my friend. Only 50 gold to you.");
+~chatplayer("<p,neutral>Err... pickled brain from what animal?");
+~chatnpc("<p,neutral>Animal? Don't be disgusting, man! No, this a human brain - only the best for my customers.");
+if(inv_total(inv, coins) < 50) {
+    ~chatplayer("<p,neutral>That sounds very nice, but I'm afraid I don't have enough gold at the moment.");
+} else {
+    @multi2("Yes.", ill_buy_one, "No.", im_not_hungry);
+}
+
+[label,ill_buy_one]
+~chatplayer("<p,neutral>Player: I'll buy one, please.");
+if(inv_total(inv, coins) >= 50) {
+    inv_del(inv, coins, 50);
+    inv_add(inv, fenk_brain, 1);
+    ~chatnpc("<p,neutral>A very wise choice, <text_gender("sir", "miss")>. Don't eat it all at once, savour every morsel - that's my advice to you.");
+}
+
+[label,im_not_hungry]
+~chatplayer("<p,neutral>I'm afraid I'm not really hungry at the moment.");

scripts/quests/quest_fenk/scripts/fenk_books.rs2

@@ -0,0 +1,5 @@
+
+[proc,chimney_book]
+switch_int (%book_page) {
+    case 0 : ~book("Chimney Sweeping on a Budget", "Page 26|that sometimes a sweep|may find themselves|brushless and without the|funds to purchase the|one tool that is most|essential to their trade.|What is a chimney sweep|without his or her brush?|In this kind of situation|any normal long-handled");
+}