Kanala girene (şartlı) otomatik mesaj
 

Merhaba kanala girene belirli şarta göre otomatik mesaj atmak istiyorum mesela kanala giren nick daha önceden hazırladığımız bir nick listesinde varsa otomatik mesaj yollansın eğer yoksa yollanmasın veya tam tersi bir durum şartına bağlı olarak otomatik mesaj atan bir kod yazılabilir mi acaba ?

Cevap: Kanala girene (şartlı) otomatik mesaj
 

On ^*:join:#: { if $read(mesaj.txt,w,$+($nick,:?*)) { msg # $nick $gettok($ifmatch,2,58) } }

mesaj.txt e

Nick:blabla
Nick2:sfkskskdgsdkgds
Nick3:sdgjsjgsd

gibi kayıt edersin.

Cevap: Kanala girene (şartlı) otomatik mesaj
 

teşekkür ederim yalnız mesaj.txt dosyasını nereye atmam gerek ? mirc klasörüne mi ve mesajımı kod içerisinde hangi kısma yazmam gerekli acemiliğii mazur görün birde nick listesini dilediğim kadar uzatabilirmiyim :) Galiba birşeyleri yanlış yaptım kodu çalıştıramadım.

Cevap: Kanala girene (şartlı) otomatik mesaj
 

mircin bulunduğu klasöre atman yetecektir yani mircden

//run $mircdir

yazarsan direkt atacağın yer açılacaktır. 2 tane / olacak başta :)

Cevap: Kanala girene (şartlı) otomatik mesaj
 

olmuyor malesef kodu alt+r ile ilgili bölüme yapıştırdım mircin bulunduğğu klasöre mesaj.txt dosyasını attım birkaç nik yapıp giriş yaptım ama hiçbir hareket yok :(

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 15:52 -->-> Daha önceki mesaj 15:15 --

birde şöyle bir kod buldum ama yine çalıştıramadım

menu channel {
© Hoşgeldin
.Aç:enable #hosgeldin | set %Hosgeldin $?"Lütfen Mesajınızı yazınız." | set %zaman $?"Süreyi Girin: [Örneğin; 1 20 gibi]" | window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi | echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi $+($timestamp,$chr(32),$chr(2),Hoşgeldin açıldı.,$chr(2))
.Kapat:disable #hosgeldin | echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi $+($timestamp,$chr(32),$chr(2),Hoşgeldin kapatıldı.,$chr(2)) | unset %zaman | unset %Hosgeldin
}
on *:Input:*: {
if $1 == $Lower(!Muafekle) {
if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi)) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi }
if $read(hosgeldinmuaf.txt,w,$2) { echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1Rumuz listede zaten var [ $2 ] | halt }
write HosgeldinMuaf.txt $2
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1Rumuz listeye eklendi. [ $2 ]
halt
}
if ($1 == !Muafsil) {
if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi)) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi }
if (!$2) { echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1 Hatalı Kullanım! "!MuafSil rumuz" şeklinde kullanınız. | halt }
if !$read(hosgeldinmuaf.txt,w,$2) { echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1 [ $2 ] rumuzu zaten listede yoktur. | halt }
write $+(-ds,$2) hosgeldinmuaf.txt
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1Rumuz listeden kaldırıldı. [ $2 ]
halt
}
if ($1 == !muaflist) {
if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi)) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi }
if $lines(hosgeldinmuaf.txt) == 0 { echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - Muaf listesinde kayıt bulunmamaktadır. | halt }
else {
Var %Sly 1
While %Sly <= $lines(hosgeldinmuaf.txt) {
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - $Read(hosgeldinmuaf.txt,%Sly)
Inc %Sly
}
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1Muaf listenizdeki4 $lines(hosgeldinmuaf.txt) 1kayıt gösterildi
}
}
if $1 == $Lower(!Kanalekle) {
if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi)) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi }
if $read(hosgeldinkanal.txt,w,$2) { echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1Kanal listede zaten var [ $2 ] | halt }
write hosgeldinkanal.txt $2
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1Kanal listeye eklendi. [ $2 ]
halt
}
if ($1 == !Kanalsil) {
if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi)) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi }
if (!$2) { echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1 Hatalı Kullanım! "!Kanalsil rumuz" şeklinde kullanınız. | halt }
if !$read(hosgeldinkanal.txt,w,$2) { echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1[ $2 ] kanalı zaten listede yoktur. | halt }
write $+(-ds,$2) hosgeldinkanal.txt
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1Kanal listeden kaldırıldı. [ $2 ]
halt
}
if ($1 == !Kanallist) {
if (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi)) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Listesi }
if $lines(hosgeldinkanal.txt) == 0 { echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - Kanal listesinde kayıt bulunmamaktadır. | halt }
else {
Var %Sly 1
While %Sly <= $lines(hosgeldinkanal.txt) {
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - $Read(hosgeldinkanal.txt,%Sly)
Inc %Sly
}
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) - 1Muaf listenizdeki4 $lines(hosgeldinkanal.txt) 1kayıt gösterildi
}
}
if ($1 == !Komutlar) {
echo -a 4 $time([HH:nn]) 4!Muafekle ( Muaf tutacağınız rumuzları ekler. )
echo -a 4 $time([HH:nn]) 4!Muafsil (Listenizden Muaf rumuzları siler.)
echo -a 4 $time([HH:nn]) 4!MuafList (Muaf listenizde kaç kişi var ve bu listediklerin kim olduğunu gösterir)
echo -a 4 $time([HH:nn]) 4!kanalekle ( Kanal listesine ekleme yapar. )
echo -a 4 $time([HH:nn]) 4!kanalSil ( Listedeki kanallardan herhangi birini silmeye yarar. )
echo -a 4 $time([HH:nn]) 4!Kanallist ( Kanal listesini göstermektedir. )
echo -a 4 $time([HH:nn]) 7//run $mIRCDirhosgeldinkanal.txt ( Komutu manuel olarak kanal listenizi düzenlemeye yarar. )
echo -a 4 $time([HH:nn]) 7//run $mIRCDirhosgeldinmuaf.txt ( Komutu manuel olarak muaf listenizi düzenlemeye yarar. )
halt
}
}
on *:join:#: {
if !$read(hosgeldinmuaf.txt,w,$nick) {
if $read(hosgeldinkanal.txt,w,$Chan) {
.timer 1 %Zaman msg $Nick %hosgeldin
}
else {
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) 4[ $Chan 4] kanalına giren 4[ $Nick 4] mesajı gönderilmemiştir.
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) 4[ $Chan 4] Kanal listenizde olmaya bilir.
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]listesi 4 $time([HH:nn]) 1Yada 4[ $Nick 4] muaf listenizdedir.
}
}
}

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 16:29 -->-> Daha önceki mesaj 15:52 --

76. satırda hata var sanırım

/timer: Geçersiz parametre (Satır 76, script1.ini) yazıyor bakıncada şöylebirşey çıkıyo


.timer 1 %Zaman msg $Nick %hosgeldin

kodun yukardaki bölümünde ne gibi bir hata olabilir acaba

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 17:50 -->-> Daha önceki mesaj 16:29 --

Derkeeeen sorunu çözdüm kod süper çalışıyo yapandan allah razı olsun timer yanında bir rakam daha belirtip hoşgeldin önündeki % yi kaldırınca çalıştı süper olmuş bu yav :)

Geriye tek bir sorun kaldı muaf kullanıcıların olduğu listeyi okuyunca giriş yapan nikteki harflerin tamamı değilde bir kısmı uyumluluk göstersede geçerli olabilecek bir parametre varmı yani listemizde ekli olan nik fatma olsun giriş yapan kullanıcı fatmagül kodumuz bu kullanıcıyıda muaf listesine alsın ve otomatik mesaj atmasın istiyorum. Böyle birşey mümkün mü ?

Cevap: Kanala girene (şartlı) otomatik mesaj
 

Mesajı nereye yazıcaz ?? onu anlamadım

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 10:13 -->-> Daha önceki mesaj 08:39 --

Birde galiba bu kod çalışmıyr sanarım.. Mesajı nere yazcamı anladım ama olmadı ..

Cevap: Kanala girene (şartlı) otomatik mesaj
 

mIRC klasöründeki dosyan sadece mesaj diye mi gözüküyor diye kontrol et yani şöyle

mesaj mı yada mesaj.txt mi gözüküyor. Normalde uzantılar kapalıdır gözükmez yani sen yeni metin belgesi oluştururken sadece mesaj yaz .txt koyma eğer koyarsan koddaki f $read(mesaj.txt,w,$+($nick,:?*)) bu kısmı f $read(mesaj.txt.txt,w,$+($nick,:?*)) olarak değişmek zorunda kalırsın. Kodda sorun yok çalışıyor

Cevap: Kanala girene (şartlı) otomatik mesaj
 

Çok kısa bir şekilde halledilicek bir konu gereksiz uzamış yardımcı olmaya calışayım..

yapmak istediğini bu kadar kısa bir komutla yapabilirsin.
kullanım;

• .ekle nick şeklinde bulunduğun herhangi bir kanala girdiğinde mesaj göndermesini istediğin kişinin nick ini nliste sine kayıt ediyorsun.
• nliste sinde olan herhangi bir nick kanala girdiğinde senin belirlediğin mesajı özeline göndericektir.(kırmızı ile işaretledim.)

iyi forumlar.

Cevap: Kanala girene (şartlı) otomatik mesaj
 

bu tip şeyler için user level öneririm