[nas]peter's afk script

[chain]

[nas]peter's afk script

 

 

on *:START: {

  set %afk.status 0

  ; timer 0 60 checkaway ;

}

alias Afk-on {

  set %afk.status 1

  set %afk.reason $$1-

  set %afk.time $time

  set %afk.date $date

  nick %afk.nick

  timer 1 2 echo -a You are now afk || you went afk on %afk.time %afk.date with reason: %afk.reason

}

alias afk-off { set %afk.status 0

  nick %nonafk.nick

  timer 1 2 msg nickserv identify %password

  timer 1 2 echo -a You are now back from afk || you went afk on %afk.time %afk.date with reason: %afk.reason

  set %afk.reason Not afk

}



on *:TEXT:*:#: {

  if (%alertnick isin $1-) && ($me == %afk.nick) {

    if ($readini(afk-script-no-notice.ini,Ignore,$nick) != $null) { halt }

    notice $nick I am now AFK || Your message has been logged || I have been AFK since: %afk.time %afk.date || If you really need me pm me or just nickalert me a few more times

  }

}



on *:INPUT:*: {

  if ( %afk.status ) {

    afk-off

  }

}



menu channel,nicklist,query,status {

  .AFK script and Nickalert

  ..Go AFK:/afk-on $$?="Why do you go afk?"

  ..Back:/Afk-off

  ..Dialog (use to install, change settings):/dialog -m Peter_afk_Dialog Peter_afk_Dialog

  ..AFK Ignore list

  ...Add:addnick-afk

  ...Del:delnick-afk

}



alias ingame.afk.set {

  set %ingame.nick $$?="What do you want the nick to be when you join the game?"

  set %ingame.afk.nick $$?="What is your ingame name?"

}



alias install_peter_afk {

  set %nonafk.nick $$?="What will be the nickname you want to use when you return?"

  set %afk.nick $$?="What will be your afk nick?"

  set %password $$?="What is the password that is used with nickserv identification?"

  set %alertnick $$?="What will be the alert nickname?"

  set %ingame.nick $$?="What do you want the nick to be when you join the game?"

  set %ingame.afk.nick $$?="What is your ingame name?"

  var %Autoafk_enable = $iif($?!="Do you to enable Auto AFK?",1,0)

  Autoafk_setup

}



alias Autoafk_setup {

  if ( %autoafk_enable ) {

    set %autoafk.time $$?="After how many SECONDS do you want to go Auto afk?"

    echo -a auto-afk installed with parameters %autoafk seconds

  }

}

; alias checkaway {

if($idle > %autoafk.time && %afk.status == off) {

  Afk-on Auto afk after $duration(%autoafk.time)

}

;if($idle