Advertisement
Guest User

Script

a guest
May 3rd, 2015
243
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.83 KB | None | 0 0
  1. on *:TEXT:!youtube:#: {
  2. if ((%floodyoutube) || ($($+(%,floodyoutube.,$nick),2))) { return }
  3. set -u10 %floodyoutube On
  4. set -u30 %floodyoutube. $+ $nick On
  5. msg $chan Here's my YouTube :) https://www.youtube.com/channel/UCAxDJqimY9Z2VOM181zi4tg
  6. }
  7.  
  8. on *:TEXT:!twitter:#: {
  9. if ((%floodtwitter) || ($($+(%,floodtwitter.,$nick),2))) { return }
  10. set -u10 %floodtwitter On
  11. set -u30 %floodtwitter. $+ $nick On
  12. msg $chan Here's my Twitter :) https://twitter.com/cinderslash
  13. }
  14.  
  15. on *:TEXT:!facebook:#: {
  16. if ((%floodfacebook) || ($($+(%,floodfacebook.,$nick),2))) { return }
  17. set -u10 %floodfacebook On
  18. set -u30 %floodfacebook. $+ $nick On
  19. msg $chan Here's my Facebook :) https://www.facebook.com/CinderSlash
  20. }
  21.  
  22. on *:TEXT:!schedule:#: {
  23. if ((%schedule) || ($($+(%,floodschedule.,$nick),2))) { return }
  24. set -u10 %floodschedule On
  25. set -u30 %floodschedule. $+ $nick On
  26. msg $chan D: No schedule as of yet, but for the most part I stream from 10:30am - 2:30PM EST from Sunday - Monday.
  27. }
  28.  
  29. on *:TEXT:!nnid:#: {
  30. if ((%nnid) || ($($+(%,floodnnid.,$nick),2))) { return }
  31. set -u10 %floodnnid On
  32. set -u30 %floodnnid. $+ $nick On
  33. msg $chan My nnid is ZenFox :)
  34. }
  35.  
  36. on *:text:!join:#: {
  37. set -u0 %floodenter. $+ $nick On
  38. if ($read(onoff.txt,nw,disable)) { msg $chan /me sorry, but the player list is closed. | return }
  39. else {
  40. if ($read(list.txt,nw,$nick)) { msg $chan /me $nick is already in the list. | return }
  41. if ($read(list.txt,20)) { msg $chan /me Sorry, the list is full. | return }
  42. else {
  43. write list.txt $nick
  44. msg $chan /me Added $nick to the list
  45. if (!$read(onstream.txt,1)) { write onstream.txt $nick }
  46. else {
  47. if (!$read(ondeck.txt,1)) { write ondeck.txt $nick }
  48. }
  49. else {
  50. if (!$read(ondeck.txt,2)) {write ondeck.txt $nick }
  51. }
  52. }
  53. }
  54.  
  55. on *:text:!del *:#: {
  56. if ($nick isop #) {
  57. if (!$read(list.txt,nw,$2-)) { msg $chan /me $2- is not in the list. | return }
  58. elseif ($read(list.txt,nw,$2)) { msg $chan /me deleted $2 from the list.
  59. write -dl $+ $readn list.txt }
  60. }
  61. else { msg $chan /me This is a mod only command. FUNgineer }
  62. }
  63.  
  64. on *:text:!list:#: {
  65. if ((%floodlist) || ($($+(%,floodlist.,$nick),2))) { return }
  66. set -u10 %floodlist On
  67. set -u30 %floodlist. $+ $nick On {
  68. var %t1 $read(list.txt,1)
  69. var %t2 $read(list.txt,2)
  70. var %t3 $read(list.txt,3)
  71. var %t4 $read(list.txt,4)
  72. var %t5 $read(list.txt,5)
  73. var %t6 $read(list.txt,6)
  74. var %t7 $read(list.txt,7)
  75. var %t8 $read(list.txt,8)
  76. var %t9 $read(list.txt,9)
  77. var %t10 $read(list.txt,10)
  78. var %t11 $read(list.txt,11)
  79. var %t12 $read(list.txt,12)
  80. var %t13 $read(list.txt,13)
  81. var %t14 $read(list.txt,14)
  82. var %t15 $read(list.txt,15)
  83. var %t16 $read(list.txt,16)
  84. var %t17 $read(list.txt,17)
  85. var %t18 $read(list.txt,18)
  86. var %t19 $read(list.txt,19)
  87. var %t20 $read(list.txt,20)
  88. var %t21 $read(list.txt,21)
  89. var %t22 $read(list.txt,22)
  90. var %t23 $read(list.txt,23)
  91. var %t24 $read(list.txt,24)
  92. var %t25 $read(list.txt,25)
  93. msg $chan Current list: %t1 , %t2 , %t3 , %t4 , %t5 , %t6 , %t7 , %t8 , %t9 , %t10 , %t11 , %t12 , %t13 , %t14 , %t15, %t16 , %t17 , %t18 , %t19, %t21, %t22, %t23, %t24, %t25 }
  94. }
  95.  
  96. on *:text:!next:#: {
  97. if ($nick isop #) {
  98.  
  99. if ($read(list.txt,3)) {
  100.  
  101. var %t2 $read(list.txt,2)
  102. var %t3 $read(list.txt,3)
  103. var %t4 $read(list.txt,4)
  104.  
  105. write -c onstream.txt
  106. write onstream.txt %t2
  107. write -c ondeck.txt
  108. write ondeck.txt %t3
  109. write ondeck.txt %t4
  110. write -dl 1 list.txt
  111. { msg $chan /me %t2 You are now up! %t3 is up afterwards, please be ready. (add my nnid if you have not) | return }
  112. }
  113. else {
  114. if ($read(list.txt,2)) {
  115. var %t2 $read(list.txt,2)
  116.  
  117. msg $chan /me %t2 you are now up!
  118. write -dl 1 list.txt
  119. write -dl 1 ondeck.txt
  120. write -dl 1 onstream.txt
  121. write onstream.txt %t2
  122. }
  123. else msg $chan /me Nobody is next on the list!
  124. write -dl 1 list.txt
  125. write -dl 1 onstream.txt
  126. write -dl 1 ondeck.txt
  127. }
  128. }
  129. else msg # This is a mod only command. FUNgineer
  130. }
  131.  
  132. on *:text:!leave:#: {
  133. if (!$read(list.txt,nw,$nick)) { msg $chan /me $nick is not in the list. | return }
  134. elseif ($read(list.txt,nw,$nick)) { { write -dl $+ $readn list.txt }
  135. msg $chan /me Removed $nick from the list. }
  136. }
  137.  
  138. on *:text:!reset:#: {
  139. if ($nick isop #) {
  140. write -c list.txt
  141. write -c ondeck.txt
  142. write -c onstream.txt
  143. msg $chan /me the list has been reset. }
  144. else { msg $chan /me This is a mod only command. FUNgineer }
  145. }
  146.  
  147. on *:text:!open:#: {
  148. if ($nick isop #) {
  149. if ($read(onoff.txt,nw,disable)) {
  150. write -c onoff.txt
  151. msg $chan /me the player list has been opened. | return }
  152. else msg $chan /me Silly $nick ... the player list is already open!
  153. }
  154. else { msg $chan /me This is a mod only command. FUNgineer }
  155. }
  156.  
  157. on *:text:!close:#: {
  158. if ($nick isop #) {
  159. if ($read(onoff.txt,nw,disable)) { msg $chan /me Silly $nick ... the player list is already closed! | return }
  160. else { write onoff.txt disable
  161. msg $chan /me Sorry, but the player list has been closed. | return }
  162. }
  163. else { msg $chan /me This is a mod only command. FUNgineer }
  164. }
  165.  
  166. ----------------------------------------------------------------------------
  167. -----------------------------KOTH Commands----------------------------------
  168. ----------------------------------------------------------------------------
  169.  
  170. on *:text:!newking:#: {
  171. if ($nick isop #) {
  172.  
  173. var %k $read(king.txt,1)
  174. var %k3 $read(kingw.txt,1)
  175.  
  176. { write -c oldking.txt }
  177. { write oldking.txt %k -- %k3 }
  178.  
  179. var %o $read(oldking.txt,1)
  180. var %c $read(list.txt,1)
  181.  
  182. { write -c king.txt }
  183. { write king.txt %c }
  184. { write -c kingx.txt }
  185. { write kingx.txt x }
  186. { write -c kingw.txt }
  187. { write kingw.txt 1 win }
  188. { write -c kinghook.txt }
  189. { write kinghook.txt %c -- 1 win }
  190. { msg $chan /me WE HAVE A NEW KING! %c is now king. The fallen king was %o }
  191. if ($read(list.txt,3)) {
  192.  
  193. var %t2 $read(list.txt,2)
  194. var %t3 $read(list.txt,3)
  195. var %t4 $read(list.txt,4)
  196.  
  197. write -c onstream.txt
  198. write onstream.txt %t2
  199. write -c ondeck.txt
  200. write ondeck.txt %t3
  201. write ondeck.txt %t4
  202. write -dl 1 list.txt
  203. { msg $chan /me %t2 You are now up! %t3 is up afterwards, please be ready. (add my nnid if you have not) | return }
  204. }
  205. else {
  206. if ($read(list.txt,2)) {
  207. var %t2 $read(list.txt,2)
  208.  
  209. msg $chan /me %t2 you are now up!
  210. write -dl 1 list.txt
  211. write -dl 1 ondeck.txt
  212. write -dl 1 onstream.txt
  213. write onstream.txt %t2
  214. }
  215. else msg $chan /me Nobody is next on the list!
  216. write -dl 1 list.txt
  217. write -dl 1 onstream.txt
  218. write -dl 1 ondeck.txt
  219. }
  220. }
  221. else msg # /me This is a mod only command. FUNgineer
  222. }
  223.  
  224. on *:text:!kingwin:#: {
  225. if ($nick isop #) {
  226.  
  227. var %k $read(king.txt,1)
  228.  
  229. { write kingx.txt x }
  230. { write -c kingw.txt }
  231.  
  232. var %k2 $lines(kingx.txt)
  233.  
  234. { write kingw.txt %k2 wins }
  235.  
  236. var %k3 $read(kingw.txt,1)
  237. var %t1 $read(list.txt,1)
  238.  
  239. { write -c kinghook.txt }
  240. { write kinghook.txt %k -- %k3 }
  241. { msg $chan /me The challenger, %t1 has fallen. %k keeps their crown, their current streak is %k3 }
  242. if ($read(list.txt,3)) {
  243.  
  244. var %t2 $read(list.txt,2)
  245. var %t3 $read(list.txt,3)
  246. var %t4 $read(list.txt,4)
  247.  
  248. write -c onstream.txt
  249. write onstream.txt %t2
  250. write -c ondeck.txt
  251. write ondeck.txt %t3
  252. write ondeck.txt %t4
  253. write -dl 1 list.txt
  254. { msg $chan /me %t2 You are now up! %t3 is up afterwards, please be ready. (add my nnid if you have not) | return }
  255. }
  256. else {
  257. if ($read(list.txt,2)) {
  258. var %t2 $read(list.txt,2)
  259.  
  260. msg $chan /me %t2 you are now up!
  261. write -dl 1 list.txt
  262. write -dl 1 ondeck.txt
  263. write -dl 1 onstream.txt
  264. write onstream.txt %t2
  265. }
  266. else msg $chan /me Nobody is next on the list!
  267. write -dl 1 list.txt
  268. write -dl 1 onstream.txt
  269. write -dl 1 ondeck.txt
  270. }
  271. }
  272. else msg # /me This is a mod only command. FUNgineer
  273. }
  274.  
  275. on *:text:!bonuswin:#: {
  276. if ($nick isop #) {
  277.  
  278. var %k $read(king.txt,1)
  279.  
  280. { write kingx.txt x }
  281. { write kingx.txt x }
  282. { write -c kingw.txt }
  283.  
  284. var %k2 $lines(kingx.txt)
  285.  
  286. { write kingw.txt %k2 wins }
  287.  
  288. var %k3 $read(kingw.txt,1)
  289. var %t1 $read(list.txt,1)
  290.  
  291. { write -c kinghook.txt }
  292. { write kinghook.txt %k -- %k3 }
  293. { msg $chan /me The challenger, %t1 has fallen. %k keeps their crown, their current streak is %k3 }
  294. if ($read(list.txt,3)) {
  295.  
  296. var %t2 $read(list.txt,2)
  297. var %t3 $read(list.txt,3)
  298. var %t4 $read(list.txt,4)
  299.  
  300. write -c onstream.txt
  301. write onstream.txt %t2
  302. write -c ondeck.txt
  303. write ondeck.txt %t3
  304. write ondeck.txt %t4
  305. write -dl 1 list.txt
  306. { msg $chan /me %t2 You are now up! %t3 is up afterwards, please be ready. (add my nnid if you have not) | return }
  307. }
  308. else {
  309. if ($read(list.txt,2)) {
  310. var %t2 $read(list.txt,2)
  311.  
  312. msg $chan /me %t2 you are now up!
  313. write -dl 1 list.txt
  314. write -dl 1 ondeck.txt
  315. write -dl 1 onstream.txt
  316. write onstream.txt %t2
  317. }
  318. else msg $chan /me Nobody is next on the list!
  319. write -dl 1 list.txt
  320. write -dl 1 onstream.txt
  321. write -dl 1 ondeck.txt
  322. }
  323. }
  324. else msg # /me This is a mod only command. FUNgineer
  325. }
  326.  
  327. on *:text:!king:#: {
  328. if ($read(king.txt,1)) {
  329.  
  330. var %k $read(king.txt,1)
  331. var %k3 $read(kingw.txt,1)
  332. var %c9 $read(onstream.txt,1)
  333.  
  334. msg $chan /me %k is king and their streak is %k3 $+ . The challenger is %c9 $+ .
  335. }
  336. else msg $chan /me There currently is not a king.
  337. }
  338.  
  339. on *:text:!noking:#: {
  340. if ($nick isop #) {
  341.  
  342. var %k $read(king.txt,1)
  343. var %k3 $read(kingw.txt,1)
  344.  
  345. write -c kinghook.txt
  346. write -c oldking.txt
  347. write oldking.txt %k -- %k3
  348. write -c king.txt
  349. write -c kingx.txt
  350. write -c kingw.txt
  351. msg $chan /me There is no longer a king. }
  352. else msg # /me This is a mod only command. FUNgineer
  353. }
  354.  
  355. on *:text:!record:#: {
  356.  
  357. var %r $read(record.txt,1)
  358.  
  359. msg $chan /me The current KOTH record is held by %r $+ .
  360. }
  361.  
  362. on *:text:!newrecord *:#: {
  363. if ($nick isop #) {
  364. if (!$2) {
  365.  
  366. var %o $read(oldking.txt,1)
  367.  
  368. write recordbackup.txt %o
  369. write -c record.txt
  370. write record.txt %o
  371. msg # /me There is a new record: %o $+ !
  372. }
  373. else {
  374. write -c record.txt
  375. write record.txt $2-
  376. msg # /me There is a new record: $2- $+ !
  377. }
  378. }
  379. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement