- 标记 第二次44
- 延时1000毫秒
- 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1024,768,"Attachment:\灰三角.bmp",0.5,x,y)
- 如果表达式 (shape = shape1) 为真,则
- 跳转到标记 采集114
- 否则
- 延时500毫秒
- 鼠标移到 845 , 635
- 跳转到标记 第二次34
- 条件结束
- //--------------------------------------------------------
- 标记 第二次34
- 延时1000毫秒
- 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1024,768,"Attachment:\灰三角.bmp",0.5,x,y)
- 如果表达式 (shape = shape1) 为真,则
- 跳转到标记 采集114
- 否则
- 延时500毫秒
- 鼠标移到 227 , 650
- 跳转到标记 第二次334
- 条件结束
- //----------------------------------
- 标记 第二次334
- 延时1000毫秒
- 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1024,768,"Attachment:\灰三角.bmp",0.5,x,y)
- 如果表达式 (shape = shape1) 为真,则
- 跳转到标记 采集114
- 否则
- 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1024,768,"Attachment:\灰三角.bmp",0.5,x,y)
- (VBScript语句) x0=fx/2:n=1:y0=fy/2
- 如果表达式 (n<77) 为真,则循环执行
- (VBScript语句) x=x0+4*(cos(n)+n*sin(n))
- (VBScript语句) y=y0+3*(sin(n)-n*cos(n))
- 鼠标移到 x , y
- 延时100毫秒
- (VBScript语句) n=n+0.8
- 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1024,768,"Attachment:\灰三角.bmp",0.5,x,y)
- Shape1 = 507365973
- 如果表达式 (shape = shape1) 为真,则
- 延时1毫秒
- 跳转到标记 采集114
- 条件结束
- 按键<A>
- 循环结束
- (VBScript语句) x1=fx/2:n=77:y1=fy/2
- 如果表达式 (n>1) 为真,则循环执行
- (VBScript语句) x=x1+4*(cos(n)+n*sin(n))
- (VBScript语句) y=y1+3*(sin(n)-n*cos(n))
- 鼠标移到 x , y
- 延时100毫秒
- (VBScript语句) n=n-0.8
- Shape1 = 507365973
- 如果表达式 (shape = shape1) 为真,则
- 延时1毫秒
- 跳转到标记 采集114
- 条件结束
- 按键<A>
- 循环结束
- 条件结束
- //--------------------
- 标记 采集114
- 延时500毫秒
- 左键单击
- 延时20000毫秒
- //判断采集第一次
- 标记 点一次44
- 如果 (428,669) 的颜色大约等于 #a0de 则
- 延时1000毫秒
- 跳转到标记 点一次44
- 否则
- 跳转到标记 到NPC面前
- 条件结束
- //-----------------------