// Evol scripts.
// Author:
//    Reid
//    Jesusalva
// Description:
//    Librarian

001-2-4,51,35,2	script	Terry	NPC_TERRY,{
    if (@terry_goal$ != "") goto L_Waiting;
    mesn;
    mesq l("Hi. Do you want to help at sorting some books? You may grow your intelligence and I'll pay a smaall coin change for it.");
    next;
    if (askyesno() == ASK_NO) {
        closeclientdialog;
        close;
    }
    @terry_goal$ = any("History", "Novel", "Legal", "Utility", "Dolfina's");
    @terry_section$ = "";
    goto L_Waiting;

// TODO: Possibly ask riddles about the books or send you to talk with other
// librarians or just read a book near to Delfina (time wait) for diversity
L_Waiting:
    if (@terry_goal$ == @terry_section$) goto L_Submit;
    mesn;
    mesq l("Okay, good, please bring me a %s book. Just find one on the shelves and go talk to me.", b(@terry_goal$));
    close;

L_Submit:
    mesn;
    mesq l("Thanks, come back later if you need more.");
    @terry_goal$="";
    @terry_section$="";
    Zeny+=1+rand2(5);
    EXP_INT+=rand2(1);
    if (EXP_INT > .@nxt) {
        statusup2(bInt, 1);
        EXP_INT -= .@nxt;

        // FIXME: Use a color-coded special effect
        specialeffect(1, SELF, getcharid(3));
    }
    close;

    // Dock warehouse: 001-2-18 and 001-2-42

OnInit:
    .distance = 2;
    end;
}