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/)
-   -   dedikodu , paparazzi botu (https://www.ircforumlari.net/mirc-scripting-sorunlari/189733-dedikodu-paparazzi-botu.html)

PoweR 21 Mart 2009 13:01
dedikodu , paparazzi botu
 
Selamlar . Eğlenceli ve güzel birşey gibi.

Bir server'de gördüğüm paparazzi botunu uygulamak istedim.

[12:42] <Bot> Bot, kullanma talimatı
[12:42] <Bot> !start
[12:42] <Bot> !stop
[12:42] <Bot> !list
[12:42] <Bot> !ekle mesaj gir
[12:42] <Bot> !sil Sıranumarası

#paparazzi@ kanalında !ekle mesaj yazınca Bir mesaj yazıyor ve bu mesajı #paparazzi kanalına yoluyor ve tabi numaralı birşekilde
mesela
#paparazzi@ kanalında

!ekle X ile W evlendi yazıyor
#paparazzi kanalına


[12:43] <@Bot> Sırano: 3/10: X ile W evlendi
[12:44] <@Bot> -
[12:44] <@Bot> Sırano: 4/10: A nicki B Nickine Çıkma teklif etti

falan yazıyor.

Bot #paparazzi@ kanalına giren nickin özeline
[12:42] <Bot> Bot, kullanma talimatı
[12:42] <Bot> !start
[12:42] <Bot> !stop
[12:42] <Bot> !list
[12:42] <Bot> !ekle mesaj gir
[12:42] <Bot> !sil Sıranumarası

yazacak

!stop deyince #paparazzi kanalına yazı yazmayacak !start deyince başlayacak

!list deyince haberleri listeleyecek..

Şimdiden teşekkürler.

Difuzyon 21 Mart 2009 19:12
Cevap: dedikodu , paparazzi botu
 
Kod:
on !*:join:#paparazzi@:{
  msg $nick Bot, kullanma talimatı
  msg $nick !start
  msg $nick !stop
  msg $nick !list
  msg $nick !ekle mesaj gir
  msg $nick !sil Sırano (ilk rakamı)
}
on *:text:*:#paparazzi@:{
  if $1 == !start { .timermagazin 0 5 magazinoku }
  if $1 == !stop { unset %magazin | .timermagazin off }
  if $1 == !list { play $chan magazin.txt 800 }
  if $1 == !ekle { msg $chan msj girildi. | write magazin.txt $2- }
  if $1 == !sil { msg $chan $2 nolu msj silindi. | write $+(-,dl,$2) magazin.txt }
}
alias magazinoku {
  if $lines(magazin.txt) == 0 { msg #paparazzi@ Hiç mesaj yok-mesaj ekle | .timermagazin off | halt }
  if !%magazin { Sırano: $+(1,/,$lines(magazin.txt),:,) msg #paparazzi $read(magazin.txt,1) | goto zıpzıp }
  msg #paparazzi Sırano: $+(%magazin,/,$lines(magazin.txt),:,) $read(magazin.txt,%magazin)
  :zıpzıp
  if %magazin == $lines(magazin.txt) { set -e %magazin 0 }
  msg #paparazzi -
  inc %magazin
}
Her !ekle , !sil komutlarını uyguladığında sıralama değişir.Ona göre hem !list ile hemde geçtiği mesajda durumu takip edersin.

İyi forumlar...

PoweR 21 Mart 2009 20:14
Cevap: dedikodu , paparazzi botu
 
[19:58] <Ben> !list
[19:58] <b0t> selam falan
[19:58] <b0t> Bunla bu cıkıyor
[19:58] <b0t> bu buna aşık
herşey tamamda list yaparken numaraları yazmıyor ?

Difuzyon 21 Mart 2009 20:44
Cevap: dedikodu , paparazzi botu
 
!list komutunun satırını aşağıdaki ile değiştirmelisin.

if $1 == !list { var %a 1 | while %a <= $lines(magazin.txt) { msg #paparazzi@ %a $+ ) $read(magazin.txt,%a) | inc %a } }

PoweR 22 Mart 2009 07:30
Cevap: dedikodu , paparazzi botu
 
[07:14] <beN> !list
[07:14] <b0t> 1) selam falan
[07:14] <b0t> 2) Bunla bu cıkıyor
[07:14] <b0t> 3) bu buna aşık
[07:15] <ben> !sil 2
[07:15] <b0t> 2 nolu Haber silindi
[07:15] <Esrar> !sil 3
[07:15] <b0t> 3 nolu Haber silindi
[07:15] <Esrar> !list
[07:15] <b0t> 1) selam falan
[07:15] <b0t> 2) bu buna aşık

Bu düzeltilemezmi :s

CesuryureK 22 Mart 2009 09:09
Cevap: dedikodu , paparazzi botu
 
PHP- Kodu:
on !*:join:#paparazzi@:{
  msg $nick Bot, kullanma talimatı
  msg $nick !start
  msg $nick !stop
  msg $nick !list
  msg $nick !ekle mesaj gir
  msg $nick !sil Sırano (ilk rakamı)
}
on *:text:*:#paparazzi@:{
  if $1 == !start { .timermagazin 0 5 magazinoku }
  if $1 == !stop { unset %magazin | .timermagazin off }
  if $1 == !list { 
    if ($lines(magazin.txt) == 0) { msg #paparazzi@ Liste Boş | /remove magazin.txt }
    else {
  var %a 1 | while %a <= $lines(magazin.txt) { msg #paparazzi@ %a $+ ) $read(magazin.txt,%a) | inc %a } } }
  if $1 == !ekle { msg $chan msj girildi. | write magazin.txt $2-  }
  if $1 == !sil { msg $chan $2 nolu msj silindi. | write -dl $2 magazin.txt   }
}
alias magazinoku {
  if $lines(magazin.txt) == 0 { msg #paparazzi@ Hiç mesaj yok-mesaj ekle | .timermagazin off | halt }
  if !%magazin { Sırano: $+(1,/,$lines(magazin.txt),:,) msg #paparazzi $read(magazin.txt,1) | goto zıpzıp }
  msg #paparazzi Sırano: $+(%magazin,/,$lines(magazin.txt),:,) $read(magazin.txt,%magazin)
  :zıpzıp
  if %magazin == $lines(magazin.txt) { set -e %magazin 0 }
  msg #paparazzi -
  inc %magazin
} 

PoweR 22 Mart 2009 09:12
Cevap: dedikodu , paparazzi botu
 
Teşekkürler CesuryureK :D

I Love you ;sucsuz


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

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