DNF自動強化源碼

Dimenv(a,b,c,d,e,g)//B是檢測強化到幾的停頓時間b=150〃C是強化到幾的圖片c="Attachment:\8.bmp"〃d是第二部調(diào)用下一個子程序的時間d=100〃等待強化的時間e=5500〃子程序第一個圖片名稱g="Attachment:\ch.bmp"Hwnd=Plugin.Window.Find(0,'地下城與勇士")TracePrinthwndCallPlugin.Window.Move(Hwnd,0,0)CallPlugin.Window.Active(Hwnd)FindPic0,0,1024,768,"Attachment:^麗.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intY+15LeftClick1Delay300MoveTointx+20,intY+120LeftClick1EndIfa=1Whilea>0Call強化1()WendSub強化1()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo489,318DelaybFindPic0,0,800,59,c,1,intX,intYIfintX>0AndintY>0ThenDelaydCall強化2()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化2()EndIfEndIfEndIfEndIfEndSubSub強化2()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo516,321DelaybFindPic0,0,800,59,c,l,intX,intYIfintX>0AndintY>0ThenDelaydCall強化3()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化3()EndIfEndIfEndIfEndIfEndSubSub強化3()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo546,323DelaybFindPic0,0,800,59,c,l,intX,intYIfintX>0AndintY>0ThenDelaydCall強化4()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化4()EndIfEndIfEndIfEndIfEndSubSub強化4()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo574,322DelaybFindPic0,0,800,59,c,l,intX,intYIfintX>0AndintY>0ThenDelaydCall強化5()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化5()EndIfEndIfEndIfEndIfEndSubSub強化5()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo610,317DelaybFindPic0,0,800,59,c,1,intX,intYIfintX>0AndintY>0ThenDelaydCall強化6()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化6()EndIfEndIfEndIfEndIfEndSubSub強化6()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo635,321DelaybFindPic0,0,800,59,c,l,intX,intYIfintX>0AndintY>0ThenDelaydCall強化7()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化7()EndIfEndIfEndIfEndIfEndSubSub強化7()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo664,324DelaybFindPic0,0,800,59,c,l,intX,intYIfintX>0AndintY>0ThenDelaydCall強化8()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化8()EndIfEndIfEndIfEndIfEndSubSub強化8()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo696,321DelaybFindPic0,0,800,59,c,1,intX,intYIfintX>0AndintY>0ThenDelaydCall強化9()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化9()EndIfEndIfEndIfEndIfEndSubSub強化9()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo492,350DelaybFindPic0,0,800,59,c,1,intX,intYIfintX>0AndintY>0ThenDelaydCall強化10()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化10()EndIfEndIfEndIfEndIfEndSubSub強化10()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo521,352DelaybFindPic0,0,800,59,c,1,intX,intYIfintX>0AndintY>0ThenDelaydCall強化11()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化11()EndIfEndIfEndIfEndIfEndSubSub強化11()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo541,350DelaybFindPic0,0,800,59,c,1,intX,intYIfintX>0AndintY>0ThenDelaydCall強化12()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化12()EndIfEndIfEndIfEndIfEndSubSub強化12()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo577,351DelaybFindPic0,0,800,59,c,1,intX,intYIfintX>0AndintY>0ThenDelaydCall強化13()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelayeFindPic0,0,438,355,"Attachment:\?定.bmp",0.9,intX,intYIfintX>0AndintY>0ThenMoveTointX,intYDelay50LeftClick1DelaydCall強化13()EndIfEndIfEndIfEndIfEndSubSub強化13()FindPic0,0,800,600,g,0.8,intX,intYIfintX>0AndintY>0ThenMoveTo607,351DelaybFindPic0,0,800,59,c,1,intX,intYIfintX>0AndintY>0ThenDelaydCall強化14()ElseLeftDown1Delay50MoveTo313,298LeftUp1Delay50FindPic0,0,462,395,"Attachment:\確定.bmp"