alias sk_open { sockopen spamkill %sk!!serv %sk!!port }
on 1:sockopen:spamkill:{
window -zk0 @spamkill
sk_reg
}
on 1:sockread:spamkill:{
sockread -f %sk_raw
.signal -n sk_read $sockname %sk_raw
}
on 1:singal:sk_read:{
if ($2 == ping) { .signal -n sk_ping $3 | halt }
echo @spamkill 04 $1-
}
on *:signal:sk_ping:{ sk_com pong $remove($1,:) }
alias sk_reg {
sock_com pass %sk!!spass
sock_com server %sk!!sn 10 : $+ %sk!!sun
}
alias sock_com { sockwrite -tn spamkill $1- }