天龍自動(dòng)打怪腳本

1、天龍自動(dòng)打怪腳本普通視圖源碼視圖1 調(diào)用插件命令hwnd=WindowForeground（）2. 導(dǎo)入程序文件window.dll3開始VBScript塊4 win=Windov/ Foregrou nd （）5. client=Window.GetClientRect（win）6. s=split（client/,|H）7. dx=s（0）8. dy=s（l）9. zx=s（2）10. zy=s（3）11. 結(jié)束 VBScript 塊12. Dimredbluebbredredwaitbluewaitmonwaitfqg jbabckqsl s2»s3» s4 s5 丿

2、 s6,s7，"八2八3»t4八5八6»t7八8八9八13. tl=now:t2=now:t3=now:t4=now:t5=now:t6=now:t7=now:a=0:b=0:c=0:q=014. 用戶定義變址fqg=DropList防搶怪:引不防搶怪:1=0防搶怪設(shè)置15. 用戶定義變雖jb=DropList不撿包:0|自動(dòng)撿包:1=0是否撿物16. 用戶定義變雖sl=2門派普玫Fl間隔（秒）17. 用戶定義變§ s2=20 體攻擊F2間隔（秒）18. 用戶定義變址s3=20單體攻擊F3何隔（秒）19. 用戶定義變fi s4=25怒氣攻擊F4間隔（秒）

3、20. 用戶定義變址s5=80自定技能F5間隔（秒）21. 用戶定義變fi： S6=60 BB技能F6間隔（秒）22. 用戶定義變址s7=10狀態(tài)技能F7間隔（分）23. 用戶定義變址 red=DropList30%: 30150%: 50170%:70=1 血少于%加血 F824. 用戶定義變雖 blue=DropList30%:30150%:50170%:70=0 藍(lán)少干加藍(lán) F925. 用戶定義變量 bbred=DropList沒有出戰(zhàn):0120%:20130%:30150%:50=2 寵少 F%加血 F1026. 用戶定義變址redwait“紅藥冷卻時(shí)間（秒）27. 用戶定義變址blu

4、ewait“藍(lán)藥冷卻時(shí)間（秒）28. 用戶定義變址monwait=100尋怪延時(shí)（毫秒）29. 展開附件plugin *.dll30. 標(biāo)記開始31延時(shí)monwait毫秒32. 調(diào)用子程序驗(yàn)證碼33. 調(diào)用子程序找怪34. 如果表達(dá)式（fqgP）為真'則35. 如果（dx+369,dy+31）的顏色大約等于# 1E252A則36. 跳轉(zhuǎn)到標(biāo)記開始37. 條件結(jié)束38. 條件結(jié)束50.54.56.70.39.標(biāo)記繼續(xù)殺怪40.涮用子程序判斷血藍(lán)狀態(tài)41.調(diào)用子程序BBlfll狀態(tài)42.調(diào)用子程序殺怪43.標(biāo)記End44腳木停止運(yùn)行45.子程序驗(yàn)證碼46. 標(biāo)記再次報(bào)警調(diào)用外部VBScri

5、pt子程序在屏幕區(qū)域里查找圖形(6 50,600 550丿"Attachment:yzl bmp"衛(wèi) 9丿 x»y) 如果表達(dá)式(x>0 and y>0)為真，則 調(diào)用插件命令SimPlayer. ring(19)使用了聲音插件，需要自己去官網(wǎng)下載延時(shí)2000峑秒52.條件結(jié)東如果表達(dá)式(x>0)為真，則循環(huán)執(zhí)行 涮用外部VBScript子程序在屏幕區(qū)域里查找圖形(650,600,550, MAttachment: yzl.bmp'* J0.9Jx,y)如果表達(dá)式(x>=0 and y>=9)為真，則如果(x+17,y+9-k

6、)的顏色等于ffFFFFFF則按 ti!<Esc>延時(shí)1000臨秒亂標(biāo)移到 dx+446 dy+315延時(shí)1000毫秒左鍵單擊跳轉(zhuǎn)到標(biāo)記End條件結(jié)束否則跳轉(zhuǎn)到標(biāo)記再次報(bào)警條件結(jié)束循環(huán)結(jié)束48.51.53.55.59.如果57.58.60.61.62.65.63.64.66.67.68.子程序結(jié)束，回到調(diào)用處69.子程序判斷血藍(lán)狀態(tài)(red/100*l20+66+dxdy+31)的顏色大約等于 #222222 則 71a=a+l否則條件結(jié)束如果(blue/100#120+66+dx,dy+37)的顏色大約等干 #222222 則b=b+l72.否則條件結(jié)束78.子程序結(jié)束，回到調(diào)用

7、處79.子程序BB血狀態(tài)80如果表達(dá)式(bbred>0)為真，則81.如果(bbred+91+dx,dy+69)的顏色大約等于#111111則82.c=c+l83條件結(jié)束84條件結(jié)束85子程序結(jié)來，回到調(diào)用處86子程序找怪87.按住88延時(shí)亳秒89按鍵<Tab>90延時(shí)10亳秒91.彈起92延時(shí)20毫秒93. 子程序結(jié)來亠回到調(diào)用處94. 子程序殺怪95. 如果(dx+247,dy+31)的顏色大約等于#0019FF則96如果(dx+261,dy+31)的顏色大約等于#0011ff則97. 調(diào)用子程序技能98. 否則99. 按惟100. 延時(shí) 1000 秒普通視圖源碼視圖10

