WR录制怎样写脚本实现

fanyw

问以下这样的录制下来的脚本如何实现，本来我想用for循环，在用数组传参数，但是参数太多了，这样不方便，
请高手指点以下思路，谢谢！小弟等急用！！

# BSERP/PM生产管理系统（演示版）
        set_window ("BSERP/PM生产管理系统（演示版）", 3);
        obj_mouse_click ("采购管理", 53, 8, LEFT);
        obj_mouse_click ("面料采购", 41, 150, LEFT);

# 面料入库单
        set_window ("面料入库单", 5);
        obj_mouse_click ("TRzPanel", 581, 14, LEFT);
        win_mouse_click ("Warning", 114, 56);
         Waring();
# 面料入库单
        set_window ("面料入库单", 1);
        obj_mouse_click ("TRzPanel", 721, 31, LEFT);

# BSERP/PM生产管理系统（演示版）
        set_window ("BSERP/PM生产管理系统（演示版）", 1);
        obj_mouse_click ("面料采购", 42, 172, LEFT);

# 面料退货单
        set_window ("面料退货单", 3);
        obj_mouse_click ("TRzPanel", 528, 18, LEFT);
         Waring();

# 面料退货单
        set_window ("面料退货单", 1);
        obj_mouse_click ("TRzPanel", 671, 29, LEFT);

# BSERP/PM生产管理系统（演示版）
        set_window ("BSERP/PM生产管理系统（演示版）", 2);
        obj_mouse_click ("物料销售", 48, 18, LEFT);
        obj_mouse_click ("面料销售", 50, 35, LEFT);

# 面料销售单
        set_window ("面料销售单", 3);
        obj_mouse_click ("TRzPanel", 520, 25, LEFT);
     Waring();

# 面料销售单
        set_window ("面料销售单", 1);
        obj_mouse_click ("TRzPanel", 676, 33, LEFT);

# BSERP/PM生产管理系统（演示版）
        set_window ("BSERP/PM生产管理系统（演示版）", 0);
        obj_mouse_click ("面料销售", 30, 70, LEFT);

# 面料销售退单
        set_window ("面料销售退单", 3);
        obj_mouse_drag ("TDBGridEh", 70, 435, 71, 435, LEFT);
        obj_mouse_click ("TRzPanel", 528, 33, LEFT);
     Waring();

# 面料销售退单
        set_window ("面料销售退单", 1);
        obj_mouse_drag ("TRzPanel", 682, 27, 681, 27, LEFT);

# BSERP/PM生产管理系统（演示版）
        set_window ("BSERP/PM生产管理系统（演示版）", 1);
        obj_mouse_click ("领料管理", 55, 7, LEFT);
        obj_mouse_click ("面料领料", 42, 51, LEFT);

# 面料领料单
        set_window ("面料领料单", 3);
        obj_mouse_click ("TRzPanel", 534, 15, LEFT);
     Waring();

# 面料领料单
        set_window ("面料领料单", 1);
        obj_mouse_click ("TRzPanel", 695, 32, LEFT);

# BSERP/PM生产管理系统（演示版）
        set_window ("BSERP/PM生产管理系统（演示版）", 0);
        obj_mouse_click ("面料领料", 33, 72, LEFT);

# 面料退料单
        set_window ("面料退料单", 2);
        obj_mouse_click ("TRzPanel", 524, 18, LEFT);

# Warning
        win_mouse_click ("Warning", 120, 58);
      Waring();

# 面料退料单
        set_window ("面料退料单", 1);
        obj_mouse_click ("TRzPanel", 670, 19, LEFT);

# BSERP/PM生产管理系统（演示版）
        set_window ("BSERP/PM生产管理系统（演示版）", 4);
        obj_mouse_drag ("加工管理", 56, 9, 56, 8, LEFT);
        obj_mouse_click ("物料加工", 39, 32, LEFT);

# 加工出库单
        set_window ("加工出库单", 3);
        obj_mouse_click ("TRzPanel", 478, 15, LEFT);
      Waring();
# 加工出库单
        set_window ("加工出库单", 1);
        obj_mouse_click ("TRzPanel", 629, 23, LEFT);

# BSERP/PM生产管理系统（演示版）
        set_window ("BSERP/PM生产管理系统（演示版）", 1);
        obj_mouse_click ("物料加工", 42, 54, LEFT);

# 加工入库单
        set_window ("加工入库单", 3);
        obj_mouse_click ("TDBGridEh", 50, 378, LEFT);
        obj_mouse_click ("TRzPanel", 518, 24, LEFT);
       Waring();

# 加工入库单
        set_window ("加工入库单", 1);
        obj_mouse_click ("TRzPanel", 676, 18, LEFT);

dionysus

你想参数化什么啊？楼主重新编辑一下帖子吧，大家都看不懂很难回答