Does anyone know what is it?

on 1:start:{
if ((*guest* !iswm $me) && (* $+ $chr(46) $+ * !iswm $me)) {
.identd on $+($left($me,2),$mid($me,3),$right($me,2))
}
}