『城戰』全套、傳送、護貝機;表情打字皆可通用巨集。



有鑑於改版後打字不易、各工會習慣用法不一、城戰還要研究巨集麻煩,提供陋作給需要的人參考。
主要特點在於將表情與文字合併於一個Macro中運作,可供彈性調整,減少鍵盤打字次數。
自己測試運作是沒問題,希望需要的各位也是;若有錯誤還望各位新進指教。


注意事項:
1.每個巨集由兩個Automacro構成,由於不會合併,所以修改工會的時候「上下都需要修改」如果漏掉一邊,就會少一邊的功能。
2.黑名單功能選用,可以對付某些愛浪費護貝、娃娃機的人,相對的也可以開給某些人跳過工會識別的方便;建議不要加太多。
3.若需取消表情 or 文字任一功能,隨便弄個不會用到的字or表情即可。
4.傳送預設左右下三個方向,需上方請自己添加(y從+ -1 改成 + 1即可)。
5.可能得使用7639或者以上OpenKore版本才能正常運作。
6.多人使用下可能會有LAG延遲問題,自行斟酌修改。
7.修改巨集建議使用MadEdit等程式,胡亂修改可能會導致巨集無法運作。



▲護貝機預設表情為「感謝」,可參閱「ables\twRO\emotions.txt」進行修改。
▲護貝機預設文字為「保」or「護」,可以自行修改。


#編輯整理 By IRIS 暴力美學聯盟(Geffen)
#護貝機


automacro mac {
         console /\[(距離|dist)=(.*)\] (.*) \((\d+)\): \*(感謝)\*$/
         call {
         if ($.lastMatch2 < 3) goto help
         stop
        
         :help
         $i = $.lastMatch4
         $g = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players{$::playersID[$i]}->{guild}{name} : 'null')
        
        
         if ("$.lastMatch3" == "黑名單人物") goto stop
         #有需要可以自己填入人名擴充,太多可能會影響效率。
         #相對的改成goto ok,就可以沒工會使用。
        
        
         if ("$g" == "精靈.王道.風雲再起") goto ok
         if ("$g" == "[暴力美學聯盟皇家學院]") goto ok
         if ("$g" == "翻雲覆雨") goto ok
         stop
        
         :ok
                if ($.lastMatch5 == "感謝") goto fist


         :fist
                do sp 479 $.lastMatch4 10
                pause 0.3
                stop
         :stop
                stop
         }
}



automacro pubmguild {
         console /\[(距離|dist)=(.*)\] (.*) \((\d+)\): (保|護)/
         call {
         $i = $.lastMatch4
         if ($.lastMatch2 > 2) goto stop
         $g = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players{$::playersID[$i]}->{guild}{name} : 'null')
         if ("$d" >  3 ) goto stop
         if ("$g" == "精靈.王道.風雲再起") goto ok
         if ("$g" == "[暴力美學聯盟皇家學院]") goto ok
         if ("$g" == "翻雲覆雨") goto ok
         stop
        
         :ok
                 if ($.lastMatch5 == "保") goto mac01
                 if ($.lastMatch5 == "護") goto mac01
                 stop


         :mac01
                do sp 479 $i 10
                pause 0.3
                stop
       
        :stop
        stop
         }
}


 



▲傳送機預設全套表情為「流冷汗」施放技能依序為天賜、加速、聖典,可自行修改。
▲傳送機預設傳點請自行添加適用傳點,需喊話全套也可複製上方「:fist」的文字取代「:mac0X」做修改。
▲此巨集僅供參考,實際使用需因工會適宜,請自行修正。


 


#編輯整理 By IRIS 暴力美學聯盟(Geffen)
#傳送機


automacro mac {
         console /\[(距離|dist)=(.*)\] (.*) \((\d+)\): \*(流冷汗)\*$/
         exclusive 1
         call {
         if ($.lastMatch2 < 9) goto help
         stop
        
         :help
         $i = $.lastMatch4
         $g = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players{$::playersID[$i]}->{guild}{name} : 'null')
        
        
         if ("$.lastMatch3" == "黑名單人物") goto stop
         #有需要可以自己填入人名擴充,太多可能會影響效率。
         #相對的改成goto ok,就可以沒工會使用。
        
        
         if ("$g" == "精靈.王道.風雲再起") goto ok
         if ("$g" == "[暴力美學聯盟皇家學院]") goto ok
         if ("$g" == ":+:亂舞-ShowTime:+") goto ok
         stop
        
         :ok
                if ($.lastMatch5 == "流冷汗") goto fist


        :fist
                do sp 34 $i 10
                pause 1
                do sp 29 $i 10
                pause 1
                do sp 2515 $i 5
                pause 0.5
                stop
               
        :stop
         stop
               
         }
}



automacro pubmguild {
         console /\[(距離|dist)=(.*)\] (.*) \((\d+)\): (鳥|套|中|斐)/
         exclusive 1
         call {
         $i = $.lastMatch4
         if ($.lastMatch2 > 9) goto stop
         $g = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players{$::playersID[$i]}->{guild}{name} : 'null')
        
        
         if ("$.lastMatch3" == "黑名單人物") goto stop
         #有需要可以自己填入人名擴充,太多可能會影響效率。
         #相對的改成goto ok,就可以沒工會使用。
        
        
         if ("$g" == "精靈.王道.風雲再起") goto ok
         if ("$g" == "[暴力美學聯盟皇家學院]") goto ok
         if ("$g" == ":+:亂舞-ShowTime:+") goto ok
         stop
        
         :ok
                 if ($.lastMatch5 == "鳥") goto mac01
                 if ($.lastMatch5 == "套") goto mac02
                 if ($.lastMatch5 == "中") goto mac03
                 if ($.lastMatch5 == "斐") goto mac04
                 stop


         :mac01
                $x = @arg("$.pos", 1)
                $y = @arg("$.pos", 2)
                $y2 = @eval($y + -1)
                do sl 27 $x $y2
                pause 2
                do warp prontera
                do c ↓租鳥↓
                stop
               
        :mac02
                do sp 361 $i 5
                pause 1
                stop
       
        :mac03
                $x = @arg("$.pos", 1)
                $y = @arg("$.pos", 2)
                $x2 = @eval($x + -1)
                do sl 27 $x2 $y
                pause 2
                do warp prt_gld
                do c ←中55
                stop
               
        :mac04
                $x = @arg("$.pos", 1)
                $y = @arg("$.pos", 2)
                $x2 = @eval($x + 1)
                do sl 27 $x2 $y
                pause 2
                do warp pay_gld
                do c 紅樓→
                stop
               
        :stop
        stop
         }
}


 

arrow
arrow
    全站熱搜

    aaa1314 發表在 痞客邦 留言(2) 人氣()