thanks for the info :]
i use mIRC and i have a private bot that i script on.
a couple of my scripts:
Code:
on *:text:!av *:#:{
if ($nick isop $chan) {
cs access $chan add $2 *
msg $chan 4[7Access4] $2 7has been given4 * 7access in4 $chan $+ .
mode $chan +v $2
}
}
on *:text:!ah *:#:{
if ($nick isop $chan) {
cs access $chan add $2 4
msg $chan 4[7Access4] $2 7has been given4 4 7access in4 $chan $+ .
mode $chan +h $2
}
}
on *:text:!ao *:#:{
if ($nick isop $chan) {
cs access $chan add $2 5
msg $chan 4[7Access4] $2 7has been given4 5 7access in4 $chan $+ .
mode $chan +o $2
}
}
on *:text:!aao *:#:{
if ($address($nick,2) == *!*@*****-***56B8*.nott.cable.ntl.com) {
cs access $chan add $2 *0
msg $chan 4[7Access4] $2 7has been given4 *0 7access in4 $chan $+ .
mode $chan +ao $2 $2
}
}
on *:text:!leet *:#:{
if ($address($nick,2) == *!*@*****-***56B8*.nott.cable.ntl.com) {
cs access $chan add $2 ***7
msg $chan 4[7Access4] $2 7has been given4 ***7 7access in4 $chan $+ .
mode $chan +ao $2 $2
}
}
on *:text:!admin *:#:{
if ($address($nick,2) == *!*@*****-***56B8*.nott.cable.ntl.com) {
cs access $chan add $2 ****
msg $chan 4[7Access4] $2 7has been given4 **** 7access in4 $chan $+ .
mode $chan +ao $2 $2
}
}
on *:text:!delacc *:#:{
if ($address($nick,2) == *!*@*****-***56B8*.nott.cable.ntl.com) {
cs access $chan del $2
msg $chan 4[7Access4] $2 7has been deleted from 4 $chan $+ 's 7access list.
}
}
Code:
alias access {
dialog -m access access
}
menu * {
access:/dialog -m access access
}
dialog access {
title "Access"
size -* -* *25 *50
option dbu
text "Access List", 6, 5* 4 60 *0 center
text "Channel", *, *0 *6 60 *0 center
text "Nickname", 4, *0 *0 60 *0 center
edit "", 2, *6 ** 56 **
edit "", 7, *6 27 56 **
button "Voice", 8, 46 42 *7 *2
button "Halfop", *, 46 55 *7 *2
button "Op", *0, 46 68 *7 *2
button "Aop", **, 46 8* *7 *2
button "Leet", *2, 46 *4 *7 *2
button "Admin", **, 46 *07 *7 *2
button "Delete", *4, 46 *20 *7 *2
text "By Triv", *, 55 *40 60 *0 center
}
on *:DIALOG:access:sclick:8:{
cs access $did(2) add $did(7) *
msg $did(2) 4[7Access4] $did(7) 7has been given4 * 7access in4 $did(2) $+ .
}
on *:DIALOG:access:sclick:*:{
cs access $did(2) add $did(7) 4
msg $did(2) 4[7Access4] $did(7) 7has been given4 4 7access in4 $did(2) $+ .
}
on *:DIALOG:access:sclick:*0:{
cs access $did(2) add $did(7) 5
msg $did(2) 4[7Access4] $did(7) 7has been given4 5 7access in4 $did(2) $+ .
}
on *:DIALOG:access:sclick:**:{
cs access $did(2) add $did(7) *0
msg $did(2) 4[7Access4] $did(7) 7has been given4 *0 7access in4 $did(2) $+ .
}
on *:DIALOG:access:sclick:*2:{
cs access $did(2) add $did(7) ***7
msg $did(2) 4[7Access4] $did(7) 7has been given4 ***7 7access in4 $did(2) $+ .
}
on *:DIALOG:access:sclick:**:{
cs access $did(2) add $did(7) ****
msg $did(2) 4[7Access4] $did(7) 7has been given4 **** 7access in4 $did(2) $+ .
}
on *:DIALOG:access:sclick:*4:{
cs access $did(2) del $did(7)
msg $did(2) 4[7Access4] $did(7) 7has been deleted from 4 $did(2) $+ 's 7access list.
}