- 硕士
- 3711900
- 449
- 43
- 794 朵
- 945 个
- 1034 个
- 16720
- 2016-01-18
|
1#
t
T
发表于 2020-03-30 18:43
|
|只看楼主
- Sub 点货(窗柄, 格位)
- Dim x, y,arr(20,1)
- x=362:y=100
- For i = 1 To 20
- arr(i, 0) = x
- arr(i, 1) = y
- x = x + 52
- If i mod 5 = 0 Then
- y = y + 52
- x = 360
- End If
- Next
- Call 梦移点击(窗柄, arr(格位,0),arr(格位,1))
- Delay 200
- 点面板空处(窗柄)
- Delay 200
- End Sub
复制代码 代码解释: 上图中的点货函数用于点击梦幻跑商卖货物品,利用了二维数组,遍历了整个道具栏(共5*4=20格)。 数组arr第一维由循环变量 i 控制,遍历1到20个格子,目的是为其赋值,初始值赋为第一格坐标362,100,横向每格间距52个坐标点(x=x+52),纵向每格间距同样也是52个坐标点(y=y+52)。 这里需要注意的是:i mod 5 这个表达式判断,表示每横向五格则"换行",实现为y坐标赋值。由此可见,arr有两维,第一维表示的是格子编号,第二维表示的是所属格子的具体坐标值。函数名为点货,只需传于指定窗口句柄和格位参数,即可实现: Call 梦移点击(窗柄, arr(格位,0),arr(格位,1)) 爱点哪里点哪里!点货的目的当然是为了卖货啦,爱跑商的同学一看便知!老板,你觉得呢? |
  (此图为道具栏20格界面) (此图为跑商对话NPC弹出的交易框界面)
|