1 files changed, 34 insertions, 0 deletions
diff --git a/npc/functions/openbook.txt b/npc/functions/openbook.txt
new file mode 100644
index 00000000..cb1a0b11
--- /dev/null
+++ b/npc/functions/openbook.txt
@@ -0,0 +1,34 @@
+// Evol functions.
+// Author:
+//    Reid
+// Description:
+//    Narrator dialogue to show the selected book.
+
+function	script	openbook	{
+    .@book_name$ = getarg(0, getvariableofnpc(.book_name$, strnpcinfo(0)));
+
+    narrator(S_LAST_NEXT,
+        l("You open a book named \"%s\".", .@book_name$),
+        l("Do you want to read it?"));
+
+    return (select("Yes.", "No.") == 1);
+}
+
+function	script	openbookshelf	{
+    .@book_name$ = getarg(0, getvariableofnpc(.book_name$, strnpcinfo(0)));
+
+    narrator(S_LAST_NEXT,
+        l("You see a dust covered book on the shelf..."),
+        l("The name of the book is \"%s\".", .@book_name$),
+        l("Do you want to read it?"));
+
+    return (select("Yes.", "No.") == 1);
+}
+
+function	script	openoldbook	{
+    narrator S_LAST_NEXT,
+        l("You open the book, but it looks like the sea water and time damaged it severely. Some pages are not readable anymore. Some others are simply missing."),
+        l("The old book seems to tell about the legend of Aemil. Would you like to read it?");
+
+    return (select("Yes.", "No.") == 1);
+}