If you are so lame to don't test @sk-parum for me, I'll test my brand new command ON you!

Enjoy the NEW, REVOLUTIONARY penalty for lame cheating! :D :smile:

1 files changed, 17 insertions, 1 deletions

diff --git a/npc/003-0/audsbel.txt b/npc/003-0/audsbel.txt
index eb3575521..cdb409ac5 100644
--- a/npc/003-0/audsbel.txt
+++ b/npc/003-0/audsbel.txt
@@ -170,7 +170,8 @@ L_Magic:
         mesq l("Have you managed to transmute the @@ I asked for?", getitemlink(MoubooFigurine));
         next;
         if (askyesno() == ASK_YES) {
-            if (!countitem(MoubooFigurine) || !MAGIC_EXP) goto L_Lie;
+            if (!countitem(MoubooFigurine)) goto L_Lie;
+            if (!MAGIC_EXP) goto L_Lame;
             delitem MoubooFigurine, 1;
             getexp 5000, 0;
             setq General_Auldsbel, 3;
@@ -217,6 +218,21 @@ L_Cheat:
     dispbottom l("You are not allowed on this building, and was caught by Jesusalva's Police!!");
     end;
 
+L_Lame:
+    setparam(MaxHp, readparam(MaxHp)-50); // I want to see how permanent this is
+    setparam(MaxSp, readparam(MaxSp)-25); // I want to see how permanent this is
+    setparam(Karma, readparam(Karma)-1); // testing
+    mesn;
+    mesq l("%%3 You sadden me. That was so, so lame. I will need to punish you. Sorry. Superior orders. %%S");
+    next;
+    mesn strcharinfo(0);
+    mesq l("%%i What, my maximum life and mana just decreased! Noooo!!");
+    next;
+    mesn;
+    mesq l("%%1 Cheer up, these should go back to normal when you level up. Just don't do that again!");
+    // If that is true or not, remains to be checked. Uh... I never used setparam() before! :D
+    close;
+
 OnInit:
     .sex=G_MALE;
     .distance=5;