t()
{
 s id=文本控件ID
 s t=150
 .设置文本字体初始大小
 w(t>15)
 .启用循环，当字体大小小于5时停止循环
 {
  s(t-2,t)
  ufnsui()
{
   us(id,"textsize",t)

}
  stop(20)
  .设置停顿间隔
  }
}