WaitingRoom Moving

prontera,163,184,0  script  AdobeRO 643,{
end;

OnInit:
set .message$, "Welcome to     AdobeRO     ";

while (1) {
    set .message$, delchar(.message$+charat(.message$,0),0);
    delwaitingroom;
    waitingroom .message$, 0;
    sleep 200;
}
}