Teach players about @ucp and Intense Beard, and gift them Equipment blueprints.

1 files changed, 40 insertions, 1 deletions

diff --git a/npc/024-16/craftsman.txt b/npc/024-16/craftsman.txt
index 477ce4069..90967b99b 100644
--- a/npc/024-16/craftsman.txt
+++ b/npc/024-16/craftsman.txt
@@ -34,7 +34,19 @@
     switch (@menu) {
     case 1:
         mesn;
-        mesq l("I dunno.");
+        mesq l("Well, first of, you'll need an @@ and an Equipment Recipe.", getitemlink(RecipeBook));
+        next;
+        mesn;
+        mesq l("If you don't have the recipe book, you'll need to find one... Maybe someone in a household you've already helped is willing to give you one.");
+        next;
+        mesn;
+        mesq l("Anyway, once you have the recipe book and learned a recipe, you can craft items in forges. I think you can buy it in your apartment.");
+        next;
+        mesn;
+        mesq l("That will help you to make your very first first craft! Remember to use @@ to change which bonuses can be applied to your craft items.", b("@ucp"));
+        next;
+        mesn;
+        mesq l("I think someone on Tulimshar is capable to teach you these bonuses. Eh, I don't know. Haven't been there for a while.");
         break;
     case 2:
         if (calcUpgrade()) {
@@ -104,6 +116,33 @@ function calcUpgrade {
     if (.@cf < 0)
         return false;
 
+    // You may get a free blueprint
+    switch (getskilllv(TMW2_CRAFT)) {
+        case 0:
+            inventoryplace EquipmentBlueprintA, 1;
+            getitem EquipmentBlueprintA, 1;
+            break;
+        case 1:
+            inventoryplace EquipmentBlueprintB, 1;
+            getitem EquipmentBlueprintB, 1;
+            break;
+        case 2:
+            inventoryplace EquipmentBlueprintC, 1;
+            getitem EquipmentBlueprintC, 1;
+            break;
+        case 3:
+            inventoryplace EquipmentBlueprintD, 1;
+            getitem EquipmentBlueprintD, 1;
+            break;
+        case 4:
+            inventoryplace EquipmentBlueprintE, 1;
+            getitem EquipmentBlueprintE, 1;
+            break;
+        default:
+            getexp 1700, 200;
+            break;
+    }
+
     Zeny-=.@gp;
     skill TMW2_CRAFT, getskilllv(TMW2_CRAFT)+1, 0;
     return true;