13 May 2012

PingG

#pingreply on
on *:text:!ping:#: { ctcp $nick ping }

on *:CtcpReply:ping*: { msg # $nick : Perghh Ping anda  $calc($ctime - $2) $+ seken }
on *:CtcpReply:ping*: { msg $nick Ping anda amat dahsyat $calc($ctime - $2) $+  seken }
on *:CtcpReply:ping*: { notice $nick Wew Ko Nyer Ping...Heheheheh Fkir2 Le ye $calc($ctime - $2) $+  seken }
#pingreply end

menu menubar,channel {
  Ping Reply %pingreply $+
  .Activate:set %pingreply Activated | enable #revenge | echo -a Ping Reply is Activated
  .Deactivate:set %pingreply Deactivated | disable #revenge | echo -a Ping Reply is Deactivated
}

No comments: