All pastes #2046223 Raw Edit

Someone

public text v1 · immutable
#2046223 ·published 2011-04-14 03:07 UTC
rendered paste body
On *:CONNECT: { if ($readini(iniscript.ini,Away,Reason)) { set %HLDelay On | away $readini(iniscript.ini,Away,Reason) | TimerHLDelay 1 10 unset %HLDelay } }
if ($chan == #msl { halt }
Alias afk { var %a $iif($1-,$1-,Away) | away %a | var %b 1 | while ($chan(%b) && $DontMess($chan(%b)) != false) { msg $chan(%b) $c2(¤¤) $+ $c1([) $+ $c2(AWAY) $+ $c1(]) $+ $c2(:) $c1(I am now) $c2(away) $+ $c1(. Reason:) $c2(%a) $c3(>>>>) $c1(left:) $c2($day) $c3(-) $c2($date(mmm/dd/yyyy)) $c3(<<<<) $c1(at:) $c2($time(hh:nn $upper(tt))) | inc %b } | writeini iniscript.ini Away Reason %a | writeini iniscript.ini Away Time $ctime } 

Alias back { if ($readini(iniscript.ini,Away,Reason) == $null) { halt } | var %b 1 | while ($chan(%b) && $DontMess($chan(%b)) != false) { msg $chan(%b) $c2(¤¤) $+ $c1([) $+ $c2(BACK) $+ $c1(]) $+ $c2(:) $c1(I am now) $c2(back) $+ $c1(. From:) $c2($readini(iniscript.ini,Away,Reason)) $c3(>>>>) $c1(back on:) $c3(-) $c2($day) $c3(-) $c2($date(mmm/dd/yyyy)) $c3(<<<<) $c1(time gone:) $c2($duration($calc($ctime - $readini(iniscript.ini,Away,Time)))) | inc %b } | away | remini iniscript.ini Away }

On *:TEXT:*:*: {
  if (%HLDelay == On) { halt }
  if ($nick == medieval || $nick == impact) { halt }
  if ($chan) && (!$regex($1-,/(sky_rider_45|sky|zoom) */Si)) { halt }
  if (!$window(@Highlights)) { window @Highlights }
  if ($chan) { echo @Highlights $c3($chan »») $timestamp $c1($nick) $c2(said:) $c4($replace($1-,sky_rider_45,$+($chr(31),sky_rider_45,$chr(31)),sky,$+($chr(31),sky,$chr(31)),zoom,$+($chr(31),zoom,$chr(31)))) }
  if ($readini(iniscript.ini,Away,Reason) == $null) { halt }
  if (!%Resp [ $+ [ $nick ] ]) {
    $iif($chan,notice,msg) $nick $c2(¤¤) $c1(I am currently) $c2(away) $+ $c1(. Reason:) $c2($readini(iniscript.ini,Away,Reason)) $c3(-) $c1(been away for) $c2($duration($calc($ctime - $readini(iniscript.ini,Away,Time)))) $c3($chr(40) $+ Response to $iif($chan,highlight,PM) $+ $chr(41))
    set %Resp [ $+ [ $nick ] ] Replied
    TimerResp [ $+ [ $nick ] ] 1 600 unset %Resp [ $+ [ $nick ] ]
  }
}
alias -l c1 return $+($chr(3),14,$strip($1-)) 
alias -l c2 return $+($chr(3),05,$strip($1-))
alias -l c3 return $+($chr(3),07,$strip($1-))
alias -l c4 return $+($chr(3),01,$strip($1-))
Alias DontMess {
  if ($chan == #msl) { return true }
  if ($chan == #skybot) { return true }
  if ($chan == #infobot) { return true }
  else { return false }
}

on *:connect: {  
  ns id windows
  /mode $me +p
  /join #skybot
  /join #infobot
  /join #rich
  /join #vkdpc
  /join #vkdpc-staff
  /join #msl
  /join #impact
  /join REBOT
  /join #vod
  /join #vodmub
  /join #vodlobby
}


 On ^*:TEXT:*:*: { haltdef | echo -mbfl $iif($chan,$chan,$nick) $time($+($chr(3),05•,$chr(3),14,$chr(40),$chr(3),05hh:nn:TT, $+ $chr(3),14,$chr(41),$chr(3),05:)) $+($chr(3),14,$chr(40),$chr(3),$iif($nick isop $chan,04,$iif($nick ishop $chan,07,$iif($nick isvoice $chan,12,06))),$nick,$chr(3),14,$chr(41),$chr(3),05:,$chr(3))) $1- }


On *:NICK: { if ($nick == $me) && (Unknown isin $newnick) { ns release $nick windows | nick $nick | ns id windows } }