summaryrefslogtreecommitdiff
path: root/npc/001-2-6/leonard.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/001-2-6/leonard.txt')
-rw-r--r--npc/001-2-6/leonard.txt89
1 files changed, 89 insertions, 0 deletions
diff --git a/npc/001-2-6/leonard.txt b/npc/001-2-6/leonard.txt
new file mode 100644
index 000000000..7b238c1a0
--- /dev/null
+++ b/npc/001-2-6/leonard.txt
@@ -0,0 +1,89 @@
+// Evol scripts.
+// Author:
+// Reid
+// Description:
+// Librarian
+
+001-2-6,52,28,0 script Leonard NPC_LEONARD,{
+
+ function esperia_city
+ {
+ speech S_FIRST_BLANK_LINE,
+ l("You have put your finger on it, I am not."),
+ l("I grew up and lived a good while in Esperia, the capital city."),
+ l("This place is surrounded by two very important elements: academia and the arts. I was surrounded by theater, music, dance, museums..."),
+ l("I had a great childhood in Esperia!"),
+ l("It was wonderful.");
+
+ emotion E_HAPPY;
+
+ return;
+ }
+
+ function need_help
+ {
+ speech S_LAST_NEXT,
+ l("Do you need help with something?");
+
+ switch (select(l("What kinds of books are there here?"),
+ l("Are you a native from Artis?"),
+ l("Nothing.")))
+ {
+ case 1:
+ closedialog;
+ npctalk3 l("You can find novels and poems on this floor.");
+ break;
+ case 2:
+ esperia_city();
+ break;
+ case 3:
+ closedialog;
+ npctalk3 l("Good day to you!");
+ }
+ return;
+ }
+
+ function not_so_loud
+ {
+ npctalkonce l("This floor is reserved for quiet reading, don't speak too loud.");
+
+ return;
+ }
+
+ function miracle
+ {
+ npctalkonce l("The miracle is this: the more we share, the more we have.");
+
+ return;
+ }
+
+ function logic_wisdom
+ {
+ npctalkonce l("Logic is the beginning of wisdom, not the end.");
+
+ return;
+ }
+
+ switch (rand(4))
+ {
+ case 0:
+ logic_wisdom();
+ break;
+ case 1:
+ miracle();
+ break;
+ case 2:
+ not_so_loud();
+ break;
+ case 3:
+ need_help();
+ break;
+ }
+
+ close;
+
+OnInit:
+ .sex = G_MALE;
+ .distance = 2;
+ end;
+}