Meldungen beim Aktivieren der Effekte erweitert

Die Meldungen waren bisher so formuliert, so dass bei jeder
eintretenden Wirkung der Eindruck entstand, es handele sich um
einen vorteilhaften Effekt. Die Meldungen wurden erweitert, so
dass nun klar erkenntlich ist, um welche Art von Effekt es sich
handelt.

Zudem wurden ein Typofix und ein Kommentar ergaenzt.

Change-Id: Ic69e402287eeec93a1db16c340b443e15832f547
diff --git a/std/items/kraeuter/trank.c b/std/items/kraeuter/trank.c
index f3c0efe..ea4bed6 100644
--- a/std/items/kraeuter/trank.c
+++ b/std/items/kraeuter/trank.c
@@ -110,6 +110,9 @@
   return "ungenehmigt viel"; // kommt hoffentlich nicht vor.
 }
 
+// Ermittelt den betragsmaessig staerksten wirksamen Effekt, d.h. wenn ein 
+// Trank eine starke negative Wirkung und eine mittelstarke positive Wirkung 
+// hat, wird hier die negative Wirkung ermittelt.
 varargs private string DetermineStrongestEffect(int pos)
 {
   // globale Werteliste befuellen, wenn da noch nichts drinsteht.
@@ -536,11 +539,19 @@
   {
     if (!mappingp(att_classes)) att_classes=m_allocate(1);
     att_classes[CL_ANIMAL] = effekt/20;
-    tell_object(environment(), break_string(
+    if ( effekt > 0 )
+      tell_object(environment(), break_string(
         "Du spuerst in Dir ein seltsames Verlangen aufsteigen, auf die Jagd "
         "zu gehen - als wuerde Artemis persoenlich Deine Angriffe "
         + num2desc_fight(effekt)
-        + " verbessern.",78));
+        + " verbessern."),78);
+    else 
+      tell_object(environment(), break_string(
+        "Dein Verlangen, auf die Jagd zu gehen, ist auf einmal sehr "
+        "gedaempft, denn Du spuerst, dass Artemis Dich im Kampf gegen "
+        "ihre Schuetzlinge "
+        + num2desc_fight(effekt)
+        + "schwaechen wuerde.",78);
     return 1;
   }
   return 0;
@@ -561,7 +572,7 @@
         "Merkwuerdig. Du hast gerade das Gefuehl, als fiele Dir der "
         "Kampf gegen von Hekate beschenkte Wesen "
         + num2desc_fight(effekt)
-        + " leichter.",78));
+        + (effekt<0?" schwerer":" leichter."),78));
     return 1;
   }
   return 0;
@@ -583,7 +594,7 @@
         "Auf einmal hast Du den Eindruck, dass die Kreaturen des "
         "Hades Deinen Angriffen "
         + num2desc_fight(effekt)
-        + " weniger entgegen zu setzen haben.",78));
+        + (effekt<0?" mehr":" weniger")+" entgegenzusetzen haben.",78));
     return 1;
   }
   return 0;
@@ -595,10 +606,21 @@
   {
     if (!mappingp(prot_classes)) prot_classes=m_allocate(1);
     prot_classes[CL_ANIMAL] = effekt/20;
-    tell_object(environment(), break_string(
+    if ( effekt>0 ) 
+    {
+      tell_object(environment(), break_string(
         "Du hast das Gefuehl, dass Artemis ihre schuetzende Hand "
         + num2desc_fight(effekt)
         + " ueber Dich haelt.",78));
+    }
+    else
+    {
+      tell_object(environment(), break_string(
+        "Du hast das Gefuehl, dass Artemis Dich im Kampf gegen ihre "
+        "Schuetzlinge "
+        + num2desc_fight(effekt)
+        + " schwaechen wird.",78));
+    }
     return 1;
   }
   return 0;
@@ -616,7 +638,7 @@
     tell_object(environment(), break_string(
         "Du hast das Gefuehl, dass von Hekate beschenkte Wesenheiten Dir "
         +num2desc_fight(effekt)
-        + " weniger anhaben koennen.",78));
+        +(effekt<0?" mehr":" weniger")+" anhaben koennen.",78));
     return 1;
   }
   return 0;
@@ -630,10 +652,9 @@
     if (!mappingp(prot_classes)) prot_classes=m_allocate(1);
     prot_classes[CL_UNDEAD] =  effekt/20;
     tell_object(environment(), break_string(
-        "Du bist ploetzlich zuversichtlich, Angriffen der Kreaturen "
-        "des Hades "
+        "Du bist Dir ploetzlich sicher, Angriffen der Kreaturen des Hades "
         + num2desc_fight(effekt)
-        + " besser widerstehen zu koennen.",78));
+        + (effekt<0?" schlechter":" besser")+" widerstehen zu koennen.",78));
     return 1;
   }
   return 0;
@@ -1088,7 +1109,7 @@
 {
   if (environment(this_object()) != PL)
   {
-    write("Aus auf dem Boden liegende Flaschen trinkt es sich so "
+    write("Aus auf dem Boden liegenden Flaschen trinkt es sich so "
        "schlecht!\n");
   }
   else if (data==0)