;**************************************************************************************************************************************
;
;         DDRepeat-Script v0.9   © by DD ©BugBot
;         edit by Chris (c53440@yahoo.de)
;         made for Cox...
;
;**************************************************************************************************************************************

on *:join:#: { if ($nick == $me) { //hmake $chan $+ rker 5 } }
on *:text:*:#:{ if ($1) && ($3) { repeatstrip $nick $chan $remove($1-4, $chr(32)) $remove($8-12, $chr(32)) } }
on *:part:#:{ if ($nick == $me) { //hfree $chan $+ rker } }
on *:disconnect:{ hfree -w *rker }
on *:exit:{ hfree -w *rker }

alias repeatstrip {
  if (!$hget($2 $+ rker)) { hmake $2 $+ rker 5 }
  if ($chan isin %rm_chan) {
    if ($hget($2 $+ rker,$1 $+ $3 $+ $4) == 1) { echo $2 $timestamp 3Erste wiederholung von $nick $+ . }
    if ($hget($2 $+ rker,$1 $+ $3 $+ $4) == 2) { echo $2  $timestamp 04[Repeat Monitor] >> $nick Wiederholt sich zum zweiten mal im $2 $+ . }
    if ($hget($2 $+ rker,$1 $+ $3 $+ $4) == 3) { echo $2  $timestamp 04[Repeat Monitor] >> $nick Wiederholt sich zum dritten mal im $2 $+ . }
    if ($hget($2 $+ rker,$1 $+ $3 $+ $4) == 4) { echo $2  $timestamp 04[Repeat Monitor] >> $nick Wiederholt sich zum vierten mal im $2 $+ . }
    if ($hget($2 $+ rker,$1 $+ $3 $+ $4) == 5) { echo $2  $timestamp 04[Repeat Monitor] >> $nick Wiederholt sich zum fuenften mal im $2 $+ . }
    if ($hget($2 $+ rker,$1 $+ $3 $+ $4) == 6) { echo $2  $timestamp 04[Repeat Monitor] >> 4AUFWACHEN!!!08 $nick muss $2 jetzt sofort verlassen! | hdel $2 $+ rker $1 $+ $3 $+ $4 }
  }
  if (!$hget($2 $+ rker,$1 $+ $3 $+ $4) || ($hget($2 $+ rker,$1 $+ $3 $+ $4) < 6)) { //hinc -u1800 $2 $+ rker $1 $+ $3 $+ $4 | halt }
}

menu channel {
  RepeatMonitor
  .$iif($istok(%rm_chan,#,32),$style(1),$style(0)) $+ Nutze RM-Script in # { set %rm_chan $iif($istok(%rm_chan,#,32),$remtok(%rm_chan,#,32),$addtok(%rm_chan,#,32)) | echo 07 -a $timestamp Aktuelle RM-Script-Chans: %rm_chan }
  .$style(2) $+ %rm_chan: { return; }
}