IRCForumu.NET - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum muhabbet


ircforumu reklam ircforumu reklamdamlasu bizimkiler sihirlisohbet sohbetelit


Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 05 Haziran 2016, 13:43   #1
Çevrimiçi
Gelme, burası çok derin.

immortaL - ait Kullanıcı Resmi (Avatar)
!Bomba Nick - !Kes Nick Puan Oyunu


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.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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

  Alıntı ile Cevapla

IRCForumu.Net - Reklam Alanı

Cevapla

Etiketler
bomba, kes, nick, oyunu, puan
IRCForumu.Net - Sponsor Bağlantılar



Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık