@FordLawnmower how i fixs this
;User Away System v1.25
;Team Nexgen 2000 by KnightFal
;www.team-nexgen.com
on *:load:{
if ($version < 5.61) echo -a $+ $colour(info2) $+ ** You need mirc 5.61 or greator in order to use this addon. | beep
echo -a 4TEAM NEXGEN'S AWAY SYSTEM v1.25 | echo -a 4Please type: /awaysys to begin. | .load -rs $findfile($nofile($script),page.mrc,1)
_vw awaysys version 1.25
}
alias time.away { set %time.away1 $?="Away interval in minute(s):" | set %time.away2 .timer22 0 $calc(%time.away1 60) } | echo -a 14Away Intervals will be displayed in channel(s) for %time.away1 minunte(s)
;[read write data/setting.ini]
alias _vr {
if ($exists(data\setting.ini) == $false) { mkdir data | write -c data\setting.ini }
return $readini data\setting.ini $1 $2
}
alias _vw {
if ($exists(data\setting.ini) == $false) { mkdir data | write -c data\setting.ini }
writeini data\setting.ini $1 $2 $3-
}
alias _vrem {
if ($exists(data\setting.ini) == $false) { mkdir data | write -c data\setting.ini }
remini data\setting.ini $1 $2
}
menu channel,menubar,status {
[away / pager]
.open away system:awaysys
.-
.open page : page1
.delete all messages : { .remove data/page.txt
if ($window(@page) != $null) page1
}
}
on :NOTICE::?: {
if ($_vr(away,away.log) == on) && ($me != $nick) {
if ([ %text [ $+ [ $site ] ] ] == $null) { set %text $++ $site 1 | .timer 1 60 unset %text $++ $site }
if ([ %text [ $+ [ $site ] ] ] == 1) { notice $nick $me IS AWAY [RECORDING ON] Hello, I'm not here right now [AWAY REASON: " $+ $vr(away,reason) $+ "] ... so please leave a brief message. Thankyou. | .timer 1 2 close -m $nick }
if ([ %text [ $+ [ $site ] ] ] == 2) { notice $nick $me IS AWAY [RECORDING ON] Hello, I'm not here right now [AWAY REASON: " $+ $vr(away,reason) $+ "] ... so please leave a brief message. Thankyou. | .timer 1 2 close -m $nick }
if ([ %text [ $+ [ $site ] ] ] == 3) { notice $nick $me IS AWAY [RECORDING ON] Hello, I'm not here right now [AWAY REASON: " $+ $vr(away,reason) $+ "] ... next message will be ignored. Thankyou. | .timer 1 2 close -m $nick }
if ([ %text [ $+ [ $site ] ] ] >= 4) { notice $nick $me IS AWAY [IGNORING] I said I'm not here! You are now IGNORED for 1 minute. | .ignore -pnu60 !@ $+ $site | .timer 1 2 close -m $nick }
inc %text $++ $site 1
write -i1 data\away.txt [NOTICE: $+ # $+ %Msgs $+ ] ( $+ $adate $+ )( $+ $day $atime $+ ) $nick ( $+ $address $+ ) $+ : $strip($1-)
set -q %messages YES
inc %msgs 1
if ($dialog(awaysys) != $null) { did -o awaysys 30 1 %msgs }
}
}
on :TEXT::?: {
if ($_vr(querycon,switch) == on) { _vw querycon switch off | _vw away querycon on }
if ($_vr(away,away.log) == on) && ($me != $nick) {
if ([ %text [ $+ [ $site ] ] ] == $null) { set %text $++ $site 1 | .timer 1 60 unset %text $++ $site }
if ([ %text [ $+ [ $site ] ] ] == 1) { notice $nick $me IS AWAY [RECORDING ON] Hello, I'm not here right now [AWAY REASON: " $+ $vr(away,reason) $+ "] ... so please leave a brief message. Thankyou. | .timer 1 2 close -m $nick }
if ([ %text [ $+ [ $site ] ] ] == 2) { notice $nick $me IS AWAY [RECORDING ON] Hello, I'm not here right now [AWAY REASON: " $+ $vr(away,reason) $+ "] ... so please leave a brief message. Thankyou. | .timer 1 2 close -m $nick }
if ([ %text [ $+ [ $site ] ] ] == 3) { notice $nick $me IS AWAY [RECORDING ON] Hello, I'm not here right now [AWAY REASON: " $+ $vr(away,reason) $+ "] ... next message will be ignored. Thankyou. | .timer 1 2 close -m $nick }
if ([ %text [ $+ [ $site ] ] ] >= 4) { notice $nick $me IS AWAY [IGNORING] I said I'm not here! You are now IGNORED for 1 minute. | .ignore -pnu60 !@ $+ $site | .timer 1 2 close -m $nick }
inc %text $++ $site 1
write -i1 $mircdir $+ data\away.txt [MSG: $+ # $+ %Msgs $+ ] ( $+ $adate $+ )( $+ $day $atime $+ ) $nick ( $+ $address $+ ) $+ : $strip($1-)
set -q %messages YES
inc %msgs 1
if ($dialog(awaysys) != $null) { did -o awaysys 30 1 %msgs }
}
}
alias awaysys {
if ($dialog(awaysys) == $null) { if ($away == $true) && (%awy.i != on) { away.set } | dialog -m awaysys awaysys }
line 64 dont work