.在屏幕上滑动时候
f(st_eA == 2)
{
 .计算当前滑动的距离，如果滑动距离短就不移动了
 s-(st_rX, sss.rX, x)
 s-(st_rY, sss.rY, y).判断是否够格移动悬浮
 f(sss.rXY == true || x>80 || x<-80 || y>80 || y<-80)
 {
  .记录本次直到结束释放触屏都可移动悬浮
  sss rXY = true
  .悬浮拖动的位置偏移
  s-(40, st_rX)
  s-(80, st_rY)
  .设置悬浮位置
  us(sss.v, "x", st_rX)
  us(sss.v, "y", st_rY)
  .刷新悬浮
  uxf(sss.v)
  }
}
else f(st_eA == 0)
{
 .当按下屏幕时候记录开始的坐标
 sss rX = st_rX
 sss rY = st_rY
 .初始化
 sss rXY = false
}
//把上面代码写入悬浮界面要滑动的控件的触屏监听事件里面
//悬浮返回赋值改成sss.v
//如果代码不会使用请加群求助