mIRC Türkçe Sözlük

Aytac

Developer
Yönetici
Developer
Katılım
4 Şub 2020
Mesajlar
373
Tepkime puanı
17
Puanları
18
Konum
ircland
Web sitesi
www.ircalem.net
Kod Amacı: Türkçe Kelimelerin Sözlük Anlamlarını Bulmak.
Kodu mircinizin remote (ALT+R) bölümüne ekleyiniz.


Kod:
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 $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
  }
}

Kullanımı: Kanalda veya Özelde;  .sözlük kelime
 
Üst