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/)
-   -   !kurallar komutu (https://www.ircforumlari.net/mirc-scripting-sorunlari/753549-kurallar-komutu.html)

Packard 19 Ağustos 2016 18:51

!kurallar komutu
 
merhaba arkadaşlar altta verdiğim kod ile kanala !kurallar yazdığımızda kanal geneline kurallar.txt deki kurallar sırasıyla geliyor.
fakat kanala gönderirken kurallar.txt deki yazıları her satır arağı 10'ar saniye olsun istiyorum.
1. satırı gönderdi 10 saniye sonra 2. satır gelsin istiyorum mümkünmü.
kodu o şekilde düzenleyip verebilirmisiniz rica etsem

on *:text:*:#kanal: {
if ($1 == !Kural) {
.msg $chan Kurallar | var %l = $lines(kurallar.txt)
.play $chan kurallar.txt 3000 | .timertplm 1 $calc(%l * 3) /msg # Kural bitti. }
}
}

KuL 19 Ağustos 2016 22:30

Cevap: !kurallar komutu
 
Play Komutunun asli:

Kod:

/play [-xaescpbrnqNmNfNlNtTOPIC] [alias] [channel/nick/stop] [filename] [delay]
[delay] kismida gecikme oluyor, yani senin 3000 yazdigin kisim.

Gecikme kismi milisaniye olarak eklenilir. Yani sen oraya 3000 yazdigin icin gecikme arada 3 Saniye ara ile oluyor. Orayi 10000 yaptiginda diledigin olur. Kural bitti Kismininda dogru zamanda gelmesi icin, hesaplamada 3 ile degilde 10 ile carpmayi unutma.


Yani toplayacak olursak, sonuc:

Kod:

on *:text:*:#kanal: {
  if $1 == !Kural {
    .msg # Kurallar | var %l = $lines(kurallar.txt)
    .play # kurallar.txt 10000 | .timertplm 1 $calc(%l * 10) msg # Kural bitti.
  }
}

Play Komutu Hakkinda Detayli Bilgi icin -> [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] <-

Packard 20 Ağustos 2016 10:49

Cevap: !kurallar komutu
 
çok teşekkür ederim hocam.

Packard 20 Ağustos 2016 21:41

Cevap: !kurallar komutu
 
Alıntı:

KuL Nickli Üyeden Alıntı (Mesaj 1041798477)
Play Komutunun asli:

Kod:

/play [-xaescpbrnqNmNfNlNtTOPIC] [alias] [channel/nick/stop] [filename] [delay]
[delay] kismida gecikme oluyor, yani senin 3000 yazdigin kisim.

Gecikme kismi milisaniye olarak eklenilir. Yani sen oraya 3000 yazdigin icin gecikme arada 3 Saniye ara ile oluyor. Orayi 10000 yaptiginda diledigin olur. Kural bitti Kismininda dogru zamanda gelmesi icin, hesaplamada 3 ile degilde 10 ile carpmayi unutma.


Yani toplayacak olursak, sonuc:

Kod:

on *:text:*:#kanal: {
  if $1 == !Kural {
    .msg # Kurallar | var %l = $lines(kurallar.txt)
    .play # kurallar.txt 10000 | .timertplm 1 $calc(%l * 10) msg # Kural bitti.
  }
}

Play Komutu Hakkinda Detayli Bilgi icin -> [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] <-


hocam peki biz buna !dur ekleyebilirmiyiz.
!basla dediğimizde ise kaldığı yerden devam etmesi mümkünmüdür

Packard 21 Ağustos 2016 19:10

Cevap: !kurallar komutu
 
konu hakkında bilgisi olan hocalarımız destek lütfen

Packard 22 Ağustos 2016 18:01

Cevap: !kurallar komutu
 
destek bekleniyor, teşekkür ederim şimdiden destek olan arkadaşlara.

nikotin 14 Eylül 2016 14:50

Cevap: !kurallar komutu
 
Difuzyon arkadasın daha önce paylasmıs oldugu bu kod isinize yarar belki
!basla #kanal dosya.txt süre
örnek: egitim2 isimli dosyası 6 saniye arayla okutmak istiyorum
!basla #kanal egitim2.txt 6
!dur ve !devam da yapabilirsin.

on *:text:*:#kanal: {
if ($nick !isop # && $v1 !ishop #) return
if $1 == !basla && $2 && $play(0) == 0 {
if $findfile($mircdir,$+(*,$3,.txt,*),0) {
set -e %difytime $calc($4 *1000)
set -e %difyject $3
set -e %difychan $iif($left($2,1) == $chr(35),$2,$+($chr(35),$2))
.play %difychan $+(",$findfile($mircdir,$+(*,$3,.txt,*),1),") %difytime
msg # $+($3,.txt) dosya ismi $4 sn. süreyle %difychan kanalına yazdırılıyor.
msg %difychan $remove($3,!) Konusu Baslatıldı.
}
else { msg # Böyle bir dosya mirc ana dizininde bulunmuyor }
}
if $1 == !dur {
var %d = $remove($nopath($play(%difychan).fname),.txt)
hadd -m play %d $play(%difychan).pos
.play stop
msg $+(#,$chr(44),%difychan) %d Dosyası durduruldu.
}
if $1 == !devam {
if $hget(play,%difyject) {
play $+(-f,$ifmatch) %difychan $+(",$findfile($mircdir,$+(*,%difyject,.txt,*),1), ") %difytime
msg $+(#,$chr(44),%difychan) %difyject Dosyasına kalınan yerden devam ediliyor.
}
}
}
on *:playend:if $regex($nopath($filename),$+(%difyject,.txt)) { msg %difychan %difyject yazısı sona erdi. | unset %dify* }

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 14:50 -->-> Daha önceki mesaj 14:09 --

pardon dosya ismi yazarken .txt uzantı eklemeye gerek yok.
!basla #kanal dosyaismi süre seklinde olacak.


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk