Çevrimdışı

Merhaba değerli İF üyeleri.

Bir süre araştırdım ancak bir netice alamadım, bir süre birkaç farklı şekilde yazdım yine sonuç alamadım.

İki yöntem üzerine yoğunlaştım. Ve yapmak istediğim şu;

/OperServ /ChanServ /NickServ /MemoServ komutlarını Türkçe olarak yazmak, gönderirken de "aliases, popous, remote" üzerinde bir düzenleme ile orijinal diline/komutuna dönmesini sağlamak.

Bir Yöntem:
Komutlarda kullanılan kelimelerin tümünü bir satır olarak değiştirmek;
/Servisİsmi Ayar #Kanal Kurucu İF komutunu sunucuya gönderdiğim zaman,
aliases, popous, remote kısmında yapılan bir düzenleme ile,
/ChanServ Set #Kanal Founder İF olarak değişerek sunucu servislerine gitmesini sağlamak.

/Servisİsmi Ayar #Kanal Kurucu İF {
Servisİsmi $1- #Kanal Founder $1
Servisİsmi $1 #Kanal Founder $2
Servisİsmi $$1- #Kanal Founder $nick
Servisİsmi Set #Kanal Founder $2
}
}

(TEK TEK BUNLARI DENEDİM)

Diğer yöntem:
Komutlarda kullanılan kelimelerin tek tek bir satırda değiştirmek;
/Servisİsmi ile başlanılan komutlardaki Türkçe kelimeleri sunucu servislerine gönderirken değişmesini sağlamak.
/Servisİsmi Ayar #Kanal Kurucu İF yazdığım zaman,
buradaki AYAR kelimesi SET olarak değişecek, Kurucu kelimesi Founder olarak.

Ayar {
Set $1-
Set $1
Set $2
Set $3
Set $4
}
}

(TEK TEK BUNLARI DA DENEDİM)

Böyle bir şey yapmak istiyorum, tabii ki mümkün ise...
Yardımlarınız için şimdiden Teşekkür Ederim. (İyi Çalışmalar.)

 

Çevrimdışı

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

on *:input:*: {
  if ($left($1,3) == /ms) {
    echo -a Komut'un: $replace($1-,set,ayar,user,kullanici)
    $replace($1-,set,ayar,user,kullanici)
    halt
  }
}

alias ms {
  if ($1 == ayar) { echo -a msg chanserv set $2 }
}

Komut: /ms ayar #kanal voice nick

yaparsan gorursun bu mantık'lada ilerleyebilirsin. ama bu basını az agritir.

 

Çevrimdışı

Öncelikle teşekkür ederim.
Üç basamaklı komutları çalıştırıyor.
(ilk adımı, (3) basamaklı komutları bitirdim.)
Fakat, dört basamaklı komutlara geldiğimde çevirme yapmasını sağlayamadım.

(1.)basamak: Servisİsmi
(2.)basamak: Komut
(3.)basamak: Nick/Kanal

ÖRNEK:
"/Servisİsmi bilgi #Kanal/Nick"
"/Servisİsmi info #Kanal/Nick"
Üstteki komutu altaki komuta çeviriyor.

4 basamaklı bir komutu çalıştırmayı başaramadım.
(İkinci Adım, (4) basamaklı komutları yapamadım.)

(1)basamak: Servisİsmi
(2)basamak: İnfo
(3)basamak: Nick/Kanal
(4)basamak: All
-gibi-

ÖRNEK:
"/Servisİsmi(1) bilgi(2) #Kanal/Nick(3) tam(4)"
"/Servisİsmi(1) info(2) #Kanal/Nick(3) all(4)"
-çeviremediğim kısım (4.) basamak "tam/all"-

Bu arada;
(5)basamaklı:
"/Servisİsmi(1) ayar(2) #Kanal/Nick(3) kilit(4) +abcd(5)"
"/Servisİsmi(1) set(2) #Kanal/Nick(3) mlock(4) mode(5)"

ve,

(6)basamaklı:
"/Servisİsmi(1) Yasak(2) #Kanal/Nick(3) Ekle(4) Rumuz(5) Seviye(6)"
"/Servisİsmi(1) akick(2) #Kanal/Nick(3) add(4) nick(5) level(6)"

komutları da çevirmek istiyorum.

##########################
# KODUN ADAPTE EDİLMİŞ HÂLİ #
##########################

on *:input:*: {
if ($left($1,3) == /ChanServ) {
$replace($1-,info,bilgi,user,kullanici)
halt
}
}
alias ChanServ {
if ($1 == bilgi) { privmsg chanserv info $2 }
}

Komut: ChanServ "info" Kanal


on *:input:*: {
if ($left($1,3) == /NickServ) {
$replace($1-,info,bilgi,user,kullanici)
halt
}
}
alias NickServ {
if ($1 == bilgi) { privmsg nickserv info $2 }
}

Komut: NickServ "info" Rumuz

İlave olarak şunu da belirtmek istiyorum.

on *:input:*: {
if ($left($1,3) == /ChanServ) {
$replace($1-,info,bilgi,user,kullanici)
$replace($1-,set,ayar,user,kullanici)
$replace($1-,levels,seviye,user,kullanici)
$replace($1-,access,yetki,user,kullanici)
$replace($1-,akick,yasak,user,kullanici)
halt
}
}
alias NickServ {
if ($1 == bilgi) { privmsg chanserv info $2 }
if ($1 == ayar) { privmsg chanserv set $2 }
if ($1 == seviye) { privmsg chanserv levels $2 }
if ($1 == access) { privmsg chanserv access $2 }
if ($1 == akick) { privmsg chanserv akick $2 }
}

