@program me:@statustime none none none
"wait for the top of the minute then send a timestamp message every 60 seconds";
suspend(60 - (time() % 60));
while (1)
  msg = "Texas, " + $time_utils:ampm(time());
  player.driver:client_notify(player, "xmcp-status", {{"text", msg}});
  suspend(60);
endwhile
.