From ddb4c03f64d652f941174c22715d56a25ed51e2f Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Wed, 29 May 2019 18:36:46 -0300
Subject: Intense Beard now allows you to learn the groups and advance tiers.
 Knowledge interface, blueprints and base skill are still missing.

---
 npc/003-8/intensebeard.txt | 123 ++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 122 insertions(+), 1 deletion(-)

(limited to 'npc/003-8')

diff --git a/npc/003-8/intensebeard.txt b/npc/003-8/intensebeard.txt
index a4975dae7..7fdbbd854 100644
--- a/npc/003-8/intensebeard.txt
+++ b/npc/003-8/intensebeard.txt
@@ -13,7 +13,128 @@
     mesq l("Hello my friend! I see you've brought your @@ with you this time!", getitemlink(RecipeBook));
     next;
     mesn;
-    mesc l("TODO"), 1;
+    mesq l("Let's learn new recipes! Do you wanna?");
+    next;
+    csysGUI_Report();
+    do {
+        mesc l("Craft Skill Lv: "+getskilllv(TMW2_CRAFT));
+        mesc l("Monster Points: @@    |    Gold: @@",
+             format_number(Mobpt), format_number(Zeny));
+        mesc l("Learn what?");
+        mes "";
+        .@opt$="Nothing";
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_BASE);
+
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_ATK);
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_DEF);
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_ACC);
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_EVD);
+
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_REGEN);
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_SPEED);
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_DOUBLE);
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_MAXPC);
+
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_SCRESIST);
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_SCINFLICT);
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_MANAUSE);
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_BOSSATK);
+
+        .@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_FINAL);
+
+        select (.@opt$);
+        mes "";
+        switch (@menu) {
+        case 2:
+			if (csysGUI_RaiseOpt(CRGROUP_BASE))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+
+        case 3:
+			if (csysGUI_RaiseOpt(CRGROUP_ATK))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+        case 4:
+			if (csysGUI_RaiseOpt(CRGROUP_DEF))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+        case 5:
+			if (csysGUI_RaiseOpt(CRGROUP_ACC))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+        case 6:
+			if (csysGUI_RaiseOpt(CRGROUP_EVD))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+
+        case 7:
+			if (csysGUI_RaiseOpt(CRGROUP_REGEN))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+        case 8:
+			if (csysGUI_RaiseOpt(CRGROUP_SPEED))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+        case 9:
+			if (csysGUI_RaiseOpt(CRGROUP_DOUBLE))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+        case 10:
+			if (csysGUI_RaiseOpt(CRGROUP_MAXPC))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+
+        case 11:
+			if (csysGUI_RaiseOpt(CRGROUP_SCRESIST))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+        case 12:
+			if (csysGUI_RaiseOpt(CRGROUP_SCINFLICT))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+        case 13:
+			if (csysGUI_RaiseOpt(CRGROUP_MANAUSE))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+        case 14:
+			if (csysGUI_RaiseOpt(CRGROUP_BOSSATK))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+
+        case 15:
+			if (csysGUI_RaiseOpt(CRGROUP_FINAL))
+				mesc l("Success!"), 3;
+			else
+				mesc l("Not enough Monster Points!"), 1;
+			break;
+
+    } while (@menu != 1);
     close;
 
 L_SemNivel:
-- 
cgit v1.2.3-60-g2f50