mIRC de Ingilizce Türkçe Kelime Öğrenme - Sayfa 2 - IRCRehberi.Net- Türkiyenin En iyi IRC ve Genel Forum Sitesi

**Kyo** · 28 Mayıs 2020, 20:47

Alıntı:

Nevra Nickli Üyeden Alıntı

Elinize sağlık :)

Teşekürler.

**She** · 29 Mayıs 2020, 23:49

Emeğinize sağlık.

**Kyo** · 30 Mayıs 2020, 03:14

Alıntı:

She Nickli Üyeden Alıntı

Emeğinize sağlık.

Teşekürler.

**diEfoRyoU** · 01 Haziran 2020, 01:32

Eğer resimde olduğu gibi kelimeler ekliyse
yani;
add=eklemek
gibi
aşağıdaki kod ile
kullanıcılar !kelime add yazdığında eklemek cevabını, eklemek yazdığında ise add cevabını alır :)

Kod

on *:text:*:#: { if $regex($1,/[.!]kel[İiı]me/i) {
   if $read(kelime.txt,nw,$+($2,*)) { 
msg # $+(4,$1,) kelimesinin Türkçe karşılığı:2 $gettok($read(kelime.txt,$readn),2,61)
  } 
  if $read(kelime.txt,nw,$+(*,$2)) { 
msg # $+(4,$1,) kelimesinin İngilizce karşılığı:2 $gettok($read(kelime.txt,$readn),1,61)
   }
  }
}

**Kyo** · 03 Haziran 2020, 12:51

Alıntı:

diEfoRyoU Nickli Üyeden Alıntı

Eğer resimde olduğu gibi kelimeler ekliyse
yani;
add=eklemek
gibi
aşağıdaki kod ile
kullanıcılar !kelime add yazdığında eklemek cevabını, eklemek yazdığında ise add cevabını alır :)

Kod

on *:text:*:#: { if $regex($1,/[.!]kel[İiı]me/i) {
   if $read(kelime.txt,nw,$+($2,*)) { 
msg # $+(4,$1,) kelimesinin Türkçe karşılığı:2 $gettok($read(kelime.txt,$readn),2,61)
  } 
  if $read(kelime.txt,nw,$+(*,$2)) { 
msg # $+(4,$1,) kelimesinin İngilizce karşılığı:2 $gettok($read(kelime.txt,$readn),1,61)
   }
  }
}

Katkıların için Teşekürler Üstad.. Emeğine Sağlık

**Kyo** · 03 Haziran 2020, 12:53

Alıntı:

FuaT Nickli Üyeden Alıntı

Katkıların için Teşekürler Üstad. Txt Dosyasını manuel olarak Renklendirdim. Eğer Renk Kodları Sorun olmayacaksa Ekleyip Silmek Müthiş olur. Emeğine Sağlık

!kelime add yazıldıgında Kelimenin karşılıgını Gösteren kodu Sunmuşsun Üstad aceleyle yazmıstım. Sonradan Farkettim. Emeğine Sağlık Üstad.