This is a mIRC away script withouth using the /away command.
If you find some bugs etc. Just tell me
You want to have some more features? Tell me on the IRC: irc.quakenet.org Port: 6667 Channel: #Defero
Now with Auto AFK function You can set it off if you want
In the 1.7 Version it will now change your nick when you type /a and if you come back it will return your old nick!
Have fun! Just load the script into your Remotes and use the command /a

on *:LOAD:{
  set %away False
  set %awayauto Off
  set %awaytimer 600
  set %awaynormalnick $me
  set %awaynick AFK| $+ $me
  echo -a 3Y14ou 3H14ave 3J14ust 3L14oaded 3T14he 3A14way 3S14cript 3B14y 3D14efero200
  echo -a 3T14he 3S14andart 3A14uto 3A14way 3T14ime 3I14s3 1140 3M14inutes
}

alias a {
  if (%away == False) && ($1- != $null) {
    unset %away
    set %away %away True
    set %awayreason %awayreason $1-
    nick %awaynick
    echo -a 3Y14ou've 3B14een 3M14arked 3A14s 3A14way 3R14eason 3:9 $1-
  }
  elseif (%away == False) && ($1- == $null) {
    echo -a 3Y14ou 3H14ave 3T14o 3U14se 3A 3A14way 3R14eason 3!
  }
  elseif (%away == True) {
    unset %awayreason
    unset %away
    set %away %away False
    nick %awaynormalnick
    echo -a 3Y14ou're 3N14o 3L14onger 3M14arked 3A14s 3B14eing 3A14way
  }
}

alias areason {
  echo -a 3Y14ou're 3A14way 3R14eason 3:9 %awayreason
}

alias ahelp {
  echo -a 3T14he 3C14ommands 3F14or 3T14his 3S14cript 3A14re 3:
  echo -a 3/14a 3<14reason3> 3- 3W14ill 3S14et 3Y14ou 3A14way 3W14ith 3T14he 3R14eason 3Y14ou 3T14ook
  echo -a 3/14a 3- 3W14ill 3R14emove 3Y14ou're 3A14way 3S14tatus
  echo -a 3/14areason 3- 3W14ill 3S14how 3Y14ou 3T14he 3R14eason 3W14hy 3Y14ou're 3A14way
  echo -a 3/14autoaway 3- 3S14ets 3T14he 3A14uto 3A14way 3T14ime
  echo -a 3/14autoawaytime 3- 3T14oggles 3T14he 3A14uto 3A14way 3O14n 3/ 3O14ff
  echo -a 3/14awaynick 3- 3S14ets 3Y14our 3A14way 3N14ick
  echo -a 3/14normalnick 3- 3Sets 3Y14our 3N14ormal 3N14ick
}

on *:TEXT:*:*:{
  if ($me isin $1-) && (%away == True) {
    notice $nick 3S14orry 3B14ut 3I14'm 3C14urrenlty 3A14way 3R14eason 3:9 %awayreason
  }
}

alias autoaway {
  set %autoaway $?="Set the Auto AFK time in seconds here!"
}

alias autoafk {
  if (%awayauto == On) {
    unset %awayauto
    set %awayauto Off
    echo -a 3Y14ou 3H14ave 3T14oggled 3O14ff 3T14he 3A14uto 3A14way 3F14unction
  }
  elseif (%awayauto == Off) {
    unset %awayauto
    set %awayauto On
    echo -a 3Y14ou 3H14ave 3T14oggled 3O14n 3T14he 3A14uto 3A14way 3F14unction
  }
}

alias awaynick {
  set %awaynick $?="Put the AFK nick you want in here"
}

alias normalnick {
  set %awaynormalnick $?="Put your normal nick in here"
}

on *:INPUT:*:{
  if ($1- == /areason) && ($1- == /normalnick) && ($1- == /awaynick) && ($1- == /autoaway) && ($1- == /autoawaytime) { {
      return
    }
    elseif (%away == True) {
      echo -a 3Y14ou're 3S14till 3M14arked 3A14s 3A14way
      echo -a 3Y14ou 3C14an 3S14top 3B14eing 3A14way 3I14f 3Y14ou 3T14ype 3: 3/14a
    }
    elseif (%away == False) {
      if (%awayauto == On) {
        timerafk 1 %awaytimer /a 3A14uto 3A14way
      }
    }
    elseif (%away == False) {
      if (%awayauto == Off) {
        timerafk off
      }
    }
  }
}

on *:UNLOAD:{
  echo -a 3T14hanks 3F14or 3U14sing 3T14he 3A14way 3S14cript 3B14y 3D14efero200
  unset %away*
  echo -a 3A14ll 3S14cript 3V14ariables 3H14ave 3B14een 3R14emoved
}