on *:sockread:bot2:{
sockread %zz
tokenize 32 %zz
window -k @probe2
echo @probe2 $lower($remove($gettok(%zz,1,32),:)) : $lower($remove($gettok(%zz,4-,32),:))
set %nick $mid(%zz,2,$calc($pos(%zz,!,1) - 2))
if ($gettok(%zz,1,32) == PING) { sockwrite -tn bot2 pong $gettok(%zz,2,32) }
if ($4 == :@remember) && (($right($gettok($1,1,33),-1) == $me) || ($level($address($right($gettok($1,1,33),-1),5)) == aowner)) {
if (&nick isin $gettok(%z,6-,32)) { $replace(&nick,$gettok(%z,6-,32),$gettok(%z,6-,32)) | write $gettok(%z,6,32) .txt $gettok(%z,7-,32) | sockwrite -n bot2 privmsg $3 :bot1.0;14 $sock(ot2).mark $+ 1b5(14 $+ $gettok(%z,7-,32) added to $gettok(%boo,6,32) .txt15) }
else { write $gettok(%z,6,32) .txt $gettok(%z,7-,32) | sockwrite -n bot2 privmsg $3 : $sock(bot2).mark $+ 15(14 $+ $gettok(%z,7-,32) added to $gettok(%z,6,32) .txt15) }
}
}