Add "Poem about Poems" by Nard on the library.

1 files changed, 57 insertions, 0 deletions

diff --git a/npc/001-2-6/books.txt b/npc/001-2-6/books.txt
index db33705b..230a3a62 100644
--- a/npc/001-2-6/books.txt
+++ b/npc/001-2-6/books.txt
@@ -51,3 +51,60 @@ OnInit:
     end;
 }
 
+001-2-6,48,41,0	script	#001-2-6-Book2	NPC_NO_SPRITE,{
+
+    .@book_name$ = "\"" + l("Poem about Poems") + "\"";
+
+    narrator 4,
+        l("You see a dust covered book on the shelf..."),
+        l("The name of the book is @@.", .@book_name$),
+        l("Do you want to read it?");
+
+    switch (select ("Yes.", "No."))
+    {
+        case 1:
+            goto L_Read;
+        case 2:
+            close;
+    }
+
+L_Read:
+    narrator 1,
+    l("Poem is making the words dance"),
+    l("Words become music and glance"),
+    l("Over lovers under a starry night"),
+    l("Whose eyes glisten under Moonlight"),
+    "",
+    l("No matter the grammar"),
+    l("If words beat in rhythm"),
+    l("Find an order with them"),
+    l("As on anvil strikes the hammer"),
+    "",
+    l("No matter the spelling"),
+    l("Just say something sparkling"),
+    l("If not, how could CrazyKatiektch"),
+    l("Say her love to glamourous Gliktch?"),
+    "",
+    l("True be or not true be"),
+    l("That's not the question"),
+    l("And rhyming is not too"),
+    l("If you don't like to"),
+    l("Share your mind is your mission"),
+    l("Whatever inside can be"),
+    "",
+    l("Don't be shy, you are nice"),
+    l("From your mind, break the ice"),
+    l("Whatever your idea"),
+    l("It's the good one and, ahem!"),
+    l("That makes everybody"),
+    l("Able to write a poem"),
+    l("-- Nard");
+
+    close;
+
+OnInit:
+    .sex = G_OTHER;
+    .distance = 1;
+    end;
+}
+