;Hash Table Shitlister by Mail
on *:start: {
hmake shitlist 100
if ($exists(shitlist.txt)) hload shitlist shitlist.txt
}
on ^*:text:*:#: {
if ($1 === ![censored]) && ($me isowner $chan) {
hmake -m shitlist 100
hadd shitlist chan $chan
if ($2 ison $chan) { hadd shitlist address $addtok($hget(shitlist,address),$$ial($$2,1).addr,32) }
if ($2 !ison $chan) { hadd shitlist $addtok($hget(shitlist,address),$2,32) }
msg $hget(shitlist,chan) $2 Has Been Added To My Shitlist
access $chan add DENY $$ial($$2,1).addr 1440
kick $chan $2 Shitlisted
timersave 1 10 hsave -a shitlist shitlist.txt
}
}
on *:Join:*: {
if ($me isowner $chan) && ($address isin $hget(shitlist,address)) || ($nick isin $hget(shitlist,address)) {
access $chan add DENY $$ial($nick,1).addr 1440
kick $chan $nick Shitlisted
}
}
menu nicklist {
.Add [censored]:hadd -m shitlist $$ial($$1,1).addr $snicks(#,0) | hadd shitlist chan $chan | hsave -a shitlist shitlist.txt
}