!peak script? - 01/07/05 09:09 PM
Hi,
I'm looking to a good working !peak script wich one is easily to start.
Hope someone can help me
I'm looking to a good working !peak script wich one is easily to start.
Hope someone can help me
on *:join:#yourchan: { if ($nick(#,0) >= $+(%,peak.,$chan)) { set $+(%,peak.,$chan) $nick(#,0) $ctime } } on *:text:!peak:#yourchan: { msg $chan On $date($gettok($+(%,peak.,$chan),2,32),mmm dd yyyy) $+ , there were $gettok($+(%,peak.,$chan),1,32) users in $chan $+ ! }
on *:join:#: { if (!$hget(PeakStats)) { hmake PeakStats 10 if ($isfile($scriptdir\PeakStats.hsh)) { hload PeakStats $scriptdir\PeakStats.hsh } } if ($nick(#,0) >= $hget(PeakStats,$chan)) { hadd PeakStats $chan $nick(#,0) $ctime hsave PeakStats $scriptdir\PeakStats.hsh } } on *:text:!peak:#: { msg $chan On $date($gettok($hget(PeakStats,$chan),2,32),mmm dd yyyy) $+ , there were $gettok($hget(PeakStats,$chan),1,32) users in $chan $+ ! }
on *:join:#:{ if (!$hget(PeakStats)) { hmake PeakStats 10 if ($isfile($scriptdir\PeakStats.hsh)) { hload PeakStats $scriptdir\PeakStats.hsh } } if ($nick(#,0) >= $hget(PeakStats,$chan)) { hadd PeakStats $chan $nick(#,0) $ctime hsave PeakStats $scriptdir\PeakStats.hsh } if (!$hget(PeakStats,$chan)) { hadd PeakStats $chan $nick(#,0) $ctime hsave PeakStats $scriptdir\PeakStats.hsh } } on *:text:!peak:#:{ msg $chan On $date($gettok($hget(PeakStats,$chan),2,32),mmm dd yyyy) $+ , there were $gettok($hget(PeakStats,$chan),1,32) users in $chan $+ ! }
on *:join:#:{ if (!$hget(PeakStats)) { hmake PeakStats 10 if ($isfile($scriptdir\PeakStats.hsh)) { hload PeakStats $scriptdir\PeakStats.hsh } } if ($nick(#,0) >= $hget(PeakStats,$chan) || !$hget(PeakStats,$chan)) { hadd PeakStats $chan $nick(#,0) $ctime hsave PeakStats $scriptdir\PeakStats.hsh } } on *:text:!peak:#:{ msg $chan On $date($gettok($hget(PeakStats,$chan),2,32),mmm dd yyyy) $+ , there were $gettok($hget(PeakStats,$chan),1,32) users in $chan $+ ! }
on *:join:#yourchan: { if ($nick(#,0) >= $+(%,peak.,$chan)) { set $+(%,peak.,$chan) $nick(#,0) $ctime } } on *:text:!peak:#yourchan: { msg $chan On $date($gettok($+(%,peak.,$chan),2,32),mmm dd yyyy) $+ , there were $gettok($+(%,peak.,$chan),1,32) users in $chan $+ ! }
if ($nick(#,0) >= $+(%,peak.,$chan,.,$network)) { set $+(%,peak.,$chan,.,$network) $nick(#,0) $ctime /echo $chan On $asctime($gettok($+(%,peak.,$chan,.,$network),2,32),mmm dd yyyy) $+ , there were $gettok($+(%,peak.,$chan,.,$network),1,32) users in $chan $+ ! }
on *:text:!peak:#yourchan,#anotherchan,...: { var %val = $($+(%,peak.,$chan),2) msg $chan On $date($gettok(%val,2,32),mmm dd yyyy) $+ , there were $gettok(%val,1,32) users in $chan $+ ! }
on *:text:!peak:#yourchan,#anotherchan,...: { var %val = $($+(%,peak.,$chan),2) msg $chan On $date($gettok(%val,2,32),mmm dd yyyy) $+ , there were $gettok(%val,1,32) users in $chan $+ ! }
on *:join:#chan,#otherchan,...: { if ($nick(#,0) > $($+(%,peak.,$chan,.,$network),2)) { set $+(%,peak.,$chan,.,$network) $nick(#,0) $ctime } } on *:text:!peak:#chan,#otherchan,...: { var %val = $($+(%,peak.,$chan,.,$network),2) if (%val) { msg $chan On $+( $date($gettok(%val,2,32),mmm dd yyyy) $& $chr(40), $duration($calc($ctime - $gettok(%val,2,32)),2) ago, $chr(41)) $& there were $gettok(%val,1,32) users $& (thats $round($calc(100 - $nick($chan,0) / $gettok(%val,1,32) * 100),0) $+ % more than now) $& in $chan $+ ! } }
on *:join:#:{ if (!$hget(PeakStats)) { hmake PeakStats 100 if ($isfile($scriptdir\PeakStats.hsh)) { hload PeakStats $scriptdir\PeakStats.hsh } } var %chan.net = $+( $chan ,., $network) if ($nick(#,0) >= $hget(PeakStats,%chan.net) || !$hget(PeakStats,%chan.net)) { hadd PeakStats %chan.net $nick(#,0) $ctime hsave PeakStats $scriptdir\PeakStats.hsh } } on *:text:!peak:#:{ var %peak.stat = $hget(PeakStats,$+( $chan ,., $network ) msg $chan On $date($gettok(%peak.stat,2,32),mmm dd yyyy) $+ , there were $gettok(%peak.stat,1,32) users in $chan $+ ! }
on *:join:#chan,#otherchan,...: { if ($nick(#,0) > $($+(%,peak.,$chan,.,$network),2)) { set $+(%,peak.,$chan,.,$network) $nick(#,0) $ctime } }
on *:join:#: { if ($+(%,peak.,$chan,.,$network) == $null) { /set $+(%,peak.,$chan,.,$network) $nick(#,0) $ctime } if ($nick(#,0) >= $+(%,peak.,$chan,.,$network)) { /set $+(%,peak.,$chan,.,$network) $nick(#,0) $ctime var %value = $($+(%,peak.,$chan,.,$network),2) if (%value) { /echo $chan $+($date($gettok(%value,2,32),mmmm dd yyyy)), ( $+ $duration($calc($ctime - $gettok(%value,2,32)),2) ago), there is a channel record of $gettok(%value,1,32) users! } } }
on *:join:#chan,#otherchan:{ if ($nick(#,0) > $($+(%,peak.,#,.,$network),2)) || (!$($+(%,peak.,#,.,$network),2)) { set $+(%,peak.,#,.,$network) $nick(#,0) $ctime echo # There is now a new channel record of $nick(#,0) users! } } on *:text:!peak:#chan,#otherchan:{ tokenize 32 $($+(%,peak.,#,.,$network),2) if ($0) { msg # On $date($2,mmmm dd yyyy) ( $+ $duration($calc($ctime - $2),2) ago $+ ) there were $1 $& users (thats $round($calc(100 - $nick(#,0) / $1 * 100),0) $+ % more than now) in # $+ ! } }
on *:join:#chan,#otherchan,...: { if ($nick(#,0) > $($+(%,peak.,$chan,.,$network),2)) { set $+(%,peak.,$chan,.,$network) $nick(#,0) $ctime } }
if ($nick(#,0) > $iif($($+(%,peak.,$chan,.,$network),2),$gettok($v1,1,32),0)) {
on *:join:#:{ if (!$hget(PeakStats)) { hmake PeakStats 100 if ($isfile($scriptdir\PeakStats.hsh)) { hload PeakStats $scriptdir\PeakStats.hsh } } var %chan.net = $+( $chan ,., $network) if ($nick(#,0) >= $hget(PeakStats,%chan.net) || !$hget(PeakStats,%chan.net)) { hadd PeakStats %chan.net $nick(#,0) $ctime hsave PeakStats $scriptdir\PeakStats.hsh } } on *:text:!peak:#:{ var %peak.stat = $hget(PeakStats,$+( $chan ,., $network )) msg $chan On $date($gettok(%peak.stat,2,32),mmm dd yyyy) $+ , there were $gettok(%peak.stat,1,32) users in $chan $+ ! }
//var %x = 5 test | if (3 < %x) { echo -a $v1 < $v2 }
//var %x = 6apples | if (3 < %x) { echo -a $v1 < $v2 }