@name bob_8_compact
@outputs I
@persist Num I Text:string Screen:wirelink
runOnChat(1)
if(first()){Screen = entity():isConstrainedTo():wirelink()}
Num++
Text = Num:toString() + ". " + lastSpoke():name()+": "+lastSaid()
if(Text:length()%30!=0){
    for(J=0,30-(Text:length()%30)-1){
        Text = Text + " "
}}
if(lastSpoke()==owner()){Color = 69
}elseif(owner():isSteamFriend(lastSpoke())){Color = 190
}elseif(lastSpoke():isAdmin()){Color = 960
}else{Color = 949}
if(I+Text:length()>540){
    Screen:writeString(Text:sub(1,540-I),I%30,floor((I%540)/30),Color)
    Screen:writeString(Text:sub(540-I+1,Text:length()),0,0,Color)
}else{Screen:writeString(Text,I%30,floor((I%540)/30),Color)}
I+=Text:length()
I=I%540
Screen:writeString("                              ",I%30,floor((I%540)/30),1000)