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

感謝許多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. }
     

複製代碼

不好意思我想請問一下
我想讓所有玩家，不論有無公會
只要做表情就能++，喊關鍵字就會傳送得話
要怎麼寫語法?

謝大大分享謝謝大大分享謝謝大大分享謝謝大大分享謝謝大大分享謝謝大大分享謝謝大大分享謝謝

正在到處學習怎麼寫巨集
參考一下怎麼寫XD

幫我們解釋這一切 真是一大福音 趕緊跟隨腳步使用

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

感謝大大提供~~~找不到最新版本還很擔心怎麼辦

謝謝大大分享~~~~~~~~~~~~~~~~~~

謝謝大大分享!!謝謝大大分享!!謝謝大大分享!!謝謝大大分享!!謝謝大大分享!!

常常失靈....
這帖是良藥阿~~!
謝謝分享