IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  Mobil Sohbet, Sohbet ve Sohbet Odaları




21Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 29 Temmuz 2019, 14:10   #1
Çevrimdışı
Çeviri Diyalogu (TRANSLATE DİALOG)


sohbet


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:   Kodu kopyalamak için üzerine çift tıklayın!
<?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:   Kodu kopyalamak için üzerine çift tıklayın!
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)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]NSLATE),window -n @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]NSLATE) | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]NSLATE $token(%i,2-,32) | did -r translate 6 | did -a translate 6 Metin @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]NSLATE penceresine yansıtıldı } }


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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:   Kodu kopyalamak için üzerine çift tıklayın!
<?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:   Kodu kopyalamak için üzerine çift tıklayın!
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)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]NSLATE),window -n @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]NSLATE) | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]NSLATE $token(%i,2-,32) | did -r translate 6 | did -a translate 6 Metin @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]NSLATE penceresine yansıtıldı } }


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına
  Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
radyo44.com.tr
Alt 29 Temmuz 2019, 15:22   #2
Çevrimdışı
Cevap: Çeviri Diyalogu (TRANSLATE DİALOG)




Başarılı bir calışma olmuş, oldukca kullanışlı.

__________________

Kullanıcı imzalarındaki bağlantı ve resimleri görebilmek için en az 20 mesaja sahip olmanız gerekir ya da üye girişi yapmanız gerekir.
®
  Alıntı ile Cevapla

Alt 29 Temmuz 2019, 20:09   #3
Çevrimdışı
Cevap: Çeviri Diyalogu (TRANSLATE DİALOG)




Bravo , aferin
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
Hüznümün en yükseğinden şöyle baksan manzarama gözlerini alamazdın. Gözlerini alırdılar..
  Alıntı ile Cevapla

Alt 29 Temmuz 2019, 21:41   #4
Çevrimdışı
Cevap: Çeviri Diyalogu (TRANSLATE DİALOG)




Etkileyici.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Gereksiz sayılabilecek şeyler kullanmamışsın, sade-yalın

Tebrik ederim dostum.

__________________
Tell me. Do you bleed? You will..!
  Alıntı ile Cevapla

Alt 07 Ağustos 2019, 20:16   #5
Çevrimdışı
Cevap: Çeviri Diyalogu (TRANSLATE DİALOG)




Kırk yıldır kod yazarım, böyle güzel kod görmedim.

  Alıntı ile Cevapla

Alt 14 Ağustos 2019, 15:39   #6
Çevrimiçi
Cevap: Çeviri Diyalogu (TRANSLATE DİALOG)




gayet sade ve şık olmuş. tebrik ederim hocam

  Alıntı ile Cevapla

Alt 14 Ağustos 2019, 18:39   #7
Çevrimdışı
Cevap: Çeviri Diyalogu (TRANSLATE DİALOG)




Recep kardeşim istesin yeter ki çok şeyler yapar ve emeği de çok üzerimizde.. Başarılarının devamını diliyorum..

  Alıntı ile Cevapla

