[size=14]Away system ( Intended for a bot... )[/size]
[size=14]Screenshots[/size]
NOTE:
When I say intended for a BOT I mean it only works for other people...
Will not work as a away system for you... but for the people using your BOT / rooms.
[size=14]Install[/size]
[size=14]Will activate on:[/size]
AFK - BRB - BBL - TTYL - AWAY
For example: AFK Sleeping aka dreaming about nature
[size=14]DeActivate on:[/size]
BACK - BAK
For example: I'm back baby ! ? !
NOTE: It will deactivate automatically ( after 10 minutes aka 600 seconds )
if someone types during AWAY that is ;)
This is the best AFK/AWAY script out there...
on @*:TEXT:*:#:mAWAY_CMDS $strip($1-)
on @*:ACTiON:*:#:mAWAY_CMDS $strip($1-)
alias mReplaceStatsDB return $replace($remove($strip($1),[,],<,>,@,~,&,%,+),[,@,],~,|,-)
alias mAWAY_CMDS {
;*** AWAY SECTiON
if ($remove($strip($1),!,@,.,+,-) == AWAY) || ($remove($strip($1),!,@,.,+,-) == AFK) || ($remove($strip($1),!,@,.,+,-) == BBL) || ($remove($strip($1),!,@,.,+,-) == TTYL) { $iif($isdir($mircdir\TXT) == $false,mkDir $mircdir\TXT) | $iif(!$readini(TXT\StatsDB.ini,$replace($nick,[,@,],~,|,-),AWAY),msg # $+(13,$nick,) is now marked as $+(3,AWAY,) $+(15ooO,$chr(40),) As in not here... $+(15,$chr(41),),$iif(!$2,halt,.notice $nick Your $+(3,AWAY,) messages has been "updated" to -> $2-)) | writeini -n TXT\StatsDB.ini $replace($nick,[,@,],~,|,-) AWAY $ctime | writeini -n TXT\StatsDB.ini $replace($nick,[,@,],~,|,-) AWAYre $iif(!$2,N/A as in Not Available,$2-) }
;*** BACK / BaK
elseif ($readini(TXT\StatsDB.ini,$replace($nick,[,@,],~,|,-),AWAY)) && ((BACK isin $strip($1-)) || (BAK isin $strip($1-)) || ($calc($ctime -$readini(TXT\StatsDB.ini,$replace($nick,[,@,],~,|,-),AWAY)) >= 600)) { set -u1 %T $v1 | $iif(!$timer($+(Back,$network,$chan)),msg # $+(13,$nick,) is now $+(03,$iif(BaK isin $1-,BAK,BACK),) $+(15ooO,$chr(40),) As in back at keyboard... $+(15,$chr(41),),.notice $nick Welcome back $+(13$nick,) you're no longer marked as $+(3AWAY)) | remini TXT\StatsDB.ini $replace($nick,[,@,],~,|,-) AWAY | remini TXT\StatsDB.ini $replace($nick,[,@,],~,|,-) AWAYre | $+(.timer,Back,$network,$chan) 1 5 noop }
;*** NOTE <NiCK> is AWAY
elseif (!$timer($+(Away,$network,$chan))) && (($readini(TXT\StatsDB.ini,$mReplaceStatsDB($1),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($2),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($3),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($4),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($5),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($6),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($7),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($8),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($9),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($10),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($11),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($12),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($13),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($14),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($15),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($16),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($17),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($18),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($19),AWAYre)) || ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($20),AWAYre))) { $+(.timer,Away,$network,$chan) 1 4 noop | set -u1 %RE $v1
if ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($1),AWAY)) { set -u1 %X $1 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($2),AWAY)) { set -u1 %X $2 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($3),AWAY)) { set -u1 %X $3 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($4),AWAY)) { set -u1 %X $4 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($5),AWAY)) { set -u1 %X $5 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($6),AWAY)) { set -u1 %X $6 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($7),AWAY)) { set -u1 %X $7 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($8),AWAY)) { set -u1 %X $8 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($9),AWAY)) { set -u1 %X $9 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($10),AWAY)) { set -u1 %X $10 }
elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($11),AWAY)) { set -u1 %X $11 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($12),AWAY)) { set -u1 %X $12 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($13),AWAY)) { set -u1 %X $13 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($14),AWAY)) { set -u1 %X $14 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($15),AWAY)) { set -u1 %X $15 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($16),AWAY)) { set -u1 %X $16 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($17),AWAY)) { set -u1 %X $17 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($18),AWAY)) { set -u1 %X $18 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($19),AWAY)) { set -u1 %X $19 } | elseif ($readini(TXT\StatsDB.ini,$mReplaceStatsDB($20),AWAY)) { set -u1 %X $20 }
$iif($strip(%X) != $nick,msg # [4NOTE] $+(13,$nick,) -> Currently $+(04,$replacex($duration($calc($ctime -$readini(TXT\StatsDB.ini,$mReplaceStatsDB(%X),AWAY))),WKS,weeks,WK,week,DAYS,days,DAY,day,MiNS,minutes,MiN,minute,SECS,seconds,SEC,second),)) since $+(13,$nick(#,$nick(#,%X)),) went $+(3AFK) $+(15ooO,$chr(40),) %RE $+(15,$chr(41),))
}
;************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************************
}