From 30b732793148a3e284c3f172328092c4ef5d2119 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Tue, 27 Aug 2019 00:24:03 -0300
Subject: New forge system prices: Fusus is the responsible for making Copper
 Ingot in Wurtizite. You'll usually get almost enough for a [Graphene]. It
 always grant a +1 and +2, or a +3.

---
 npc/017-4/refine.txt | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)

(limited to 'npc')

diff --git a/npc/017-4/refine.txt b/npc/017-4/refine.txt
index 874cc6c99..dddb2e0ef 100644
--- a/npc/017-4/refine.txt
+++ b/npc/017-4/refine.txt
@@ -20,12 +20,52 @@ OnInit:
 
 017-4,23,23,0	script	Fusus	NPC_FUSUS,{
     showavatar NPC_FUSUS;
+    select
+        l("Repair items"),
+        l("Compact forge stones");
+    mes "";
+    if (@menu == 2)
+        goto L_Fusus;
     @menu=0;
     do
     {
         repairMaster();
     } while (getbrokencount() >= 0);
 
+L_Fusus:
+    inventoryplace Iten, 1;
+    mesn;
+    mesq l("I can fuse an @@ and an @@, besides @@ GP, into 3~6 @@.", getitemlink(CopperIngot), getitemlink(SilkCocoon), 500, getitemlink(Wurtizite));
+    mesc l("5 @@ can be fused in a @@", getitemlink(Wurtizite), getitemlink(Graphene));
+    mesc l("5 @@ can be fused in a @@", getitemlink(Graphene), getitemlink(Arcanum));
+    select
+        rif(Zeny >= 500, l("I want the Wurtizite")),
+        rif(countitem(Wurtizite) >= 5, l("I want Graphene")),
+        rif(countitem(Graphene) >= 5, l("I want Arcanum")),
+        l("Do nothing");
+    mes "";
+    switch (@menu) {
+    case 4:
+        close;
+    case 1:
+        if (!transcheck(CopperIngot, 1, SilkCocoon, 1))
+            close;
+        Zeny -= 500;
+        getitem Wurtizite, any(3,4,4,5,6);
+        break;
+    case 2:
+        delitem Wurtizite, 5;
+        getitem Graphene, 1;
+        break;
+    case 3:
+        delitem Graphene, 5;
+        getitem Arcanum, 1;
+        break;
+    }
+    mesc l("Done!"), 2;
+    next;
+    goto L_Fusus;
+
 OnInit:
     .sex=G_MALE;
     .distance=5;
-- 
cgit v1.2.3-70-g09d2