Patch B-2 bugfix: Give experience when you "waste" a blue print

1 files changed, 7 insertions, 6 deletions

diff --git a/npc/craft/recipes.txt b/npc/craft/recipes.txt
index 016d1ceec..99a1d6e8d 100644
--- a/npc/craft/recipes.txt
+++ b/npc/craft/recipes.txt
@@ -79,7 +79,7 @@ function readAlchemy {
     setnpcdialogtitle l("Alchemy Recipes");
     @scope$="ALCHEMY";
 
-    mesc l("Burn burn!");
+    mesc l("Alchemy. The art of having quasi-magical effects without magic.");
     mesc l("(All items must be placed exactly in this order.)");
     next;
     mesc l("List of known alchemy recipes:");
@@ -152,7 +152,7 @@ function readCrafting {
     setnpcdialogtitle l("Crafting Recipes");
     @scope$="EQUIPMENT";
 
-    mesc l("Smith smith!");
+    mesc l("There is only one way towards the best equipment: Smith away!");
     mesc l("(All items must be placed exactly in this order.)");
     next;
     mesc l("List of known crafting recipes:");
@@ -214,12 +214,13 @@ function	script	MakeBlueprint	{
 
             // Now you'll learn some recipe!
             .@rcp=any_of(.@recipes);
-            if (RECIPES_ALCHEMY[.@rcp])
+            if (RECIPES_ALCHEMY[.@rcp]) {
                 dispbottom l("It was a recipe you already knew...");
-            else
+                getexp (BaseLevel+JobLevel)*rand(1,.@rarity), JobLevel+rand(1,.@rarity);
+            } else {
                 dispbottom l("Learned a new recipe!");
-
-            RECIPES_ALCHEMY[.@rcp]=true;
+                RECIPES_ALCHEMY[.@rcp]=true;
+            }
             break;
         default:
             return Exception("Invalid blueprint type "+.@type+" - item was lost.");