IRCALEM.Com Genel Forum, IRC Forumu IF - mIRC Scripting mIRC Scripting Hazır Kodlar mIRC Parça Kodlar Çeviri Diyalogu (TRANSLATE DİALOG)
irc

Çeviri Diyalogu (TRANSLATE DİALOG)
Aytac
Çeviri Diyalogu (TRANSLATE DİALOG)
0
460
  • 0 Oy - 0 Ortalama
  • 1
  • 2
  • 3
  • 4
  • 5

[-]
Etiketler
diyalogu dialog çeviri translate

Bu konuyu görüntüleyen kullanıcı(lar):1 Ziyaretçi
Şuan Offine!
Şuan Offine!
Aytac Administrator
********
Proje Sorumlusu

  • Üyelik tarihi    04.02.2020
  • Konum  78 Karabük
  • Konular351
  • Mesajlar364
  • Verilen beğeni8 in 5 posts
  • Alınan beğeni6
  • Rep puanı 6

Merhaba, yabancı serverlerde özellikle pek fazla yabancı dili olmayan kişilerin rahat sohbet etmesi açısından yaptığım bir kod, bu kodu isterseniz verdiğim php dosyası ile kendi sitenize ekleyerek kullanabilirsiniz, eklemek istemiyorsanız veya siteniz yoksa benim sitem üzerinden de aktif kullanabilirsiniz. ( site patlayana kadar :d )
*NOT: Kendi Sitenize Eklemek İçin Yandex Üzerinden Bir Api Key Almanız Gerekir ve "ALDIĞINIZ API KEY" bu kısma ekleyiniz.
---> yandex api key al

Kullanımı: /translate

*NOT: Dialog Üzerinde İbranice,Yunanca,Rusça,Japonca,Arapça vb. dillerin karakterleri bozuk çıktığı için, farklı pencereye yansıttım.
PHP Kod :
<?php  
function yandex_cevir($text,$from,$to,$key){
$text urlencode($text);
$domain="https://translate.yandex.net";
$parametre="/api/v1.5/tr.json/translate?key=";
$sonuc file_get_contents($domain.$parametre.$key.'&lang='.$from.'-'.$to.'&text='.$text); 
$json json_decode($sonuc); 
return 
$json->text[0];
}
$text$_GET["metin"];
$buraya$_GET["sen"];
$burdan$_GET["ben"];
$key="ALDIĞINIZ API KEY";
$text yandex_cevir($text,$burdan,$buraya,$key);
echo 
'<html>
<head><title>Translate</title></head>
<body> '
.$text.'
</body>
</html>'
;
?>

mIRC KODLARI
Kod :
alias translate { dialog -m translate translate }
dialog translate {
  title "TRANSLATE"
  size -1 -1 177 153
  option dbu
  text "Hangi Dilden Çeviri Yapılacak ", 1, 6 12 73 8
  text "Hangi Dile Çeviri Yapılacak", 2, 99 12 94 8
  combo 3, 6 24 72 50, size
  combo 4, 98 23 72 50, size
  box "Çevrilecek Metin", 5, 6 78 167 41
  edit "", 6, 9 87 161 28
  button "ÇEVİRİ YAP", 7, 6 126 76 21
  button "KAPAT !", 8, 98 126 76 21, cancel
}
on *:dialog:translate:*:*:{
  if ($devent = init) {
    did -r translate 3,4
    did -a translate 3,4 tr_TÜRKÇE
    did -a translate 3,4 en_İNGİLİZCE
    did -a translate 3,4 de_ALMANCA
    did -a translate 3,4 fr_FRANSIZCA
    did -a translate 3,4 ru_RUSCA
    did -a translate 3,4 az_AZERİCE
    did -a translate 3,4 sl_YUNANCA
    did -a translate 3,4 ar_ARAPÇA
    did -a translate 3,4 pl_İBRANİCE
    did -a translate 3,4 ja_JAPONCA
    did -a translate 3,4 zh_ÇİNCE
    did -a translate 3,4 it_İTALYANCA
    did -a translate 3,4 pt_PORTEKİZCE
  }
  elseif ($devent = sclick) && ($did = 7) {
    var %:cvr $r(1000000000,9999999999) | sockopen $+(ceviri,%:cvr) www.perfectdent.net 80
    sockmark $+(ceviri,%:cvr) $+(ben=,$token($did(3),1,95),&sen=,$token($did(4),1,95),&metin=,$replace($did(6),$chr(32),$+($chr(37),20),ı,i,İ,i,Ö,o,ö,o,ü,u,Ü,u,ğ,g,Ğ,g,ç,c,Ç,c))
  }
}
on *:sockopen:ceviri*: {
sockwrite -nt $sockname GET $+(/translate.php?,$sock($sockname).mark) HTTP/1.1 | sockwrite -nt $sockname Host: $sock($sockname).addr | sockwrite -nt $sockname $crlf }
on *:sockread:ceviri*:{
var %i | sockread %i | if (<body> isin %i) { $iif(!$window([MENTION=143461]TRA[/MENTION]NSLATE),window -n [MENTION=143461]TRA[/MENTION]NSLATE) | echo -t [MENTION=143461]TRA[/MENTION]NSLATE $token(%i,2-,32)  | did -r translate 6 | did -a translate 6 Metin [MENTION=143461]TRA[/MENTION]NSLATE penceresine yansıtıldı } }

[Resim: bNAdc8.png]
“İnsanların en hayırlısı, insanlara faydalı olandır”. H.Ş.


Foruma Git: