當前位置:首頁 » 編程軟體 » 腳本刷征服

腳本刷征服

發布時間: 2024-11-12 00:48:05

A. 征服自動打怪腳本

要什麼腳本.別的沒有.捐官精靈我到是有.不用手動.開起來只要按F10就會自動開始捐.捐到你沒TS為止.

B. 跪求征服腳本!

VBSCall Call GetCursorPos(a,b)@<stdlib.vbs>SaveMousePos///儲存此時坐標/開始主腳本rem beginIfExpression l<=r0While 1IfExpression k>-91 and,

C. 帝國時代2 征服者地圖腳本編輯器怎麼弄場景

創建好你想要的場景後,保存,然後你可以在戰役編輯器里找到你所創的場景,選中後點添加,在定製戰役裡面就可以找到它了

D. 征服服務端裡面寫腳本放在什麼地方,文件是什麼格式的

你用管理工具添加了就是添加到服務瑞了的了! 然後要在客戶瑞的INI文件夾裡面的shop.dat添加,就可以顯示出來了!在itemtype.dat裡面修改顯示價格(這個文件要解密才可以用)

E. 誰知道按鍵精靈怎麼弄征服的自動復活腳本

你自己寫吧 我就是自己寫的,掛機的都是自己寫的,你把游戲的那個自動復活的按鈕在游戲中的坐標弄出來,自己在寫程序時候+入重復進程中。讓鍵盤的按鈕總是持續按下 命令上。這樣就可以只要死了 按鈕就持續點擊游戲上的復活按鈕的,很簡單 就看你怎麼想或者怎麼實現

F. 寫個腳本,腳本內容就是點擊下面那個「征服」按鈕,怎麼寫

如果是不間斷的按這個按鈕的話,直接弄一個時間間隔的Enter鍵就好的。把滑鼠箭頭放在征服位置

G. 500高分跪求《征服-縱馬江湖》勇士練級掛機的按鍵精靈腳本!!

[replyview] vbs dim r0,l,m,k,dx,dy,x,y,a,b,starttime,sunhao2,xue2,color0,color//固定半徑r0=100VBS l=10 /圓半徑VBS m=5 /圓半徑VBS k=-90 /圓的漸變率vbs dx=1 /區的判斷值 goSub 注冊rem 注冊用戶goSub 加血提示goSub 損耗度提示gosub 半徑a,b /滑鼠初始坐標,開始時取得坐標值輸入// VBSCall Call GetCursorPos(a,b)@<stdlib.vbs>SaveMousePos///儲存此時坐標///////////////////////////////////開始主腳本rem beginIfExpression l<=r0While 1IfExpression k>-91 and k<270Gosub sub1 //獲得動態坐標EndIf IfExpression k>269 and k<630Gosub sub2 //獲得動態坐標EndIf gosub 注冊用戶打怪VBS k=k+1 /圓的漸變率k=k+0.3 IfExpression k=630VBS k=-90EndIf EndFor/////////////////對應開始的循環vbs l=l+10vbs k=k+10else RestoreMousePos delay 5000 VBSCall Call GetCursorPos(a,b)@<stdlib.vbs> SaveMousePos///儲存此時坐標 VBS l=10 /圓半徑 VBS m=5 /圓半徑 VBS k=-90 /圓的漸變率 endifgoto begin ////////以下為非注冊用戶 rem 非注冊用戶gosub 啟動時間goSub 加血提示goSub 損耗度提示 gosub 半徑a,b /滑鼠初始坐標,開始時取得坐標值輸入// VBSCall Call GetCursorPos(a,b)@<stdlib.vbs>SaveMousePos///儲存此時坐標///////////////////////////////////開始主腳本rem beginIfExpression l<=r0While 1IfExpression k>-91 and k<270Gosub sub1 //獲得動態坐標EndIf IfExpression k>269 and k<630Gosub sub2 //獲得動態坐標EndIf gosub 非注冊用戶打怪VBS k=k+1 /圓的漸變率k=k+0.3 IfExpression k=630VBS k=-90EndIf EndFor/////////////////對應開始的循環vbs l=l+10vbs k=k+10else RestoreMousePos delay 5000 VBSCall Call GetCursorPos(a,b)@<stdlib.vbs> SaveMousePos///儲存此時坐標 VBS l=10 /圓半徑 VBS m=5 /圓半徑 VBS k=-90 /圓的漸變率 endifgoto begin /////////////////////////////////////////////////以上為非注冊用戶代碼 Sub sub1VBS x=a+cos((k*3.1415926)/180)*lVBS y=b+sin((k*3.1415926)/180)*lReturn Sub sub2VBS x=a+cos((k*3.1415926)/180)*mVBS y=b+sin((k*3.1415926)/180)*mReturn /////////////////////////////////////////////////////////一下是件東西命令 Sub 撿東西vbs dim gx,gy,cx,xy VBSCall Call GetCursorPos(cx,cy)@<stdlib.vbs> //獲得當前坐標,方便回到以前軌跡 VBSCall Call FindColor(x-100,y+100,x+100,y-100,"8CE3FF",gx,gy)@<stdlib.vbs> //撿金子 If gx>0 VBSCall Call SetCursorPos(gx,gy)@<stdlib.vbs> LeftClick 1 Delay 3000 VBSCall Call SetCursorPos(cx,cy)@<stdlib.vbs> LeftClick 1 Delay 1000 EndIf VBSCall Call FindColor(x-100,y+100,x+100,y-100,"EFE3EF",gx,gy)@<stdlib.vbs>/////撿銀子 If gx>0 VBSCall Call SetCursorPos(gx,gy)@<stdlib.vbs> LeftClick 1 Delay 3000 VBSCall Call SetCursorPos(cx,cy)@<stdlib.vbs> LeftClick 1 Delay 1000 EndIf VBSCall Call FindColor(x-100,y+100,x+100,y-100,"FF55F7",gx,gy)@<stdlib.vbs>/////撿流星 If gx>0 VBSCall Call SetCursorPos(gx,gy)@<stdlib.vbs> LeftClick 1 Delay 3000 VBSCall Call SetCursorPos(cx,cy)@<stdlib.vbs> LeftClick 1 Delay 1000 EndIf VBSCall Call FindColor(x-100,y+100,x+100,y-100,"FF75CE",gx,gy)@<stdlib.vbs>/////撿龍豬 If gx>0 VBSCall Call SetCursorPos(gx,gy)@<stdlib.vbs> LeftClick 1 Delay 3000 VBSCall Call SetCursorPos(cx,cy)@<stdlib.vbs> LeftClick 1 Delay 1000 EndIf Return ///////////////////////////////////////////一下是退出遊戲命令 sub 死後回城退出IfColor 63 729 5a7584 0 KeyPress 115 1 Delay 3000 MoveTo 464 709 LeftClick 1 Delay 10000 SayString 大家玩好,我下了,先!! KeyPress 13 1 Delay 100 MoveTo 671 757 LeftClick 1 Delay 10000 MoveTo 621 481 LeftClick 1 Delay 10000 MoveTo 469 413 LeftClick 1 Delay 100 gosub 關機 EndIf return ////////////////////////////////////////////下面是關機命令 sub 關機Delay 4000KeyDown 91 1KeyPress 82 1KeyUp 91 1Delay 50KeyPress 8 1Delay 100SayString Shutdown.exe -s -t 0Delay 1000KeyPress 13 1return /////////////////////////////////////////////////下面是加血以及損耗度命令 Sub 加血提示vbs dim xue2 VBSCall xue2=InputBox("請輸入補血最低值:") KeyDown 18 1 KeyPress 9 1 KeyUp 18 1 Delay 1000 If cint(xue2)>=5000 VBSCall Call MessageBox("注意您補血設定值"&xue2&" 太高!")@<stdlib.vbs> ElseIf cint(xue2)<=50 VBSCall Call MessageBox("注意您補血設定值"&xue2&" 太低!")@<stdlib.vbs> EndIf EndIf ReturnSub 加血vbs dim xue1,xue2 VBSCall Call ReadMemory(&h00E50CC0,2,xue1) If cint(xue1)<=cint(xue2) KeyPress 112 1 EndIf Return Sub 損耗度提示vbs dim sunhao2 VBSCall sunhao2=InputBox("請輸入損耗度允許的最低值:") KeyDown 18 1 KeyPress 9 1 KeyUp 18 1 Delay 1000 If cint(sunhao2)>=100 VBSCall Call MessageBox("注意您損耗度設定值:"&sunhao2&" ;設置太高呀!!!")@<stdlib.vbs> ElseIf cint(sunhao2)<=10 VBSCall Call MessageBox("注意您損耗度設定值:"&sunhao2&" ;設置太低呀!!!")@<stdlib.vbs> EndIf EndIf Return Sub 損耗度低退出vbs dim sunhao1,sunhao2 VBSCall Call ReadMemory(&h0504D52A,2,sunhao1) If cint(sunhao1)<=cint(sunhao2) KeyPress 115 1 Delay 100 MoveTo 671 757 LeftClick 1 Delay 2000 MoveTo 621 481 LeftClick 1 Delay 2000 MoveTo 469 413 LeftClick 1 Delay 100 gosub 關機 EndIf Return Sub 技能 vbs dim xf VBSCall Call ReadMemory(&h0053ACA8,2,xf) If cint(xf)=100 KeyPress 121 1 EndIf Return Sub 限時 vbs dim stoptime,starttime VBS stoptime=timer VBS t=stoptime-starttime If t>=600000 VBSCall Call MessageBox("使用時間已到,請注冊,謝謝使用!聯系:[email protected]") MoveTo 671 757 LeftClick 1 Delay 400 MoveTo 621 481 LeftClick 1 Delay 400 MoveTo 469 413 LeftClick 1 Delay 80 KeyDown 91 1 KeyPress 82 1 KeyUp 91 1 Delay 20 KeyPress 8 1 Delay 50 SayString Shutdown.exe -s -t 0 Delay 10 KeyPress 13 1 Gosub 終止腳本 EndIf Return Sub 注冊 VBS dim sn1,sn2,sn3 VBSCall sn1=InputBox("請輸入帳號:") KeyDown 18 1 KeyPress 9 1 KeyUp 18 1 VBS sn3="ascii"+sn1 VBSCall sn2=InputBox("請輸入注冊碼:") KeyDown 18 1 KeyPress 9 1 KeyUp 18 1 If StrComp(sn2,sn3)=0 VBSCall Call MessageBox("謝謝使用!請注冊!未注冊用戶試用10分鍾,聯系:[email protected]") Goto 非注冊用戶 elseif StrComp(sn2,sn3)=1 VBSCall Call MessageBox("謝謝您的注冊和支持,請關注我們為您提供的升級服務!聯系:[email protected]") Goto 注冊用戶 EndIf Return sub 葯少退出vbs dim yaoVBSCall Call ReadMemory(&h00F92ABC,2,yao) If cint(yao)<=3 KeyPress 115 1 Delay 100 MoveTo 671 757 LeftClick 1 Delay 10000 MoveTo 621 481 LeftClick 1 Delay 10000 MoveTo 469 413 LeftClick 1 Delay 100 gosub 關機 EndIf Return sub 半徑vbs dim roVBSCall ro=InputBox("請輸入掛機范圍(建議:100~150):")Return Sub 血少退出vbs dim blood VBSCall Call ReadMemory(&h00E50CC0,2,blood) If cint(blood)<=800 KeyPress 115 1 Delay 100 MoveTo 671 757 LeftClick 1 Delay 10000 MoveTo 621 481 LeftClick 1 Delay 10000 MoveTo 469 413 LeftClick 1 Delay 100 gosub 關機 EndIf Return sub 終止腳本 VBSCall Call MessageBox("謝謝使用!請提出建議並注冊,聯系:[email protected] 再見!")EndScriptReturn sub 啟動時間vbs dim starttimeVBS starttime=timerReturn Sub 注冊用戶打怪///////////////////////////////////可以做成打怪子程序VBSCall color0=GetPixelColor(x,y) //在滑鼠移動之前,獲取目標點色值並賦值給color0VBSCall Call SetCursorPos(x,y)@<stdlib.vbs> //馬上移動滑鼠到目標點VBSCall color=GetPixelColor(x,y) //獲取滑鼠移動後該點色值並賦值給color IfExpression color<>color0 //同一點取得的兩次色值比較,不同,則執行以下的打怪腳本 LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 限時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 限時 goSub 撿東西 EndIf //該點判斷結束 Delay 10 //循環延時///////////////////////////////////////////while dx>0VBSCall Call FindcenterColor(x-100,y+100,x+100,y-100,「0000BD」,dx,dy)@<stdlib.vbs>IfExpression dx>0 VBSCall Call SetCursorPos(dx,dy)@<stdlib.vbs> LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 限時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 限時 goSub 撿東西 endifendfor/////////////////////////////////////////////vbs dx=1 ///////////////////////回到原始位置再次判斷VBSCall Call SetCursorPos(x,y)@<stdlib.vbs>//回到原始設定的軌跡上LeftClick 1Delay 1000VBSCall color0=GetPixelColor(x,y) //在滑鼠移動之前,獲取目標點色值並賦值給color0VBSCall Call SetCursorPos(x,y)@<stdlib.vbs> //馬上移動滑鼠到目標點VBSCall color=GetPixelColor(x,y) //獲取滑鼠移動後該點色值並賦值給color IfExpression color<>color0 //同一點取得的兩次色值比較,不同,則執行以下的打怪腳本 LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 限時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 限時 goSub 撿東西 //打怪延時 EndIf //該點判斷結束 Delay 10 //循環延時VBSCall Call SetCursorPos(x,y)@<stdlib.vbs>//回到原始設定的軌跡上LeftClick 1Delay 1000 return //////////////////////////////////// Sub 注冊用戶打怪///////////////////////////////////可以做成打怪子程序VBSCall color0=GetPixelColor(x,y) //在滑鼠移動之前,獲取目標點色值並賦值給color0VBSCall Call SetCursorPos(x,y)@<stdlib.vbs> //馬上移動滑鼠到目標點VBSCall color=GetPixelColor(x,y) //獲取滑鼠移動後該點色值並賦值給color IfExpression color<>color0 //同一點取得的兩次色值比較,不同,則執行以下的打怪腳本 LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 撿東西 EndIf //該點判斷結束 Delay 10 //循環延時///////////////////////////////////////////while dx>0VBSCall Call FindcenterColor(x-100,y+100,x+100,y-100,「0000BD」,dx,dy)@<stdlib.vbs>IfExpression dx>0 VBSCall Call SetCursorPos(dx,dy)@<stdlib.vbs> LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 撿東西 endifendfor/////////////////////////////////////////////vbs dx=1 ///////////////////////回到原始位置再次判斷VBSCall Call SetCursorPos(x,y)@<stdlib.vbs>//回到原始設定的軌跡上LeftClick 1Delay 1000VBSCall color0=GetPixelColor(x,y) //在滑鼠移動之前,獲取目標點色值並賦值給color0VBSCall Call SetCursorPos(x,y)@<stdlib.vbs> //馬上移動滑鼠到目標點VBSCall color=GetPixelColor(x,y) //獲取滑鼠移動後該點色值並賦值給color IfExpression color<>color0 //同一點取得的兩次色值比較,不同,則執行以下的打怪腳本 LeftClick 1 //左鍵單擊 goSub 損耗度低退出 gosub 技能 Delay 900 //打怪延時 RightClick 1 gosub 加血 Delay 900 //打怪延時 goSub 撿東西 gosub 技能 goSub 損耗度低退出 Delay 900 //打怪延時 gosub 加血 gosub 葯少退出 Delay 900 gosub 技能 goSub 血少退出 gosub 死後回城退出 Delay 500 goSub 撿東西 //打怪延時 EndIf //該點判斷結束 Delay 10 //循環延時VBSCall Call SetCursorPos(x,y)@<stdlib.vbs>//回到原始設定的軌跡上LeftClick 1Delay 1000 return[/replyview]

熱點內容
羅技g502宏吃雞腳本 發布:2024-11-22 04:02:33 瀏覽:291
dxp里如何編譯集成庫 發布:2024-11-22 03:40:42 瀏覽:503
php入門開發實戰 發布:2024-11-22 03:27:20 瀏覽:808
研究網路存儲 發布:2024-11-22 03:26:33 瀏覽:83
yumphp版本 發布:2024-11-22 03:21:39 瀏覽:744
記憶存儲味道 發布:2024-11-22 03:21:35 瀏覽:937
c語言ifelse語句 發布:2024-11-22 03:20:58 瀏覽:631
塞班安卓怎麼刷 發布:2024-11-22 03:16:43 瀏覽:289
青春密碼肌底液怎麼樣 發布:2024-11-22 03:03:59 瀏覽:977
php開發erp 發布:2024-11-22 03:00:24 瀏覽:421