Alt 14 Ağustos 2019, 23:33   #8
Çevrimdışı
Cevap: Çeviri Diyalogu (TRANSLATE DİALOG)




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias tmscumleceviri { dialog -m tmscumleceviri tmscumleceviri } dialog tmscumleceviri { title "Cümle Çevirici" size -1 -1 177 153 icon $mircdirTMSResim\cumlecevirici.ico option dbu text "AŞAĞIDAKİ BU DİLDEN", 1, 14 15 73 8 text "ŞU DİLE ÇEVİR", 2, 115 15 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 "Cümle Çevirisini Yap", 7, 6 126 76 21 button "Diyalogu KAPAT", 8, 98 126 76 21, cancel icon 9, 1 -6 175 25, TMSResim\cumlebayrak.jpg, 0 } on *:dialog:tmscumleceviri:*:*:{ if ($devent = init) { var %mdx dll dll\mdx.dll %mdx MarkDialog $dname %mdx SetDialog $dname bgcolor $rgb(99,184,255) %mdx SetFont $dname 1,2,5,6 +b Turkish 12 600 Arial %mdx SetFont $dname 7,8 +b Turkish 15 600 Arial %mdx SetColor $dname 1,2,3,4,5,7,8,9 textbg $rgb(99,184,255) %mdx SetColor $dname 1,2,3,4,5,7,8,9 background $rgb(99,184,255) %mdx SetColor $dname 6 text $rgb(255,0,0) did -r $dname 3,4 did -a $dname 3,4 tr_TÜRKÇE did -a $dname 3,4 en_İNGİLİZCE did -a $dname 3,4 de_ALMANCA did -a $dname 3,4 fr_FRANSIZCA did -a $dname 3,4 ru_RUSCA did -a $dname 3,4 az_AZERİCE did -a $dname 3,4 sl_YUNANCA did -a $dname 3,4 ar_ARAPÇA did -a $dname 3,4 pl_İBRANİCE did -a $dname 3,4 ja_JAPONCA did -a $dname 3,4 zh_ÇİNCE did -a $dname 3,4 it_İTALYANCA did -a $dname 3,4 pt_PORTEKİZCE } elseif ($devent = sclick) && ($did = 7) { var %:cvr $r(1000000000,9999999999) | sockopen $+(ceviri,%:cvr)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]),window -n @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) | echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $token(%i,2-,32) | did -r tmscumleceviri 6 | did -a tmscumleceviri 6 Çevirisi Yapılan Cümle @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Penceresine Yansıtıldı.. } }



Renkli diyalog sevenler için düzenlemedir.. Gerekli olan dll, ico, jpeg ve kod txt dosyaları, linkteki dosyanın içerisindedir ve kırmızı ile belirtilen yerleri kendi scriptinize göre ayarlayınız.. Ellerine sağlık tekrar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] kardeşim harika bir çalışma..

Ekran görüntüsü ve Download Linki: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Eklenen Resim Ön İzlemesi Bu forumdaki ekleri görübilmek için 25 mesaja sahip olmanız gerekir. Sizin 0 Mesajınız var.

Konu Tai_Pan tarafından (14 Ağustos 2019 Saat 23:40 ) değiştirilmiştir.
  Alıntı ile Cevapla

Alt 07 Mart 2020, 01:32   #9
Çevrimdışı
Cevap: Çeviri Diyalogu (TRANSLATE DİALOG)




emeğine sağlık @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

bunu kanalda .çeviri yazarak kanala yansıtma şansımız var mı?

__________________
Yaşıyoruz AHESTE AHESTE
  Alıntı ile Cevapla

Alt 19 Mayıs 2020, 22:29   #10
Çevrimdışı
Cevap: Çeviri Diyalogu (TRANSLATE DİALOG)




UBUT Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
emeğine sağlık @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

bunu kanalda .çeviri yazarak kanala yansıtma şansımız var mı?

Tabiki var lakin suanda askerde olduğum için pek fazla ilgilenemiyorum forum uzerindeki arkadaslarim yardimci olur illaki

__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına
  Alıntı ile Cevapla

Cevapla

Etiketler
çeviri kodu, mirc coklu dil, mirc translate

Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Google Translate (çeviri) muratt_aziz mIRC Scripting Hazır Kodlar 12 26 Nisan 2020 02:17
Google Translate, Evrensel Çeviri Yapmayı Öğrendi Dream Google 0 30 Kasım 2016 12:56
MSG/AME Koruma Diyalogu R3dLine mIRC Parça Kodlar 9 09 Mart 2016 22:19
Teşekkür diyalogu Poison341 mIRC Scripting Sorunları 2 03 Ekim 2015 17:29
Translate.tcl ( tr -> en | en -> tr ) rascoLn TCL Scriptler 8 02 Mart 2015 18:55