Eglence botu yardım - Sayfa 2 - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

AfraN · 10 Nisan 2020, 01:37

yapacak bir şeyin yok telefon numaralarını engellemek için sayıları blocklamışlar % lerde rakamları verdiği için blocklanıyor

mys_35 · 10 Nisan 2020, 03:26

on $*:text:/^[!.]test/Si:#: { if (!$2) { msg # Hatalı kullanım lütfen nick belirtin. } | elseif $regex($2,/\W+|\s+|\d+|/Si) && ($2 !ison #) { notice # Hatalı kullanım lütfen gecerli veya kanalda bulunan bir nick belirtin. } | var %:Mylife = $rand(5,100) | msg # ( $2 ) sizin için besledigi duygular; | msg # - | msg # 0,3 $($chr(45), 20),$chr(32) % $+ %:Mylife NEFRET! $chr(32), $($chr(45), 20) | msg # 0,4 $($chr(45), 20),$chr(32) % $calc(100-%:Mylife) SEVGİ! $chr(32), $+ $($chr(45), 20) | var %:Kod = $calc(100-%:Mylife) | msg # - | $iif(%:Kod >= 50,msg # ( $2 ) - $read(akılsız.txt,1),msg # ( $2 ) - $read(akıllı.txt,1)) } }
bunda cıkıyor ama rakamlar bundada %25 gibi cıkıyor

AfraN · 10 Nisan 2020, 10:07

onu kanala yansıtan kişi yada bot ta yetki vardır
sunucuda denedim rakamlar takılıyor

cinaryigit · 11 Haziran 2020, 13:44

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on $*:text:/[!.]a[sSşŞ]kte[sSşS]t[iıİI]\s+\S+$/SAi:#: {
  if $hget($2) == $me { notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 2Beni Yazamazsın 4:12-1) | halt }
  if !$2 { notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 2Nick Belirtmediniz, Lütfen Bir Nick Belirtiniz.. 4Komut: 7!aşktesti Nick | halt }
  if ($3) { notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 2Lütfen Komutu Doğru Yazınız. 4Komut: 7!aşktesti Nick | halt }
  if $2 == $nick { notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 2Kendine Aşk Testi Yapamazsın Delimisin. | halt }
  if !$hget(aşktesti,$nick) {
    .hinc -msu30 aşktesti $nick $ctime
    msg $chan 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$2,$chr(2)) 2Nick'inin 4AŞK TESTİ 2Sonuçları Gösteriliyor.. 4Bekleyiniz.
    var %toplam  $r(90,100)
    var %seviyor $calc(%toplam - $r(1,79))
    var %sevmiyor $calc(%toplam - $r(1,78))
    var %kararsız $calc(%toplam - $r(1,77))
    var %umursamıyor $calc(%toplam - $r(1,76))
    var %testet $sorttok($gettok(%seviyor,1,45) $gettok(%sevmiyor,1,45) $gettok(%kararsız,1,45) $gettok(%umursamıyor,1,45),32,nr)
    var %sonuç $sorttok(%testet,32,nr)
    msg $chan 14[4AŞK TESTİ414] 4 $chr(42)
    msg $chan 14[4AŞK TESTİ414] $chr(32) 4,4 $str($chr(42),6) 0 % $+ $gettok(%seviyor,1,45) 8Seviyor1! $+(12,$chr(42)) 
    msg $chan 14[4AŞK TESTİ414] $chr(32) 8,8 $str($chr(42),9) 1 % $+ $gettok(%sevmiyor,1,45) 4Sevmiyor1! $+(12,$chr(42)) 
    msg $chan 14[4AŞK TESTİ414] $chr(32) 6,6 $str($chr(42),12) 0 % $+ $gettok(%kararsız,1,45) 11Kararsız1! $+(12,$chr(42)) 
    msg $chan 14[4AŞK TESTİ414] $chr(32) 7,7 $str($chr(42),15) 0 % $+ $gettok(%umursamıyor,1,45) 2Umursamıyor1! $+(12,$chr(42)) 
    msg $chan 14[4AŞK TESTİ414] 4 $chr(42)
    msg $chan 14[4AŞK TESTİ414] 10 $2 4Sonuç12 $2 $replace($gettok(%testet,1,32) / $gettok(%sonuç,1,32),$gettok(%seviyor,1,32) / $gettok(%sonuç,1,32),2Sizi Çok 3SEVİYOR,$gettok(%sevmiyor,1,32) / $gettok(%sonuç,1,32),2Sizi Hiç 4SEVMİYOR,$gettok(%kararsız,1,32) / $gettok(%sonuç,1,32),2Size Karşı Hep 14KARARSIZ,$gettok(%umursamıyor,1,32) / $gettok(%sonuç,1,32),2Sizi Hiç 7UMURSAMIYOR) 
  }
  else { 
    var %sevdi $calc(120 - $calc($ctime - $hget(aşktesti,%nick)))
    notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 2Aşk Testini4 2 2Dakikada Bir Kez Kullanabilirsiniz4.. 
    notice $nick 14[4AŞK TESTİ414] $+($chr(3),$chr(49),$chr(48),$chr(2),$nick,$chr(2)) 4(1 %sevdi 4) 7Saniye 2Sonra Tekrardan 4!aşktesti Nick 2Komutunu Yazarak Aşk Testinizi Yapabilirsiniz4.. 
  }
}

Daha önce forumda paylaşılmıştı. !aşktesti olarak çalışır. bunu arıyor arkadaş sanırım

Seçenekler	Arama
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder	Arama: Gelişmiş Arama Yap
Stil
Normal gösterime geğ Hybrid-Şeklinde Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Soru Botu Yardım.!	LoRDGuaRD	mIRC Scripting Sorunları	3	13 Ağustos 2010 22:25
Yardım Botu	F0X	mIRC Scripting Sorunları	15	23 Mayıs 2009 18:47
Koruma botu yardım.	Redsea	Eggdrop, NeoStats, BNC	1	04 Mart 2009 13:29
Cause botu hakkında yardım	By_Asi_Mavi	mIRC Scripting Sorunları	5	18 Ekim 2007 22:56
Radyo botu yardım	hipokrat	Eggdrop, NeoStats, BNC	10	30 Ağustos 2007 21:10

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.