Elimde olan bi kod hakkında yardım edermisiniz.. - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

03 Mayıs 2008, 16:57

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

S.a arkadaşlar elimde şöyle bi kode var
on *:text:!basla sohbet #:#xx: { .msg # 13 Sohbet Başlıyor.. }{
var %s 1
while %s <= $lines(sohbet.txt) {
msg # -> $read(sohbet.txt,%s)
inc %s
}
}
Şimdi bu kodede örnegin xx kanalında biri !basla sohbet #kanal yazdıgı zaman sohbete hangi kanaldaysa o kanalda sohbet.txt deki yazıları yazmasını istiyorum.. ve bu yazıları. mumkunse her cumleyi 3 saniyede bir göndersin.. kanala böyle bişe yapabilirmiyiz..

on *:text:!basla sohbet #:#xx: {
.msg # 13 Sohbet Başlıyor..
.play sohbet.txt 3000
}

cashmare · 03 Mayıs 2008, 17:02

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

on *:text:!basla sohbet #:#xx: {
.msg # 13 Sohbet Başlıyor..
.play sohbet.txt 3000
}

nickolas bide on *:text:!basla sohbet #:#xx: {
.msg # 13 Sohbet Başlıyor..
.play sohbet.txt 3000
} burda !basla sohbet #sohbet yazdıgımda baslamıyor !basla sohbet #
yazdıgımda baslıyor.. yani diyorum ki örnegin #xx kanalında biri !baslas sohbet #sohbet yazdıgında sohbet kanalına sohbet.txt deki yazılar 3 saniye aralıklarla göndericek..
bide verdigin code de
* /play: Bu pencerede oynatamassın (Satır 3, script1.txt)
diyor

03 Mayıs 2008, 17:13

Elimde mirc help yok o nedenle senin kodunu tekrar düzenliyorum...

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

 
on *:text:*:#xx: { 
  if ($1-2 == !basla sohbet && $me ison $3) {
    .msg $3 13 Sohbet Başlıyor..
    var %s = 1, %time = 1, %r = $r(0, 9898999)
    while %s <= $lines(sohbet.txt) {
      .timer.sohbet_ $+ %s $+ _ $+ %r 1 %time msg $3 -> $read(sohbet.txt,%s)
      inc %s
      %time = $calc(%time + 3)
    }
  }
}

cashmare · 03 Mayıs 2008, 17:20

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

Elimde mirc help yok o nedenle senin kodunu tekrar düzenliyorum...

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

 
on *:text:*:#xx: { 
  if ($1-2 == !basla sohbet && $me ison $3) {
    .msg $3 13 Sohbet Başlıyor..
    var %s = 1, %time = 1, %r = $r(0, 9898999)
    while %s <= $lines(sohbet.txt) {
      .timer.sohbet_ $+ %s $+ _ $+ %r 1 %time msg $3 -> $read(sohbet.txt,%s)
      inc %s
      %time = $calc(%time + 3)
    }
  }
}

Teşekkür Ederim Nickolas.. Allah razı Olsun..
Bide Nickolas buraya kadar teşekkür ederim.. bide sunu ekleyebilirmiyiz bu codeye şimdi diyelimki bende sohbet.txt , muhabbet.txt, xxx.txt yy.txt felan yani kendim ekliycegim txtleri yani şöyle diyim.. şimdi #xx kanalında biri !basla muhabbet #sohbet yazdıgı zaman botum sohbet kanalına muhabbet.txt içindeklieri göndersin.. aynı şekilde !basla xxx #sohbet yazdıgında xxx.txt dekileri göndersin böyle bişe olur mu

03 Mayıs 2008, 17:32

detay Nickli Üyeden Alıntı

nickolasin verdigi kodda sadece kanal eksik, while döngüsüz daha kısa ve rahat bir kod

on *:text:!basla sohbet #:#xx: {
.msg # 13 Sohbet Başlıyor..
.play # sohbet.txt 3000
}

Elimde mirc help olmadığı için while kullandım. Sağolasın açıklaman için

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

Teşekkür Ederim Nickolas.. Allah razı Olsun..
Bide Nickolas buraya kadar teşekkür ederim.. bide sunu ekleyebilirmiyiz bu codeye şimdi diyelimki bende sohbet.txt , muhabbet.txt, xxx.txt yy.txt felan yani kendim ekliycegim txtleri yani şöyle diyim.. şimdi #xx kanalında biri !basla muhabbet #sohbet yazdıgı zaman botum sohbet kanalına muhabbet.txt içindeklieri göndersin.. aynı şekilde !basla xxx #sohbet yazdıgında xxx.txt dekileri göndersin böyle bişe olur mu

Şöyle diyelim istersen !basla sohbet #muhabbet yazdığında muhabbet.txt dekileri yani !basla sohbet #kanalismi yazdığında kanalismi.txt 'deki gönderir?

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

 
on *:text:*:#xx: { 
  if ($1-2 == !basla sohbet && $me ison $3) {
    .msg $3 13 Sohbet Başlıyor..
    if ($isfile($right($3, -1) $+ .txt)) {
      .play $3 $right($3, -1) $+ .txt 3000
    }
    else {
      msg # $right($3, -1) $+ .txt dosyası bulunamadı
    }
  }
}

cashmare · 03 Mayıs 2008, 17:34

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

Elimde mirc help olmadığı için while kullandım. Sağolasın açıklaman için

Şöyle diyelim istersen !basla sohbet #muhabbet yazdığında muhabbet.txt dekileri yani !basla sohbet #kanalismi yazdığında kanalismi.txt 'deki gönderir?

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

 
on *:text:*:#xx: { 
  if ($1-2 == !basla sohbet && $me ison $3) {
    .msg $3 13 Sohbet Başlıyor..
    if ($isfile($3 $+ .txt)) {
      .play $3 $3 $+ .txt 3000
    }
    else {
      msg # $3 $+ .txt dosyası bulunamadı
    }
  }
}

şimdi diyelim ki ben !basla sohbet #muhabbet yazdım.. xx kanalında muhabbet .txt ler gitsin tamamda burda #kanaladı kısmına illa kanal mı yazmam lazım yani kısaca ben örnegin nefis-muhasebesi.txt die bi sohbet ekledim bu durumda #nefis-muhasebesi die bi kanal açmam gerekicek sanırım.. ama ben diyorum ki yani xx kanalında !basla txtismi #kanal böyle yazıldıgında txtismi kısmını bende olan listeden hangisi yazılmışsa o gitsin o kanala

03 Mayıs 2008, 17:35

Kodu tekrar al lütfen

!basla sohbet #sohbet yazdığında #Sohbet kanalına sohbet.txt içindekileri yollar

!basla sohbet #muhabbet yazdığında #muhabbet kanalına muhabbet.txt içindekileri yollar

!basla sohbet #istanbul yazdığında #istanbul kanalına istanbul.txt yi yollar.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Yardım edermisiniz	mercenary	Bilgisayar Donanımı	2	20 Ekim 2010 21:54
yardım edermisiniz..	kanarya034	Eggdrop, NeoStats, BNC	4	08 Aralık 2008 21:39
Acil yardım bot elimde kaldı!!	IceR	mIRC Scripting Sorunları	1	07 Nisan 2007 15:18
2 hata mesajı hakkında yardım edermisiniz ?	Enigmatic	Unreal IRCd	7	09 Şubat 2007 14:48
Services Hakkında Yardım Edermisiniz?	zimone	Servisler	3	04 Aralık 2005 15:07

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.