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/)
-   -   !bomba nick - !kes nick puanlı (https://www.ircforumlari.net/mirc-scripting-sorunlari/291448-bomba-nick-kes-nick-puanli.html)

fatal 10 Kasım 2009 15:20
!bomba nick - !kes nick puanlı
 
Merhaba, tasarladığım botta forumdan bir arkadaşın yazmış olduğu kodu kullaniyorum.

Kod:
;Kanala yazılan yazılarda
on *:text:*:#bomba:{
  ;Eğer 1. kelime !bomba ise VE 2. kelime kanalda varolan bir nick ise VE %bombarenk isminde bir variables yoksa(Neden olmamasını istedim:Aynı anda 2. kez başlatılmasını engellemek için)
  if $1 == !bomba && $2 ison $chan && !%bombarenk {
    ;%bombaNick isminde bir değişken oluştur(Sebebi:Yazacak olan diğer nicklerle karışmasın)
    set $+(%,bomba,$2) $2
    ;%bombarenkler oluştur
    set %bombarenkler altin lacivert mavi kahverengi yesil kirmizi
    ;%bombarenkler 'den rastgele(1 2 3 4 5 6)  bir renk seç
    set %bombarenk $token(%bombarenkler,$rand(1,6),32)
    ;Zamanlayıcıyı başlat süre sonunda(32 sn) bilemezse\yanıtlamazsa kanaldan atılsın ve değişkenler silinsin
    $+(.,timer,$2) 1 32 cs kick $chan $nick Geç kaldın! 4BOOOOOOOOOOOOOOMBA1 patladı! :) $(|) unset %bomba*
    ;Kanala Belirtilen mesajı geç
    msg $chan Bombayı $2 isimli arkadaşın eline tutuşturur!. [32] Saniye içinde patlayacak!
    ;Kanala belirtilen mesajı geç
    msg $chan Bombayı etkisiz hale getirmek için 6 kablodan doğru olanı kesmelisin. Kablolar : altin lacivert mavi kahverengi yesil ve kirmizi. !kes renk
  }
  ;Eğer kanala yazan nick adına bir değişken varsa(yazan kişiyi doğrulamak adına) VE 1. kelimesi !kes ise
  if $var($+(%,bomba,$nick)) && $1 == !kes {
    ;Eğer 2. kelime rastgele seçilen renk ise(ki bu durumda doğru bulmuştur) , zamanlayıcıyı durdur ve kanal tebrik mesajı geç ve değişkenleri sil
    if $2 == %bombarenk { $+(.,timer,$nick) off | msg $chan $nick şimdilik kurtuldun bi dahaki sefere şanslı olmayabilirsin :) | unset %bomba* }
    ;Şayet 2. kelime doğru seçenek değilse ve aynı zamanda kanala yazdığı 2. kelime diğer renklerden biriyse zamanlayıcıyı durdur , kanaldan at ve değişkenleri sil
    elseif $istok($remtok(%bombarenkler,%bombarenk,32),$2,32) { $+(.,timer,$nick) off | cs kick $chan $nick Yanlış Kablo. 4*BOOOOOOOOOOM!* | unset %bomba* }
  }
}
Buna puan ekleyebilir miyiz?

Örnek;

Kod:
<Gaffur> uNuTuLMaZ şimdilik kurtuldun bi dahaki sefere şanslı olmayabilirsin :) Puanın: 150


*** Mustafa_ ChanServ Tarafından Kanaldan Atıldı (KICK by Gaffur (Geç kaldın! BOOOOOOOOOOOOOOMBA patladı! :) Puan: -20))


*** uNuTuLMaZ ChanServ Tarafından Kanaldan Atıldı (KICK by Gaffur (Yanlış Kablo. *BOOOOOOOOOOM!* Puanın: 600))

Difuzyon 10 Kasım 2009 22:40
Cevap: !bomba nick - !kes nick puanlı
 
Kod:
on @*:text:*:#:{
  if $1 == !bomba && $2 == $chan && !%bombarenk {
    set %bombarenkler altin lacivert mavi kahverengi yesil kirmizi
    set %bombarenk $token(%bombarenkler,$rand(1,6),32)
    set %bombacı $nick
    msg $chan $nicks($chan)
    msg $chan -
    msg $chan $qt($nick) kanala bombayı bırakır!04 [30] 01Saniye içinde patlayacak!
    msg $chan Bombayı etkisiz hale getirmek için 6 kablodan doğru olanı kesmelisiniz. Kablolar : altin lacivert mavi kahverengi yesil ve kirmizi. !kes renk
    $+(.,timer,$chan) 1 30 msg $chan 01Doğru kablo $qt(%bombarenk) .Geç kaldınız 4bOoOoOoomba1 patladı! $(|) .enable #bombardıman $(|) who $chan 
  }
  if $1 == !kes && $timer($chan) && $nick != %bombacı {
    if $2 == %bombarenk { $+(.,timer,$chan) off | msg $chan - | inc $+(%,puan,+,$nick) 200 | msg $chan Kanalın kahramanı  $nick .Hepinizi o kurtardı,tebrikler $nick :) 12(Puanın: $($+(%,puan,+,$nick),2) ) | msg $chan - | unset %bomba* }
    elseif $istok($remtok(%bombarenkler,%bombarenk,32),$2,32) { dec $+(%,puan,+,$nick) 50 | kick $chan $nick 1Yanlış kabloyu kestin!4 14(Puanın: $($+(%,puan,+,$nick),2) | msg $chan Bomba halen aktif ! }
  }
  if $1 == !bomba && $2 ison $chan && !%bombarenk && $2 != $me {
    set $+(%,bomba,$2) $2
    set %bombarenkler altin lacivert mavi kahverengi yesil kirmizi
    set %bombarenk $token(%bombarenkler,$rand(1,6),32)
    $+(.,timer,$2) 1 30 dec $+(%,puan,+,$2) 50 $(|) kick $chan $2 1Geç kaldın 4bOoOoOoomba1 patladı! 14(Puanın: $+(%,puan,+,$2) $(|) unset %bomba*
    msg $chan Bombayı $2 isimli arkadaşın eline tutuşturur!. [30] Saniye içinde patlayacak!
    msg $chan Bombayı etkisiz hale getirmek için 6 kablodan doğru olanı kesmelisin. Kablolar : altin lacivert mavi kahverengi yesil ve kirmizi. !kes renk
  }
  if $var($+(%,bomba,$nick)) && $1 == !kes {
    if $2 == %bombarenk { $+(.,timer,$nick) off | inc $+(%,puan,+,$nick) 100 | msg $chan $nick şimdilik kurtuldun bi dahaki sefere şanslı olmayabilirsin :) 12(Puanın: $($+(%,puan,+,$nick),2) ) | unset %bomba* }
    elseif $istok($remtok(%bombarenkler,%bombarenk,32),$2,32) { dec $+(%,puan,+,$nick) 50 | kick $chan $nick 1Yanlış Kabloo 4*BOOOOOOOOOOM!* 14(Puanın: $($+(%,puan,+,$nick),2) }
  }
}
alias nicks {
  var %i = 1
  while ($nick($1,%i)) {
    var %cenk = %cenk $nick($1,%i)
    inc %i
  }
  return %cenk
}
#bombardıman off
raw 352:*:haltdef | if !$istok(%bombacı $me,$6,32) { dec $+(%,puan,+,$6) 50 | raw -q kick $2 $6 1Bomba patladı 4*BOOOOOOOOOOM!* 14(Puanın: $($+(%,puan,+,$6),2) }
raw 315:*:haltdef | unset %bomba* | .disable #bombardıman
#bombardıman end
Oyun iki türlü oynanıyor,hatırlatayım ( !bomba #kanal yada !bomba nick )
Amaç birazda puan olduğu için tek kişilik oyunuda süre sonuna kadar bilmesini zorunda haline getirdim.Ayrıca #kanal'da kazanan 200 , tek kişilikte bilen 100 , yanlış işlemde ise -50 puandır.

Bu şekilde gözlemleyebildiğim eksiklikleri giderdim,güle güle oynayabilirsiniz :)

İyi forumlar...

fatal 11 Kasım 2009 13:56
Cevap: !bomba nick - !kes nick puanlı
 
Selam Difüzyon, ilginizi için teşekkür ederim. Yalnız; kodda bir hata var.

PHP- Kodu:
<ParadisoLa> !kes kirmizi
*** ParadisoLa Gaffur Tarafından Kanaldan Atıldı (Yanlış Kabloo *BOOOOOOOOOOM!* (Puanın: -650)
*** Giriş: ParadisoLa (uus@GlobalOP.Sohbete.NET)
<StaticRhyme> -650 allahtan kork la
<StaticRhyme> :D
*** ParadisoLa Gaffur Tarafından Kanaldan Atıldı (Geç kaldın bOoOoOoomba patladı! (Puanın: -250) 

By-|Realist 11 Kasım 2009 14:08
Cevap: !bomba nick - !kes nick puanlı
 
eylenceli bişeye benziyo Paylaşım İçin tşkler. :)

hayvan 16 Ocak 2011 17:10
Cevap: !bomba nick - !kes nick puanlı
 
kodda, kırmızı kısım eksik yazılmıs.
difüzyona oyun için tşk.

Kod:
on @*:text:*:#:{
if $1 == !bomba && $2 == $chan && !%bombarenk {
set %bombarenkler altin lacivert mavi kahverengi yesil kirmizi
set %bombarenk $token(%bombarenkler,$rand(1,6),32)
set %bombacı $nick
msg $chan $nicks($chan)
msg $chan -
msg $chan $qt($nick) kanala bombayı bırakır!04 [30] 01Saniye içinde patlayacak!
msg $chan Bombayı etkisiz hale getirmek için 6 kablodan doğru olanı kesmelisiniz. Kablolar : altin lacivert mavi kahverengi yesil ve kirmizi. !kes renk
$+(.,timer,$chan) 1 30 msg $chan 01Doğru kablo $qt(%bombarenk) .Geç kaldınız 4bOoOoOoomba1 patladı! $(|) .enable #bombardıman $(|) who $chan
}
if $1 == !kes && $timer($chan) && $nick != %bombacı {
if $2 == %bombarenk { $+(.,timer,$chan) off | msg $chan - | inc $+(%,puan,+,$nick) 200 | msg $chan Kanalın kahramanı  $nick .Hepinizi o kurtardı,tebrikler $nick :) 12(Puanın: $($+(%,puan,+,$nick),2) ) | msg $chan - | unset %bomba* }
elseif $istok($remtok(%bombarenkler,%bombarenk,32),$2,32) { dec $+(%,puan,+,$nick) 50 | kick $chan $nick 1Yanlış kabloyu kestin!4 14(Puanın: $($+(%,puan,+,$nick),2) | msg $chan Bomba halen aktif ! }
}
if $1 == !bomba && $2 ison $chan && !%bombarenk && $2 != $me {
set $+(%,bomba,$2) $2
set %bombarenkler altin lacivert mavi kahverengi yesil kirmizi
set %bombarenk $token(%bombarenkler,$rand(1,6),32)
$+(.,timer,$2) 1 30 dec $+(%,puan,+,$2) 50 $(|) kick $chan $2 1Geç kaldın 4bOoOoOoomba1 patladı! 14(Puanın: $+(%,puan,+,$2) $(|) unset %bomba*
msg $chan Bombayı $2 isimli arkadaşın eline tutuşturur!. [30] Saniye içinde patlayacak!
msg $chan Bombayı etkisiz hale getirmek için 6 kablodan doğru olanı kesmelisin. Kablolar : altin lacivert mavi kahverengi yesil ve kirmizi. !kes renk
}
if $var($+(%,bomba,$nick)) && $1 == !kes {
if $2 == %bombarenk { $+(.,timer,$nick) off | inc $+(%,puan,+,$nick) 100 | msg $chan $nick şimdilik kurtuldun bi dahaki sefere şanslı olmayabilirsin :) 12(Puanın: $($+(%,puan,+,$nick),2) ) | unset %bomba* }
elseif $istok($remtok(%bombarenkler,%bombarenk,32),$2,32) { $+(.,timer,$nick) off { dec $+(%,puan,+,$nick) 50 | kick $chan $nick 1Yanlış Kabloo 4*BOOOOOOOOOOM!* 14(Puanın: $($+(%,puan,+,$nick),2) }
}
}
alias nicks {
var %i = 1
while ($nick($1,%i)) {
var %cenk = %cenk $nick($1,%i)
inc %i
}
return %cenk
}
#bombardıman off
raw 352:*:haltdef | if !$istok(%bombacı $me,$6,32) { dec $+(%,puan,+,$6) 50 | raw -q kick $2 $6 1Bomba patladı 4*BOOOOOOOOOOM!* 14(Puanın: $($+(%,puan,+,$6),2) }
raw 315:*:haltdef | unset %bomba* | .disable #bombardıman
#bombardıman end

SystemTeqniC 03 Nisan 2011 13:59
Cevap: !bomba nick - !kes nick puanlı
 
belli bir süre sonra kod kullanılmıyor :S işlemiyor.

Difuzyon 03 Nisan 2011 23:08
Cevap: !bomba nick - !kes nick puanlı
 
Görebildiğim kadarıyla bu oyun oynanıyor.Sadece bu başlık altında değil 1-2 konu başlığı altında bu oyun hakkında çeşitli düzenlemeler mevcut.

Şayet kod belli bir süre sonra kullanılamaz hale gelmişse yapmanız gerekenler (aklıma gelen) :

a) Scriptinizin remote kısmında çakışan başka bir TEXT event'ı vardır,buna önlem almalısınız.
b) Düzeneği bir bomba uzmanına göstermelisiniz.

unpainful 07 Nisan 2016 22:15
Cevap: !bomba nick - !kes nick puanlı
 
Peki hiç bu kadar teferruata girmeyip bombayı elden ele dolaştırsak nasıl olabilir?
<Ahmet>!bomba Ali
<Bot>Ahmet bombayı alinin eline tutuşturdu!
<Ali>!bomba Sinan
<Bot>Ali bombayı sinanın eline tutuşurdu , patlamaya az kaldı..

Şeklinde , !bombayı ilk atanın süresinden itibaren ilk 30 saniyede bomba patlasa , yapılabilir mi?

Feragat 07 Nisan 2016 23:55
Cevap: !bomba nick - !kes nick puanlı
 
İstediğin gibi gözüküyor.

Kod:
msg $chan $qt($nick) kanala bombayı bırakır!04 [30] 01Saniye içinde patlayacak!

unpainful 08 Nisan 2016 00:07
Cevap: !bomba nick - !kes nick puanlı
 
Alıntı:
Feragat Nickli Üyeden Alıntı (Mesaj 1041764272)
İstediğin gibi gözüküyor.

Kod:
msg $chan $qt($nick) kanala bombayı bırakır!04 [30] 01Saniye içinde patlayacak!
ilginiz için teşekkür ederim

PHP- Kodu:
on $*:text:/[!.]bomba\s+\S/SAi:#: {
msg $chan $qt($nick) kanala bombayı bırakır!04 [30] 01Saniye içinde patlayacak! 
şeklinde mi yapmam gerekiyor? böyle biraz saçma oldu sanki yapamadım ;s

Feragat 08 Nisan 2016 23:05
Cevap: !bomba nick - !kes nick puanlı
 
Yok onu demedim, yani üstte arkadaşların paylaştığı kod bu istediğini içeriyor anlamında söylemiştim. Sen sıfırdan mı yazmak istiyorsun bilmiyorum ama hazır istiyorsan üsttekileri denemeni öneririm.

unpainful 09 Nisan 2016 14:06
Cevap: !bomba nick - !kes nick puanlı
 
Alıntı:
Feragat Nickli Üyeden Alıntı (Mesaj 1041764553)
Yok onu demedim, yani üstte arkadaşların paylaştığı kod bu istediğini içeriyor anlamında söylemiştim. Sen sıfırdan mı yazmak istiyorsun bilmiyorum ama hazır istiyorsan üsttekileri denemeni öneririm.
Bu kadar detaylı değilde sadece belirtilen süre içerisinde atıyorum 30 saniye !bomba nick yapıldığında elden ele dolaşabilir ve 30 saniye sonunda kimde kaldıysa o kanaldan atılabilir

YouMyCure 10 Nisan 2016 01:04
Cevap: !bomba nick - !kes nick puanlı
 
Alıntı:
unpainful Nickli Üyeden Alıntı (Mesaj 1041764739)
Bu kadar detaylı değilde sadece belirtilen süre içerisinde atıyorum 30 saniye !bomba nick yapıldığında elden ele dolaşabilir ve 30 saniye sonunda kimde kaldıysa o kanaldan atılabilir
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Kod:
on *:text:*:#: {
  if $regex($1,/([.!]bomba)/Si) {
    if $istok($me $nick,$2,32) { msg $chan beni veya kendinizi bombalayamazsınız $nick | return }
    if !$2 { msg $chan $nick lütfen nick belirtiniz. | return }
    if $2 !ison $chan { msg $chan belirtilen nick kanalda bulunmuyor. }
    elseif $2 ison $chan {
      msg $chan $nick bombayı $2 nin eline tutuşturdu. ( $2 !kes NİCK yaparak bombayı başkasına atın )
      msg $chan 30 Saniye başladı...
      .timerBOMBA 1 30 bitti $chan
      set %bomba_nick $2
      .hadd -m bomba $nick
    }
  }
  if $regex($1,/([.!]kes)/Si) {
    if $istok($me $nick,$2,32) { msg $chan beni veya kendinizi bombalayamazsınız $nick | return }
    if !$2 { msg $chan $nick lütfen nick belirtiniz. | return }
    if $2 !ison $chan { msg $chan belirtilen nick kanalda bulunmuyor. }
    elseif $2 ison $chan {
      var %i
      while %i <= $hget(bomba,0).data {
        if $2 == $hget(bomba,%i).item {
          msg $chan $2 zaten daha önce bombalanmış başka nick belirtin $nick
          return
        }
        inc %i
      }
      msg $chan $nick bombayı $2 nin eline tutuşturdu. ( $2 !kes NİCK yaparak bombayı başkasına atın )
      .hadd -m bomba $nick
    }
  }
}
alias bitti {
  kick $1 %bomba_nick BOMMMMMMMMMMMM
  .hfree bomba
}

Feragat 10 Nisan 2016 01:27
Cevap: !bomba nick - !kes nick puanlı
 
Alıntı:
unpainful Nickli Üyeden Alıntı (Mesaj 1041764739)
Bu kadar detaylı değilde sadece belirtilen süre içerisinde atıyorum 30 saniye !bomba nick yapıldığında elden ele dolaşabilir ve 30 saniye sonunda kimde kaldıysa o kanaldan atılabilir
Önemsediğin şey süre ise, yapman gereken tek şey 30 saniye saydırmak. 30 Saniye sayarken bu esnada belirleyeceğin komutlarla bombayı birilerine transfer edip süre sonunda son nickte patlatmak.
Kısaca mantık bu.

Biraz mirc scripting bilgin varsa basit 1-2 koşulla sende yapabilirsin.

mIRC Scripting Dersleri kategorisinde daha iyilerini yapabileceğin kadar bilgi mevcut. (Tabi eğer istiyorsan)

En güzeli ve keyiflisi kendi yapabildiğindir. mIRC Scripting konusunda teknik açıdan her türlü soruyu sorabilirsin. Kolaylıklar dilerim.

unpainful 10 Nisan 2016 19:50
Cevap: !bomba nick - !kes nick puanlı
 
Teşekkürler @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ve @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
!kes komutu sağlıklı çalışmakta fakat ;
kanaldaki herkes !kes nick komutunu kullanabiliyor sadece bomba sahibi kullanması gerekmez mi
30 saniye içinde bir işlem yapmıyor rica etsem kodu tekrar kontrol edermisiniz

YouMyCure 10 Nisan 2016 20:02
Cevap: !bomba nick - !kes nick puanlı
 
Alıntı:
unpainful Nickli Üyeden Alıntı (Mesaj 1041765166)
Teşekkürler @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ve @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
!kes komutu sağlıklı çalışmakta fakat ;
kanaldaki herkes !kes nick komutunu kullanabiliyor sadece bomba sahibi kullanması gerekmez mi
30 saniye içinde bir işlem yapmıyor rica etsem kodu tekrar kontrol edermisiniz
işte bomba herkesde elden ele dolaşıyor, tekrar bomba sahibinede dönebilir istemiyorsan bunu;
en son düzenleme yaptığımı paylaşıyorum;
Kod:
on *:text:*:#: {
  if $regex($1,/([.!]bomba)/Si) {
    if $istok($me $nick,$2,32) { msg $chan beni veya kendinizi bombalayamazsınız $nick | return }
    if !$2 { msg $chan $nick lütfen nick belirtiniz. | return }
    if $2 !ison $chan { msg $chan belirtilen nick kanalda bulunmuyor. }
    elseif $2 ison $chan {
      msg $chan $nick bombayı $2 nin eline tutuşturdu. ( $2 !kes NİCK yaparak bombayı başkasına atın )
      msg $chan 30 Saniye başladı...
      .timerBOMBA 1 30 bitti $chan
      set %bomba_nick $2
      .hadd -m bomba $nick
    }
  }
  if $regex($1,/([.!]kes)/Si) {
    if $istok($me $nick,$2,32) { msg $chan beni veya kendinizi bombalayamazsınız $nick | return }
    if !$2 { msg $chan $nick lütfen nick belirtiniz. | return }
    if $2 !ison $chan { msg $chan belirtilen nick kanalda bulunmuyor. }
    elseif $2 ison $chan {
      var %i
      while %i <= $hget(bomba,0).data {
        if $2 == $hget(bomba,%i).item {
          msg $chan $2 zaten daha önce bombalanmış başka nick belirtin $nick
          return
        }
        inc %i
      }
      msg $chan $nick bombayı $2 nin eline tutuşturdu. ( $2 !kes NİCK yaparak bombayı başkasına atın )
      .hadd -m bomba $nick
      set %bomba_nick $2
    }
  }
}
alias bitti {
  kick $1 %bomba_nick BOMMMMMMMMMMMM
  .hfree bomba
  unset %bomba_nick
}

unpainful 10 Nisan 2016 20:13
Cevap: !bomba nick - !kes nick puanlı
 
Teşekkürler @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] fakat anlatmak istediğim !bomba yazıldığı andan itibaren oyun başlıyor ve !kes nickiyle başka nicke aktarıyor lâkin oyun sırasında bir başka kullanıcı !bomba yazarak başkasınada atabiliyor ve karışıyor

YouMyCure 10 Nisan 2016 20:38
Cevap: !bomba nick - !kes nick puanlı
 
Alıntı:
unpainful Nickli Üyeden Alıntı (Mesaj 1041765173)
Teşekkürler @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] fakat anlatmak istediğim !bomba yazıldığı andan itibaren oyun başlıyor ve !kes nickiyle başka nicke aktarıyor lâkin oyun sırasında bir başka kullanıcı !bomba yazarak başkasınada atabiliyor ve karışıyor
bu şekilde güncelleyebilirsin.
Kod:
on *:text:*:#: {
  if $regex($1,/([.!]bomba)/Si) {
  if %bomba_nick { msg $chan $nick bomba zaten aktif, | return }
    if $istok($me $nick,$2,32) { msg $chan beni veya kendinizi bombalayamazsınız $nick | return }
    if !$2 { msg $chan $nick lütfen nick belirtiniz. | return }
    if $2 !ison $chan { msg $chan belirtilen nick kanalda bulunmuyor. }
    elseif $2 ison $chan {
      msg $chan $nick bombayı $2 nin eline tutuşturdu. ( $2 !kes NİCK yaparak bombayı başkasına atın )
      msg $chan 30 Saniye başladı...
      .timerBOMBA 1 30 bitti $chan
      set %bomba_nick $2
      .hadd -m bomba $nick
    }
  }
  if $regex($1,/([.!]kes)/Si) {
    if $istok($me $nick,$2,32) { msg $chan beni veya kendinizi bombalayamazsınız $nick | return }
    if !$2 { msg $chan $nick lütfen nick belirtiniz. | return }
    if $2 !ison $chan { msg $chan belirtilen nick kanalda bulunmuyor. }
    elseif $2 ison $chan {
      var %i
      while %i <= $hget(bomba,0).data {
        if $2 == $hget(bomba,%i).item {
          msg $chan $2 zaten daha önce bombalanmış başka nick belirtin $nick
          return
        }
        inc %i
      }
      msg $chan $nick bombayı $2 nin eline tutuşturdu. ( $2 !kes NİCK yaparak bombayı başkasına atın )
      .hadd -m bomba $nick
      set %bomba_nick $2
    }
  }
}
alias bitti {
  kick $1 %bomba_nick BOMMMMMMMMMMMM
  .hfree bomba
  unset %bomba_nick
}

MatheuS 13 Nisan 2016 22:03
Cevap: !bomba nick - !kes nick puanlı
 
iki farklı versiyon haline getirdim !dinamit !at !kes | !bomba !at !kes birde dinamit hali olsun dedim :)
Dinamit Versiyonu;
Kod:
on *:text:*:#: {
  if $regex($1,/([.!]dinamit)/Si) {
    if %bombaci_nick {
      msg $chan $chr(3) $+ 4 $+ Dinamit Şuanda Ateşlenmiş Durumda.
      return
    }
    set %bomba_renkler altin gri mavi siyah yesil kirmizi
    set %bomba_renk $token(%bomba_renkler,$rand(1,6),32)
    if $istok($me $nick,$2,32) {
      msg $chan $chr(3) $+ 4 $+ Bana Veya Kendinize Dinamit Atamazsınız. $chr(2) $+ $nick $+ $chr(2)
      return
    }
    if !$2 {
      msg $chan $chr(2) $+ $nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3)
      return
    }
    if $2 !ison $chan {
      msg $chan $chr(3) $+ 4 $+ Belirtilen Nick KanaLda Bulunmuyor. $+ $chr(3)
    }
    elseif $2 ison $chan {
      msg $chan $chr(2) $+ $nick $+ $chr(2) $+ , $chr(3) $+ 5 $+ Dinamiti Yaktı. $+ $chr(3) $chr(2) $+ $2 $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil FitiLi Kes, Ya At Kurtul.
      msg $chan $chr(3) $+ 5 $+ FitiL Ateşlendi. Son $+ $chr(3) $+ 4 30 $chr(3) $+ 5 $+ Saniye. $chr(3) $+ 4 $+ Zaman İşLiyor... Tik Tak Tik Tak...
      msg $chan $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL FitiLi Kes KurtuL. $chr(41)
      msg $chan -
      msg $chan $chr(3) $+ 5 $+ DinamitLerimizin FitiL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi
      .set %dinchan $chan
      .timerdinamit 1 30 bitti
      set %bomba_nick $2
      set %bombaci_nick $nick
      set %bombaci_nick $addtok(%bombaci_nick,$+($2),32)
    }
  }
  if $regex($1,/([.!]at)/Si) {
    if ($nick == %bomba_nick) {
      if $istok($me $nick,$2,32) {
        msg $chan $chr(3) $+ 4 $+ Bana Veya Kendinize Dinamiti Atamazsınız. $chr(2) $+ $nick $+ $chr(2)
        return
      }
      if !$2 {
        msg $chan $chr(2) $+ $nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3)
        return
      }
      if $2 !ison $chan {
        msg $chan $chr(3) $+ 4 $+ Belirtilen Nick KanaLda Bulunmuyor. $+ $chr(3)
      }
      elseif $2 ison $chan {
        if ($2 isin %bombaci_nick) {
          msg $chan $chr(2) $+ $2 $+ $chr(2) $chr(3) $+ 4 $+ Daha Önce Dinamitten Kurtulmuş. Başkasına Doğru At $chr(2) $+ $nick $+ $chr(2)
          return
        }
        msg $chan $chr(2) $+ $nick $+ $chr(2) $+ , $chr(3) $+ 5 $+ Dinamiti Aldı. $+ $chr(3) $chr(2) $+ $2 $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil FitiLi Kes, Ya At Kurtul.
        msg $chan $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL FitiLi Kes KurtuL. $chr(41)
        msg $chan -
        msg $chan $chr(3) $+ 5 $+ DinamitLerimizin FitiL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi
        set %bomba_nick $2
        set %bombaci_nick $addtok(%bombaci_nick,$+($2),32)
      }
    }
    else {
      msg $chan $chr(3) $+ 4 $+ Dinamit Şuan Sizde Değil.
    }
  }
  if $regex($1,/([.!]kes)/Si) {
    if ($nick == %bomba_nick) {
      if ($2 == %bomba_renk) {
        .timerdinamit off
        msg $chan -
        msg $chan $chr(3) $+ 5 $+ Kanalın Kahramanı $+ $chr(3) $chr(2) $+ $nick $+ $chr(2) $+ . $chr(3) $+ 5 $+ Hepinizi o Kurtardı. Tebrikler, $+ $chr(3) $chr(2) $+ $nick $+ $chr(2) $+ . :) 
        msg $chan -
        unset %bomba_*
        .unset %bombaci_*
        .unset %dinchan
      }
      elseif $istok($remtok(%bomba_renkler,%bomba_renk,32),$2,32) {
        msg $chan $chr(2) $+ $nick $+ $chr(2) $+ .  $chr(3) $+ 4 $+ Yanlış Renk!
        msg $chan $chr(3) $+ 5 $+ Dinamitin PatLamasına Saniyeler Kaldı.!
      }
    }
    else {
      msg $chan $chr(3) $+ 4 $+ Dinamit Şuan Sizde Değil.
    }
  }
}

alias -l bitti {
  .kick %dinchan %bomba_nick Seni Uyardım, Dinamit Elinde PatLadı. $chr(2) $+ BOOOOM!
  .unset %bomba_*
  .unset %bombaci_*
  .unset %dinchan
}
Bomba Versiyonu;
Kod:
on *:text:*:#: {
  if $regex($1,/([.!]bomba)/Si) {
    if %bombaci_nick {
      msg $chan $chr(3) $+ 4 $+ Bomba Şuanda Aktif Durumda.
      return
    }
    set %bomba_renkler altin gri mavi siyah yesil kirmizi
    set %bomba_renk $token(%bomba_renkler,$rand(1,6),32)
    if $istok($me $nick,$2,32) {
      msg $chan $chr(3) $+ 4 $+ Bana Veya Kendinize Bomba Atamazsınız. $chr(2) $+ $nick $+ $chr(2)
      return
    }
    if !$2 {
      msg $chan $chr(2) $+ $nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3)
      return
    }
    if $2 !ison $chan {
      msg $chan $chr(3) $+ 4 $+ Belirtilen Nick KanaLda Bulunmuyor. $+ $chr(3)
    }
    elseif $2 ison $chan {
      msg $chan $chr(2) $+ $nick $+ $chr(2) $+ , $chr(3) $+ 5 $+ Bombayı Aldı. $+ $chr(3) $chr(2) $+ $2 $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil TeLi Kes, Ya At Kurtul.
      msg $chan $chr(3) $+ 5 $+ Bomba Aktif. Son $+ $chr(3) $+ 4 30 $chr(3) $+ 5 $+ Saniye. $chr(3) $+ 4 $+ Zaman İşLiyor... Tik Tak Tik Tak...
      msg $chan $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL TeLi Kes KurtuL. $chr(41)
      msg $chan -
      msg $chan $chr(3) $+ 5 $+ Bombanın Üzerindeki TeL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi
      .set %dinchan $chan
      .timerbomba 1 30 patlat
      set %bomba_nick $2
      set %bombaci_nick $nick
      set %bombaci_nick $addtok(%bombaci_nick,$+($2),32)
    }
  }
  if $regex($1,/([.!]at)/Si) {
    if ($nick == %bomba_nick) {
      if $istok($me $nick,$2,32) {
        msg $chan $chr(3) $+ 4 $+ Bana Veya Kendinize Bomba Atamazsınız. $chr(2) $+ $nick $+ $chr(2)
        return
      }
      if !$2 {
        msg $chan $chr(2) $+ $nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3)
        return
      }
      if $2 !ison $chan {
        msg $chan $chr(3) $+ 4 $+ Belirtilen Nick KanaLda Bulunmuyor. $+ $chr(3)
      }
      elseif $2 ison $chan {
        if ($2 isin %bombaci_nick) {
          msg $chan $chr(2) $+ $2 $+ $chr(2) $chr(3) $+ 4 $+ Daha Önce Bombadan Kurtulmuş. Başkasına Doğru At $chr(2) $+ $nick $+ $chr(2)
          return
        }
        msg $chan $chr(2) $+ $nick $+ $chr(2) $+ , $chr(3) $+ 5 $+ Bombayı Aldı. $+ $chr(3) $chr(2) $+ $2 $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil TeLi Kes, Ya At Kurtul.
        msg $chan $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL TeLi Kes KurtuL. $chr(41)
        msg $chan -
        msg $chan $chr(3) $+ 5 $+ Bombanın Üzerindeki TeL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi
        set %bomba_nick $2
        set %bombaci_nick $addtok(%bombaci_nick,$+($2),32)
      }
    }
    else {
      msg $chan $chr(3) $+ 4 $+ Bomba Şuan Sizde Değil.
    }
  }
  if $regex($1,/([.!]kes)/Si) {
    if ($nick == %bomba_nick) {
      if ($2 == %bomba_renk) {
        .timerbomba off
        msg $chan -
        msg $chan $chr(3) $+ 5 $+ Kanalın Kahramanı $+ $chr(3) $chr(2) $+ $nick $+ $chr(2) $+ . $chr(3) $+ 5 $+ Kendini Bombadan Kurtardı. Tebrikler, $+ $chr(3) $chr(2) $+ $nick $+ $chr(2) $+ . :) 
        msg $chan -
        unset %bomba_*
        unset %bombaci_*
        unset %dinchan
      }
      elseif $istok($remtok(%bomba_renkler,%bomba_renk,32),$2,32) {
        msg $chan $chr(2) $+ $nick $+ $chr(2) $+ .  $chr(3) $+ 4 $+ Yanlış Renk!
        msg $chan $chr(3) $+ 5 $+ Bombanın PatLamasına Saniyeler Kaldı.!
      }
    }
    else {
      msg $chan $chr(3) $+ 4 $+ Bomba Şuan Sizde Değil.
    }
  }
}
alias -l patlat {
  .kick %dinchan %bomba_nick Seni Uyardım, Bomba Elinde PatLadı. $chr(2) $+ BOOOOM!
  .unset %bomba_*
  .unset %bombaci_*
  .unset %dinchan
}

GoldKey 30 Temmuz 2016 20:05
Cevap: !bomba nick - !kes nick puanlı
 
calışmıyor bu addon bence düzenleyin bunu derim

KuL 01 Ağustos 2016 15:06
Cevap: !bomba nick - !kes nick puanlı
 
Alıntı:
İnFaZ Nickli Üyeden Alıntı (Mesaj 1041796307)
calışmıyor bu addon bence düzenleyin bunu derim
Calismiyor demektense, Kodu denediyseniz; kimin Kodunu eklediginizi ve cikan Hatayi veya nasil eklediginizi söylerseniz ona göre Koda tekrardan bakilir.


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

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net