Heh. Way to necro a 9 year old thread smile Welcome to the forums!

I guess while we're here...

Code:
On $*:PARSELINE:in:/^[^:]*:([^!$%]+)!\S+ PRIVMSG \S+ :\x01VERSION\x01$/: {
  var %fakeversion = Not mIRC.
  .parseline -itu0 $regsubex(a,$parseline,/:\x01VERSION\K/,$chr(32) $+ (Blocked by Raccoon.))
  .timerCtcpVersionFloodDelay 1 $r(1,5) ctcpreply $regml(1) VERSION %fakeversion
} ; by Raccoon 2017

Alternately...

Code:
On $*:PARSELINE:in:/^([^:]*:\S+ PRIVMSG \S+ :\x01VERSION)\x01$/i: {
  .parseline -itu0 $regml(1) (Blocked.) $+ $chr(1)
} ; by Raccoon & SReject 2017

CTCP *:VERSION:*: {
  ctcpreply $nick VERSION Not mIRC.
}

Alternately...

Code:
On $*:PARSELINE:out:/^(NOTICE \S+ :\x01VERSION) mIRC/:{
  .parseline -otn $regml(1) Not mIRC. $+ $chr(1)
} ; by SReject 2017

Last edited by Raccoon; 21/09/17 10:49 AM. Reason: Thanks SReject
Well. At least I won lunch.
Good philosophy, see good in bad, I like!