By Raid on Aug 02, 2005Copy and make a new txt file inside your mIRC folder. Then load the script into the remote section. Commands: right click in channel or /a /b /re /log /msgs |||||
Credits to tank59 on the auto away. http://hawkee.com/snippet.php?snippet_id=1189
Menu channel {
RaidAway
.Set Raid Away:a
.Set Raid Back:b
.Auto Away Return:re
.Log:log
}
On *:OPEN:?:*: {
if ($away) {
close -m $nick
msg $nick -RaidAway- My Pm system is offline. Your Msg has been logged.
echo -a $nick sent a pm
write Msgs.txt $fulldate ( $Nick ) - $1-
}
}
on *:CONNECT: {
echo -s -RaidAway- Activated.
timeridle 0 2400 idler
}
on *:DISCONNECT: {
echo -as -RaidAway- Deacivated.
timers off
}
on *:INVITE:*: {
if ($away == $true) {
notice $nick I am away, leave me alone if this is not important.
}
}
Alias msgs {
var %x 1
while ($Read(Msgs.txt,%x)) {
echo $v1
inc %x
}
}
Alias log {
run $scriptdirMsgs.txt
}
Alias a {
if ($away == $false) {
amsg -RaidAway- Now Activated: Query Logger Activated - Reason: ( $?="Give a reason" ) | away Set away at $time $chr(91) $+ $! $+ $chr(93) | timerRaidAway 0 2400 amsg -RaidAway- Activated: Query Logger Activated - Reason: $duration( $awaymsg )
nick R[a]id
}
}
Alias b {
if ($away == $true) {
amsg -RaidAway- Now Deactivated: Query Logger Deactivated - Reason: ( $awaymsg ) Time AWaY: $duration($awaytime) | away | log | timerRaidAway off
nick Raid
}
}
Alias idler {
if ($away == $false) && ($idle >= 600) {
set %awaygone $ctime
amsg -RaidAway- Now Activated: Query Logger Activated - Reason: Auto Idle at $asctime(h:nn:sstt)
away Reason: Auto Idle at $asctime(h:nn:sstt)
nick R[a]id
}
elseif ($away == $true) {
halt
}
}
Alias re {
if ($away == $true) {
amsg -RaidAway- Now Deactivated: Query Logger Deactivated - Reason: Auto Idler I was gone: $replace($duration($calc($ctime - %awaygone)),wks,w,wk,w,days,d,day,d,hrs,h,hr,h,mins,m,min,m,secs,s,sec,s)
nick Raid
away | log
unset %awaygone
}
}
On :OPEN:?:: {
if ($away) {
close -m $nick
msg $nick -RaidAway- My Pm system is offline. Your Msg has been logged.
echo -a $nick sent a pm
write Msgs.txt On $fulldate [ $Nick ] Sent You A Message Saying $1-
}
}
better would be
On :OPEN:?:: {
if ($away) {
msg $nick -RaidAway- My Pm system is offline. Your Msg has been logged.
close -m $nick
echo -a $nick sent a pm
write msgs.txt $1- ( $+ $fulldate / $nick $+ )
}
}
Added some new features to it. It works great with this Query Control By SeiferAlmasy I changed it a bit to make it fit the script:
.
.
dialog qc {
title \"Query Control\"
size -1 -1 140 51
option dbu
edit \"\", 3, 4 10 132 10, read
text \"From:\", 5, 4 24 14 8
edit \"\", 7, 20 22 116 10, read
button \"Accept\", 1, 5 34 37 12, flat
button \"Decline\", 2, 44 34 37 12, flat
box \"Query Control\", 4, 1 1 138 49
}
on :dialog:qc:sclick:1:{
/window -w %qnick
/msg %qnick -Query Accepted- You may talk now. -Query Accepted-
/dialog -x qc
/window -a %qnick
/unset %qnick
}
on :dialog:qc:sclick:2:{
close -m %qnick
/msg %qnick -Query Declined- Go away you are not worth my time. -Query Declined-
/dialog -x qc
unset %qnick
}
On *:OPEN:?: {
if (!$away) {
if ($dialog(qc)) {
close -m $nick
}
else {
/set %qnick $nick
/window -h %qnick
/msg %qnick -Please Wait- I am thinking if you are worth my time. -Please Wait-
/dialog -m qc qc
did -a qc 7 %qnick
did -a qc 3 $1-
} }
}
well to set the away if you put this in >popups>channel---> so it looks like this
Away System
.set away:/amsg 1514,151,1415,1 -- -- [J.A.C.K.A.L AWAY SYSTEM
.set back:/amsg 1514,151,1415,1 -- -- [J.A.C.K.A.L AWAY SYSTEM
then all you have to do is right click in the channel and it should list away system in the little popup. just click away or back.
heres another version that has different colors put in popups under channel or Aliases.
/amsg 1,14--15,14--1,14--15 [1S15ha1d15o1w 1S15c1Ri15p1T] [1A15wA1Y 1S15y1sT15E1m 1A15c1t15iv1e15]0 $me 1i15s n1ow15 aW1A15Y 0 ( $?=\"Give a reason\" ) 1Q15u1er15y S1y15st1em 1Se15t 1T15o 1B15lo1c15k 1Mo15de. 1Q15ue1r15y 1L15o1gg15e1r 15Ac1t15iv1ate15d. 15 [1S15ha1d15o1w 1S15c1Ri15p1T] [1A15wA1Y 1S15y1sT15E1m 1A15c1t15iv1e15] | /nick {Sh[A]do[W][A][Y]} | /msg nickserv identify fisher | /away Set away at $time { $+ $! $+ }|
/amsg 1,14--15,14--1,14--15 [1S15ha1d15o1w 1S15c1Ri15p1T] [1A15wA1Y 1S15y1sT15E1m 15D1ea15C1t15iV1A15te1d]0 $me 1i15s n1o15w 1B15AC1K. 15Qu1e15r1y 15Lo1gg15e1r 15N1ow15 1Of15f1l15in1e15. Qu1e15r1y 15S1ys15t1e15m Se1t 15T1o 15N1or15mal1 Mo15d15e.[1S15ha1d15o1w 1S15c1Ri15p1T] [1A15wA1Y 1S15y1sT15E1m 15D1ea15C1t15iV1A15te1d]15,14--15,14--1,14--14 | /away | /nick {Shadow} | /msg nickserv identify fisher | /msgs
o this is for popups section not remotes. the logger is only thing that goes in the remotes. This script also makes good f keys
/f1 /amsg 1514,151,1415,1 -- -- [J.A.C.K.A.L AWAY SYSTEM ACTIVATED] $me is now AWAY ( $?=\"Give a reason\" ) Away Query logger activated. Type /ms send $me (your msg) and i will get back to you when i return. [J.A.C.K.A.L AWAY SYSTEM ACTIVATED] 1514,151,1415,1 | /nick (YOUR AWAY NICK) | /msg nickserv identify (YOURPASS) | /away Set away at $time { $+ $! $+ }
I wen looking for the Query blocker i use w/ this and found it http://www.hawkee.com/snippet.php?snippet_id=1014 it allows you to block all in comming pm yet the logger keeps tract of what they say.
k the logger was made more me so i didnt post it. It was made by LordBaby at irc.scrollrack.com he made it in a min. or two. I am still a HUGE noob at scripting and dont quite understand every thing so i made this in popup section alt+p under channel. I thought that it made it function great and also is simple to use. I had went through many away systems that would mess my mirc up some how. The passwords is there because i had switched nicks and grouped the away nick with an other nick so when i change {RAiD} to {R{A}iD} i need to identify to {R{A}iD}, and when i change back i need to identify to {RAiD}. Im too lazy to regroup. if you dont need the password leave it out.
