Just another CTCP fake

By Spoofing on Sep 22, 2010

Anybody can say list of all CTCPs? :P

alias traffic {
  tokenize 32 $1
  if ($1 == <-) {
    if ($3 == PRIVMSG) {
      if (:* iswm $5-) {
        if ($mid($5,3) == PING) ctcpreply $mid($gettok($2,1,33),2) $v1 $mid($6-,1,-1)
        elseif ($mid($5-,3,-1) == VERSION) ctcpreply $mid($gettok($2,1,33),2) $v1 mIRC $+(v,$version)
        elseif ($mid($5-,3,-1) == TIME) ctcpreply $mid($gettok($2,1,33),2) $v1 $asctime
        elseif ($mid($5-,3,-1) == USERINFO) ctcpreply $mid($gettok($2,1,33),2) $v1 $mnick
        elseif ($mid($5-,3,-1) == CLIENTINFO) ctcpreply $mid($gettok($2,1,33),2) $v1 PING VERSION TIME USERINFO CLIENTINFO
      }
    }
  }
}
on *:START: {
  ignore -tw *
  debug -i aux traffic
}

Comments

Sign in to comment.
MaSOuD   -  Sep 25, 2010

Aha :)

 Respond  
jaytea   -  Sep 25, 2010

not necessarily. when you use /debug -i win customAlias, mIRC will call $customAlias($1-) for each debug message where $1- is each line (plus the prefixing <- or ->). as such, the full line can be retrieved using $1.

 Respond  
MaSOuD   -  Sep 25, 2010

'tokenize 32 $1' Shouldn't be: 'tokenize 32 $1-'

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.