Include petcaring book (a patch done by me)

2 files changed, 45 insertions, 0 deletions

diff --git a/db/re/item_db.conf b/db/re/item_db.conf
index 8032985d1..2ffd417d3 100644
--- a/db/re/item_db.conf
+++ b/db/re/item_db.conf
@@ -1113,6 +1113,19 @@ item_db: (
     ">
 },
 {
+    Id: 536
+    AegisName: "PetcaringGuide"
+    Name: "Fluffy Animals who Love Their Owners"
+    Type: "IT_USABLE"
+    Buy: 70
+    Sell: 10
+    Weight: 20
+    KeepAfterUse: true
+    Script: <"
+        doevent "#Book-Petcaring::OnUse";
+    ">
+},
+{
     Id: 537
     AegisName: "BookOfLaws"
     Name: "The Book of Laws"
diff --git a/npc/items/books.txt b/npc/items/books.txt
index 730e1efca..2b990bfe2 100644
--- a/npc/items/books.txt
+++ b/npc/items/books.txt
@@ -90,3 +90,35 @@ OnInit:
     end;
 }
 
+
+
+000-0,0,0,0	script	#Book-Petcaring	NPC_HIDDEN,{
+    function read_book {
+        narrator 1,
+        l("So you have now a pet, who is loyal to you. It'll follow you everywhere, but there are two things you must know."),
+        l("Do not let intimacy and hunger get to zero. If any of those get to zero, it'll leave you forever."),
+        l("Pious must keep a strict diet composed of Piberries."),
+        l("However, you should only give food when it's hungry, otherwise it'll believe you're a bad owner and intimacy will decrease."),
+        l("To perform most actions, like feeding and renaming, just right-click it. You can even put it back on the egg if its following gets too annoying."),
+        l("Give your pet a nice name, and keep it healthy, and you'll be a successful pet owner!"),
+        l("When you intimacy is high, it'll increase your stats and who knows, might even help you in combat!"),
+        l("...And if you're still trying to check your pet stats, just hover it with your mouse. Thanks."),
+        l("-- Animals Protection Agency of Aemil");
+    }
+OnShelfUse:
+    @book_name$ = .bookname$;
+    if (openbookshelf ())
+        read_book;
+    close;
+OnUse:
+    @book_name$ = .bookname$;
+    if (openbook ())
+        read_book;
+    close;
+OnInit:
+    .bookname$ = "Fluffy Animals who Love Their Owners";
+    .sex = G_OTHER;
+    .distance = 1;
+    end;
+}
+