IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Kod:

alias google {

  sockopen google google.com 80

  %google.temp = $1-

}

on 1:sockopen:google:{

  if ($sockerr > 0) return

  sockwrite -n google $eval(GET [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) $+ %google.temp $+ $eval(&btnI=I%27m+Feeling+Lucky HTTP/1.0,0)

  sockwrite -n google

}

on 1:sockread:google:{

  if ($sockerr > 0) return

  :nextread

  sockread %google.temp

  if ($sockbr == 0) return

  if ( Location: isin %google.temp ) {

    if ( %google.nick != $null ) {

      notice %google.nick 2G4o8o2g3l4e $right(%google.temp,-10)

      unset %google.nick

    }

    else {

      echo 2G4o8o2g3l4e $right(%google.temp,-10)

    }

    sockclose google | return

  }

  elseif ( did not match any documents isin %google.temp ) {

    if ( %google.nick != $null ) {

      notice %google.nick 2G4o8o2g3l4e No match

      unset %google.nick

    }

    else {

      echo 2G4o8o2g3l4e No match

    }

  }

  goto nextread

}

on 1:text:!google*:#:{

  %google.nick = $nick

  google $2-

}

AraYaCagımız KeLimeyi

/GoogLe <kelime>

öRnek ; /Google Adana

Google [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Status'te ßeLirtmektedir.