on *:text:`profile*:#:{
var %z, %t, %q, %g, %n
if ($getustatus($nick) > 4) { halt }
if (!$2) {
var %g
%g = Your Profile: http://www.tachat.org/index.php?act=Profile&mhx= $+ $gettok($$ial($nick $+ *,1).addr,1,64)
if ($left($nick,6) == Admin_) { %g = Staff Profiles can not be gatherd, Please visit the TAChat Website and browse the members list. }
if ($left($nick,6) == Sysma_) { %g = Staff Profiles can not be gatherd, Please visit the TAChat Website and browse the members list. }
if ($left($nick,6) == Sysop_) { %g = Staff Profiles can not be gatherd, Please visit the TAChat Website and browse the members list. }
if ($left($nick,6) == Guide_) { %g = Staff Profiles can not be gatherd, Please visit the TAChat Website and browse the members list. }
if ($right($nick,4) == _Bot) { %g = Staff Profiles can not be gatherd, Please visit the TAChat Website and browse the members list. }
setmsg $chan %g
halt
}
else {
if ($left($2,5) == Admin) { setmsg $chan Staff Profiles can not be gatherd, Please visit the TAChat Website and browse the members list. | halt }
if ($left($2,5) == Sysma) { setmsg $chan Staff Profiles can not be gatherd, Please visit the TAChat Website and browse the members list. | halt }
if ($left($2,5) == Sysop) { setmsg $chan Staff Profiles can not be gatherd, Please visit the TAChat Website and browse the members list. | halt }
if ($left($2,5) == Guide) { setmsg $chan Staff Profiles can not be gatherd, Please visit the TAChat Website and browse the members list. | halt }
if ($right($2,4) == _Bot) { setmsg $chan Staff Profiles can not be gatherd, Please visit the TAChat Website and browse the members list. | halt }
%t = $+($2,$chr(95)) | %q = $len(%t)
var %nko 1
while (%nko <= $nick($chan,0)) {
if ($left($nick($chan,%nko),%q) == %t) {
setmsg $chan $nls2get($nick($chan,%nko)) Profile: http://www.tachat.org/index.php?act=Profile&mhx= $+ $gettok($$ial($nick($chan,%nko) $+ *,1).addr,1,64)
halt
}
inc %nko
}
}
haltdef
}