009-2,54,49,0	script	Note#bar	NPC400,{
    mesn l("Note");
    mes l("We refuse service to anyone who:");
    mes l("• Has a bubblehead");
    mes l("• Is not properly shaded");
    mes l("• Can't walk without stopping after every step");
    close;
    // In case you don't get the joke, know that it's a parody on Illutia.
}

009-2,109,44,0	script	#Book	NPC400,{
    if (getskilllv(SKILL_MAGIC))
        goto L_Magic;
    mesn l("Bookshelf");
    mes "This bookshelf seems to have a selection of diaries and manuscripts, though you can't find anything that strikes you as being particularly interesting.";
    close;

L_Magic:
    mesn l("Bookshelf");
    mes l("Browsing through the books, you come across a manuscript entitled 'Notes of Potaffe, On Transmutation.'");
    next;
    if (getskilllv(SKILL_MAGIC_TRANSMUTE) < 2)
        goto L_Magic_boring;
    mesn l("Bookshelf");
    mes l("Leafing through the manuscript, you find that you can read little of the tiny handwriting and understand only a fraction of what is said.");
    next;
    if (getskilllv(SKILL_MAGIC) < 2)
        goto L_Magic_weak;
    mesn l("Bookshelf");
    mes l("After a while, you stumble across a section that appears to be written somewhat legibly. The author notes that he (or perhaps she?) is describing a completely new transmutation.");
    next;
    mesn l("Bookshelf");
    mes l("Excitedly, you turn the page – only to find that it is stuck to the next and can't be freed!");
    next;
    mesn l("Bookshelf");
    mes l("The page after that is once again hastily written, with many crossed out words and sections and side remarks such as 'it almost worked' or 'it worked fine yesterday.'");
    next;
    mesn l("Bookshelf");
    mesq l("The last word on that page is '%s' and it's underlined twice with a comment next to it saying 'finally got it right.'", b("Zukminbirf"));
    learnskill SKILL_ZUKMINBIRF;
    next;
    mesn l("Bookshelf");
    mes l("Unfortunately, you can't make out what the transmutation is for or even whether it requires any materials...");
    next;
    mesn l("Bookshelf");
    mes l("You can't make out anything else of value, so you place the manuscript back in the bookshelf.");
    close;

L_Magic_boring:
    mesn l("Bookshelf");
    mes l("Leafing through the manuscript, you find that you understand too little of what is written to make any sense of it.");
    close;

L_Magic_weak:
    mesn l("Bookshelf");
    mes l("Unfortunately, that seems to require more magical power than you can use right now. If only the Mana Seed granted you more power...");
    close;
}