聊天室收購,內含有一些心得不喜勿入

首先...先發表心得 and 自我介紹一下
看到大家無私的分享Macro 我真的很開心 撿到好多傑作 訥麼 我也發表我的傑作吧^^

在下是 天波,魔波,波王 的CoCo
ps.麻將大軍就是我的傑作之一...
因該不少人有印象...
回到正題...

測試結果是無人 成功 歡迎挑戰...
不過首先要你看的懂我發的簡易版...
不過以防萬一 錢還是別放太多 [損失我不賠的]

密語請關閉喔 這是以防小偷.


嗯...不過癮對吧...看狀況 我我考慮貼出 進階版
最強的功能能達到...
跑馬燈收物 + 收數量型物品(如:白水,材料) + 自動存倉(需配合其他文件)
+ 收抽獎用卡片!!!(還排除npc不收的喔) + 自動招呼客人 + 記錄下所有交易狀況(log資料夾)
+ 隨時可觀看收了多少

雖然Macro我寫的也許不是很理想 也留下開發中的注解
但是應該是使用無問題喔^^

再說一次 老子最看不起盜文去賣的人 別人的輔助 給你用已經不錯 拿去賣很無恥
下次考慮開發中的所有macro輔助 偵測廣播內容含有賣掛的 密爆他

完整版狀況

1. automacro asw {
   
2.         console /您現在已在遊戲中/
   
3.         call {
   
4.   if ($online = 1) goto out
   
5.   $online = 1
   
6.   pause 1
   
7.   call start
   
8.   pause 1
   
9.   stop
   
10. :out
    
11. do quit
    
12. }
    
13. }
    
14. 
    
15. macro start {
    
16. $P1 = 10
    
17. #收濃神
    
18. $P2 = 10
    
19. #收濃鋁
    
20. 
    
21. $no = 0
    
22. #交易次數
    
23. $dealout = 0
    
24. #亂小次數
    
25. 
    
26. do chat create "準備中..." 2 0 @eval($x - @rand(1000,9999))
    
27. call start1
    
28. }
    
29. 
    
30. 
    
31. 
    
32. macro start1 {
    
33. log $dealout亂/$no次(神$P1 鋁$P2)
    
34. pause 1
    
35. do chat modify "交易$no次 搗蛋失敗$dealout次" 2 0 @eval($x - @rand(1000,9999))
    
36. log "交易$no次 搗蛋失敗$dealout次"
    
37. pause 1
    
38. 
    
39. do chat modify "收濃神($P1箱)" 2 0 @eval($x - @rand(1000,9999))
    
40. log "收濃神($P1箱)"
    
41. pause 1
    
42. do chat modify "收濃鋁($P2箱)" 2 0 @eval($x - @rand(1000,9999))
    
43. log "收濃鋁($P2箱)"
    
44. pause 1
    
45. 
    
46. call start1
    
47. }
    
48. 
    
49. 
    
50. automacro b {
    
51.         console /(.*) ((.*)) 向您要求一個交易/  
    
52. run-once 1
    
53.         call {
    
54.   $dealco = 0
    
55.   $no = @eval($no + 1)
    
56.   do conf logConsole 1
    
57.   pause 1
    
58.                 do deal
    
59.                 pause 15
    
60.   #15秒內不動作取消交易
    
61.   log 來亂的人
    
62.   $dealout = @eval($dealout + 1)
    
63.                 do deal no
    
64.                 stop
    
65.         }
    
66. }
    
67. 
    
68. 
    
69. 
    
70. automacro Deal1 {
    
71.              console /[deal](.*)加入物品以交易: 濃縮神之金屬箱子 x 1/
    
72.              call {   
    
73.   if ($P1 = 0) goto stop1
    
74.      $asd = 1
    
75.      $dealco = @eval($dealco + 4400000)
    
76.                    #do deal add z 5500000
    
77.      #pause 1
    
78.                    #do deal
    
79.   call Deal15no
    
80.   stop
    
81. :stop1
    
82. do deal no
    
83. call start1
    
84. stop
    
85.                    }
    
86. }
    
87. automacro Deal2 {
    
88.              console /[deal](.*)加入物品以交易: 濃縮鋁箱子 x 1/
    
89.              call {
    
90.   if ($P2 = 0) goto stop2
    
91.      $asd = 1
    
92.      $dealco = @eval($dealco + 4800000)
    
93.                    #do deal add z 6000000
    
94.      #pause 1
    
95.                    #do deal
    
96.   call Deal15no
    
97.   stop
    
98. :stop2
    
99. do deal no
    
100. call start1
     
101. stop
     
102.                    }
     
103. }
     
104. 
     
105. 
     
106. 
     
107. automacro Dealok1 {
     
108.              console /[drop] 物品已加入背包: 濃縮神之金屬箱子(.*)x(.*)-(.*)/
     
109.              call {
     
110.   $P1 = @eval($P1 - $.lastMatch2)
     
111.   release all
     
112.   do conf logConsole 0
     
113.   call start1
     
114.       }
     
115. }
     
116. 
     
117. automacro Dealok2 {
     
118.              console /[drop] 物品已加入背包: 濃縮鋁箱子(.*)x(.*)-(.*)/
     
119.              call {
     
120.   $P2 = @eval($P2 - $.lastMatch2)
     
121.   release all
     
122.   do conf logConsole 0
     
123.   call start1
     
124.       }
     
125. }
     
126. 
     
127. 
     
128. 
     
129. ##以下不用調整 ==============================================
     
130. automacro FinDeal {
     
131.              console /[deal](.*)完成了本交易/
     
132.       run-once 1
     
133.              call {
     
134.   if ($asd = 1) goto asa
     
135.   pause 2
     
136.   do deal no
     
137.   do conf logConsole 0
     
138.   release all
     
139.   stop
     
140. :asa
     
141.      $asd = 0
     
142.      do deal add z $dealco
     
143.      $dealco = 0
     
144.      do deal
     
145.      pause 1
     
146.      do deal
     
147.      pause 15
     
148.      log 來亂的人
     
149.      $dealout = @eval($dealout + 1)
     
150.      do deal no
     
151. stop
     
152.                    }
     
153. }
     
154. 
     
155. macro Deal15no {
     
156.                 pause 10
     
157. 
     
158.   if ($asd = 1) goto asa
     
159.   pause 2
     
160.   do deal no
     
161.   do conf logConsole 0
     
162.   release all
     
163.   stop
     
164. :asa
     
165.      $asd = 0
     
166.      do deal add z $dealco
     
167.      $dealco = 0
     
168.      do deal
     
169.      pause 1
     
170.      do deal
     
171.      pause 15
     
172.      log 來亂的人
     
173.      $dealout = @eval($dealout + 1)
     
174.      do deal no
     
175. }
     
176. 
     
177. automacro Dealno {
     
178.              console /(.*)交易已取消/
     
179.       run-once 1
     
180.              call {
     
181.   $asd = 0
     
182.   do deal no
     
183.   do conf logConsole 0
     
184.   release all
     
185.   call start1
     
186.       }
     
187. }
     
188. 
     
189. automacro Dealok {
     
190.              console /(.*)交易完成/
     
191.       run-once 1
     
192.              call {
     
193.   do conf logConsole 0
     
194.   call start1
     
195.       }
     
196. }

複製代碼

免費贈送
automacro bug1 {
    console /[schat] [系統] '(.*)'?生/小姐的呼叫 :(.*)賣輔助(.*)/
    call bugout
}
automacro bug2 {
    console /[schat] [系統] '(.*)'?生/小姐的呼叫 :(.*)賣黑窗(.*)/
    call bugout
}
automacro bug3 {
    console /[schat] [系統] '(.*)'?生/小姐的呼叫 :(.*)賣小黑(.*)/
    call bugout
}
automacro bug4 {
    console /[schat] [系統] '(.*)'?生/小姐的呼叫 :(.*)賣迷之程式(.*)/
    call bugout
}
macro bugout {
    do pm $.lastMatch1 安安 多少錢?
    pause 3
    do pm $.lastMatch1 冥紙收嗎?
    pause 1
    do pm $.lastMatch1 你知道你賣輔助已經違反著作權法 以及 遊戲規章嗎?
}

德州炸魚大大你好,你的巨集我剛開始不能用,後來把[deal]刪掉就可以用了,不然發生一個問題,會被廣播打字洗錢,還好發現得早才被洗掉1億,請問廣播洗錢要如何避免呢?謝謝大大你的分享

回復 1# 德州炸魚


    會寫巨集的大大我都覺得很了不起阿XD
像小弟不知道研究幾年了還時研究不出個所以然來