Advertisement
Guest User

New version of Script I'm having trouble with

a guest
Jul 7th, 2017
247
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 3.12 KB | None | 0 0
  1. ON $*:TEXT:/^!note\s\w+\s/iS:#:{
  2.   if ( $2 == $null ) { return }
  3.   if ( $3- == $null ) { return }
  4.   if ( $nick isin %twitchbots ) { return }
  5.   ; %randnotemsg the fix for repetative messages when you leave a message for others
  6.   ; var %randnotemsg Message from $nick to $2 $+ : $3- $+ ;Note left for $2 by $nick $+ : $3- $+ ;Message left for $2 by $nick $+ : $3-
  7.   ; %randnotemsgself the fix for repetative messages when you leave a message for yourself
  8.   ; var %randnotemsgself Message left by $nick $+ : $3- $+ ;Note left by $nick $+ : $3- $+ ; $+ $nick left note: $3-
  9.   if ( $nick == $me ) { return }
  10.   if ( %noteidnick. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] >= 5 ) {
  11.     msg $chan $nick $+ , Limit reached. Only 5 messages per user is allowed.
  12.     return
  13.   }
  14.   inc %noteidnick. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ]
  15.   set %notenick. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] [ $+ [ . ] ] $+ %noteidnick. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] $nick
  16.   if ( $2 != $nick ) {
  17.     ; Old Code
  18.     ; set %notemsg. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] [ $+ [ . ] ] $+ %noteidnick. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] $gettok(%randnotemsg,$rand(1,3),59)
  19.     set %notemsg. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] [ $+ [ . ] ] $+ %noteidnick. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] Message left for $2 by $nick $+ : $3-    
  20.     msg $chan $nick $+ , Your message has been left for $2 $+ .
  21.     return
  22.   }
  23.   ; Old Code
  24.   ; set %notemsg. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] [ $+ [ . ] ] $+ %noteidnick. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] $gettok(%randnotemsgself,$rand(1,3),59)
  25.   set %notemsg. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] [ $+ [ . ] ] $+ %noteidnick. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $2 ] ] Message left by $nick $+ : $3-
  26.   msg $chan $nick $+ , Your message has been left.
  27. }
  28.  
  29. on *:JOIN:#:{ postmessage }
  30. on *:TEXT:*:#:{ postmessage }
  31.  
  32. alias postmessage {
  33.   if ( $nick == $me ) { return }
  34.  
  35.   var %x_note_id 1
  36.   while ( %noteidnick. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ] > 0 ) {
  37.  
  38.     msg $chan %notemsg. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ] [ $+ [ . ] ] [ $+ [ %x_note_id ] ]
  39.     unset %notenick. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ] [ $+ [ . ] ] [ $+ [ %x_note_id ] ]
  40.     unset %notemsg. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ] [ $+ [ . ] ] [ $+ [ %x_note_id ] ]
  41.     var %note_delay 10000
  42.     while ( %note_delay ) {
  43.       dec %note_delay
  44.       if ( %note_delay == 0 ) {
  45.      
  46.         inc %x_note_id
  47.         dec %noteidnick. [ $+ [ $server ] ] [ $+ [ . ] ] [ $+ [ $chan ] ] [ $+ [ . ] ] [ $+ [ $nick ] ]
  48.       }
  49.     }
  50.   }
  51. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement