Advertisement
Guest User

Untitled

a guest
Jul 27th, 2017
59
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.19 KB | None | 0 0
  1. on *:text:!setCall*:#: {
  2. /set %nick $nick
  3. if (%color == 12(BLUE)) {
  4. /msg #****** 14Caller Bot: 4xX $+ 6{} $+ 12Xx 2 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 2 World:  4xX $+ 6{} $+ 12Xx 2 w $+ %World1  4xX $+ 6{} $+ 12Xx 2 Set by: 7 %nick $+ , Just Now 
  5. /msg # 14Caller Bot: 4xX $+ 6{} $+ 12Xx 2 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 2 World:  4xX $+ 6{} $+ 12Xx 2 w $+ %World1  4xX $+ 6{} $+ 12Xx 2 Set by: 7 %nick $+ , Just Now 
  6. }
  7. if (%color == 4(RED)) {
  8. /msg # 14Caller Bot: 4xX $+ 6{} $+ 12Xx 5 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 5 World:  4xX $+ 6{} $+ 12Xx 5 w $+ %World1  4xX $+ 6{} $+ 12Xx 5 Set by: 7 %nick $+ , Just Now 
  9. /msg #****** 14Caller Bot: 4xX $+ 6{} $+ 12Xx 5 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 5 World:  4xX $+ 6{} $+ 12Xx 5 w $+ %World1  4xX $+ 6{} $+ 12Xx 5 Set by: 7 %nick $+ , Just Now 
  10. }
  11. /set %time.start $ctime
  12. /set %record.start $ctime
  13. /timerreminder 1 %timer.avg /cs yo
  14. }
  15. Else /msg # 3 $nick fails, and unwisely slapped me, or a friend...so... i forbid you from calling. =D Have a good day now ^_^ 
  16. if ($nick == %fail) {
  17. /set %fail $null
  18. }
  19. if ($nick == %fail1) {
  20. /set %fail1 $null
  21. }
  22. if ($nick == %fail2) {
  23. /set %fail2 $null
  24. }
  25. if ($nick == %fail3) {
  26. /set %fail3 $null
  27. }
  28. if ($nick == %fail4) {
  29. /set %fail4 $null
  30. }
  31. }
  32. ctcp *:halt: {
  33. /timerreminder off
  34. /notice $nick 10Reminder Halted.
  35. }
  36. on *:notice:*Yo*:*: {
  37. /msg # 2========== 4{{{ Time To Call My Friends 4}}} 2==========
  38. }
  39. on *:text:!settime*:#: {
  40. /set %reminder.origin $2
  41. /set %time.begin $ctime
  42. /msg # 14The Timer Command Has Been Updated, Type !time To See Time Remaning At Any Time.
  43. }
  44. on *:text:!time:# {
  45. /set %time.final $ctime
  46. /set %time.elapsed $calc(%time.final - %time.begin)
  47. /set %Raw.time $calc(1410 - %time.elapsed)
  48. /set %Call.time $calc(%reminder.origin * 60)
  49. /set %Game.time $calc(%Call.time + %Raw.time)
  50. if (%game.time > 1410) {
  51. /set %game.time $calc(%game.time - 1410)
  52. }
  53. if (%game.time < 0) && (%game.time > -1410) {
  54. /set %Raw.time $calc(2820 - %time.elapsed)
  55. /set %Game.time $calc(%Raw.time + %call.time)
  56. if (%game.time > 1410) {
  57. /set %game.time $calc(%game.time - 1410)
  58. }
  59. }
  60. if (%game.time < -1410) && (%game.time > -2820) {
  61. /set %Raw.time $calc(4230 - %time.elapsed)
  62. /set %Game.time $calc(%Raw.time + %call.time)
  63. if (%game.time > 1410) {
  64. /set %game.time $calc(%game.time - 1410)
  65. }
  66. }
  67. if (%game.time < -2820) && (%game.time > -4230) {
  68. /set %Raw.time $calc(5640 - %time.elapsed)
  69. /set %Game.time $calc(%Raw.time + %call.time)
  70. if (%game.time > 1410) {
  71. /set %game.time $calc(%game.time - 1410)
  72. }
  73. }
  74. /set %call Yes
  75. if (%game.time > 1230) {
  76. /set %game.time $calc(%game.time - 1230)
  77. /set %call Room
  78. }
  79. if (%game.time < -4230) {
  80. /set %Call No
  81. }
  82. if (%Call == No) {
  83. /notice $nick Time has not been set in a while, timer too inaccurate at the moment. Please set by doing "!settime ?" please ^_^
  84. }
  85. if (%call == Yes) {
  86. /notice $nick 7There is approximatly $duration(%game.time) In Game.
  87. }
  88. if (%call == Room) {
  89. /notice $nick 7There is approximatly $duration(%game.time) Untill Next Game.
  90. }
  91. }
  92. on 1:text:-SwCall:#: {
  93. if ( $nick != %fail ) {
  94. set %time.end $ctime
  95. set %time.elapsed $calc(%time.end - %time.start)
  96. if (%color == 12(BLUE)) /notice $nick 14Caller Bot: 4xX $+ 6{} $+ 12Xx 2 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 2 World:  4xX $+ 6{} $+ 12Xx 2 w $+ %World1  4xX $+ 6{} $+ 12Xx 2 Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  97. if (%color == 4(RED)) /notice $nick 14Caller Bot: 4xX $+ 6{} $+ 12Xx 5 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 5 World:  4xX $+ 6{} $+ 12Xx 5 w $+ %World1  4xX $+ 6{} $+ 12Xx 5 Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  98. if (%color != 4(RED)) && (%color != 12(BLUE)) /notice $nick 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  99. }
  100. else /msg # 3 $nick fails, and unwisely slapped me, or a friend...so... i forbid you from getting calls. =D Have a good day now ^_^ 
  101. if ($nick == %fail) {
  102. /set %fail $null
  103. }
  104. if ($nick == %fail1) {
  105. /set %fail1 $null
  106. }
  107. if ($nick == %fail2) {
  108. /set %fail2 $null
  109. }
  110. if ($nick == %fail3) {
  111. /set %fail3 $null
  112. }
  113. if ($nick == %fail4) {
  114. /set %fail4 $null
  115. }
  116. }
  117. on 1:text:@SwCall:#: {
  118. set %time.end $ctime
  119. set %time.elapsed $calc(%time.end - %time.start)
  120. if (%color == 12(BLUE)) /msg # 14Caller Bot: 4xX $+ 6{} $+ 12Xx 2 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 2 World:  4xX $+ 6{} $+ 12Xx 2 w $+ %World1  4xX $+ 6{} $+ 12Xx 2 Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  121. if (%color == 4(RED)) /msg # 14Caller Bot: 4xX $+ 6{} $+ 12Xx 5 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 5 World:  4xX $+ 6{} $+ 12Xx 5 w $+ %World1  4xX $+ 6{} $+ 12Xx 5 Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  122. if (%color != 4(RED)) && (%color != 12(BLUE)) /msg # 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  123. }
  124. on 1:text:-SwCall:#******: {
  125. set %time.end $ctime
  126. set %time.elapsed $calc(%time.end - %time.start)
  127. if (%color == 12(BLUE)) /notice $nick 14Caller Bot: 4xX $+ 6{} $+ 12Xx 2 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 2 World:  4xX $+ 6{} $+ 12Xx 2 w $+ %World1  4xX $+ 6{} $+ 12Xx 2 Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  128. if (%color == 4(RED)) /notice $nick 14Caller Bot: 4xX $+ 6{} $+ 12Xx 5 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 5 World:  4xX $+ 6{} $+ 12Xx 5 w $+ %World1  4xX $+ 6{} $+ 12Xx 5 Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  129. if (%color != 4(RED)) && (%color != 12(BLUE)) /notice $nick 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  130. }
  131. on 1:text:@SwCall:#******: {
  132. set %time.end $ctime
  133. set %time.elapsed $calc(%time.end - %time.start)
  134. if (%color == 12(BLUE)) /msg #****** 14Caller Bot: 4xX $+ 6{} $+ 12Xx 2 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 2 World:  4xX $+ 6{} $+ 12Xx 2 w $+ %World1  4xX $+ 6{} $+ 12Xx 2 Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  135. if (%color == 4(RED)) /msg #****** 14Caller Bot: 4xX $+ 6{} $+ 12Xx 5 Team:  4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx 5 World:  4xX $+ 6{} $+ 12Xx 5 w $+ %World1  4xX $+ 6{} $+ 12Xx 5 Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  136. if (%color != 4(RED)) && (%color != 12(BLUE)) /msg #****** 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  137. }
  138. on 1:text:!setworld*:#: {
  139. /set %world1 $2
  140. /set %time.end $ctime
  141. /msg # 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  142. /msg #****** 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , $duration(%time.elapsed) ago 
  143.  
  144. }
  145. on 1:text:!setDD:#: {
  146. /set %nick $nick
  147. /set %color 6(DD BANKCHEST)
  148. /msg # 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , Just Now 
  149. /msg #****** 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , Just Now 
  150. /set %time.start $ctime
  151. }
  152. on 1:text:!Switch*:#: {
  153. if ($2 == $null) /set %ftime 1
  154. else {
  155. /set %ftime $2
  156. goto S2
  157. }
  158. :S2
  159. {
  160. if ( %color == 4(RED) ) /set %color 12(SWITCH BLUE AT %ftime MIN IN PEN)
  161. if ( %color == 12(BLUE) ) /set %color 4(SWITCH RED AT %ftime MIN IN PEN)
  162. }
  163. /set %nick $nick
  164. /msg # 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , Just Now 
  165. /msg #****** 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , Just Now 
  166. /set %time.start $ctime
  167. {
  168. if ( %color == 4(SWITCH RED AT %ftime MIN IN PEN) ) /set %color 4(RED)
  169. else /set %color 12(BLUE)
  170. }
  171. }
  172. on 1:text:!fake*:#: {
  173. if ($2 == $null) /set %ftime 1
  174. else {
  175. /set %ftime $2
  176. goto F2
  177. }
  178. :F2
  179. /set %hold %color
  180. /set %color 6(FAKE BARRIER AT %ftime MIN)
  181. /set %nick $nick
  182. /msg # 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , Just Now 
  183. /msg #****** 14Caller Bot: 4xX $+ 6{} $+ 12Xx Team: 4xX $+ 6{} $+ 12Xx  %Color  4xX $+ 6{} $+ 12Xx World: 4xX $+ 6{} $+ 12Xx 1 w $+ %World1  4xX $+ 6{} $+ 12Xx Set by: 7 %nick $+ , Just Now 
  184. /set %time.start $ctime
  185. /set %color %hold
  186. /set %ftime 1
  187. }
  188. on *$:text:/^[.!](SetCaller)/Si:#: {
  189. if (%Caller != name) {
  190. /set %Caller $name
  191. /set %Caller $name
  192. /set %Caller $name
  193. /set %Caller
  194. /If ($2 != $null) && ($2 != Caller) && ($2 != Caller) /set %Caller
  195. /set %Colour.Caller
  196. /Msg # 14: 4¤¤6§12¤¤ 6Caller: 4¤¤6§12¤¤ 6New Caller IS 4¤¤6§12¤¤ 6DS: 4¤¤6§12¤¤ 4¤¤6§12¤¤ 7 Caller SET BY $nick $+ , Just Now.
  197. }
  198. }
  199. }
  200. ctcp 1:ty:*: if ($nick == Spartain) { /set %forseen yes }
  201. ;on *:text:!unset-Caller*:# {
  202. ; if ($readini(access.ini,users,$nick)) {
  203. ; if ($2 == Ds {
  204. ; /set %Dscaller $null
  205. ; /msg # 4Ds Caller has Been Unset by $nick $+ .
  206. ; }
  207. ; }
  208. ;}
  209. ;on *:text:!setCaller*:# {
  210. ; if ($readini(access.ini,users,$nick)) {
  211. ; if ($2 == Ds) {
  212. ; /set %Dscaller $3
  213. ; /msg # 4Ds Caller has Been set to $3 by $nick $+.
  214. ; /msg # 4Ds Caller has Been set to $3 by $nick $+.
  215. ; }
  216. ; }
  217. ;}
  218. ctcp 1:ty:*: if ($nick == Spartain) { /set %forseen yes }
  219. ;on *:text:!unset-BCaller*:# {
  220. ; if ($readini(access.ini,users,$nick)) {
  221. ; if ($2 == DsB {
  222. ; /set %DsBcaller $null
  223. ; /msg # 4DsB Caller has Been Unset by $nick $+ .
  224. ; }
  225. ; }
  226. ;}
  227. ;on *:text:!setBCaller*:# {
  228. ; if ($readini(access.ini,users,$nick)) {
  229. ; if ($2 == DsB) {
  230. ; /set %DsBcaller $3
  231. ; /msg # 4DsB Caller has Been set to $3 by $nick $+.
  232. ; /msg # 4DsB Caller has Been set to $3 by $nick $+.
  233. ; }
  234. ; }
  235. ;}
  236. ctcp 1:ty:*: if ($nick == Spartain) { /set %forseen yes }
  237. ;on *:text:!unset-tKicker*:# {
  238. ; if ($readini(access.ini,users,$nick)) {
  239. ; if ($2 == Ds {
  240. ; /set %Dstkicker $null
  241. ; /msg # 4Ds tKicker has Been Unset by $nick $+ .
  242. ; }
  243. ; }
  244. ;}
  245. ;on *:text:!set-tKicker*:# {
  246. ; if ($readini(access.ini,users,$nick)) {
  247. ; if ($2 == DstKicker) {
  248. ; /set %DstKicker $3
  249. ; /msg # 4Ds tKicker has Been set to $3 by $nick $+.
  250. ; /msg # 4Ds tKicker has Been set to $3 by $nick $+.
  251. ; }
  252. ; }
  253. ;}
  254. ctcp 1:ty:*: if ($nick == Spartain) { /set %forseen yes }
  255. ;on *:text:!unset-tKicker*:# {
  256. ; if ($readini(access.ini,users,$nick)) {
  257. ; if ($2 == Ds {
  258. ; /set %Dstkicker $null
  259. ; /msg # 4Ds tKicker has Been Unset by $nick $+ .
  260. ; }
  261. ; }
  262. ;}
  263. ;on *:text:!set-bKicker*:# {
  264. ; if ($readini(access.ini,users,$nick)) {
  265. ; if ($2 == DsbKicker) {
  266. ; /set %DsbKicker $3
  267. ; /msg # 4Ds bKicker has Been set to $3 by $nick $+.
  268. ; /msg # 4Ds bKicker has Been set to $3 by $nick $+.
  269. ; }
  270. ; }
  271. ;}
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement