// Evol functions.
// Author:
//    Reid
// Description:
//    Narrator dialogue to show the selected book.
// Variables:
//    @book_name$ = The name of the book to read.

function	script	openbook	{
    .@book_name$ = "\"" + l(getarg(0, getvariableofnpc(.book_name$, strnpcinfo(0)))) + "\"";

    narrator S_LAST_NEXT,
        l("You open a book named @@.", .@book_name$),
        l("Do you want to read it?");

    return (select("Yes.", "No.") == 1);
}

function	script	openbookshelf	{
    .@book_name$ = "\"" + l(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 @@.", .@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);
}