1.     条件结束
  2. 子程序结束,回到调用处
  3. 子程序 取消PK
  4.     调用外部VBScript子程序 在屏幕区域里查找图形(776+cx,123+cy,cx+836,cy+182,"Attachment:\标识_狩猎.bmp",0.92,tx,ty)
  5.     如果表达式 (pktx>0 and pkty>0) 为真,则
  6.         保存鼠标位置
  7.         鼠标移到 cx+549 , cx+422
  8.         延时256毫秒
  9.         左键单击
  10.         延时256毫秒
  11.         恢复鼠标位置
  12.     条件结束
  13. 子程序结束,回到调用处