新学lua，打坐吐纳，欢迎拍砖

tianheng

1. local info = {}
   
2. 
   
3. info.job = "tn" -- or tn
   
4. info.job0 = nil --保存工作状态
   
5. info.double = false --是否双倍内力
   
6. info.eforce = 10 --有效内功的十分之一
   
7. info.qx = 0 --气血
   
8. info.qxmax = 0
   
9. info.js = 0
   
10. info.jsmax = 0
    
11. info.jl = 0
    
12. info.jlmax = 0
    
13. info.nl = 0
    
14. info.nlmax = 0
    
15. info.food = "ganliang"
    
16. info.water = "jiudai"
    
17. info.sleep_to = ""
    
18. info.sleep_back = ""
    
19. 
    
20. function test(name, line, wildcards)
    
21. print("name:" .. name);
    
22. print("line:" .. line);
    
23. for i, v in ipairs(wildcards) do
    
24. print("wcs[" .. i .. "]:" .. v);
    
25. end
    
26. end
    
27. 
    
28. function gethp(name, line, wildcards)
    
29. SetVariable ( "exp" , wildcards[1] );
    
30. SetVariable ( "pot" , wildcards[2] );
    
31. SetVariable ( "nlmax" , wildcards[3] );
    
32. SetVariable ( "nl" , wildcards[4] );
    
33. SetVariable ( "jlmax" , wildcards[5] );
    
34. SetVariable ( "jl" , wildcards[6] );
    
35. SetVariable ( "qxmax" , wildcards[8] );
    
36. SetVariable ( "qx" , wildcards[9] );
    
37. SetVariable ( "jsmax" , wildcards[11] );
    
38. SetVariable ( "js" , wildcards[12] );
    
39. end
    
40. 
    
41. function info_init()
    
42. info.qx = tonumber (GetVariable ("qx"))
    
43. info.qxmax = tonumber (GetVariable ("qxmax"))
    
44. info.js = tonumber (GetVariable ("js"))
    
45. info.jsmax = tonumber (GetVariable ("jsmax"))
    
46. info.jl = tonumber (GetVariable ("jl"))
    
47. info.jlmax = tonumber (GetVariable ("jlmax"))
    
48. info.nl = tonumber (GetVariable ("nl"))
    
49. info.nlmax = tonumber (GetVariable ("nlmax"))
    
50. info.enforce = tonumber (GetVariable ("enforce"))
    
51. info.job = GetVariable ("job")
    
52. if info.job == nil then
    
53. SetVariable ("job", "dz")
    
54. info.job = "dz"
    
55. end
    
56. end
    
57. 
    
58. function check(name, line, wildcards)
    
59. if wildcards[1] == "正" then
    
60. --DoAfterSpecial (1, 'SendNoEcho("checkbusy")', 12)
    
61. AddTimer ("my_timer", 0, 0, 1, "", 1 + 4 + 1024 + 16384, "busy")
    
62. end
    
63. if wildcards[1] == "不" then
    
64. Send("hpbrief")
    
65. Send("set job on")
    
66. end
    
67. end
    
68. 
    
69. function dojob(name, line, wildcards)
    
70. AddTimer ("my_timer_fadai", 0, 8, 30, "", 1 + 4 + 1024 + 16384, "busy")
    
71. Send("eat " .. info.food)
    
72. Send("drink " .. info.water)
    
73. if info.job == 'dz' then
    
74. dz()
    
75. end
    
76. if info.job == 'tn' then
    
77. tn()
    
78. end
    
79. end
    
80. 
    
81. function dz()
    
82. info_init()
    
83. 
    
84. if info.nl < 100 then
    
85. print("内力不够啊，等待30秒恢复")
    
86. --DoAfterSpecial (30, 'SendNoEcho("checkbusy")', 12)
    
87. AddTimer ("my_timer", 0, 0, 30, "", 1 + 4 + 1024 + 16384, "busy")
    
88. return
    
89. end
    
90. 
    
91. local diff = 2 * info.nlmax - info.nl + 1
    
92. diff = (info.nlmax < 1000) and math.ceil(diff/2) or diff
    
93. 
    
94. if info.double then
    
95. if diff <= info.qx then
    
96. local _diff = (info.nlmax < 1000) and diff*2 or diff
    
97. print("_diff:" .. _diff)
    
98. if _diff + info.nl > info.nlmax * 2 then
    
99. info.job = info.job0
    
100. info.job0 = nil
     
101. info.double = nil
     
102. print("双倍内力恢复完成，继续未完成的工作:" .. info.job)
     
103. SendNoEcho("checkbusy")
     
104. return
     
105. end
     
106. end
     
107. end
     
108. 
     
109. if info.js < info.jsmax * 0.6 then
     
110. print("精神不佳啊，恢复（exert regenerate）")
     
111. --Send("exert regenerate")
     
112. --DoAfterSpecial (15, 'SendNoEcho("checkbusy")', 12)
     
113. AddTimer ("my_timer", 0, 0, 15, "", 1 + 4 + 1024 + 16384, "busy")
     
114. return
     
115. end
     
116. 
     
117. if info.qx < info.qxmax * 0.3 then
     
118. print("气血不佳啊，恢复（exert recover）")
     
119. --Send("exert recover")
     
120. --DoAfterSpecial (15, 'SendNoEcho("checkbusy")', 12)
     
121. AddTimer ("my_timer", 0, 0, 15, "", 1 + 4 + 1024 + 16384, "busy")
     
122. return
     
123. end
     
124. 
     
125. diff = (diff > info.qx * 0.8) and (math.floor((info.qx / info.enforce) / 2) * info.enforce) or diff
     
126. 
     
127. diff = (diff < 10) and 10 or diff
     
128. 
     
129. Send("dazuo " .. diff)
     
130. SendNoEcho("checkbusy")
     
131. 
     
132. end
     
133. 
     
134. function tn()
     
135. info_init()
     
136. 
     
137. if info.nl < 100 then
     
138. print("内力不够啊，等待30秒恢复")
     
139. info.job0 = info.job
     
140. info.job = "dz"
     
141. info.double = true
     
142. --DoAfterSpecial (30, 'SendNoEcho("checkbusy")', 12)
     
143. AddTimer ("my_timer", 0, 0, 30, "", 1 + 4 + 1024 + 16384, "busy")
     
144. return
     
145. end
     
146. 
     
147. local diff = 2 * info.jlmax - info.jl + 1
     
148. diff = (info.jlmax < 1000) and math.ceil(diff/2) or diff
     
149. 
     
150. if info.qx < info.qxmax * 0.6 then
     
151. print("气血不佳啊，恢复（exert recover）")
     
152. --Send("exert recover")
     
153. --DoAfterSpecial (15, 'SendNoEcho("checkbusy")', 12)
     
154. AddTimer ("my_timer", 0, 0, 15, "", 1 + 4 + 1024 + 16384, "busy")
     
155. return
     
156. end
     
157. 
     
158. if info.js < info.jsmax * 0.3 then
     
159. print("精神不佳啊，恢复（exert regenerate）")
     
160. Send("exert regenerate")
     
161. --DoAfterSpecial (1, 'SendNoEcho("checkbusy")', 12)
     
162. AddTimer ("my_timer", 0, 0, 1, "", 1 + 4 + 1024 + 16384, "busy")
     
163. return
     
164. end
     
165. 
     
166. diff = (diff > info.js * 0.8) and (math.floor((info.js / info.enforce) / 2) * info.enforce) or diff
     
167. 
     
168. diff = (diff < 10) and 10 or diff
     
169. 
     
170. Send("tuna " .. diff)
     
171. SendNoEcho("checkbusy")
     
172. 
     
173. end
     
174. 
     
175. function busy()
     
176. SendNoEcho("checkbusy")
     
177. end
     
178. 
     
179. function start()
     
180. EnableTriggerGroup ("dztn", true)
     
181. Send("checkbusy")
     
182. end
     
183. 
     
184. function stop()
     
185. DeleteTimer("my_timer")
     
186. DeleteTimer("my_timer_fadai")
     
187. EnableTriggerGroup ("dztn", false)
     
188. end

复制代码

北大侠客行MUD，中国最好的MUD

tianheng

使用起来很简单啊

npckill

zyj