Is it possible to have an object read a story?

key kQuery;
integer pause = 2; // delay between lines
integer iLine = 0;
default 
{
    touch_start(integer num) // touch to start reading notecard
    {
        llSay(0, "Reading notecard...");
        kQuery = llGetNotecardLine("My Notecard", iLine); // "My Notecard" is default change to what you like
    }
 
    dataserver(key query_id, string data) 
    {
        if (query_id == kQuery) 
        {
            if (data == EOF) 
            {    
 
                llSay(0, "No more lines in notecard, read " + (string)iLine + " lines."); // omit this is feel like it
 
            }
            else 
            {
                llSay(0,data);
                llSleep(pause); 
                iLine++;
                kQuery = llGetNotecardLine("My Notecard", iLine); // change "My Notecard" to what notecard you have like above
 
            }
        }
    }
}