ElseIf h=29 Then kns=kns+1 ElseIf h=30 Then kls=kls+1 ElseIf h=31 Then sfs=sfs+1 ElseIf h=32 Then djs=djs+1 ElseIf h=33 Then ygs=ygs+1 End if End Sub //============================计算价格================================ Sub 计算价格() hmjsj=hmjss*hmjs mhjsj=mhjss*mhjs lhjsj=lhjss*lhjs hmzxj=hmzxs*hmzx mhzxj=mhzxs*mhzx z1j=z1s*z1 z3j=z3s*z3 gj5j=gj5s*gj5 gj10j=gj10s*gj10 sj5j=sj5s*sj5 sj10j=sj10s*sj10 jy10j=jy10s*jy10 jy15j=jy15s*jy15 nj50j=nj50s*nj50 jyqj=jyqs*jyq jyqlbj=jyqlbs*jyqlb tzlbj=tzlbs*tzlb dfj=dfs*df xfj=xfs*xf xycj=xycs*xyc sbj=sbs*sb olb6j=olb6s*olb6 olb8j=olb8s*olb8 xolb12j=xolb12s*xolb12 xolb19j=xolb19s*xolb19 gclbj=gclbs*gclb fzj=fzs*fz zzj=zzs*zz ktj=kts*kt knj=kns*kn klj=kls*kl sfj=sfs*sf djj=djs*dj ygj=yjs*yj zongjia=hmjsj+mhjsj+lhjsj+hmzxj+mhzxj+z1j+z3j+gj5j+gj10j+sj5j+sj10j+jy10j+jy15j+nj50j+jyqj+jyqlbj+tzlbj+dfj+xfj+xycj+sbj+olb6j+olb8j+xolb12j+xolb19j+gclbj+fzj+zzj+ktj+knj+klj+sfj+djj+ygj End Sub //============================交易等待================================ Sub 交易等待() ddsj=0 For dengdai+1 Rem jump9 If ddsj=dengdai Then Call Plugin.BGKM5.LClick(qx,25,8) Call Plugin.Window.Move(hwnd1,Myzb(0),Myzb(1)) Goto jump0 End if Call 检查交易是否提前结束() Delay 900 ddsj=ddsj+1 Next End Sub //=============================交易开始===================== Sub 交易开始() Call 交易过程中所需变量() Call 检查交易是否提前结束() Call 检查物品() Call 对比颜色() Call 计算价格() Call 检查交易是否提前结束() Call 出价() Call 交易等待() End Sub //============================OnScriptExit======================= Sub OnScriptExit() Call Plugin.Window.Move(hwnd1,Myzb(0),Myzb(1)) End Sub