model run command

/models {
  if ( $daylight > 0 ) { %tz% = 4CDT | %etz% = 4EDT }
  elseif ( $daylight = 0 ) { %tz% = 4CST | %etz% = 4EST }
  %et% = $calc($asctime(HH) + 1)
  %etoffset% = $calc($asctime(z) + 1)
  msg $chan The time is12 $asctime($gmt,HH:nn:ss) 4UTC /12 $asctime(HH:nn:ss) %tz% (4UTC06 $+ $asctime(z) $+ ) /$&
    12 $+ %et% $+ : $+ $asctime(nn:ss) %etz% (4UTC06 $+ %etoffset% $+ ).
  if ( $asctime($gmt,HH) < 6) {
    %hours% = 5 - $asctime($gmt,HH)
    %hoursstring% = 12 $+ %hours% hours and
    if %hours% == 0 { %hoursstring% = }
    %mins% = $calc(60 - $asctime($gmt,nn))
    %minsstring% = 12 $+ $calc(60 - $asctime($gmt,nn)) minutes
    if %mins% == 60 { %hours% = %hours% + 1 | %minsstring% = }
    ;    msg $chan 12 $+ %hours% $+ : $+ $calc(60 - $asctime($gmt,nn)) until the 4GFS model run will initialize at 04060005Z.
    msg $chan %hoursstring% %minsstring% until the 4GFS model run will initialize at 04060005Z.
  }

  elseif ( $asctime($gmt,HH) < 12) {
    %hours% = 11 - $asctime($gmt,HH)
    %hoursstring% = 12 $+ %hours% hours and
    if %hours% == 0 { %hoursstring% = }
    %mins% = $calc(60 - $asctime($gmt,nn))
    %minsstring% = 12 $+ $calc(60 - $asctime($gmt,nn)) minutes
    if %mins% == 60 { %hours% = %hours% + 1 | %minsstring% = }
    if( %mins% < 10) {
      %mins% = 0 $+ $calc(60 - $asctime($gmt,nn))
    }
    msg $chan %hoursstring% %minsstring% until the 4GFS and 4Euro model runs will initialize at 04120005Z.
  }

  elseif ( $asctime($gmt,HH) < 18) {
    %hours% = 19 - $asctime($gmt,HH)
    %hoursstring% = 12 $+ %hours% hours and
    if %hours% == 0 { %hoursstring% = }
    %mins% = $calc(47 - $asctime($gmt,nn))
    %minsstring% = 12 $+ %mins% minutes
    if %mins% == 60 { %hours% = %hours% + 1 | %minsstring% = }
    msg $chan %hoursstring% %minsstring% until the 04180012Z 4GFS model run will 12begin at 12~04204712Z.
    %donehours% = 21 - $asctime($gmt,HH)
    %donehoursstring% = 12 $+ %donehours% hours and
    if %donehours% == 0 { %donehoursstring% = }
    %donemins% = 65 - $asctime($gmt,nn)
    %doneminsstring% = 12 $+ %donemins% minutes
    if %donemins% == 60 { %donehours% = %donehours% + 1 | %doneminsstring% = }
    msg $chan The run should be complete in %donehoursstring% %doneminsstring% by 12~04220512Z.
  }

  else ( $asctime($gmt,HH) < 24) {
    %hours% = 23 - $asctime($gmt,HH)
    %hoursstring% = 12 $+ %hours% hours and
    if %hours% == 0 { %hoursstring% = }
    %mins% = $calc(60 - $asctime($gmt,nn))
    %minsstring% = 12 $+ $calc(60 - $asctime($gmt,nn)) minutes
    if %mins% == 60 { %hours% = %hours% + 1 | %minsstring% = }
    ;    msg $chan 12 $+ %hours% $+ : $+ $calc(60 - $asctime($gmt,nn)) until the 4GFS and 4Euro models run will initialize at 04000006Z.
    msg $chan %hoursstring% %minsstring% until the 4GFS and 4Euro model runs will initialize at 04000005Z.
  }
  msg $chan Model run status page from 4NCEP: 12https://goo.gl/fn6Td9
}