1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
on *:text:!idle*:%chan:{
if (!$regex($2,/^#.+/)) || ($2 == #help) { msg # Error: Invalid Channel Name. }
elseif ($me ison $2) { msg # Error: I'm Already On That Channel. }
elseif ($idlec($nick) == $2) { msg # Error: You Have Already Requested Me! }
else {
msg # Ok, Now Joining $2 With Password ( $+ $iif($3,$3,None) $+ )
join $2-
.timercc 1 3 cc $nick $2
}
}
alias cc {
if ($1 !ison $2) {
part $2 Not On Chan.
msg %chan Parted $2 $+ , $1 Not There!
}
else {
writeini -n idle.ini $1 Chan $2
msg $2 OK, Requierments Met So I Will Stay! Come #advGames.adv
}
}
alias idlec { return $readini(Idle.ini,$1,Chan) }
on *:part:%chan:{ if ($idlec($nick) != $null) { part $v1 | remini -n Idle.ini $nick } }
on *:quit:{ if ($idlec($nick) != $null) { part $v1 | remini -n Idle.ini $nick } }
on *:kick:%chan:{ if ($idlec($knick) != $null) { part $v1 | remini -n Idle.ini $knick } }
on *:nick:{ if ($idlec($nick) != $null) { writeini -n Idle.ini $newnick Chan $v1 | remini -n Idle.ini $nick } }
on *:disconnect:{ write -c Idle.ini }
on *:exit:{ write -c Idle.ini }
on master:text:*:%chan:{
if ($1 == !part) { msg $2 Leaving Now! Reason: $3 Owner Request. | part $2 }
if ($1 == !status) { msg $chan Notice: I'm on $chan(0) chans. }
}
|