on *:join:#sohbet:{ if $read(vident.txt,w,$gettok($gettok($address($nick,5),2,33),1,64)) {
    set -u15 $+(%,version.,$nick) | ctcp $nick version
}
}
on *:ctcpreply:*version*: {  if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ion) {  window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ion }
  if $($+(%,version.,$nick),1) {
 Echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ion $nick $1- | return }
}
alias vident { run $mircdirvident.txt }

/auser x *!ident@*

/auser x *!mIRC@*
/auser x *!Sohbet@*
/auser x *!WebSohbet@*

on x:join:#Sohbet:ctcp $nick version 
on $*:ctcpreply:/mIRC\sv6\.35|mIRC\sv6\.21/i:{ window -e @Ctcp-Version | echo -t @Ctcp-Version $nick $+ : $1- }