Move @ipcheck to GM 60 and no longer log it. (@accinfo still logged)

Count how many times you've donated blood.

2 files changed, 5 insertions, 3 deletions

diff --git a/npc/012-6/nurse.txt b/npc/012-6/nurse.txt
index 8a1419894..00bbc0ebd 100644
--- a/npc/012-6/nurse.txt
+++ b/npc/012-6/nurse.txt
@@ -40,7 +40,7 @@ L_BLCore:
             next;
             mesn;
             mesq l("Not everyone can be a blood donor. For example, you must be healthy.");
-            mesq l("You can think more info about this on these links:");
+            mesq l("You can find more info about this on these links:");
             mes "";
             mes "[@@https://www.blood.co.uk/|https://www.blood.co.uk/@@]";
             mes "[@@https://www.nhsbt.nhs.uk/what-we-do/blood-services/blood-donation/|https://www.nhsbt.nhs.uk/what-we-do/blood-services/blood-donation/@@]";
@@ -73,7 +73,9 @@ OnDonationComplete:
     slide 58, 67;
     percentheal 100, 0;
     getexp readparam(Hp)*2, readparam(Hp)/100;
-    setq HurnscaldQuest_BloodDonor, 1, gettimetick(2)+(2592000); // 60*60*24*30
+    .@q3=getq3(HurnscaldQuest_BloodDonor)+1;
+    // Cooldown: 60*60*24*30: 30 days
+    setq HurnscaldQuest_BloodDonor, 1, gettimetick(2)+(2592000), .@q3;
     if (BaseLevel >= 30)
         getitem Bread, 1;
     if (BaseLevel >= 50)
diff --git a/npc/commands/ipcheck.txt b/npc/commands/ipcheck.txt
index 501dbfe8b..5cb57578e 100644
--- a/npc/commands/ipcheck.txt
+++ b/npc/commands/ipcheck.txt
@@ -34,7 +34,7 @@ OnBan:
     end;
 
 OnInit:
-    bindatcmd "ipcheck", "@ipcheck::OnCall", 80, 100, 1;
+    bindatcmd "ipcheck", "@ipcheck::OnCall", 60, 100, 0;
     bindatcmd "ipban", "@ipcheck::OnBan", 99, 100, 1;
     end;
 }