for 3 //百位数字扫描
i=0
For 8 //单个数字扫描
rx=rightx-jici*6 //后退6个像素点
For 5
ifcolor rx,ry,colo(y),0
nob="1"
Else 
nob="0"
End If 
rx=rx-1
number=number&nob 
Next 
ry=ry+1 
Next
For 10
If number=no(i)
jine=i&jine
Exit For 
End If 
i=i+1
Next 
jici=jici+1
number=""
ry=righty //循环一次结束后初始化ry坐标
Next //修改初始化值
jici=0
y=y+1
Next 
'MsgBox jine
Delay 100
feyjy=feyjy+1
If feyjy>120 Then //若一段时间内没有成功交易则取消交易，慎重！！！
KeyPress "Esc",1
Delay 100
gosub 站街自动喊话
End If 
If int(jine)=jiage(1000) Then 
'MsgBox "价格正确可以进行下一步交易"
ifcolor 167,269,"44EEFF",0 //检查对方是否先点击了交易 
MoveTo 161,426 //交易逐步点击
Delay 400
LeftClick 2
Delay 400
LeftClick 2
Delay 150 
Else 
Goto jiancha
End If 
Else 
'MsgBox "价格不符合"
gosub 输入金钱
Delay 500
Gosub 检查并交易
End If 

End Sub 

Sub 检查交易是否提前结束
i=0
Rem star
FindPic 0,0,1024,768,"Attachment:\11.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
Delay 500 //2分钟内未交易完成则关闭交易框
Else 
gosub 站街自动喊话
Goto jiewei
End If
rem jiewei
End Sub 

Sub 检查是否有交易
Rem star
FindPic 0,0,1024,768,"Attachment:\11.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then

gosub 检查并交易
Delay 100

Else 

' Goto jiewei
End If
' rem jiewei
End Sub 

Sub 防掉线
kaiguan=0
For 2
MoveTo 33,439
Delay 600
KeyPress "w", 1
Delay 100
KeyPress "q", 1
Delay 100
MoveTo 89,202 
Delay 100
LeftClick 1
Delay 1000