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 Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   !zar eklentisi (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/837163-zar-eklentisi.html)

mys_35 16 Eylül 2019 12:18

!zar eklentisi
 
on *:text:*:#: {
if $regex($1,/([.!]zar)/Si) {
if $hget(zar,$nick) { notice $nick 1 Saat içersinde, Yalnız 1 defa [.!]zar Komutunu Kullanabilirsiniz. | return }
var %rand $rand(1,6), %rand2 $rand(1,6), %hediye $read(hediye.txt)
hinc -mu3600 zar $nick
if (%rand == %rand2) { goto kazandi }
else { goto kaybetti }
:kazandi
msg # 2Sallıyoruz zarları 4 $nick 2Haydi yavrum kemik
msg # 4 $nick 2Zarlar Durdu! 4 $+([ %rand ]) - $+([ %rand2 ])
msg # 4 $nick 2hediyeniz ->4 %hediye
return
:kaybetti
msg # 2Sallıyoruz zarları4 $nick 2Haydi yavrum kemik
msg # 4 $nick 2Zarlar Durdu! 4 $+([ %rand ]) - $+([ %rand2 ])
}
}
buna sadece voiceli nickler zar komutunu kullansın
nick +v frefixi almadan bu komutu kullanamazsın desin birde zar atan kişi bir saat dolmadan atarsa kanal süreniz [35] Dakika [23] Sani kaldı diyebilirmi

YouMyCure 16 Eylül 2019 14:59

Cevap: !zar eklentisi
 
Alıntı:

mys_35 Nickli Üyeden Alıntı (Mesaj 1042155613)
on *:text:*:#: {
if $regex($1,/([.!]zar)/Si) {
if $hget(zar,$nick) { notice $nick 1 Saat içersinde, Yalnız 1 defa [.!]zar Komutunu Kullanabilirsiniz. | return }
var %rand $rand(1,6), %rand2 $rand(1,6), %hediye $read(hediye.txt)
hinc -mu3600 zar $nick
if (%rand == %rand2) { goto kazandi }
else { goto kaybetti }
:kazandi
msg # 2Sallıyoruz zarları 4 $nick 2Haydi yavrum kemik
msg # 4 $nick 2Zarlar Durdu! 4 $+([ %rand ]) - $+([ %rand2 ])
msg # 4 $nick 2hediyeniz ->4 %hediye
return
:kaybetti
msg # 2Sallıyoruz zarları4 $nick 2Haydi yavrum kemik
msg # 4 $nick 2Zarlar Durdu! 4 $+([ %rand ]) - $+([ %rand2 ])
}
}
buna sadece voiceli nickler zar komutunu kullansın
nick +v frefixi almadan bu komutu kullanamazsın desin birde zar atan kişi bir saat dolmadan atarsa kanal süreniz [35] Dakika [23] Sani kaldı diyebilirmi

voice için,
Kod:

if $regex($1,/([.!]zar)/Si) {
bu satırı
Kod:

if $regex($1,/([.!]zar)/Si) && ($nick isvoice #) {
olarak değiştirin

saniye için,
Kod:

if $hget(zar,$nick) { notice $nick 1 Saat içersinde, Yalnız 1 defa [.!]zar Komutunu Kullanabilirsiniz. | return }
bu satırı
Kod:

if $hget(zar,$nick) { notice $nick Bu komutu kullanmaniz için $hget(zar,$nick).unset saniye beklemeniz gerek. | return }
bu şekilde değişin.

mys_35 16 Eylül 2019 16:43

Cevap: !zar eklentisi
 
<nick> .zar
<bot> nick +v prefiksi almadan bu komutu kullanamazsını

<nick> .zar
<bot> nick; henüz süreniz dolmadı, kalan süre: [5] dakika, [17] saniye.

böyle cıkmıyor

Emrehan 16 Eylül 2019 22:18

Cevap: !zar eklentisi
 
Alıntı:

mys_35 Nickli Üyeden Alıntı (Mesaj 1042155719)
<nick> .zar
<bot> nick +v prefiksi almadan bu komutu kullanamazsını

<nick> .zar
<bot> nick; henüz süreniz dolmadı, kalan süre: [5] dakika, [17] saniye.

böyle cıkmıyor

Kod:

on *:text:*:#: {
  if $regex($1,/([.!]zar)/Si) {
    if ($nick !isvoice #) { notice $nick $nick bu komutu yalnızca voice(+v) konumunda bulunan kullanıcılar kullanabilir. | return }
    elseif $hget(zar,$nick) { notice $nick Bu komutu tekrar kullanabilmek için $zarsure($hget(zar,$nick).unset) beklemeniz gerek. | return }
    else {
      var %rand $rand(1,6), %rand2 $rand(1,6), %hediye $read(hediye.txt)
      hinc -mu3600 zar $nick
      if (%rand == %rand2) { goto kazandi }
      else { goto kaybetti }
      :kazandi
      msg # 2Sallıyoruz zarları 4 $nick 2Haydi yavrum kemik
      msg # 4 $nick 2Zarlar Durdu! 4 $+([ %rand ]) - $+([ %rand2 ])
      msg # 4 $nick 2hediyeniz ->4 %hediye
      return
      :kaybetti
      msg # 2Sallıyoruz zarları4 $nick 2Haydi yavrum kemik
      msg # 4 $nick 2Zarlar Durdu! 4 $+([ %rand ]) - $+([ %rand2 ])
    }
  }
}
alias zarsure var %zar $calc($1 - $calc($int($calc($1 / 3600)) * 3600)) | return $replace($duration(%zar),mins,$chr(32) $+ dakika,min,$chr(32) $+ dakika,secs,$chr(32) $+ saniye,sec,$chr(32) $+ saniye)

Dipnot Mesajı:
[21:33] * Emrehan mod değiştirdi:-v Emrehan
[21:33] <Emrehan> .zar
[21:33] -test- Emrehan bu komutu yalnızca voice(+v) konumunda bulunan kullanıcılar kullanabilir.
[21:50] * Emrehan mod değiştirdi:+v Emrehan
[21:50] <+Emrehan> .zar
[21:50] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> Sallıyoruz zarları Emrehan Haydi yavrum kemik
[21:50] <@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]> Emrehan Zarlar Durdu! 2 - 5
[21:50] <+Emrehan> .zar
[21:50] -test- Bu komutu tekrar kullanabilmek için 59 dakika 59 saniye beklemeniz gerek.
[21:50] <+Emrehan> .zar
[21:50] -test- Bu komutu tekrar kullanabilmek için 59 dakika 58 saniye beklemeniz gerek.
[21:50] <+Emrehan> .zar
[21:50] -test- Bu komutu tekrar kullanabilmek için 59 dakika 57 saniye beklemeniz gerek.

mys_35 18 Eylül 2019 01:09

Cevap: !zar eklentisi
 
op sop founder halfop kullanamıyor ama

Emrehan 18 Eylül 2019 01:26

Cevap: !zar eklentisi
 
Alıntı:

mys_35 Nickli Üyeden Alıntı (Mesaj 1042156550)
op sop founder halfop kullanamıyor ama

Kod:

if ($nick !isvoice #) { notice $nick $nick bu komutu yalnızca voice(+v) konumunda bulunan kullanıcılar kullanabilir. | return }
burayı

Kod:

if ($nick !isvoice #) && ($nick !ishop #) && ($nick !isop #) { notice $nick $nick bu komutu kullanabilmek için en az voice(+v) konumunda olmalısınız. | return }
şeklinde değiştirin.

mys_35 18 Eylül 2019 01:54

Cevap: !zar eklentisi
 
Bu komutu tekrar kullanabilmek için 26 dakika 45 saniye beklemeniz gerek.
bunu
Bu komutu tekrar kullanabilmek için [26] dakika [45] saniye beklemeniz gerek.
nasıl yapabilirim

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 01:54 -->-> Daha önceki mesaj 01:48 --

bu yek dü se car penc şeş zarda nasıl cıkıyor

Emrehan 18 Eylül 2019 02:55

Cevap: !zar eklentisi
 
Alıntı:

mys_35 Nickli Üyeden Alıntı (Mesaj 1042156558)
Bu komutu tekrar kullanabilmek için 26 dakika 45 saniye beklemeniz gerek.
bunu
Bu komutu tekrar kullanabilmek için [26] dakika [45] saniye beklemeniz gerek.
nasıl yapabilirim

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 01:54 -->-> Daha önceki mesaj 01:48 --

bu yek dü se car penc şeş zarda nasıl cıkıyor

Kod:

on *:text:*:#: {
  if $regex($1,/([.!]zar)/Si) {
    if ($nick !isvoice #) && ($nick !ishop #) && ($nick !isop #) { notice $nick $nick bu komutu kullanabilmek için en az voice(+v) konumunda olmalısınız. | return }
    elseif $hget(zar,$nick) { notice $nick Bu komutu tekrar kullanabilmek için $zarsure($hget(zar,$nick).unset) beklemeniz gerek. | return }
    else { var %rand $rand(1,6), %rand2 $rand(1,6), %hediye $read(hediye.txt)
      hinc -mu3600 zar $nick
      if (%rand == %rand2) { goto kazandi }
      else { goto kaybetti }
      :kazandi
      msg # 2Sallıyoruz zarları 4 $nick 2Haydi yavrum kemik
      msg # 4 $nick 2Zarlar Durdu! 4 $+([ %rand ]) - $+([ %rand2 ]) $+($chr(40),$token($read(zar.txt,w,$+(%rand,-,%rand2,:*)),2,58),$chr(41))
      msg # 4 $nick 2hediyeniz ->4 %hediye
      return
      :kaybetti
      msg # 2Sallıyoruz zarları4 $nick 2Haydi yavrum kemik
      msg # 4 $nick 2Zarlar Durdu! 4 $+([ %rand ]) - $+([ %rand2 ]) $+($chr(40),$token($read(zar.txt,w,$+(%rand,-,%rand2,:*)),2,58),$chr(41))
    }
  }
}
alias zarsure var %zar $calc($1 - $calc($int($calc($1 / 3600)) * 3600)) | return $regsubex(parantez,$replace($duration(%zar),mins,$chr(32) $+ dakika,min,$chr(32) $+ dakika,secs,$chr(32) $+ saniye,sec,$chr(32) $+ saniye),/(\d+)/g,$+([,\1,]))

zar.txt oluşturup mIRC'in anadizinine atın.

zar.txt içeriği aşağıdaki gibi olsun;
Kod:

1-1:hep yek
2-1:dü yek
5-5:dübeş
6-6:düşeş

gibi gibi tüm zarları bu şekilde zar.txt'ye ekleyin işinizi görür.


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk