Sagratha Score

2 files changed, 39 insertions, 0 deletions

diff --git a/npc/014-5-1/sagratha.txt b/npc/014-5-1/sagratha.txt
index e3c6fe799..d9cf0585b 100644
--- a/npc/014-5-1/sagratha.txt
+++ b/npc/014-5-1/sagratha.txt
@@ -4,6 +4,44 @@
 // Description:
 //    Sagratha
 
+// SaggyScoreUpdate( amount )
+function	script	SaggyScoreUpdate	{
+    .@val=getarg(0);
+    SAGRATHA_SCORE=max(-50, min(50, SAGRATHA_SCORE+.@val));
+    return;
+}
+
+function	script	SaggyMobCount	{
+    switch (killedrid) {
+        // She gets angry
+        case Mouboo:
+        case AlphaMouboo:
+            SaggyScoreUpdate(-5);
+            break;
+        case Pollet:
+        case Fluffy:
+        case IcedFluffy:
+            SaggyScoreUpdate(-3);
+            break;
+        case Squirrel:
+        case SpringSquirrel:
+        case LofSquirrel:
+        case FrozenSquirrel:
+        case FairysSquirrel:
+        case Pinkie:
+            SaggyScoreUpdate(-2);
+            break;
+
+        // She gets happy
+        case ViciousSquirrel:
+        case WickedMushroom:
+        case Bluepar:
+            SaggyScoreUpdate(1);
+            break;
+    }
+    return;
+}
+
 014-5-1,33,37,0	script	Sagratha	NPC_SAGRATHA,{
     goodbye; end;
 
diff --git a/npc/functions/mobpoint.txt b/npc/functions/mobpoint.txt
index 0b38d3311..2054b5493 100644
--- a/npc/functions/mobpoint.txt
+++ b/npc/functions/mobpoint.txt
@@ -43,6 +43,7 @@ OnNPCKillEvent:
     callfunc "mobpoint";
     callfunc "mobhunter";
     callfunc "SQuest_Hasan";
+    callfunc "SaggyMobCount";
 
     killedrid=0;
     end;