All pastes #209923 Raw Edit

Something

public text v1 · immutable
#209923 ·published 2006-10-19 12:36 UTC
rendered paste body
on $*:text:/^[!@.]set away */Si:#: {
  if ($nick == [FI]Bab) {
    set %awaytime $gonetime
    set %away $3-
    amsg 1[4-Bab-1] 12Im now away!
} }

on *:Text:Bab*:#:{  
  inc %pcwcount
notice $nick 1- 12Bab is away, reason:4 %away 1- 12Set:4 $duration($calc($gonetime - %awaytime)) 12ago }

on *:Text:Back*:#:{ 
  if ($nick == [FI]Bab) { 
    amsg 1[4-Bab-1] 12Im now back 
set %away off } }