If you're going to scroll text across the STATUSMSG, might as well loop it.

ON ENTER {
"Message" msg =
0 a = 45 m = 60 s =
{ "\"" msg & "\" " & { a m - } { 0 } a m > IFELSE ITOA & " " & a ITOA & " SUBSTRING" & a s * ALARMEXEC a ++ } { j msg STRLEN < } WHILE
}

a = accumulator, m = max output length, s = speed of the update

This should work but I kind of tossed it together...