class_code="SPBFUT"
sec_code="SiH1"
function main()
  clock1=0
  is_run=true
  while is_run do
    sleep(100)
  end
end
function OnStop()
  is_run=false
  return 100
end
function OnParam(c_code,s_code)
  if(c_code==class_code)and(s_code==sec_code)then
    clock2=os.clock()
    message("delta="..clock2-clock1.."sec")
    clock1=clock2
  end
end