#    This is the module register Run/Start/Stop Delay 0x8170


     variable RunSSDelay 0

proc GetRunSSDelay {} {
     variable RunSSDelay 

     set RunSSDelay [ReadRegister RunSSDelay]
}

proc SetRunSSDelay {} {
     variable RunSSDelay 

     WriteRegister RunSSDelay $RunSSDelay
}


proc DrawRunSSDelay {} {
   variable Name

   set html ""

   append html  "<p align=center>"
   append html  "<table cellpadding=0 cellspacing=0 border=1>"

   append html  "<tr>"
   append html  "<td  align=center width=50%>Run/Start/Stop Delay</td>"
   append html "<td align=center width=50%>"
     append html "<input type=text name=RunSSDelay size=6 value=[set ::[set Name]::RunSSDelay]  \
          onMouseOver=\"activateEntry(document.MSETTINGS.RunSSDelay)\" \  
              onChange=\"click_MSETTING(document.[set Name], 'RunSSDelay', document.MSETTINGS.RunSSDelay.value)\">"

   append html "</td>"

   append html  "</tr>"

   append html  "</table>"
   append html  "</p>"

     return $html
}