Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- alias floodcooldownnote {
- if ( $me !isop $chan ) {
- if ((%flood [ $+ [ $1 ] ]) || ($($+(%,flood,$1,.,$nick),2))) { halt }
- set -u3 %flood [ $+ [ $1 ] ] On
- set -u3 %flood [ $+ [ $1 ] $+ [ . ] $+ [ $nick ] ] On
- }
- }
- alias meisnotTwitchMod {
- return $iif($msgtags(user-type).key == mod || $mid(#, 2-) == $me, $false)
- }
- alias IamaTwitchMod {
- return $iif($msgtags(user-type).key == mod || $mid(#, 2-) == $me, $false)
- }
- alias autokbnote {
- if ( $server == tmi.twitch.tv ) {
- if ( $me isop $chan ) {
- timeout $nick
- halt
- }
- if ( $me isop $chan ) {
- ban $chan $nick 2
- kick $chan $nick
- halt
- }
- }
- }
- ON $*:TEXT:!adelnote*:#:{
- var %ntchan = $chr(35) $+ $2
- var %nonexistentnote that note doesn't exist.;that note doesn't ring any bells.;that request returned a null value. Maybe the note doesn't exist?;I can't find that note anywhere.;I don't recall having that note.;note was not found in the database.
- IF ( $2 = $null ) { return }
- IF ( $3 = $null ) { return }
- IF ( $4 = $null ) { return }
- IF ( $nick isin %botowners ) {
- IF ( %notes_for. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ %ntchan ] ] [ $+ [ . ] ] [ $+ [ $4 ] ] == $null ) {
- floodcooldownnote
- msg $chan $nick $+ , $gettok(%nonexistentnote,$rand(1,6),59)
- return
- }
- UNSET %notes_for. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ %ntchan ] ] [ $+ [ . ] ] [ $+ [ $4 ] ]
- UNSET %note_from_to. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ %ntchan ] ] [ $+ [ . ] ] [ $+ [ $3 ] ] [ $+ [ . ] ] [ $+ [ $4 ] ]
- UNSET %note_info. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ %ntchan ] ] [ $+ [ . ] ] [ $+ [ $4 ] ]
- IF ( $4 == $nick ) {
- floodcooldownnote
- MSG $chan $nick $+ , your message has been deleted.
- return
- }
- floodcooldownnote
- MSG $chan $nick $+ , $4 $+ 's message has been deleted.
- }
- }
- ON $*:TEXT:!sadelnote*:#:{
- var %ntchan = $chr(35) $+ $3
- var %noteexist that note doesn't exist.;that note doesn't ring any bells.;that request returned a null value. Maybe the note doesn't exist?;I can't find that note anywhere.;I don't recall having that note.;note was not found in the database.
- IF ( $2 = $null ) { return }
- IF ( $3 = $null ) { return }
- IF ( $4 = $null ) { return }
- IF ( $nick isin %botowners ) {
- IF ( %notes_for. [ $+ [ $2 ] ] [ $+ [ . ] ] [ $+ [ %ntchan ] ] [ $+ [ . ] ] [ $+ [ $5 ] ] == $null ) {
- floodcooldownnote
- msg $chan $nick $+ , $gettok(%noteexist,$rand(1,6),59)
- return
- }
- UNSET %notes_for. [ $+ [ $2 ] ] [ $+ [ . ] ] [ $+ [ %ntchan ] ] [ $+ [ . ] ] [ $+ [ $5 ] ]
- UNSET %note_from_to. [ $+ [ $2 ] ] [ $+ [ . ] ] [ $+ [ %ntchan ] ] [ $+ [ . ] ] [ $+ [ $4 ] ] [ $+ [ . ] ] [ $+ [ $5 ] ]
- UNSET %note_info. [ $+ [ $2 ] ] [ $+ [ . ] ] [ $+ [ %ntchan ] ] [ $+ [ . ] ] [ $+ [ $5 ] ]
- IF ( $4 == $nick ) {
- floodcooldownnote
- MSG $chan $nick $+ , your message has been deleted.
- return
- }
- floodcooldownnote
- MSG $chan $nick $+ , $4 $+ 's message has been deleted.
- }
- }
- ON $*:TEXT:!delnote*:#:{
- var %thenoteinfo = $nick $2
- var %doesnotexist that note doesn't exist.;that note doesn't ring any bells.;that request returned a null value. Maybe the note doesn't exist?;I can't find that note anywhere.;I don't recall having that note.;note was not found in the database.
- IF ( $nick isin %bannedusers ) { autokbnote }
- IF ( $nick isin %twitchbots ) { return }
- IF ( $2 = $null ) { return }
- IF ( %notes_for. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] == $null ) {
- floodcooldownnote
- MSG $chan $nick $+ , $gettok(%doesnotexist,$rand(1,6),59)
- return
- }
- IF ( %note_info. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] != %thenoteinfo ) {
- IF ( $nick !isin %botowners ) {
- floodcooldownnote
- MSG $chan $nick $+ , Unauthorized
- return
- }
- }
- UNSET %notes_for. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ]
- UNSET %note_from_to. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ] [ $+ [ . ] ] [ $+ [ $2 ] ]
- UNSET %note_info. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ]
- IF ( $2 == $nick ) {
- floodcooldownnote
- MSG $chan $nick $+ , your message has been deleted.
- return
- }
- floodcooldownnote
- MSG $chan $nick $+ , your message for $2 has been deleted.
- }
- ON $*:TEXT:!adminnote*:#:{
- var %notevaradmin1 $server $+ . $+ $2 $+ . $+ $3 $+ . $+ $4
- var %notevaradmin2 $server $+ . $+ $2 $+ . $+ $4
- var %adminrandnotemsg Message from $3 to $4 $+ : $5- $+ ;Note left for $4 by $3 $+ : $5- $+ ;Message left for $4 by $3 $+ : $5-
- IF ( $nick isin %botowners ) {
- IF ( $2 = $null ) { return }
- IF ( $3- = $null ) { return }
- inc %note_id
- inc %note_id. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] [ $+ [ . ] ] [ $+ [ $4 ] ]
- SET %note_info. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] [ $+ [ . ] ] [ $+ [ $4 ] ] $3 $4
- ; set %notes_for.* variable that contains the names of everyone who has left a note for the targeted user
- SET %notes_for. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] [ $+ [ . ] ] [ $+ [ $4 ] ] %notes_for. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] [ $+ [ . ] ] [ $+ [ $4 ] ] $3
- ECHO $chan -- Variable %note_from_to. $+ %notevaradmin2 created --
- SET %note_from_to. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] [ $+ [ . ] ] [ $+ [ $3 ] ] [ $+ [ . ] ] [ $+ [ $4 ] ] $gettok(%adminrandnotemsg,$rand(1,3),59)
- ECHO $chan -- Variable %note_from_to. $+ %notevaradmin1 created --
- floodcooldownnote
- MSG $chan $nick $+ , message has been added to the database with ID no %note_id $+ .
- }
- }
- var %varban = chatter testuser95
- ON $*:TEXT:/^!note\s\w+\s/iS:#:{
- ; %randnotemsg the fix for repetative messages when you leave a message for others
- var %randnotemsg Message from $nick to $2 $+ : $3- $+ ;Note left for $2 by $nick $+ : $3- $+ ;Message left for $2 by $nick $+ : $3-
- ; %randnotemsgself the fix for repetative messages when you leave a message for yourself
- var %randnotemsgself Message left by $nick $+ : $3- $+ ;Note left by $nick $+ : $3- $+ ; $+ $nick left note: $3-
- IF ( $nick isin %bannedusers ) { autokbnote }
- IF ( $nick isin %twitchbots ) { return }
- IF ( $2 isin %twitchbots ) { return }
- IF ( $2 = $null ) { return }
- IF ( $3- = $null ) { return }
- inc %note_id
- inc %note_id. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ]
- SET %note_info. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] $nick $2
- ; set %notes_for.* variable that contains the names of everyone who has left a note for the targeted user
- SET %notes_for. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] %notes_for. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] $nick
- ; set %notes_from_to.* variable that contains the message from the user to the targeted user
- IF ( $2 != $nick ) {
- SET %note_from_to. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] $gettok(%randnotemsg,$rand(1,3),59)
- floodcooldownnote
- MSG $chan $nick $+ , your message has been left for $2 with ID no %note_id $+ .
- return
- }
- SET %note_from_to. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] $gettok(%randnotemsgself,$rand(1,3),59)
- floodcooldownnote
- MSG $chan $nick $+ , your message has been left with ID no %note_id $+ .
- }
- on *:JOIN:#: { postmessage }
- on *:TEXT:*:#: { postmessage }
- alias postmessage {
- var %notebegin %note_from_to.
- var %notebegin2 %notes_for.
- var %notebegin3 %note_info.
- var %notevar1 $server $+ . $+ $chan $+ . $+ $v1 $+ . $+ $nick
- var %notevar2 $server $+ . $+ $chan $+ . $+ $nick
- IF (%notes_for. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ]) {
- VAR %x_notes 1
- WHILE ($gettok(%notes_for. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ],%x_notes,32)) {
- MSG $chan %note_from_to. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $v1 ] ] [ $+ [ . ] ] [ $+ [ $nick ] ]
- UNSET %note_from_to. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $v1 ] ] [ $+ [ . ] ] [ $+ [ $nick ] ]
- ECHO $chan -- Variable %notebegin $+ %notevar1 erased --
- INC %x_notes
- DEC %note_id. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ]
- }
- UNSET %notes_for. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ]
- ECHO $chan -- Variable %notebegin2 $+ %notevar2 erased --
- UNSET %note_info. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ]
- ECHO $chan -- Variable %notebegin3 $+ %notevar2 erased --
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement