IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - oto msg (https://www.ircforumlari.net/mirc-scripting-sorunlari/168779-oto-msg.html)

muratt_aziz

29 Aralık 2008 00:27

oto msg

s.a arkadaslar ark.txt adlı nod defterındekı kısılerden kanala gıren olursa h.g.txt ile özeline msg atmak istedım olmadı yardım edermısınız[code]on *:Join:#:{ if $Read(ark.Txt,w,$Nick) { /msg $nick $read $mircdirbot/h.g.txt | halt }
} }
code]

özele h.g.txt dosyasından rast gele karsılama msg sı atsın istıyorum

tamam hallettim yanlız nick ali diyelim bu kişi aliii olarak grerse ona msg atması icin ark.txt icine ali yi *ali* die mi kaydetmeliyiz orasını cözemedim teşekkürler

Lord_Raiden

29 Aralık 2008 00:50

Cevap: oto msg

wildcart kullanmalısın. *aLi* diye kaydedersen nickinin içerisinde aLi kelimesi geçen herkezi algılar. vehaLi gibi mesela.
ALi* ile başlayan
*aLi ile biten.
demektir.
İyi forumlar.

muratt_aziz

29 Aralık 2008 00:57

Cevap: oto msg

Alıntı:

NetherLanDs Nickli Üyeden Alıntı (Mesaj 612068)

malesef olmadı denedım ıkı ayrı gırıs yaptım kanala olmadı *ali* yazdım node defterıne gırıs nıckını aliii yazdım olmadı

Lord_Raiden

29 Aralık 2008 01:03

Cevap: oto msg

kodu verirmisin buraya; wildcard kullanımına uygunmu bakayım.

muratt_aziz

29 Aralık 2008 01:10

Cevap: oto msg

Alıntı:

NetherLanDs Nickli Üyeden Alıntı (Mesaj 612072)

kodu verirmisin buraya; wildcard kullanımına uygunmu bakayım.

Kod:

on *:Join:#:{ if $Read(ark.Txt,w,$Nick) { /timer 1 6 msg $nick $read $mircdirbot/h.g.txt | halt }

} }

buyur kardes

Lord_Raiden

29 Aralık 2008 01:20

Cevap: oto msg

on *:join:#: {
var %nicks $lines(nickler.txt)
while (%nicks <= 1) {
if ($read(nickler.txt,%nicks) { .msg $nick Merhaba Hoşgeldin $nick }
}
}

Böyle denermisin.

muratt_aziz

29 Aralık 2008 01:32

Cevap: oto msg

Alıntı:

NetherLanDs Nickli Üyeden Alıntı (Mesaj 612078)

on *:join:#: {
var %nicks $lines(nickler.txt)
while (%nicks <= 1)
if ($read(nickler.txt,%nicks) { .msg $nick Merhaba Hoşgeldin $nick }

Böyle denermisin.

/while: Yetersiz veya eksik parametre (Satır 3, script13.mrc)

diyor

XcLusive

29 Aralık 2008 02:15

Cevap: oto msg

txt kullanmaktan vaz geçin artık..
mIRC'in users bölümünü aç
arkadaşlar:ali
arkadaşlar:veli
arkadaşlar:hüso
arkadaşlar:ahmet
arkadaşlar:abuzer

diye ekle

on arkadaşlar:join:#:msg $nick $read(hosgeldin.txt)

Difuzyon

29 Aralık 2008 02:15

Cevap: oto msg

Kod:

on *:join:#: {

  var %} 1 

  while %} <= $lines(Arkadas.txt) {

    if $read(Arkadas.txt,%}) isin $nick { msg $nick $read(HosGeldin.txt) }

    inc %}

  }

}

Arkadas.txt dosyanıza arkadaşlarınızın nickini sade bir şekilde ekliyorsunuz:
Ali
Mehmet
Ayse

Şayet kanala Ali'de girse aLiii'de girse HosGeldin.txt dosyasından rastgele seçtiği bir satırı özeline mesaj olarak gönderecektir.Yani kanal giren nickin içindeki kelime,Arkadas.txt'in içinde ekli bir nickse yanıt verecektir.
Bu işlem mIRC'inizi gereksiz yere(while) yoracaktır.Size önerim şu olur:

Kod:

on *:join:#:if $ulist($nick,arkadas,0) { msg $nick $read(HosGeldin.txt) }

alias arkadas {

  .auser arkadas $1 $+ *

  echo -a 4 $1 7arkadaş listesine eklenmiştir.

}

Kullanımı : /arkadas ali Uyguladığınızda Users kısmına
arkadas:ali*
arkadas:ahmet*
arkadas:ayse*
şeklinde ekliyecektir.Kanala ali'de girse aliiiii'de girse ,HosGeldin.txt den rastgele bir mesajı özeline gönderecektir.
Gördüğünüz üzere mIRC'i gereksiz yere while döngüsüne almadan,halledebiliriz.
Sizin için hangisi uygunsa onu kullanırsınız..

İyi forumlar...

Lord_Raiden

29 Aralık 2008 04:59

Cevap: oto msg

Alıntı:

XcLusive Nickli Üyeden Alıntı (Mesaj 612137)

While kullanmaktan vazgeçin dicektin herhalde üstad:)

kurugaddere

29 Aralık 2008 23:08

Cevap: oto msg

peki difizyon bu /arkadas ali ekle komutunun kısayolu yada daha rahat eklenebilicek bir formul varmı her seferinde /arkadas ali bu tarz komutmu yazılıcak

Lord_Raiden

30 Aralık 2008 02:41

Cevap: oto msg

menu olustur

menu * {
Listeye Ekle: .auser arkadas $?"Hangi Nick"

Herhangi bir sağ click yaptıgında scriptte Listeye ekleye tıkla nicki yaz tamamdır.

kurugaddere

30 Aralık 2008 10:28

Cevap: oto msg

difisyonun yazmış olduğu kodu beş saniye gecikmeli olarak atabilirmiyiz birde eklediğim isimler mircde nerde saklanıyorlar ben bu isimlerin listesini kendim düzenliyemezmiyim.

CesuryureK

30 Aralık 2008 10:40

Cevap: oto msg

Alıntı:

kurugaddere Nickli Üyeden Alıntı (Mesaj 612751)

difisyonun yazmış olduğu kodu beş saniye gecikmeli olarak atabilirmiyiz birde eklediğim isimler mircde nerde saklanıyorlar ben bu isimlerin listesini kendim düzenliyemezmiyim.

nickler ALT+R Yaptıktan Sonra

Aliases Popups Remote Kullanıcı(Users) Veriables

başlıklarını göreceksin o nickler Kullanıcı(Users) Kısmında yer alır.
ordan düzenleyebilirsin tabiki

kurugaddere

30 Aralık 2008 11:01

Cevap: oto msg

arkdaşlar son bir isteğim olucak

on *:join:#:if $ulist($nick,arkadas,0) { msg $nick $read(HosGeldin.txt) }
alias arkadas {
.auser arkadas $1 $+ *
echo -a 4 $1 7arkadaş listesine eklenmiştir.

peki difisyon arkadaşımızın verdiği bun koda x servarına beş saniye gecikmeli diğer
tüm serverlara normal olarak oto
mesaj gitsin şeklinde nasıl bir ekleme uygun olur.
}

CesuryureK

30 Aralık 2008 12:51

Cevap: oto msg

PHP- Kodu:

   on *:join:#: {
  if $ulist($nick,arkadas,0) { 
    if ($server == irc.x.com) {
      timer 1 5 /msg $nick $read(HosGeldin.txt) 
    }
    else { msg $nick $read(HosGeldin.txt) }
  }
}

muratt_aziz

02 Ocak 2009 12:57

Cevap: oto msg

slm bu koda bir ek yapa bılırmıyız ali nicki kanala gırdı tekrar cıktı tekrar gırdıgınde h.g demesın istıyorum 5 dakıa sonra tekrar gırerse işlesin 5 dakıka ıcın bır ıkı defa gırer se karsılama yapmasın istıyorum mumkunmu

Difuzyon

02 Ocak 2009 13:20

Cevap: oto msg

Kod:

on *:join:#:if $ulist($nick,arkadas,0) { inc -eu300 $+(%,$nick,#) 1 | if $($+(%,$nick,#),2) == 1 { msg $nick $read(HosGeldin.txt) } }

alias arkadas {

  .auser arkadas $1 $+ *

  echo -a 4 $1 7arkadaş listesine eklenmiştir.

}

Selam murat_aziz ,

İlk vermiş olduğum kod üzerinden düzenledim.Şayet bu 1 kanal için geçerliyse #kanal ismini yazarsın.Aksi takdirde bulunduğun her kanalda işlem görecektir.

İyi forumlar...

muratt_aziz

13 Şubat 2009 15:13

Cevap: oto msg

Alıntı:

Difuzyon Nickli Üyeden Alıntı (Mesaj 612138)

Kod:

on *:join:#: {

  var %} 1 

  while %} <= $lines(Arkadas.txt) {

    if $read(Arkadas.txt,%}) isin $nick { msg $nick $read(HosGeldin.txt) }

    inc %}

  }

}

Kod:

on *:join:#:if $ulist($nick,arkadas,0) { msg $nick $read(HosGeldin.txt) }

alias arkadas {

  .auser arkadas $1 $+ *

  echo -a 4 $1 7arkadaş listesine eklenmiştir.

}

toplu liste eklemek istesem nasıl ekleye bılırım örn: ark.txt icindekı nickleri bir defada

/arkadas ali te oldugu gıbı

senın verdıgın kodun ekleyecegi yere ekleye bilirmiyiz..

tşk

Difuzyon

13 Şubat 2009 15:34

Cevap: oto msg

//var %a 1 | while %a <= $lines(ark.txt) { auser arkadas $read(ark.txt,%a) $+ * | inc %a }

Bu komutu uygulaman halinde ark.txt 'de bulunan kelime'leri , kelime* olarak arkadas listesine ekler.

muratt_aziz

15 Şubat 2009 14:42

Cevap: oto msg

Kod:

on *:join:#:if $ulist($nick,arkadas,0) { /timer1 1 10 msg $nick $read(h.g.txt) }

alias arkadas {

  .auser arkadas $1 $+ *

  echo -a 4 $1 7arkadaş listesine eklenmiştir.

}

koda bır ek yapabılırmıyız ben timer ekledım h.g.txt harıcın de ıkıncı bır txt daha ekleyıp ilk msg den 10 sanıye sonra dıger txt den bır msg daha attıra bılırmıyız..

örnek: arkadas kanala gırınce rast gele karsılama msg sı atıyor h.g.txt den
10 sanıye sonra h.g2.txt ıcınden rast gele baska bır yanıt daha versin istıyorum mümkünmü denedım yapamadım :)

Kod:

on *:join:#:if $ulist($nick,arkadas,0) { /timer1 1 10 msg $nick $read(h.g.txt) | /timer2 1 25 msg $nick $read(h.g2.txt) }

alias arkadas {

  .auser arkadas $1 $+ *

  echo -a 4 $1 7arkadaş listesine eklenmiştir.

}

cözdüm gerek kalmadı teşekürler.

uFuK	15 Şubat 2009 15:14

Cevap: oto msg

$nick ne işe yarıyor o kodun sonundaki :)

muratt_aziz

15 Şubat 2009 16:39

Cevap: oto msg

:) ıkı dakıka kaldı duzelttım :D ne cabuk gordunde yazdın

kurugaddere

15 Şubat 2009 19:46

Cevap: oto msg

on *:join:#:if $ulist($nick,arkadas,0) { /timer1 1 10 msg $nick $read(h.g.txt) | /timer2 1 25 msg $nick $read(h.g2.txt) }
alias arkadas {
.auser arkadas $1 $+ *
echo -a 4 $1 7arkadaş listesine eklenmiştir

peki bu koda sadece ilk mesajımıza cevap yazanlara yollama şeklinde nasıl ayarlarız.
yani hg.txt ilk mesajı atıcak ama karşı taraf yanıt verirse hg.txt2 ikinci mesajı oto atıcak şeklinde

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 06:59.