mIRC Türkçe Sözlük

---

Kod Amacı: Türkçe Kelimelerin Sözlük Anlamlarını Bulmak.
Kodu mircinizin remote (ALT+R) bölümüne ekleyiniz.

alias duzlt return $replace($1,•, ,ç,$chr(231),ö,$chr(246),ü,$chr(252),ı,$chr(253),ÅŸ,$chr(254),ÄŸ,$chr(240),Ä°,$chr(221),Å,$chr(222),Ç,$chr(199),ç,$chr(231),Ãœ,$chr(220),ö,$chr(246),Ö,$chr(214),ü,$chr(252),Ãœ,$chr(220),’,$chr(146),â,$chr(226),Ä,$chr(208), ,$chr(32))
on *:sockopen:trsorgula: { 
  sockwrite -nt $sockname GET /1/ $+ %ymc_k $+ / HTTP/1.1
  sockwrite -nt $sockname Host: www.birsozluk.com
  sockwrite -nt $sockname $crlf
}
on *:sockread:trsorgula:{
  var %i
  sockread %i
  if *SÖZLÜK ANLAMI* iswm %i {
    msg $active 4Kelimeniz;2 %ymc_k
    msg $active 4Sozluk Anlami;2 $duzlt($gettok($gettok($gettok($gettok(%i,3,$asc(")),5,$asc(/)),3,$asc(>)),1,$asc(<)))
  }
}
on *:input:*: {
  if $regex($1,/^([.!]s[oÖö]zl[üÜu]k)/Si) {
    if !$2 { msg $active Hatalı Kullanım Sözcük Belirtmediniz. | return }
    if $3- { msg $active Hatalı Kullanım Tek Kelimeden Oluşan Sözcükler Belirtin. | return }
    set %ymc_k $2
    sockclose trsorgula
    sockopen trsorgula www.birsozluk.com 80
  }
}

---

---

mIRC Türkçe Sözlük İle Benzer Sohbet Yazıları

---

mIRC Türkçe Sözlük yazına yapılan yorumlar