Bu şekilde alt alta yazabilir miyiz? Çalışır mı?

 

Çevrimdışı

kırmızıyla belirtigim $3 kısmı komut kullanımında 4'ncu parametreye eşittir.

Ornek: /nickserv info Nick all

esit demektir.

 

Çevrimdışı

/Servisİsmi bilgi Kanal/Nick all
yukarıdaki komutu, aşağıdaki komuta çeviriyorum.
/Servisİsmi bilgi Kanal/Nick all

/Servisİsmi bilgi Kanal/Nick (tam)
yukarıdaki komutu, aşağıdaki komuta çeviremiyorum.
/Servisİsmi bilgi Kanal/Nick (all)
Bu şekilde çevirim yapmıyor.

4. kelimeyi çeviremiyorum.

on *:input:*: {
if ($left($1,3) == /NickServ) {
$replace($1-,all,tam,user,kullanici)
halt
}
}
alias NickServ {
if ($1 == tam) { privmsg nickserv info $2 $3 }
}

$1 yerine $2 ve $3 yazdım yine de 4. kelimeyi çeviremedim.

 

Çevrimdışı

TurkneT Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

/Servisİsmi bilgi Kanal/Nick all yukarıdaki komutu, aşağıdaki komuta çeviriyorum. /Servisİsmi bilgi Kanal/Nick all /Servisİsmi bilgi Kanal/Nick (tam) yukarıdaki komutu, aşağıdaki komuta çeviremiyorum. /Servisİsmi bilgi Kanal/Nick (all) Bu şekilde çevirim yapmıyor. 4. kelimeyi çeviremiyorum. on *:input:*: { if ($left($1,3) == /NickServ) { $replace($1-,all,tam,user,kullanici) halt } } alias NickServ { if ($1 == tam) { echo -a privmsg nickserv info $2 $3 } } $1 yerine $2 ve $3 yazdım yine de 4. kelimeyi çeviremedim.

echo -a kullan yanıtları görebilir ve yanlış kısmı daha iyi anlamanı sağlamıs olursun eğitimine bu şekilde devam et kodlama yaparken echo -a yı kullan kod çalışır olduğunda echo -a kısmını silerek işlev haline getirmiş olursun

 

Çevrimdışı

on *:input:*: {
if ($left($1,3) == /ns) {
echo -a $replace($1-,info,bilgi,user,kullanici)
$replace($1-,info,bilgi,user,kullanici)
halt
}
}
alias ns {
if ($1 == bilgi) { echo -a msg nickserv info $2 | msg nickserv info $2 }
}

/ns bilgi Turknet
msg nickserv info Turknet
[22:08] -> *nickserv* info Turknet

olarak normâl çalışıyor ve hatasız işlem yapıyor.
Ancak;

on *:input:*: {
if ($left($1,3) == /ns) {
echo -a $replace($1-,all,tam,user,kullanici)
$replace($1-,all,tam,user,kullanici)
halt
}
}
alias ns {
if ($1 == tam) { echo -a msg nickserv info $nick $2 $3 | msg nickserv info $2 $3 }
if ($3 == tam) { echo -a msg nickserv info $nick $2 $3 | msg nickserv info $2 $3 }
}BU SEÇENEKLERİ ÇOĞALTTIM AMA BİR NETİCE ALAMADIM.

/ns bilgi Turknet tam
msg nickserv info Turknet
[22:09] -> *nickserv* info Turknet

/ns bilgi Turknet all
msg nickserv info Turknet
[22:09] -> *nickserv* info Turknet all

ns bilgi rumuz tam
komutunu
ns info nick all
olarak çeviremiyorum.

İkinci basamak olan BİLGİ kelimesi İNFO olarak çevriliyor.
Aynı satırda dördüncü basamaktaki TAM kelimesi ALL olarak çevrilmiyor.
$1-, $1, $2, $3... Hepsini denedim ama bir yerde eksiklik var. :s

 

Çevrimdışı

bu mantıkla devam edebilirsin şu şekilde diğer servisleride kullanabilrsin

on *:input:*: {
if ($left($1,11) == /isimServis) {
echo -a Komut'un: $replace($1-,PASSWORD,şifredeğiş,ghost,sahte,register,kayıt,id entify,belirt,set,ayar,user,kullanici,info,bilgi,a ll,tam)
$replace($1-,şifredeğiş,PASSWORD,sahte,ghost,kayıt,register,be lirt,identify,ayar,set,user,kullanici,bilgi,info,t am,all)
}
if ($left($1,12) == /kanalServis) {
echo -a Komut'un: $replace($1 gibide yapılabilir
}
}
alias isimServis {
if ($1 == bilgi) { echo -a msg nickserv info $2 $3 }
if ($1 == belirt) { echo -a msg nickserv identify $2 }
if ($1 == kayıt) { echo -a msg nickserv register $2 $3 }
if ($1 == sahte) { echo -a msg nickserv GHOST $2 }
if ($1 == şifredeğiş) { echo -a msg nickserv set PASSWORD $2 }
}

alias kanalServis {
vs
vs
vs
}