| Run file for !Annouce <time> <message>

Set DirectorAnnounce$Path <Obey$Dir>.
RMEnsure Director 0.00 Error Need Director to be running

Set Name Announce <Sys$Time>

If "%0" = "" Then Set Time 10 Else Set Time %0
If "%*1" = "" Then Set Message No message Else Set Message %*1

DirectorWindow announce "<Name>" -file "DirectorAnnounce:Templates" -callevery <Time> -temp -command "/DirectorAnnounce:!RunImage -message <Message>"

Unset Time
Unset Message

DirectorShowMenu Window:<Name>
|DirectorDo Set Director$Menu Window:<Name>
