mIRCForum.Com - mIRC Kullanıcılarının Buluşma Noktası   Reklam Alanı


  mIRCForum.Com - mIRC Kullanıcılarının Buluşma Noktası MF - mIRC Scripting Hazır Kodlar

Gevezeyiz Sohbet

Like Tree1Beğeni(ler)
  • 1 Post By Sado
Yeni Konu   Cevap Yaz

 
LinkBack Seçenekler Stil
Alt 04 Mayıs 2019, 19:57   #1
 
Üyelik tarihi: 19 Ocak 2018
Bulunduğu yer: İstanbul
Mesajlar: 12
WEB Sitesi: Gevezeyiz.Net
IRC Sunucusu: irc.gevezeyiz.net
İlgi Alanı: Linux
Kan Grubu: 0 RH (-)
Alınan Beğeni: 4
Standart !zarat eglence mirc ekleyin

Kod:
on *:text:*:#sohbet: {   if  $regex($1,/zarat$/i) {     var %dice $rand(1,6)     if  !$hget(zarat,nick) {       hadd -m zarat nick $nick       hadd -m zarat  zar %dice        msg # 4 $nick  2-> zar atildi.. baska bir  arkadasta 4!zarat2 yaz atilmasi bekleniliyor.        return     }      if $hget(zarat,nick) {        if $hget(zarat,nick) == $nick { msg # 4  $nick 2zaten siz 4!zarat2 komutunu yazdiniz, sizden baska bir nick bu  komutu kullanmalidir. | return }       msg # 2 Zariniz atildi.        msg # **4 $nick -> 2 Zarınız ->5 %dice        msg # **4  $hget(zarat,nick) ->2 Attigi zar ->5 $hget(zarat,zar)       msg #  $iif(%dice == $hget(zarat,zar),4**2Oyun berabere,2Yuksek atan  ->4 $iif(%dice >= $hget(zarat,zar),$nick,$hget(zarat,nick)))        msg # 4 $nick 2 $iif(%dice == $hget(zarat,zar),2ve 4  $hget(zarat,nick) 2 Berabere geldiler (Puan bolusuldu),$iif(%dice  >= $hget(zarat,zar),kazandin $chr(40) $+ Kazanc puan:  $eglenceoyunpuan  $+ $chr(41) $chr(44) Kaybeden  -> 4  $hget(zarat,nick), kaybettin $chr(44) Kazanan ->4 $hget(zarat,nick)  $chr(40) $+ Kananc puan: $eglenceoyunpuan $+  $+ $chr(41) ))       msg  # -       $iif(%dice == $hget(zarat,zar),.timer 1 0 puanekle $nick $(|)  puanekle $hget(zarat,nick),$iif(%dice >= .timer 1 0 puanekle  $nick,.timer 1 0 puanekle $hget(zarat,nick)))       .hfree -sw zarat       }   } } alias puanekle {   if $istok($masternick,$1,32) { return }    if $read(eglence-puan.txt,w,$+($1,$chr(32),*)) { var %pnp  $token($v1,2,32) | write $+(-dl,$readn) eglence-puan.txt | write  eglence-puan.txt $+($1,$chr(32),$calc(%pnp +  $iif($2,$v1,$eglenceoyunpuan))) } } 
Kendinize gore degistirebilirsiniz. İyi Gunler
Candy bunu beğendi.
 Sado isimli Üye şimdilik offline konumundadır   Alıntı
Alt 07 Mayıs 2019, 19:30   #2
 
Üyelik tarihi: 19 Ocak 2018
Bulunduğu yer: İstanbul
Mesajlar: 12
WEB Sitesi: Gevezeyiz.Net
IRC Sunucusu: irc.gevezeyiz.net
İlgi Alanı: Linux
Kan Grubu: 0 RH (-)
Alınan Beğeni: 4
Post Cevap: !zarat eglence mirc ekleyin

Ziyaretçilere içerik gizlenmiştir.
Ücretsiz olarak sizde bize katılmak istermisiniz?

Kayıt ol Giriş yap

 Sado isimli Üye şimdilik offline konumundadır   Alıntı

Yeni Konu   Cevap Yaz

Etiketler
eglence, ekleyin, mirc, zar, zar oyunu, zarat

Seçenekler
Stil

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



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


Powered by vBulletin® Version 3.8.9 Beta 1
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
SEO by vBSEO 3.6.0
mIRCForum - Sohbet
Copyright ©2005 - 2016 mIRCForum.Com | Tüm Hakları Saklıdır.