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

感謝許多OP前輩提供各種素材，此腳本乃拾人牙慧彙整而得。
有鑑於改版後打字不易、各工會習慣用法不一、城戰還要研究巨集麻煩，提供陋作給需要的人參考。
主要特點在於將表情與文字合併於一個Macro中運作，可供彈性調整，減少鍵盤打字次數。
自己測試運作是沒問題，希望需要的各位也是；若有錯誤還望各位新進指教。

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


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

1. 
   
2. #編輯整理 By IRIS 暴力美學聯盟(Geffen)
   
3. #護貝機
   
4. 
   
5. automacro mac {
   
6.          console /\[(距離|dist)=(.*)\] (.*) \((\d+)\): \*(感謝)\*$/
   
7.          call {
   
8.          if ($.lastMatch2 < 3) goto help
   
9.          stop
   
10.          
    
11.          :help
    
12.          $i = $.lastMatch4
    
13.          $g = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players{$::playersID[$i]}->{guild}{name} : 'null')
    
14.          
    
15.          
    
16.          if ("$.lastMatch3" == "黑名單人物") goto stop
    
17.          #有需要可以自己填入人名擴充，太多可能會影響效率。
    
18.          #相對的改成goto ok，就可以沒工會使用。
    
19.          
    
20.          
    
21.          if ("$g" == "精靈．王道．風雲再起") goto ok
    
22.          if ("$g" == "[暴力美學聯盟皇家學院]") goto ok
    
23.          if ("$g" == "翻雲覆雨") goto ok
    
24.          stop
    
25.          
    
26.          :ok
    
27.                 if ($.lastMatch5 == "感謝") goto fist
    
28. 
    
29.          :fist
    
30.                 do sp 479 $.lastMatch4 10
    
31.                 pause 0.3
    
32.                 stop
    
33.          :stop
    
34.                 stop
    
35.          }
    
36. }
    
37. 
    
38. 
    
39. automacro pubmguild {
    
40.          console /\[(距離|dist)=(.*)\] (.*) \((\d+)\): (保|護)/
    
41.          call {
    
42.          $i = $.lastMatch4
    
43.          if ($.lastMatch2 > 2) goto stop
    
44.          $g = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players{$::playersID[$i]}->{guild}{name} : 'null')
    
45.          if ("$d" >  3 ) goto stop
    
46.          if ("$g" == "精靈．王道．風雲再起") goto ok
    
47.          if ("$g" == "[暴力美學聯盟皇家學院]") goto ok
    
48.          if ("$g" == "翻雲覆雨") goto ok
    
49.          stop
    
50.          
    
51.          :ok
    
52.                  if ($.lastMatch5 == "保") goto mac01
    
53.                  if ($.lastMatch5 == "護") goto mac01
    
54.                  stop
    
55. 
    
56.          :mac01
    
57.                 do sp 479 $i 10
    
58.                 pause 0.3
    
59.                 stop
    
60.         
    
61.         :stop
    
62.         stop
    
63.          }
    
64. }
    

複製代碼

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

1. 
   
2. #編輯整理 By IRIS 暴力美學聯盟(Geffen)
   
3. #傳送機
   
4. 
   
5. automacro mac {
   
6.          console /\[(距離|dist)=(.*)\] (.*) \((\d+)\): \*(流冷汗)\*$/
   
7.          exclusive 1
   
8.          call {
   
9.          if ($.lastMatch2 < 9) goto help
   
10.          stop
    
11.          
    
12.          :help
    
13.          $i = $.lastMatch4
    
14.          $g = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players{$::playersID[$i]}->{guild}{name} : 'null')
    
15.          
    
16.          
    
17.          if ("$.lastMatch3" == "黑名單人物") goto stop
    
18.          #有需要可以自己填入人名擴充，太多可能會影響效率。
    
19.          #相對的改成goto ok，就可以沒工會使用。
    
20.          
    
21.          
    
22.          if ("$g" == "精靈．王道．風雲再起") goto ok
    
23.          if ("$g" == "[暴力美學聯盟皇家學院]") goto ok
    
24.          if ("$g" == ":+:亂舞-ＳhowＴime:+") goto ok
    
25.          stop
    
26.          
    
27.          :ok
    
28.                 if ($.lastMatch5 == "流冷汗") goto fist
    
29. 
    
30.         :fist
    
31.                 do sp 34 $i 10
    
32.                 pause 1
    
33.                 do sp 29 $i 10
    
34.                 pause 1
    
35.                 do sp 2515 $i 5
    
36.                 pause 0.5
    
37.                 stop
    
38.                
    
39.         :stop
    
40.          stop
    
41.                
    
42.          }
    
43. }
    
44. 
    
45. 
    
46. automacro pubmguild {
    
47.          console /\[(距離|dist)=(.*)\] (.*) \((\d+)\): (鳥|套|中|斐)/
    
48.          exclusive 1
    
49.          call {
    
50.          $i = $.lastMatch4
    
51.          if ($.lastMatch2 > 9) goto stop
    
52.          $g = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players{$::playersID[$i]}->{guild}{name} : 'null')
    
53.          
    
54.          
    
55.          if ("$.lastMatch3" == "黑名單人物") goto stop
    
56.          #有需要可以自己填入人名擴充，太多可能會影響效率。
    
57.          #相對的改成goto ok，就可以沒工會使用。
    
58.          
    
59.          
    
60.          if ("$g" == "精靈．王道．風雲再起") goto ok
    
61.          if ("$g" == "[暴力美學聯盟皇家學院]") goto ok
    
62.          if ("$g" == ":+:亂舞-ＳhowＴime:+") goto ok
    
63.          stop
    
64.          
    
65.          :ok
    
66.                  if ($.lastMatch5 == "鳥") goto mac01
    
67.                  if ($.lastMatch5 == "套") goto mac02
    
68.                  if ($.lastMatch5 == "中") goto mac03
    
69.                  if ($.lastMatch5 == "斐") goto mac04
    
70.                  stop
    
71. 
    
72.          :mac01
    
73.                 $x = @arg("$.pos", 1)
    
74.                 $y = @arg("$.pos", 2)
    
75.                 $y2 = @eval($y + -1)
    
76.                 do sl 27 $x $y2
    
77.                 pause 2
    
78.                 do warp prontera
    
79.                 do c ↓租鳥↓
    
80.                 stop
    
81.                
    
82.         :mac02
    
83.                 do sp 361 $i 5
    
84.                 pause 1
    
85.                 stop
    
86.         
    
87.         :mac03
    
88.                 $x = @arg("$.pos", 1)
    
89.                 $y = @arg("$.pos", 2)
    
90.                 $x2 = @eval($x + -1)
    
91.                 do sl 27 $x2 $y
    
92.                 pause 2
    
93.                 do warp prt_gld
    
94.                 do c ←中55
    
95.                 stop
    
96.                
    
97.         :mac04
    
98.                 $x = @arg("$.pos", 1)
    
99.                 $y = @arg("$.pos", 2)
    
100.                 $x2 = @eval($x + 1)
     
101.                 do sl 27 $x2 $y
     
102.                 pause 2
     
103.                 do warp pay_gld
     
104.                 do c 紅樓→
     
105.                 stop
     
106.                
     
107.         :stop
     
108.         stop
     
109.          }
     
110. }
     

複製代碼

上面那個照著喊鳥中斐就會傳了?
所以只要修凱鳥中斐納幾個字就可以了?

To tmi7166：
可以這樣說，不過修改上字串相符地方都要改到，就是有兩個地方，應該不難理解。
修改時記得使用MadEdit等程式，用記事本修改完巨集也壞了。

--
*補充：不過巨集有寫入支援工會識別的部份，所以你也得把工會改成適用的，不然就是關閉工會識別，有需要在討論吧。

@@ 蟹蟹大大分享~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

大大   請問假如我要讓樂師放憂鬱也可適用嗎
我應該看的懂放技能部分
是要改SP XX 的部分就OK了嗎


順道問一下喔  現在我用7648板的巨集好像壞了跑不動
我是用之前熊大那板的巨集覆蓋過去的
開起以後會出現錯誤然後就關掉了
刪掉plugins資料夾後就又好了
你們的巨集是用哪種呢

好複雜不太懂xd 不知道有沒有中文版

To chia82：
原本的回覆好像被審核吃掉了，重新回一次。
sp後面接著的是技能編號，您可以自己做修改；$i 後面接著的是技能等級，也是自己修改。
如果您那邊巨集還是會有問題，我在上傳我手邊的完整程式囉。

To protege：
如果沒特地要改什麼，就直接貼上去就能用了。
比較需要修改的是傳送，看您哪邊不懂？有空的話可以幫您解說一下。

我現在的版本好像是7648吧
我用雄大以前那板的巨集他會出現錯誤無法執行
刪掉巨集的資料夾就又好了
可是我忘記更新到其中一個版本好像可以
(可是我現在找不到那個版本= =|||)

大大假如可以的話就麻煩你傳一下吧  感恩...

謝謝大大分享~!!!
我會好好使用
感謝大大嚕=口=