8、1. 條件結(jié)束102. 跳轉(zhuǎn)到標(biāo)記繼續(xù)殺怪23否則104如果表達(dá)式(jb=l)為真，則105. 調(diào)用子程序撿包106. 否則107. 跳轉(zhuǎn)到標(biāo)記開始208條件結(jié)束109.條件結(jié)束子程序結(jié)束，回到調(diào)用處111. 子程序怒氣判斷112. 如果(qx+126,qy+43)的顏色大約等于#00ffff則113. q=l114. 條件結(jié)束115. 如果(qx+188,qy+43)的顏色大約等于則116. q=2117. 條件結(jié)束"8 子程序結(jié)束回到調(diào)用處119. 子程序技能120. 跳轉(zhuǎn)到標(biāo)記開始121. 如果表達(dá)式(DateDiff(MsM,tl,now)>=sl)為真，則122. 按

9、鍵123. tl=now124. 延時(shí)200奄秒125 條件結(jié)束226 如果(dx+261,dy+31)的顏色大約等于#0Ollff則127. 如果表達(dá)式(DateDiff(Ms't2,now)>=s2)為真'則128. 延時(shí)500秒129. 按 ti!<F2>130. t2=now131. 延時(shí)500秒132. 條件結(jié)束133. 否則134. 條件結(jié)束235 如果(dx+261,dy+31)的顏色大約等于#0011ff貝ij136. 如果表達(dá)式(DateDi仔(”sjt30討)>*3)為直'則137. 延時(shí)500秒138. 按 <F3&g

10、t;139. t3=now140. 延時(shí)500秒141條件結(jié)束142. 否則143. 條件結(jié)束144 涮用子程序怒氣判斷245 如果(dx+261,dy+31)的顏色大約等于#0011ff則146. 如果表達(dá)式(DateDiff("st4,now)>=s4 and q>=l)為真，則147. 延時(shí)500亳秒148. 按 tit<F4>149. t4=now:q=q-l150. 延時(shí)500秒151. 條件結(jié)束152. 否則253 條件結(jié)束154. 如果(dx+261,dy+31)的顏色大約等于#0011ff則255.如果表達(dá)式(DateDi仟(Ut5jOW)&g

11、t;=s5)為真'則156.延時(shí)500奄秒257按 <F5>1S8.t5=nov/159. 延時(shí)500秒160. 條件結(jié)束262 否則162. 條件結(jié)束263 如果(dx+261,dy+31)的顏色大約等于#0011ff則264.如果表達(dá)式(DateDiff(MsM,t6,now)>=s6)為真'則165. 按 fihF6>166. t6=nov/167. 延時(shí)100秒168. 條件結(jié)束269 條件結(jié)束170. 如果表達(dá)式(DateDiff(,nt7,now)>=s7)為真?zhèn)仁髽?biāo)移到dx+36 » dy+35172左鍵單擊173延時(shí)100

12、亳秒174按鍵<F7>175t7=now276.延時(shí)100毫秒177按住<Ctrl>178延時(shí)1.0亳秒179按鍵<Tab>180延時(shí)20亳秒281彈起<Ctrl>182.延時(shí)10亳秒183.條件結(jié)束184. 如果表達(dá)式(DateDiff(Ms18,now)>=redwait and a>=l)為真'則185. 按鍵 <F8>186. t8=now:a=0187. 延時(shí)500亳秒188. 條件結(jié)束189. 如果表達(dá)式(DateDiff("s'*,t9,now)>»bluewait

13、and b>«l)為真，則190. 按鍵 <F9>191. t9=now:b=0192. 延時(shí)500秒193. 條件結(jié)束194. 如果表達(dá)式(DateDiff(Ms",tl0,now)>=1 and c>=l)為真丿則195. 按鍵 <F10>196. tl0=now197. c=0198. 延時(shí)500秒299條件結(jié)束200. 子程序結(jié)束，回到調(diào)用處普通視圖源碼視圖201. 子程序撿包202. Dim v,川Jal,blJa2>b2JshapeJx0>y0JklJk2/xlJyl203.1=20:m=2:al=dx+28

14、6:bl=dy+200:a2=dx+486:b2=dy+400:x0=dx+366:y0=dy+300:d=954439560204.如果表達(dá)式(x0-al>=a2-x0)為真"則205n=al206. 否則207. n=xO-(a2-x0)208. 條件結(jié)束209. 標(biāo)記開始搜索i=m210.211.218.213.217.212.如果表達(dá)式214.215.216.如果表達(dá)式(xl>=al229220.xl=x0:yl=y0-v(xl>=n)為真，則循環(huán)執(zhí)行kl=0:k2=v循環(huán)2遍循環(huán)i遍xl=xl+kl:yl=yl+k2and xl<=a2 and yl>=bl and yl<=b2)為真，則 亂標(biāo)移到xl , yl延時(shí)2亳秒221.222