on 1:load:{
  echo $color(info) -at Peak-Script
  echo $color(info) -at Neuer Peak wird nur bei !peak im Channel gepostet, ansonsten wird dem User, der einen neuen Peak verursacht, eine Notice geschickt
  echo $color(info) -at usage: !peak eingeben oder warten, bis jemand anders im Channel !peak sagt
}
on *:JOIN:#: {
  if ($nick != $me) {  
    var %proof1 $nick($chan,0)
    if (%chanpeak [ $+ [ $chan ] ] != $null) var %proof2 %chanpeak [ $+ [ $chan ] ]
    else { var %proof2 0 | set %chanpeakzeit [ $+ [ $chan ] ] $ctime }
    if (%proof1 > %proof2) {
      var %i %chanpeakzeit [ $+ [ $chan ] ] 
      set %chanpeak [ $+ [ $chan ] ] $nick($chan,0) 
      if (%chanpeakuser [ $+ [ $chan ] ] != $null) { echo -t $chan 4••• New Channel Peak: $chan $+ : %chanpeak [ $+ [ $chan ] ] - last peak i've seen: $duration($calc($ctime - %i)) ago from %chanpeakuser [ $+ [ $chan ] ]  | if (%mespam != 1) { .notice $nick you caused a new channel-peak in $chan $+ : %chanpeak [ $+ [ $chan ] ] - last peak i've seen: $duration($calc($ctime - %i)) ago from %chanpeakuser [ $+ [ $chan ] ]  | set -u30 %mespam 1 } }
      else { echo -t $chan 4••• New Channel Peak: $chan $+ : %chanpeak [ $+ [ $chan ] ]  | if (%mespam != 1) { .notice $nick Channel Peak: $chan $+ : %chanpeak [ $+ [ $chan ] ]  | set -u30 %mespam 1 } }
      set %chanpeakzeit [ $+ [ $chan ] ] $ctime 
      set %chanpeakuser [ $+ [ $chan ] ] $nick 
    } 
  }
}
on *:TEXT:!peak:#: {
  if (%peakspam != 1) {
    set -u10 %peakspam 1
    var %i %chanpeakzeit [ $+ [ $chan ] ]
    if (%chanpeakuser [ $+ [ $chan ] ] == $null) msg $chan --- Bitte warten ---- Sorry, versuch es später noch einmal... ( No Peak Daten...)
    else msg $chan Last Channel Peak: %chanpeak [ $+ [ $chan ] ] i've seen: $duration($calc($ctime - %i)) ago
  }
  else msg $chan $nick Don't ( !peak ) Spam !!! Thx...
}
on *:input:#: {
  if (($1 == !peak) && ($2- == $null)) {  
    if ($me isop $chan) var %mode 12@
    elseif (($me !isop $chan) && ($me isvoice $chan)) var %mode 12+
    var %i %chanpeakzeit [ $+ [ $chan ] ]
    if (%chanpeakuser [ $+ [ $chan ] ] == $null) { msg $chan --- Bitte warten ---- Sorry, versuch es später noch einmal... ( No Peak Daten...) | halt }
    echo -tl $chan %mode $+  $+ $me $+ 11 $+ $chr(187)  $+ Last Channel Peak: %chanpeak [ $+ [ $chan ] ] - From: %chanpeakuser [ $+ [ $chan ] ] 
    else msg $chan Last Channel Peak: %chanpeak [ $+ [ $chan ] ] - From: %chanpeakuser [ $+ [ $chan ] ] 
    halt
  }
}