Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- on *:TEXT:!youtube:#: {
- if ((%floodyoutube) || ($($+(%,floodyoutube.,$nick),2))) { return }
- set -u10 %floodyoutube On
- set -u30 %floodyoutube. $+ $nick On
- msg $chan Here's my YouTube :) https://www.youtube.com/channel/UCAxDJqimY9Z2VOM181zi4tg
- }
- on *:TEXT:!twitter:#: {
- if ((%floodtwitter) || ($($+(%,floodtwitter.,$nick),2))) { return }
- set -u10 %floodtwitter On
- set -u30 %floodtwitter. $+ $nick On
- msg $chan Here's my Twitter :) https://twitter.com/cinderslash
- }
- on *:TEXT:!facebook:#: {
- if ((%floodfacebook) || ($($+(%,floodfacebook.,$nick),2))) { return }
- set -u10 %floodfacebook On
- set -u30 %floodfacebook. $+ $nick On
- msg $chan Here's my Facebook :) https://www.facebook.com/CinderSlash
- }
- on *:TEXT:!schedule:#: {
- if ((%schedule) || ($($+(%,floodschedule.,$nick),2))) { return }
- set -u10 %floodschedule On
- set -u30 %floodschedule. $+ $nick On
- msg $chan D: No schedule as of yet, but for the most part I stream from 10:30am - 2:30PM EST from Sunday - Monday.
- }
- on *:TEXT:!nnid:#: {
- if ((%nnid) || ($($+(%,floodnnid.,$nick),2))) { return }
- set -u10 %floodnnid On
- set -u30 %floodnnid. $+ $nick On
- msg $chan My nnid is ZenFox :)
- }
- on *:text:!join:#: {
- set -u0 %floodenter. $+ $nick On
- if ($read(onoff.txt,nw,disable)) { msg $chan /me sorry, but the player list is closed. | return }
- else {
- if ($read(list.txt,nw,$nick)) { msg $chan /me $nick is already in the list. | return }
- if ($read(list.txt,20)) { msg $chan /me Sorry, the list is full. | return }
- else {
- write list.txt $nick
- msg $chan /me Added $nick to the list
- if (!$read(onstream.txt,1)) { write onstream.txt $nick }
- else {
- if (!$read(ondeck.txt,1)) { write ondeck.txt $nick }
- }
- else {
- if (!$read(ondeck.txt,2)) {write ondeck.txt $nick }
- }
- }
- }
- on *:text:!del *:#: {
- if ($nick isop #) {
- if (!$read(list.txt,nw,$2-)) { msg $chan /me $2- is not in the list. | return }
- elseif ($read(list.txt,nw,$2)) { msg $chan /me deleted $2 from the list.
- write -dl $+ $readn list.txt }
- }
- else { msg $chan /me This is a mod only command. FUNgineer }
- }
- on *:text:!list:#: {
- if ((%floodlist) || ($($+(%,floodlist.,$nick),2))) { return }
- set -u10 %floodlist On
- set -u30 %floodlist. $+ $nick On {
- var %t1 $read(list.txt,1)
- var %t2 $read(list.txt,2)
- var %t3 $read(list.txt,3)
- var %t4 $read(list.txt,4)
- var %t5 $read(list.txt,5)
- var %t6 $read(list.txt,6)
- var %t7 $read(list.txt,7)
- var %t8 $read(list.txt,8)
- var %t9 $read(list.txt,9)
- var %t10 $read(list.txt,10)
- var %t11 $read(list.txt,11)
- var %t12 $read(list.txt,12)
- var %t13 $read(list.txt,13)
- var %t14 $read(list.txt,14)
- var %t15 $read(list.txt,15)
- var %t16 $read(list.txt,16)
- var %t17 $read(list.txt,17)
- var %t18 $read(list.txt,18)
- var %t19 $read(list.txt,19)
- var %t20 $read(list.txt,20)
- var %t21 $read(list.txt,21)
- var %t22 $read(list.txt,22)
- var %t23 $read(list.txt,23)
- var %t24 $read(list.txt,24)
- var %t25 $read(list.txt,25)
- 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 }
- }
- on *:text:!next:#: {
- if ($nick isop #) {
- if ($read(list.txt,3)) {
- var %t2 $read(list.txt,2)
- var %t3 $read(list.txt,3)
- var %t4 $read(list.txt,4)
- write -c onstream.txt
- write onstream.txt %t2
- write -c ondeck.txt
- write ondeck.txt %t3
- write ondeck.txt %t4
- write -dl 1 list.txt
- { msg $chan /me %t2 You are now up! %t3 is up afterwards, please be ready. (add my nnid if you have not) | return }
- }
- else {
- if ($read(list.txt,2)) {
- var %t2 $read(list.txt,2)
- msg $chan /me %t2 you are now up!
- write -dl 1 list.txt
- write -dl 1 ondeck.txt
- write -dl 1 onstream.txt
- write onstream.txt %t2
- }
- else msg $chan /me Nobody is next on the list!
- write -dl 1 list.txt
- write -dl 1 onstream.txt
- write -dl 1 ondeck.txt
- }
- }
- else msg # This is a mod only command. FUNgineer
- }
- on *:text:!leave:#: {
- if (!$read(list.txt,nw,$nick)) { msg $chan /me $nick is not in the list. | return }
- elseif ($read(list.txt,nw,$nick)) { { write -dl $+ $readn list.txt }
- msg $chan /me Removed $nick from the list. }
- }
- on *:text:!reset:#: {
- if ($nick isop #) {
- write -c list.txt
- write -c ondeck.txt
- write -c onstream.txt
- msg $chan /me the list has been reset. }
- else { msg $chan /me This is a mod only command. FUNgineer }
- }
- on *:text:!open:#: {
- if ($nick isop #) {
- if ($read(onoff.txt,nw,disable)) {
- write -c onoff.txt
- msg $chan /me the player list has been opened. | return }
- else msg $chan /me Silly $nick ... the player list is already open!
- }
- else { msg $chan /me This is a mod only command. FUNgineer }
- }
- on *:text:!close:#: {
- if ($nick isop #) {
- if ($read(onoff.txt,nw,disable)) { msg $chan /me Silly $nick ... the player list is already closed! | return }
- else { write onoff.txt disable
- msg $chan /me Sorry, but the player list has been closed. | return }
- }
- else { msg $chan /me This is a mod only command. FUNgineer }
- }
- ----------------------------------------------------------------------------
- -----------------------------KOTH Commands----------------------------------
- ----------------------------------------------------------------------------
- on *:text:!newking:#: {
- if ($nick isop #) {
- var %k $read(king.txt,1)
- var %k3 $read(kingw.txt,1)
- { write -c oldking.txt }
- { write oldking.txt %k -- %k3 }
- var %o $read(oldking.txt,1)
- var %c $read(list.txt,1)
- { write -c king.txt }
- { write king.txt %c }
- { write -c kingx.txt }
- { write kingx.txt x }
- { write -c kingw.txt }
- { write kingw.txt 1 win }
- { write -c kinghook.txt }
- { write kinghook.txt %c -- 1 win }
- { msg $chan /me WE HAVE A NEW KING! %c is now king. The fallen king was %o }
- if ($read(list.txt,3)) {
- var %t2 $read(list.txt,2)
- var %t3 $read(list.txt,3)
- var %t4 $read(list.txt,4)
- write -c onstream.txt
- write onstream.txt %t2
- write -c ondeck.txt
- write ondeck.txt %t3
- write ondeck.txt %t4
- write -dl 1 list.txt
- { msg $chan /me %t2 You are now up! %t3 is up afterwards, please be ready. (add my nnid if you have not) | return }
- }
- else {
- if ($read(list.txt,2)) {
- var %t2 $read(list.txt,2)
- msg $chan /me %t2 you are now up!
- write -dl 1 list.txt
- write -dl 1 ondeck.txt
- write -dl 1 onstream.txt
- write onstream.txt %t2
- }
- else msg $chan /me Nobody is next on the list!
- write -dl 1 list.txt
- write -dl 1 onstream.txt
- write -dl 1 ondeck.txt
- }
- }
- else msg # /me This is a mod only command. FUNgineer
- }
- on *:text:!kingwin:#: {
- if ($nick isop #) {
- var %k $read(king.txt,1)
- { write kingx.txt x }
- { write -c kingw.txt }
- var %k2 $lines(kingx.txt)
- { write kingw.txt %k2 wins }
- var %k3 $read(kingw.txt,1)
- var %t1 $read(list.txt,1)
- { write -c kinghook.txt }
- { write kinghook.txt %k -- %k3 }
- { msg $chan /me The challenger, %t1 has fallen. %k keeps their crown, their current streak is %k3 }
- if ($read(list.txt,3)) {
- var %t2 $read(list.txt,2)
- var %t3 $read(list.txt,3)
- var %t4 $read(list.txt,4)
- write -c onstream.txt
- write onstream.txt %t2
- write -c ondeck.txt
- write ondeck.txt %t3
- write ondeck.txt %t4
- write -dl 1 list.txt
- { msg $chan /me %t2 You are now up! %t3 is up afterwards, please be ready. (add my nnid if you have not) | return }
- }
- else {
- if ($read(list.txt,2)) {
- var %t2 $read(list.txt,2)
- msg $chan /me %t2 you are now up!
- write -dl 1 list.txt
- write -dl 1 ondeck.txt
- write -dl 1 onstream.txt
- write onstream.txt %t2
- }
- else msg $chan /me Nobody is next on the list!
- write -dl 1 list.txt
- write -dl 1 onstream.txt
- write -dl 1 ondeck.txt
- }
- }
- else msg # /me This is a mod only command. FUNgineer
- }
- on *:text:!bonuswin:#: {
- if ($nick isop #) {
- var %k $read(king.txt,1)
- { write kingx.txt x }
- { write kingx.txt x }
- { write -c kingw.txt }
- var %k2 $lines(kingx.txt)
- { write kingw.txt %k2 wins }
- var %k3 $read(kingw.txt,1)
- var %t1 $read(list.txt,1)
- { write -c kinghook.txt }
- { write kinghook.txt %k -- %k3 }
- { msg $chan /me The challenger, %t1 has fallen. %k keeps their crown, their current streak is %k3 }
- if ($read(list.txt,3)) {
- var %t2 $read(list.txt,2)
- var %t3 $read(list.txt,3)
- var %t4 $read(list.txt,4)
- write -c onstream.txt
- write onstream.txt %t2
- write -c ondeck.txt
- write ondeck.txt %t3
- write ondeck.txt %t4
- write -dl 1 list.txt
- { msg $chan /me %t2 You are now up! %t3 is up afterwards, please be ready. (add my nnid if you have not) | return }
- }
- else {
- if ($read(list.txt,2)) {
- var %t2 $read(list.txt,2)
- msg $chan /me %t2 you are now up!
- write -dl 1 list.txt
- write -dl 1 ondeck.txt
- write -dl 1 onstream.txt
- write onstream.txt %t2
- }
- else msg $chan /me Nobody is next on the list!
- write -dl 1 list.txt
- write -dl 1 onstream.txt
- write -dl 1 ondeck.txt
- }
- }
- else msg # /me This is a mod only command. FUNgineer
- }
- on *:text:!king:#: {
- if ($read(king.txt,1)) {
- var %k $read(king.txt,1)
- var %k3 $read(kingw.txt,1)
- var %c9 $read(onstream.txt,1)
- msg $chan /me %k is king and their streak is %k3 $+ . The challenger is %c9 $+ .
- }
- else msg $chan /me There currently is not a king.
- }
- on *:text:!noking:#: {
- if ($nick isop #) {
- var %k $read(king.txt,1)
- var %k3 $read(kingw.txt,1)
- write -c kinghook.txt
- write -c oldking.txt
- write oldking.txt %k -- %k3
- write -c king.txt
- write -c kingx.txt
- write -c kingw.txt
- msg $chan /me There is no longer a king. }
- else msg # /me This is a mod only command. FUNgineer
- }
- on *:text:!record:#: {
- var %r $read(record.txt,1)
- msg $chan /me The current KOTH record is held by %r $+ .
- }
- on *:text:!newrecord *:#: {
- if ($nick isop #) {
- if (!$2) {
- var %o $read(oldking.txt,1)
- write recordbackup.txt %o
- write -c record.txt
- write record.txt %o
- msg # /me There is a new record: %o $+ !
- }
- else {
- write -c record.txt
- write record.txt $2-
- msg # /me There is a new record: $2- $+ !
- }
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement