API tools faq
paste
Guest User

Untitled

a guest
Jul 8th, 2017
113
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.48 KB | None | 0 0
raw download clone embed print report
  1. on *:connect:{
  2. identify [pass]
  3. }
  4.  
  5. on *:start:{
  6. server -m irc.focogaming.com
  7. if ($network = irc.focogaming.com) {
  8. join #[T][U][N][E][R]
  9. join #assa
  10. join #emsal
  11. join #f4u
  12. join #iCk
  13. join #jeroen
  14. join #wryyyyyyy
  15. join #quicksilver
  16. join #jane
  17. join #beremix
  18. join #irc-bots }
  19. elseif ($network = irc.impulse99.com) {
  20. join #Quicksilver
  21. join #f4u
  22. join #69 }
  23. }
  24.  
  25. on *:text:!test:#:{
  26. msg $chan $nick $+ ,sup?
  27. }
  28.  
  29. on *:text:!explode *:#:{
  30. timer 1 0 describe $chan grabs a dynamite.
  31. timer 1 4 describe $chan lights the dynamite.
  32. timer 1 6 describe $chan plants it in $$2 $+ 's ass.
  33. timer 1 8 describe $chan runs away from $$2.
  34. timer 1 9 msg $chan 4 BOOOM !
  35. }
  36.  
  37.  
  38. on *:text:!jc*:#:{
  39. if ($me ison $2) {
  40. msg $chan 4Error1:I'm already there. }
  41. elseif ($nick isin $read(owners.txt,w, $nick)) {
  42. join $2
  43. ns ajoin add $2
  44. msg $chan 4 Successfully joined. }
  45. else msg $chan Only my boss can do it.
  46. }
  47.  
  48. on *:text:!pc *:#:{
  49. if ($me !ison $2) {
  50. msg $chan 4Error1:I'm not there. }
  51. if ($nick isin $read(owners.txt,w, $nick)) {
  52. part $2
  53. ns ajoin del $2
  54. msg $chan 4 Successfully parted. }
  55. else msg $chan Only my boss can do it.
  56. }
  57.  
  58. on *:connect:{
  59. timer 1 3 .amsg 0,4Mason V2.1 [MADP PLEASE FIX THIS]
  60. }
  61.  
  62. on *:text:!poke *:#:{
  63. describe $chan pokes $$2
  64. }
  65.  
  66. on *:text:LV5 *:#:{
  67. if ($nick isin $read(owners.txt,w, $nick)) {
  68. cs access $chan add $$2 9999
  69. msg $chan Successfully changed level.
  70. timer 1 2 mode $chan +q $$2 }
  71. else {
  72. msg $chan 4Error:1You do not have access to this command.
  73. }
  74. }
  75.  
  76.  
  77. on *:text:LV4 *:#:{
  78. if ($nick isin $read(owners.txt,w, $nick)) {
  79. .mode $chan -q $$2
  80. cs access $chan add $$2 9998
  81. msg $chan Successfully changed level. }
  82. else {
  83. msg $chan 4Error:1You do not have access to this command.
  84. }
  85. }
  86. on *:text:LV3 *:#:{
  87. if ($nick isin $read(owners.txt,w, $nick)) {
  88. mode $chan -q $$2
  89. cs access $chan add $$2 9
  90. msg $chan Successfully changed level. }
  91. else {
  92. msg $chan 4Error:1You do not have access to this command.
  93. }
  94. }
  95.  
  96. on *:text:LV2 *:#:{
  97. if ($nick isin $read(owners.txt,w, $nick)) {
  98. .mode $chan -q $$2
  99. cs access $chan add $$2 4
  100. msg $chan Successfully changed level. }
  101. else {
  102. msg $chan 4Error:1You do not have access to this command.
  103. }
  104. }
  105.  
  106. on *:text:LV1 *:#:{
  107. if ($nick isin $read(owners.txt,w, $nick)) {
  108. .mode $chan -q $$2
  109. cs access $chan add $$2 3
  110. msg $chan Successfully changed level. }
  111. else {
  112. msg $chan 4Error:1You do not have access to this command.
  113. }
  114. }
  115.  
  116. on *:text:LV0 *:#:{
  117. if ($nick isin $read(owners.txt,w, $nick)) {
  118. .mode $chan -q $$2
  119. cs access $chan add $$2 1 }
  120. msg $chan Successfully changed level.
  121. else {
  122. msg $chan 4Error:1You do not have access to this command.
  123. }
  124. }
  125.  
  126. on *:text:!k *:#:{
  127. if ($$2 = Quicksilver) {
  128. msg $chan I cant afford the loss. }
  129. elseif ($nick isin $read(owners.txt,w, $nick)) {
  130. kick $chan $$2 Get the fuck out }
  131. else { halt }
  132. }
  133.  
  134. on *:text:!kb *:#:{
  135. if ($$2 = Quicksilver) {
  136. msg $chan I cant afford the loss. }
  137. elseif ($nick isin $read(owners.txt,w, $nick)) {
  138. ban $chan $$2
  139. kick $chan $$2 Get lost }
  140. else { halt }
  141. }
  142.  
  143. on *:text:!mkiss *:#:{
  144. if ($$2 = Quicksilver) {
  145. timer 1 3 msg $chan He's my boss,cant do that. }
  146. else {
  147. timer 1 1 describe $chan gets close to $$2
  148. timer 1 6 describe $chan holds $$2 tight.
  149. timer 1 9 describe $chan kisses $$2 $+ 's lips.
  150. timer 1 12 msg $chan Damn,that was the best kiss ever.
  151. timer 1 15 msg $chan But,I cant cheat my wife.
  152. timer 1 17 part $chan User has been kicked by $$2.
  153. timer 1 18 cs unban $chan
  154. timer 1 20 join $chan }
  155. }
  156.  
  157. on *:text:!mhug *:#:{
  158. if ($$2 = Quicksilver) {
  159. timer 1 3 msg $chan He's my boss,cant do that. }
  160. else {
  161. timer 1 1 describe $chan gets close to $$2
  162. timer 1 3 describe $chan hugs $$2
  163. timer 1 5 msg $chan $$2 $+ ,I love you.
  164. timer 1 7 describe $chan gives $$2 a kiss on cheek. }
  165. }
  166.  
  167. on *:text:Mason:#:{
  168. timer 1 2 msg $chan $read($mircdir\Mason.txt)
  169. }
  170.  
  171. on *:text:mason gtfo:#:{
  172. if ($nick = Quicksilver) {
  173. quit Mason has left the building }
  174. else {
  175. msg $chan You wish. }
  176. }
  177.  
  178. on *:text:!users:#:{
  179. msg $chan $nick($chan,0) users on this channel.
  180. }
  181.  
  182. on *:text:!dice:#:{
  183. var %dice = $rand(1,6)
  184. timer 1 0 msg $chan So you think you're lucky? Let's see..
  185. timer 1 1 describe $chan rolls the dice.
  186. if (%dice == 1) { timer 1 4 msg # 1 $+ ! | timer 1 6 msg # You win a baseball bat. | timer 1 7 describe # gives $nick a baseball bat. | timer 1 8 msg # Don't hit me with that man. }
  187. if (%dice == 2) { timer 1 4 msg # 2 $+ ! | timer 1 6 msg # You win protection. | timer 1 7 .mode # +ao $nick | timer 1 12 .mode # -ao $nick }
  188. if (%dice == 3) { timer 1 4 msg # 3 $+ ! | timer 1 6 msg # You win a red hat. | timer 1 7 describe # gives $nick a red hat. }
  189. if (%dice == 4) { timer 1 4 msg # 4 $+ ! | timer 1 6 msg # You win a Porsche 911 | timer 1 7 describe # throws $nick the keys of the Porsche. | timer 1 15 describe # detonates the bomb. | timer 1 16 msg # BOOM! }
  190. if (%dice == 5) { timer 1 4 msg # 5 $+ ! | timer 1 5 msg # You win a trip outside this channel. | timer 1 6 kick # Hope you enjoy it. }
  191. if (%dice == 6) { timer 1 4 msg # 6 $+ ! | timer 1 6 msg # You win a facepalm. | timer 1 7 describe # facepalms $nick . }
  192. }
  193.  
  194. ;on *:text:!football:#:{
  195. timer 1 1 msg $chan Messi or Cristiano Ronaldo?
  196. var %football == $rand(1,2)
  197. 1 = Messi
  198. 2 = Cristiano Ronaldo
  199. if (%football == 1) {
  200. timer 1 2 msg $chan Messi rulz.
  201. timer 1 4 describe $chan gives $nick a cake. }
  202. elseif (%football = 2) {
  203. timer 1 3 msg $chan LOL Ronaldo,he's a fucking loser.
  204. timer 1 6 msg $chan Getting pwned by Barcelona by 5-0.
  205. timer 1 10 describe $chan kicks $nick $+ 's ass. }
  206.  
  207.  
  208. on *:text:!ak:#:{
  209. timer 1 1 describe $chan grabs an AK-47.
  210. timer 1 3 describe $chan grabs some ammo.
  211. timer 1 5 msg $chan Let the fun begin >:)
  212. timer 1 7 describe $chan reloads the gun.
  213. timer 1 9 describe $chan shoots everyone in his way.
  214. timer 1 11 describe $chan puts the AK-47 down.
  215. timer 1 13 describe $chan yells:FUCK YEA !
  216. }
  217.  
  218. on *:text:!nick *:#:{
  219. if ($$2 = Mason) {
  220. timer 1 1 nick mason
  221. timer 1 2 identify argintulviu }
  222. elseif ($nick isin $read(owners.txt,w, $nick)) {
  223. timer 1 1 nick $$2 }
  224. else {
  225. msg $chan Only my boss can do it. }
  226. }
  227.  
  228.  
  229. on *:text:!noob:#:{
  230. if ($nick isin $read(owners.txt,w, $nick)) {
  231. timer 1 0 nick noob
  232. timer 1 2 msg $chan Hey.
  233. timer 1 8 msg $chan You fucking faggot.
  234. timer 1 14 msg $chan Why the fuck did you ban me?
  235. timer 1 20 msg $chan You really want me to flood your server?
  236. timer 1 26 msg $chan I'll make sure it'll be dead within 5 minutes.
  237. timer 1 32 msg $chan I warned you,unban me or I flood it !
  238. timer 1 35 msg $chan UNBAN ME NOW FAGGOT FOR FUCK SAKE
  239. timer 1 37 kick $chan Mason User has been banned from this channel by $nick
  240. timer 1 39 nick Mason
  241. timer 1 43 join $chan
  242. timer 1 44 identify argintulviu }
  243. else {
  244. msg $chan No. }
  245. }
  246.  
  247. on 1:Ban:#:{
  248. if ($banmask iswm $address($me,5)) {
  249. .mode $chan -b $banmask
  250. timer 1 1 join $chan }
  251. }
  252.  
  253. on *:kick:#:{
  254. if ($knick == $me) {
  255. timer 1 1 join # }
  256. }
  257.  
  258. on *:text:!hop mason:#:{
  259. if ($nick isin $read(owners.txt,w, $nick)) {
  260. timer 1 1 hop $chan }
  261. else {
  262. timer 1 3 describe $chan grabs $nick by the neck and says:
  263. timer 1 6 msg $chan Don't you dare to do that again,capiche? }
  264. }
  265.  
  266.  
  267. on *:TEXT:!uptime:#:{
  268. msg $chan $me has been online for $uptime(mirc,1) $+ .
  269. }
  270.  
  271. on *:text:!adduser*:#: {
  272. if ($1 == !adduser && $nick == Quicksilver) {
  273. if ($2) {
  274. if ($2 ison $chan) {
  275. if ($2 !isin $read(owners.txt,w, $2)) {
  276. write owners.txt $2
  277. msg $chan User has been added to the owner list
  278. }
  279. else { msg $chan This user already is a bot owner }
  280. }
  281. else { msg $chan This user is not in the channel }
  282. }
  283. else { msg $chan 4Usage:1 !adduser <nick> }
  284. }
  285. elseif ($1 == !adduser) { msg $chan You cannot use this command }
  286. }
  287.  
  288. on *:text:!deluser*:#: {
  289. if ($1 == !deluser && $nick == Quicksilver) {
  290. if ($2) {
  291. if ($2 isin $read(owners.txt,w, $2)) {
  292. write -dl $+ $readn owners.txt
  293. msg $chan User has been deleted out of the owner list
  294. }
  295. else { msg $chan This user is not a bot owner }
  296. }
  297. else { msg $chan 4Usage:1 !deluser <nick> }
  298. }
  299. elseif ($1 == !deluser) { msg $chan You cannot use this command }
  300. }
  301. on *:text:!owners:#:{
  302. notice $nick 3My owners are:7 $read(owners.txt, 1) $read(owners.txt, 2) $read(owners.txt, 3) $read(owners.txt, 4) $read(owners.txt, 5) $read(owners.txt, 6) $read(owners.txt, 7) $read(owners.txt, 8) $read(owners.txt, 9) $read(owners.txt, 10) }
  303.  
  304. on *:text:!pm*:#:{
  305. if ($nick isin $read(owners.txt,w, $nick)) {
  306. msg $2 $3- }
  307. else {
  308. msg $chan You need the golden medal to use this command,soldier. }
  309. }
  310.  
  311.  
  312. on *:text:!mcs:#:{
  313. if ($nick !isin $read(owners.txt,w, $nick)) {
  314. timer 1 0 notice $nick 10Mason's Commands: 5\\ !test \ !explode <nick> \ !poke <nick> \ !users \ !ak \ !mhug <nick> \ !mkiss <nick> \ !uptime \ !dice \ !slap // }
  315. else {
  316. timer 1 0 notice $nick 10Mason's Commands: 5\\ !test \ !explode <nick> \ !poke <nick> \ !users \ !ak \ !mhug <nick> \ !mkiss <nick> \ !uptime \ !dice \ !slap // }
  317. if ($nick isin $read(owners.txt,w, $nick)) {
  318. timer 1 1 .notice $nick 4Owner commands: 5\\ !join <chan> \ !part <chan> \ LV1/LV2/LV3/LV4/LV5 (using cs access) <nick> \ !k <nick> \ !kb <nick> \ !nick <nick> \ !noob \ !hop crazychick \ !pm <nick> <text> \ !ignore <nick> \ !ignorelist \ !unignore <nick> // }
  319. else { halt }
  320. }
  321.  
  322.  
  323. on *:text:!ignore *:#:{
  324. if ($2 = Quicksilver) {
  325. msg $chan I'll never do that to him. }
  326. elseif ($2 !ison $chan) {
  327. msg $chan 4Error:1 $2 is not on the channel. }
  328. elseif ($2 isin $read(ignore.txt,w, $2)) {
  329. msg $chan 4Error:1 $2 is already ignored. }
  330. elseif ($nick isin $read(owners.txt,w, $nick)) {
  331. .ignore $2
  332. if ($nick = Quicksilver) {
  333. .ignore -r $nick }
  334. write ignore.txt $2
  335. msg $chan 3 $2 1has been ignored. }
  336. else {
  337. msg $chan Your rank is not high enough to use this command.
  338. }
  339. }
  340.  
  341. on *:text:!ignorelist:#:{
  342. .notice $nick 3Ignored users are:7 $read(ignore.txt, 1) $read(ignore.txt, 2) $read(ignore.txt, 3) $read(ignore.txt, 4) $read(ignore.txt, 5) $read(ignore.txt, 6) $read(ignore.txt, 7) $read(ignore.txt, 8) $read(ignore.txt, 9) $read(ignore.txt, 10)
  343. }
  344.  
  345. on *:text:!unignore *:#:{
  346. if ($nick isin $read(owners.txt,w, $nick)) {
  347. .ignore -r $2
  348. $read(ignore.txt,w, $2)
  349. write -dl $+ $readn ignore.txt
  350. msg $chan 3 $2 1is no longer ignored. }
  351. else {
  352. msg $chan Your rank is not high enough to use this command. }
  353. }
  354.  
  355. on *:text:*Mason*:#:{
  356. if ($nick == Woods) {
  357. timer 1 1 msg $chan $read(mason2.txt) }
  358. else { halt }
  359. }
  360.  
  361. on *:text:!slap *:#:{
  362. describe $chan slaps $$2
  363. describe $chan slaps $$2
  364. describe $chan slaps $$2
  365. describe $chan slaps $$2
  366. }
  367.  
  368. on *:text:!say *:#:{
  369. if ($me !ison $chan) {
  370. msg $chan 4Error:1I'm not on that channel }
  371. elseif ($nick isin $read(owners.txt,w, $nick)) {
  372. msg $2 $3- }
  373. else {
  374. msg $chan You're not one of my owners }
  375. }
  376.  
  377. on *:text:!cmds:#:{
  378. .notice $nick 3Use !mc for Mason's commands list.
  379. }
  380.  
  381. Add !owners and ignore stuff and
  382. on *:text:!cmds:#:{
  383. .notice $nick 3Use !cc for Coca-Cola's commands list.
  384. }
  385. to coca-cola
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!