1.         延时200毫秒
  2.         按键#fj1
  3.         fz1=now
  4.     条件结束
  5.     如果表达式 (datediff("s",fz2,now)>fsj2*60) 为真,则
  6.         延时200毫秒
  7.         按键#fj2
  8.         fz2=now
  9.     条件结束
  10.     如果表达式 (datediff("s",fz3,now)>fsj3*60) 为真,则
  11.         延时200毫秒
  12.         按键#fj3
  13.         fz3=now
  14.     条件结束
  15.     如果表达式 (datediff("s",fz4,now)>fsj4*60) 为真,则
  16.         延时200毫秒
  17.         按键#fj4
  18.         fz4=now
  19.     条件结束
  20. 子程序结束,回到调用处