All pastes #804021 Raw Edit

Unnamed

public text v1 · immutable
·published 2007-12-03 01:10 UTC
rendered paste body
Alias rc { 
  set %rctime $asctime   
  set %rcin [ $+ [ status ] ] ON
  nick Lil_Aziz1|Power_RC
  set %msgs 0
  amsg 15[12» 4Now Power RuneCrafting 12«15][12» 4Started at:13 %rctime 12«15]
  away $1-
} 
Alias finish {
  if (%rcin [ $+ [ status ] ] == ON) { 
    nick Lil_Aziz1 
    amsg 15[12» 4Done POwer RuneCrafting 12«15][12» 4how long have I Power Runecrafting:13 $duration($calc(($ctime - $ctime(%rctime)))) 12«15][12» 4Messaged Received:13 %msgs 12«15]
    set %msgs 0
    remove away.txt  
    set %rcin [ $+ [ status ] ] OFF
  }
  elseif (%away [ $+ [ status ] ] == OFF) { echo I am not away! }

}

Alias bye { 
  set %ltime $asctime 
  set %away [ $+ [ reason ] ] $1-  
  set %away [ $+ [ status ] ] ON
  nick Lil_Aziz1|AFK
  set %msgs 0
  amsg 15[12» 4Away 12«15][12» 4Reason:13 %away [ $+ [ reason ] ] 12«15][12» 4Left at:13 %ltime 12«15]
  away $1-
} 

Alias back {
  if (%away [ $+ [ status ] ] == ON) { 
    nick Lil_Aziz1 
    amsg 15[12» 4Back 12«15][12» 4From:13 %away [ $+ [ reason ] ] 12«15][12» 4Time Gone:13 $duration($calc(($ctime - $ctime(%ltime)))) 12«15][12» 4Messaged Received:13 %msgs 12«15]
    set %msgs 0
    remove away.txt  
    set %away [ $+ [ status ] ] OFF
  }
  elseif (%away [ $+ [ status ] ] == OFF) { echo I am not away! }

}

on $*:TEXT:/(Aziz|izz)/Si:#:{ 
  if (%away [ $+ [ status ] ] == ON) { 
    if ($nick == $read(away.txt,w,$nick)) { halt } 
    write away.txt   
    notice $nick 15[12» 4Away 12«15][12» 4Reason:13 %away [ $+ [ reason ] ] 12«15][12» 4Left at:13 %ltime 12«15][12»4 If important:13 /ms send Lil_Aziz1 message 12«15]
    inc %msgs
    window @Highlights
    aline -a @Highlights $time :: $nick :: $1- in $chan on $network 
    if (%responses < 1) { 
      notice $nick 15[12» 4Away 12«15][12» 4Reason:13 %lrsn 12«15][12» 4Left at:13 %ltime 12«15][12»4 If important:13 /ms send Lil_Aziz1 message 12«15]
    }
  }
  elseif (%rcin [ $+ [ status ] ] == ON) {
    if ($nick == $read(away.txt,w,$nick)) { halt } 
    write away.txt   
    notice $nick 15[12» 4Power RuneCrafting 12«15][12» 4Started at:13 %rctime 12«15][12»4 If important:13 /ms send Lil_Aziz1 message 12«15]
    inc %msgs
    window @Highlights
    aline -a @Highlights $time :: $nick :: $1- in $chan on $network 
    if (%responses < 1) { 
      notice $nick 15[12» 4Power RuneCrafting 12«15][12» 4Started at:13 %rctime 12«15][12»4 If important:13 /ms send Lil_Aziz1 message 12«15]
    }
  }

  else { halt } 
}