Multi Message System

You can stack up to 10 messages per nickname. When they say something in any channel that your script is in, the bot will message the channel with your previous message or messages.

Postat de	Copyright	Categorie	Review user	Vizualizari	Data
BLKoldSUN	newklear	activity	Cod testat	460	2023-12-04 19:36:27

;;Example usage:
;;[16:01:27] !tell ChanServ Missed you bud, have something to tell you
;;[16:01:28] newklear, Message captured for ChanServ.
;;[16:01:44] !tell ChanServ It is really important, so get hold of me asap!
;;[16:01:44] newklear, Additional Message captured for ChanServ.
;;[16:02:01] <&ChanServ> I am here
;;[16:02:01] ChanServ: Sent 33secs ago: "Missed you bud, have something to tell you" while on #ghostcore
;;[16:02:09] <&ChanServ> what was it ?
;;[16:02:09] ChanServ: Sent 25secs ago: "It is really important, so get hold of me asap!" while on #ghostcore

on *:TEXT:!tell*:#: {
  if (%lasttell. [ $+ [ $address($nick,5) ] ] == 1) { halt }
  set -u10 %lasttell. [ $+ [ $address($nick,5) ] ] 1
  if (!$2) { msg $chan Syntax: !tell nickname leave your message here! | halt }
  if ($2 == $me) { msg $chan You can`t send me a message, I see everything already :p | halt }
  if ($read(Tell.txt,w,$+(*,$2,*))) { 
    write -l $+ $calc($readn + 10) Tell.txt $2 $nick $ctime $chan $3-
    msg $chan $nick $+ , Additional Message captured for $2 $+ .
  } 
  else {
    write Tell.txt $2 $nick $ctime $chan $3-
    msg $chan $nick $+ , Message captured for $2 $+ .
  } 
}

on *:TEXT:*:#: {
  if ($read(Tell.txt,s,$nick)) { 
    if (%tell. [ $+ [ $address($nick,5) ] ] != 1) { timertell 1 5 notice $nick This is the 1st time you have received a message with a 24 hour period, to leave a message, Syntax: !tell nickname your message goes here! }
    set -u86400 %tell. [ $+ [ $address($nick,5) ] ] 1
    var %who $gettok($read(Tell.txt,s,$nick),1,32)
    var %time $gettok($read(Tell.txt,s, $nick),2,32)
    var %mchan $gettok($read(Tell.txt,s, $nick),3,32)
    var %msg $gettok($read(Tell.txt,s,$nick),4-,32)
    msg $chan $nick $+ : Sent $duration($calc($ctime - %time)) ago: < $+ %who $+ > " $+ %msg $+ " while on %mchan 
    write -ds $+ $nick Tell.txt
  }
}