[原創] #6仙魔道腳本終極版全職可法師樂了0319增防拖怪噹噹補紅選項控制

711層

adaada21 2008-3-31 22:31:40

//打坐回紅或是回藍，採用選單合併式
//補紅藍改用選單式
//快速反擊 //環境 1024*768 全螢幕
//按鍵1 普攻擊
//按鍵234578都是技能
//按鍵9.0加持技能
//F7放鈴鐺自己職業的武器放在F4 F5 F6 相對位置會自動補
//自動仙魔化
//F1 補紅 F2 補藍
//遊戲預設F9 休息
//遊戲預設TAB 尋怪
//延遲找怪物，有選單可設定開啟或關閉
UserVar jobKey=DropList{劍客:115|槍手:116|拿馬尾:117|拿鈴鐺:118}=0 主角的職業，點擊下拉切換
UserVar reserveMp=DropList{不保留藍:0|保留藍15啪:15|保留藍23啪:23|保留藍33啪:33|保留藍50啪:46|保留藍70啪:67|保留藍85啪:84}=7 藍高於N趴時才技能攻擊
UserVar noteam=1 1拒組隊  0看看再說
UserVar sdp=DropList{不打坐:0|紅50啪打坐回紅:50|藍50啪打坐回藍:150|紅33啪打坐回紅:33|紅70啪打坐回紅:70|紅80啪打坐回紅:80|藍33啪打坐回藍:133|藍70啪打坐回藍:170|藍80啪打坐回藍:180}=2 打坐回紅藍模式選擇，點擊下拉切換
UserVar addhp=DropList{不補紅:0|紅低於20啪補紅:20|紅低於25啪補紅:25|紅低於33啪補紅:33|紅低於50啪補紅:46|紅低於70啪補紅:67|紅低於85啪補紅:84}=2 補紅模式選擇，點擊下拉切換
UserVar addmp=DropList{不補藍:0|藍低於15啪補藍:15|藍低於23啪補藍:23|藍低於33啪補藍:33|藍低於50啪補藍:46|藍低於70啪補藍:67|藍低於85啪補藍:84}=1 補藍模式選擇，點擊下拉切換
UserVar slowMotion=DropList{不延遲尋怪:0|稍微延遲尋怪:1000|有心延遲尋怪:1800|努力延遲尋怪:2500|原地發呆等怪來:4000}=1 避免打怪太猛，被發現是外掛，延遲尋怪
UserVar key2=DropList{停用按鍵2:0|鍵2每3秒放技:3|鍵2每5秒放技:5|鍵2每7秒放技:7|鍵2每9秒放技:9|鍵2每2秒放技:2}=1 數字2技能施放
UserVar key3=DropList{停用按鍵3:0|鍵3每3秒放技:3|鍵3每5秒放技:5|鍵3每7秒放技:7|鍵3每9秒放技:9|鍵3每2秒放技:2}=2 數字3技能施放
UserVar key4=DropList{停用按鍵4:0|鍵4每3秒放技:3|鍵4每5秒放技:5|鍵4每7秒放技:7|鍵4每9秒放技:9|鍵4每2秒放技:2}=1 數字4技能施放
UserVar key5=DropList{停用按鍵5:0|鍵5每3秒放技:3|鍵5每5秒放技:5|鍵5每7秒放技:7|鍵5每9秒放技:9|鍵5每2秒放技:2}=0 數字5技能施放
UserVar key7=DropList{停用按鍵7:0|鍵7每3秒放技:3|鍵7每5秒放技:5|鍵7每7秒放技:7|鍵7每9秒放技:9|鍵7每2秒放技:2}=1 數字7技能施放
UserVar buff8T=0 按鍵數字9加持技能每幾秒 0表示不加持
UserVar buff9T=0 按鍵數字9加持技能每幾秒 0表示不加持
UserVar buff0T=0 按鍵數字0加持技能每幾秒 0表示不加持
UserVar redius=80 畫圓半徑不可為零
VBS Dim addhpT,addmpT
VBS Dim chpColor,cmpColor,mhpColor,chplx,chpnx,chprx,chpy,mhplx,mhpnx,mhprx,mhpy,cmpy,cmplx,cmpnx,cmprx,chpnxc,cmpnxc
VBS Dim hpSupply,mpSupply,temp,waitForMe
VBS Dim ztjnt,ztjn,aniSki3,keyF2,bour,rota,sk1,sk2,sk3,sk4,sk5,sk7,sk8,sk9,sk0,buff9T,buff0T,buff8T
Delay 1000
rota=now
KeyPress 84,1
ztjn=now
ztjnt=30
addhpT=500
addmpT=500
waitForMe=100
chpColor="2610E0"
cmpColor="EB8400"
mhpColor="07008C"
chplx=11
chprx=148
chpnx=72
chpy=34
mhplx=397
mhprx=626
mhpnx=497
mhpy=41
cmplx=11
cmprx=148
cmpnx=72
cmpy=50
Gosub 打坐模式
Rem 開始掛機
Rem 0
Gosub 銅鈴補紅
Gosub 認真打坐
Rem 滿血
Gosub 加持技能sk8
Gosub 加持技能sk9
Gosub 加持技能sk0
Gosub 狀態技能
Rem 1
Gosub 尋怪
Rem 2
Gosub 判斷攻擊方式
Rem 3
Gosub 確認無他怪
Rem 4
//Gosub 確認無怪完畢
//Gosub 揀物
Gosub 慢點找怪
Goto 開始掛機
Sub 慢點找怪
If slowMotion<>0
      waitForMe=waitForMe+150
      waitForMe=waitForMe mod slowMotion
      Delay waitForMe
EndIf
Return
Sub 打坐模式
If sdp=33
      chpnxc=59
      cmpnxc=0
ElseIf sdp=50
      chpnxc=74
      cmpnxc=0
ElseIf sdp=70
      chpnxc=103
      cmpnxc=0
ElseIf sdp=80
      chpnxc=125
      cmpnxc=0
ElseIf sdp=133
      chpnxc=0
      cmpnxc=59
ElseIf sdp=150
      chpnxc=0
      cmpnxc=74
ElseIf sdp=170
      chpnxc=0
      cmpnxc=103
ElseIf sdp=180
      chpnxc=0
      cmpnxc=125
Else
      chpnxc=0
      cmpnxc=0
Return
Sub 認真打坐
      If chpnxc<>0
         Gosub 打坐遇怪反擊
         IfColor chpnxc,chpy,chpColor,1
            Delay 100
            KeyPress 120,1
            Delay 1000
            Rem sitre
            Delay 200
            Gosub 打坐遇怪反擊
            IfColor chprx,chpy,chpColor,0
                  Delay 32
                  KeyPress 83,1
                  Delay 50
                  Goto 滿血
            EndIf
            Delay 500
            Goto sitre
         Else
            Delay 32
         EndIf
      EndIf
      If cmpnxc<>0
         Gosub 打坐遇怪反擊
         IfColor cmpnxc,cmpy,cmpColor,1
            Delay 100
            KeyPress 120,1
            Delay 1000
            Rem ohMyGod
            Delay 200
            Gosub 打坐遇怪反擊
            IfColor cmprx,cmpy,cmpColor,0
                  Delay 32
                  KeyPress 83,1
                  Delay 50
                  Goto 滿血
            EndIf
            Delay 500
            Goto ohMyGod
         Else
            Delay 32
         EndIf
      EndIf
Return
Sub 打坐遇怪反擊
      IfColor mhplx,mhpy,mhpColor,0
         KeyPress 83,1
         Delay 50
         Gosub 用力攻擊
      EndIf
Return
Sub 尋怪
      IfColor mhplx,mhpy,mhpColor,0
         Delay 32
         IfColor mhprx,mhpy,mhpColor,1
            KeyPress 9,1
         EndIf
         Goto 2
      Else
         Delay 32
         If noteam=1
            KeyPress 27,1
            Delay 300
         EndIf
         KeyPress 9,1
         Delay 200
      EndIf
Return
Sub 判斷攻擊方式
      IfColor mhprx,mhpy,mhpColor,0
         Delay 100
         Gosub 用力攻擊
      Else
         Delay 450
         Goto 1
      EndIf
Return
Sub 確認無他怪
      IfColor mhplx,mhpy,mhpColor,0
         Gosub 用力攻擊
      EndIf
      Gosub 畫圓S
      Gosub 銅鈴補紅
      Goto 4
EndIf
Return
Sub 確認無怪完畢
Gosub 畫圓S
Return
Sub 防呆裝置
If DateDiff("s",bour,Now) >25
      Delay 32
      IfColor mhprx,mhpy,mhpColor,0
         KeyDown 83,1
         Delay 300
         KeyUp 83,1
         KeyDown 65,1
         Delay 250
         KeyUp 65,1
         KeyPress 9,1
         Delay 200
         Goto 2
      EndIf
EndIf
Return
Sub 畫圓S
Delay 400
r=30:x0=512:y0=384:x=0:y=0:n=0
While n<3.1415926*2
      //
      r=r+30
      r=r mod redius
      //
      x=x0+r*cos(n)
      y=y0-r*sin(n)
      MoveTo x y
      Delay 5
      VBSCall shape=GetCursorShape(0)
      If shape = (389492009)
         Delay 2
         LeftClick 1
         Gosub 判斷攻擊方式
         //Goto 2
      EndIf
      //  n=n+0.05
      n=n+0.06
EndWhile
Return 畫圓

回覆

使用道具舉報

abc761120 該用戶已被刪除	712層 abc761120 2008-3-31 23:04:27 提示: 作者被禁止或刪除內容自動屏蔽
abc761120 該用戶已被刪除
	回覆使用道具舉報

a6221924 該用戶已被刪除	713層 a6221924 2008-4-1 01:13:25 提示: 作者被禁止或刪除內容自動屏蔽
a6221924 該用戶已被刪除
	回覆使用道具舉報

joedayandnight 該用戶已被刪除	714層 joedayandnight 2008-4-1 01:36:39 提示: 作者被禁止或刪除內容自動屏蔽
joedayandnight 該用戶已被刪除
	回覆使用道具舉報

715層

DXCI2213 2008-4-1 02:12:45

回覆 1# 的文章

大大你好帥~~
分享的真是時候!!

回覆

使用道具舉報

a033384661 該用戶已被刪除	716層 a033384661 2008-4-1 02:57:38 提示: 作者被禁止或刪除內容自動屏蔽
a033384661 該用戶已被刪除
	回覆使用道具舉報

24362299 該用戶已被刪除	717層 24362299 2008-4-1 03:27:02 提示: 作者被禁止或刪除內容自動屏蔽
24362299 該用戶已被刪除
	回覆使用道具舉報