From 0298a66e28ebb4c751c94495d8009970b9433ae0 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Fri, 10 Jan 2020 12:28:08 -0300
Subject: Acorns Test Formula :alembic:

---
 npc/functions/scoreboards.txt | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)

diff --git a/npc/functions/scoreboards.txt b/npc/functions/scoreboards.txt
index ceccb016..be90cb53 100644
--- a/npc/functions/scoreboards.txt
+++ b/npc/functions/scoreboards.txt
@@ -79,6 +79,28 @@ function	script	HallOfJob	{
     return;
 }
 
+function	script	HallOfAcorns	{
+    mes "";
+	mes l("##BHall Of Acorns: TOP15##b");
+    mesc l("Only %s in storage will be counted.", getitemlink(Acorn));
+	mesf("1. %s (%d)", $@hoalvl_name$[0], $@hoalvl_value[0]);
+	mesf("2. %s (%d)", $@hoalvl_name$[1], $@hoalvl_value[1]);
+	mesf("3. %s (%d)", $@hoalvl_name$[2], $@hoalvl_value[2]);
+	mesf("4. %s (%d)", $@hoalvl_name$[3], $@hoalvl_value[3]);
+	mesf("5. %s (%d)", $@hoalvl_name$[4], $@hoalvl_value[4]);
+	mesf("6. %s (%d)", $@hoalvl_name$[5], $@hoalvl_value[5]);
+	mesf("7. %s (%d)", $@hoalvl_name$[6], $@hoalvl_value[6]);
+	mesf("8. %s (%d)", $@hoalvl_name$[7], $@hoalvl_value[7]);
+	mesf("9. %s (%d)", $@hoalvl_name$[8], $@hoalvl_value[8]);
+	mesf("10. %s (%d)", $@hoalvl_name$[9], $@hoalvl_value[9]);
+	mesf("11. %s (%d)", $@hoalvl_name$[10], $@hoalvl_value[10]);
+	mesf("12. %s (%d)", $@hoalvl_name$[11], $@hoalvl_value[11]);
+	mesf("13. %s (%d)", $@hoalvl_name$[12], $@hoalvl_value[12]);
+	mesf("14. %s (%d)", $@hoalvl_name$[13], $@hoalvl_value[13]);
+	mesf("15. %s (%d)", $@hoalvl_name$[14], $@hoalvl_value[14]);
+    return;
+}
+
 // HallOfGame()
 function	script	HallOfGame	{
     if ($MOST_HEROIC$)
@@ -136,6 +158,7 @@ OnInit:
 	.@nb = query_sql("select name, base_level from `char` ORDER BY base_level DESC LIMIT 15", $@hoblvl_name$, $@hoblvl_value);
 	.@nb = query_sql("select name, job_level from `char` ORDER BY job_level DESC LIMIT 15", $@hojlvl_name$, $@hojlvl_value);
 	.@nb = query_sql("select name, guild_lv from `guild` ORDER BY guild_lv DESC LIMIT 5", $@hoguild_name$, $@hoguild_value);
+	.@nb = query_sql("SELECT c.name, i.amount FROM `storage` AS i, `char` AS c WHERE i.nameid="+Acorn+" AND i.account_id=c.account_id ORDER BY i.amount DESC LIMIT 15", $@hoa_name$, $@hoa_value);
     consolemes(CONSOLEMES_DEBUG, "Scoreboards reloaded");
     if (!$@SCOREBOARD_BIND) {
         bindatcmd "scoreboard", "@scoreboard::OnCall", 0, 100, 0;
@@ -156,6 +179,7 @@ OnCall:
             l("Hall Of Base Level"),
             l("Hall Of Job Level"),
             l("Hall Of Guilds"),
+            l("Hall Of Acorns"),
             l("Game Statistics"),
             l("Quit");
         mes "";
@@ -177,6 +201,10 @@ OnCall:
             next;
             break;
         case 5:
+            HallOfAcorns();
+            next;
+            break;
+        case 6:
             HallOfGame();
             next;
             break;
-- 
cgit v1.2.3-70-g09d2