string ASCII = "̖̗̘̙̜̝̞̟̠̤̥̦̩̪̫̬̭̮̯̰̱̲̳̹̺̻̼͇͈͉͍͎͓͚̣̍̎̄̅̿̑̆̐͒͗͑̇̈̊͂̓̈́͊͋͌̃̂̌̀́̋̏̒̓̔̽̉̾͆̚ͅ ̴̵̶̡̢̧̨̛̀́̕͘͏̸̷͜͟͢͝͞͠͡҉_";
string chr(integer i) {
    return llGetSubString(ASCII, i, i);
}
string zalgo(integer amount) {
    string zalgo = "";
    integer i;
    for(i = 0; i < amount; i++) {
        zalgo += chr((integer)llFrand(llStringLength(ASCII)));
    }
    return zalgo;
}

dostuff(){
    llSetLinkPrimitiveParamsFast((integer)llFrand(llGetNumberOfPrims()+1),[
    PRIM_TEXT,zalgo((integer)llFrand(3)) + "\n" + zalgo((integer)llFrand(3)) + "  " + zalgo((integer)llFrand(5)) + "  " + zalgo((integer)llFrand(3)) + "\n" + zalgo((integer)llFrand(3)), <0,0,0>, 1
    ]);
}

default
{
    state_entry()
    {

        while(1)
        {
            dostuff();
        }
    }
}