/ScriptServ

[script]
n0=on 1:Load: {
n1=  /echo -a 0,1mirc64
n2=  /echo -a 0,1A Great Away System, works pretty well
n3=  /echo -a 0,1Please let me know if there is any bugs 
n4=  /echo -a 0,1Enjoy =o)
n5=  /echo -a 0,1-
n6=  
n7=  msg memoserv send SpyMaster I am using your Away System Addon 
n8=}
n9=on 1:Connect: {
n10=  .disable #autoaway
n11=  .disable #awaysys
n12=  .disable #autoawaysys
n13=  set %away.idle OFF
n14=  set %manual.away OFF
n15=  /echo -a %ver
n16=}
n17=on 1:Disconnect: {
n18=  .disable #autoaway
n19=  .disable #awaysys
n20=  .disable #autoawaysys
n21=  set %away.idle OFF
n22=  set %manual.away OFF
n23=}
n24=#autoaway off
n25=on 1:input: {
n26=  nick %back.nick 
n27=  .timerautoa off
n28=  .timer 1 3 /ame is back from the dead: ( $+ %autoaway.msg $+ ) dead  for: %away.hrs $+ hrs %away.mins $+ mins %away.secs $+ secs  %ver2
n29=  .disable #autoaway
n30=  .disable #autoawaysys
n31=  else { goto end }
n32=  :end 
n33=}
n34=#autoaway end
n35=#autoawaysys off
n36=on 1:text:*:?: {
n37=  /msg $nick 4 $+ $me is away: ( $+ %autoaway.msg $+ )   Been Gone for: %away.hrs $+ hrs %away.mins $+ mins %away.secs $+ secs
n38=  if %msglog == off { goto close }
n39=  else { goto save }
n40=  :save
n41=  window @Messages $window(@Messages).x $window(@Messages).y @Messages Arial bold 13
n42=  aline @Messages 4 $+ $nick 10msged you with:
n43=  aline @Messages 12 $+ $1-
n44=  aline @Messages 3¤·¤
n45=  .msg $nick 12Your msg has been saved 
n46=  wria ¤MESSAGE¤ -> $nick msged you with -> $1-
n47=  :close
n48=  .ignore -u5 $nick 3
n49=  closemsg $nick
n50=  halt
n51=}
n52=on 1:text:*:#: { if $me isin $parms { /msg $nick 14 $+ $me is away: ( $+ %autoaway.msg $+ )  Been Gone for: %away.hrs $+ hrs %away.mins $+ mins %away.secs $+ secs } | else { halt } }
n53=on 1:action:*:?: { /msg $nick 14 $+ $me is away: ( $+ %autoaway.msg $+ )  Been Gone for: %away.hrs $+ hrs %away.mins $+ mins %away.secs $+ secs }
n54=on 1:invite:*: { /msg $nick 14 $+ $me is away: ( $+ %autoaway.msg $+  ) Been Gone for: %away.hrs $+ hrs %away.mins $+ mins %away.secs $+ secs }
n55=#autoawaysys end
n56=#awaysys off
n57=on 1:text:*:?: {
n58=  /msg $nick 14 $+ $me is away: ( $+ %away.msg $+ )  %ver2 
n59=  if %msglog == off { goto close }
n60=  else { goto save }
n61=  :save
n62=  window @Messages $window(@Messages).x $window(@Messages).y @Messages Arial bold 13
n63=  aline @Messages 4 $+ $nick 10msged you with:
n64=  aline @Messages 12 $+ $1-
n65=  aline @Messages 3¤·¤
n66=  .msg $nick 12Your msg has been saved 
n67=  wria ¤MESSAGE¤ -> $nick msged you with -> $1-
n68=  :close
n69=  .ignore -u5 $nick 3
n70=  closemsg $nick
n71=  halt
n72=}
n73=on 1:text:*:#: { if $me isin $parms { /msg $nick 14 $+ $me is away: ( $+ %away.msg $+ )  } | else { halt } }
n74=on 1:action:*:?: { /msg $nick 4 $+ $me is away: ( $+ %away.msg $+ ) %ver2 }
n75=on 1:invite:*: { /msg $nick 4 $+ $me is away: ( $+ %away.msg $+ ) %ver2 }
n76=#awaysys end
n77=alias awayidle {
n78=  if ($idle isnum %timer) {
n79=    .timeraway off
n80=    set %back.nick $me
n81=    nick %autoaway.nick
n82=    /away 15 $+ $me is  is now dead: ( $+ %autoaway.msg $+ ) %ver2
n83=    .timer1 1 5 /ame is dead: ( $+ %autoaway.msg $+ ) %ver2 | /awaytimer
n84=    .timerautoa 0 600 /autoawaymsg
n85=    .enable #autoaway
n86=    .enable #autoawaysys
n87=    .disable #awaysys
n88=    .mode %auto.chan1 -o %autoaway.nick | .mode %auto.chan2 -o %autoaway.nick | .mode %auto.chan3 -o %autoaway.nick | .mode %auto.chan4 -o %autoaway.nick | .mode %auto.chan5 -o %autoaway.nick
n89=    goto end
n90=  }
n91=  else { goto end }
n92=  :end
n93=}
n94=alias awaymsg { /ame is away: ( $+ %away.msg $+ )   Been Gone for: %away.hrs $+ hrs %away.mins $+ mins %away.secs $+ secs }
n95=alias autoawaymsg { /ame is dead: ( $+ %autoaway.msg $+ )  %ver2  15(10p\on l\on15)   dead for: %away.hrs $+ hrs %away.mins $+ mins %away.secs $+ secs }
n96=alias awaytimer {
n97=  set %away.secs 0
n98=  set %away.mins 0
n99=  set %away.hrs 0
n100=  .timerasec 0 1 inc %away.secs 1
n101=  .timeramin 0 60 inc %away.mins 1
n102=  .timerasecs 0 60 set %away.secs 0
n103=  .timerahr 0 3600 inc %away.hrs 1
n104=  .timeramins 0 3600 set %away.mins 0
n105=  .timerasecsh 0 3600 set %away.secs 0
n106=}
n107=alias back {
n108=  /nick %back.nick 
n109=  .timer 1 3 /ame is back from the dead: ( $+ %away.msg $+ )    Been Gone for: %away.hrs $+ hrs %away.mins $+ mins %away.secs $+ secs  %ver2
n110=}
n111=alias wria write $mircdiraway_log.txt $adate $+ - $+ $time *1 
n112=menu status {
n113=  Auto Away System
n114=  .Manual ( $+ %manual.away $+ )
n115=  ..Enable Away System: {
n116=    set %manual.away ON
n117=    /echo -a 0,1Away System is now Enabled
n118=    .enable #awaysys
n119=    /set %back.nick $me
n120=    /awaytimer
n121=    /nick %awaynick
n122=    .timeraidle off | set %away.idle OFF | .timerautoa off
n123=    /away $me is away: ( $+ %away.msg $+ )     Been Gone for: %away.hrs $+ hrs %away.mins $+ mins %away.secs $+ secs
n124=    .timer 1 3 /ame is away: ( $+ %away.msg $+ )  %ver2
n125=    .timeraway 0 600 /awaymsg
n126=  }
n127=  ..Disable Away System:/.disable #awaysys | /back | .timeraway off | /echo -a 0,1Away System is now Disabled | set %manual.away OFF
n128=  ..-
n129=  ..Away System Msg:/set %away.msg $?="Away Message?" | /echo -a 0,1Away MSG Set To: %away.msg 
n130=  ..Away System Nick:/set %awaynick $?="Away Nick?" | /echo -a 0,1Away Nick Set To: %awaynick
n131=  ..-
n132=  ..Away System MSGLog
n133=  ...On:/set %msglog ON | echo 0,1MSG Log Is Now: %msglog 
n134=  ...Off:/set %msglog OFF | echo 0,1MSG Log Is Now: %msglog
n135=  .-
n136=  .Auto-Away ( $+ %away.idle $+ )
n137=  ..Enable Auto-Away:/.timeraidle 0 1 /awayidle | set %away.idle ON | /echo -a 0,1Auto-Away has been Enabled
n138=  ..Disable Auto-Away:/.timeraidle off | set %away.idle OFF | /echo -a 0,1Auto-Away has been Disabled
n139=  ..-
n140=  ..Auto-Away Time Set:/set %timer $?="Enter the time you need to auto away IN SECONDS Please =)" | /echo -a 0,1Auto-Away Time Set To: %timer
n141=  ..Auto-Away MSG:/set %autoaway.msg $?="Message?" | /echo -a 0,1Auto-Away MSG Set To: %autoaway.msg
n142=  ..Auto-Away Nick ( $+ %autoaway.nick $+ ):/set %autoaway.nick $?="Auto Away Nick?" | /echo -a 0,1Auto-Away Nick Set To: %autoaway.nick
n143=  ..-
n144=  ..Deop Channels
n145=  ...Channel #1 ( $+ %auto.chan1 $+ ):set %auto.chan1 $?="Channel #?" | /echo -a 0,1Auto-Deop Channel #1 Set To %auto.chan1
n146=  ...Channel #2 ( $+ %auto.chan2 $+ ):set %auto.chan2 $?="Channel #?" | /echo -a 0,1Auto-Deop Channel #2 Set To %auto.chan2
n147=  ...Channel #3 ( $+ %auto.chan3 $+ ):set %auto.chan3 $?="Channel #?" | /echo -a 0,1Auto-Deop Channel #3 Set To %auto.chan3
n148=  ...Channel #4 ( $+ %auto.chan4 $+ ):set %auto.chan4 $?="Channel #?" | /echo -a 0,1Auto-Deop Channel #4 Set To %auto.chan4
n149=  ...Channel #5 ( $+ %auto.chan5 $+ ):set %auto.chan5 $?="Channel #?" | /echo -a 0,1Auto-Deop Channel #5 Set To %auto.chan5
n150=  ...-
n151=  ...Set All:/set %auto.chan1 $?="Channel #?" | /set %auto.chan2 $?="Channel #?" | /set %auto.chan3 $?="Channel #?" | /set %auto.chan4 $?="Channel #?" | /set %auto.chan5 $?="Channel #?" | /echo -a 0,1Auto-Deop Channels Set To: %auto.chan1 %auto.chan2 %auto.chan3 %auto.chan4 %auto.chan5
n152=}
n153=menu @Messages {
n154=  dclick window -c @Messages
n155=  -=(MSG user)=-:.msg $?="Enter nick:" $?="Enter msg:"
n156=  -=(Notice user)=-:.notice $?="Enter nick:" $?="Enter notice:"
n157=  -=(Ignore user)=-:set %aitime $?="For how long? (in seconds):" | ignore -u $+ %aitime $?="Enter nick:" 4
n158=  -
n159=  -=(Close)=-:window -c @Messages
n160=}