| Zalimsin | 30 Haziran 2018 12:16 |
!rulet
Kod:
on *:start: {
mkdir rulet
if !$read(rulet/cekme.txt) {
write rulet/cekme.txt hizlica tetigi ceker...
write rulet/cekme.txt titreyerek elini tetige goturur ve silayi yavasca sakagina dayar....
write rulet/cekme.txt tetigi cekerken, yuzunde soguk ve sakin gulumseme belirir....
write rulet/cekme.txt tabancayi agzina sokar....
write rulet/cekme.txt tabancayi kaslarinin arasina yerlestirir ve sessizce dua eder...
write rulet/cekme.txt yavasca silahi kaldirir ve cenesinin altina sabitler....
echo -s 2* Çekme Aliasları Tekrar Yüklendi.....
}
else { echo -s 2* Çekme Aliasları Yüklendi..... }
if !$read(rulet/sans.txt) {
write rulet/sans.txt ...klik......Oops..bu silahi doldurmayi mi unuttum ?
write rulet/sans.txt ....klik....Bu sansin daha fazla surmeyecek hahaha
write rulet/sans.txt .klik........Gelecek sefere kursun ile bir randevun olacak hahaha
write rulet/sans.txt .klik....... Seni sansli budala
write rulet/sans.txt ......klik....Sanslisin o kursun calismadi...Ping silaha yeni kursun doldurur
write rulet/sans.txt ....klik.....Bahse varim sen lotoda da bu kadar sansliydin
write rulet/sans.txt ....klik......Cevir ya da ates et umursamiyorum, eger kazanirsan seni kendi ellerimle oldururum
write rulet/sans.txt .....klik.....iyi oldugunu saniyorsun.....birdahaki sefere karsina cikmaya curet ediyorum
write rulet/sans.txt ....klik......Eger senin gibi bi kafam olsaydi kaybedene kadar devam ederdim
write rulet/sans.txt .....klik......Boyle cirkin biri nasil bu kadar sansli olabilir
write rulet/kayp.txt kaşlarının ortasına domdom kurşunu değdi :D
echo -s 2* Şans Aliasları Tekrar Yüklendi.....
}
else { echo -s 2* Şans Aliasları Yüklendi..... }
if !$read(rulet/sans.txt) {
write rulet/kayp.txt aha gafası yarıldı :d
write rulet/kayp.txt HeadShoooot
echo -s 2* Kayp Aliasları Tekrar Yüklendi.....
}
else { echo -s 2* Kayp Aliasları Yüklendi..... }
unset %sira %r1 %r2 %x
hmake puanlar | hload -sbi puanlar puanlar.hash
}
alias _puan return 1
on *:text:*:#: {
if $1 == !rulet {
if %r1 || %r2 { msg $chan Şuan %r1 nicki %r2 nicki ile rulet oynuyor.... | return }
if !$2 { msg $chan $nick Hatalı Kullanım; Nick Belirtmediniz... "!rulet YouMyCure" | return }
if $2 == $me { msg $chan Benimle Rulet Oynayamazsın $nick | return }
if $2 == $nick { msg $chan Kendinle Rulet Oynayamazsın $nick | return }
if $2 ison $chan {
set %r1 $nick
set %r2 $2
notice $nick $2 nickine rulet isteğiniz gitmiştir bekleyiniz...
notice $2 $nick size rulet isteği gönderdi kabul ediyorsanız !kabul , etmiyorsanız !tavuk yazınız.
}
else { msg $chan $nick Hatalı Kullanım; $2 Nicki Şuan Kanalda Bulunmuyor.... }
}
if $1 == !kabul {
if $nick == %r2 {
msg $chan Meydan okuma kabul edildi
msg $chan %r1 << once basliyor. !vur tetigi ceker, !cevir tetigi cekmeden once tabancayi cevirir
set %sira %r1
}
else { msg $chan $nick Size Bir Meydan Okuma Yok...... }
}
if $1 == !tavuk {
if $nick == %r2 {
msg $chan $nick Muhtemelen tavuk gibi korktu.
unset %sira %r1 %r2 %x
}
else { msg $chan $nick Size Bir Meydan Okuma Yok...... }
}
if $1 == !vur {
if $nick == %sira {
msg $chan $nick $read(rulet/cekme.txt)
set -s %x $r(0,30)
if $istok(5 10 15 17 20 27 25 8 14 29 30,%x,32) {
msg $chan %sira ta ta ta öldün çıq
timerCIQ 1 2 /kick $chan %sira $read(rulet/kayp.txt)
if !$hget(puanlar) { hmake puanlar 100 }
if %sira == %r1 { /a %r2 } | else { /a %r1 }
elseif %sira == %r2 { /a %r1 } | else { /a %r2 }
unset %sira %r1 %r2 %x
}
else {
msg $chan $read(rulet/sans.txt)
if %sira == %r1 { set %sira %r2 } | else { set %sira %r1 }
elseif %sira == %r2 { set %sira %r1 } | else { set %sira %r2 }
msg $chan sıra >> %sira da. !vur tetigi ceker, !cevir tetigi cekmeden once tabancayi cevirir.
}
}
else { msg $chan $nick Sıra Sizde Değil... }
}
if $1 == !cevir {
if $nick == %sira {
if %sira == %r1 { set %sira %r2 } | else { set %sira %r1 }
elseif %sira == %r2 { set %sira %r1 } | else { set %sira %r2 }
msg $chan $nick Sırasını Devretti Sıra Sende >> %sira . !vur tetigi ceker, !cevir tetigi cekmeden once tabancayi cevirir.
}
else { msg $chan $nick Sıra Sizde Değil... }
}
}
alias a {
hinc -s puanlar $1 $_puan
hsave -i puanlar puanlar.hash
}
on *:text:*:?: {
if $1 == !puan { msg $nick Kazanma Sayınız; $hget(puanlar,$nick) }
if $1 == !puanlar { play $nick puanlar.hash 1 }
}
arkadaşlar bu kodu buldum ama bu kodda söylebi sıkıntı var bir kanaldan atmasını istemiyorum vurulan kişini kanala uyarı versin birde bu kod takılı kalıyor !rulet yaptıgımızda o kişi pas demen oynamıyor bunu soreli yapsak olurmu bir dakka içinde kabul yazmazsa Korktunmu gibi kanala yazı yazsa olurmu tşler | 