alphabroadcasta

string notename="In>";
integer InLn;
key query;
vector cursorpos;
integer chan=999987;

init(){
    llShout(chan,"cleartext");
    InLn=0;
    query = llGetNotecardLine(notename, InLn);
}

default{
    on_rez(integer p){
        llResetScript();
    }
    state_entry(){
        init();
    }
    dataserver(key query_id, string data) {
        if (query_id == query){
            integer len = llStringLength(data);
            cursorpos=<0,0,2>;
            cursorpos.x -= 0.63*(len/2);
            if (data != EOF){
                integer i=0;
                do{
                    string char = llGetSubString(data,i,i);
                    if(char!=" ")
                        llRezObject(char,llGetPos()+cursorpos,ZERO_VECTOR,ZERO_ROTATION,0);
                    i++;
                    cursorpos.x += 0.63;
                }while(i<llStringLength(data));
                InLn++;
                llShout(chan,"nl");
                query = llGetNotecardLine(notename,InLn);
            }
        }
    }
}