IRCRehberi.Net- Türkiyenin En iyi IRC ve Genel Forum Sitesi  
 sohbet
derya sohbet
Kayıt ol
Güncel Konular
irc.Soyle.NET Sunucusu Tüm Hakları İle Satın Alınmıştır..     */ ZurnaSohbet.Com.TR - Yeni Arayüzü Çalışması     TRmIRC.Net Satılıktır...     Sunucu Rehberi - Dostyeri.Org     Meepress: Full SEO Uyumlu ve Yaratıcı Haber Scripti     Wordpress Sohbet Siteleri İçin Öneriler Eklentisi ÇIKTI ve ÜCRETSİZ     10 bin Kişi Getirecek DJ Ve admin ALımları...     SuperSohbet.Net Güncel Yönetim Kadrosu     Satılık Radyo Domaini     Sohbet Chat Makaleleri Alınacaktır.    Sunucu Polemiği - AyYildizSohbet.Com & AyYildizFM    🎙️Radyo Polemiği 57- DostCanlar.Net & DostCanlar-Fm🎤📻    Ayın Editörü - Astrea    Ne Seninle Ne Sensiz - Brittle


mIRC Scripting Hazır Kodlar mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz.

22Beğeni(ler)


Yeni Konu Aç
Cevap Yaz
  
Sayfa 1 Toplam 2 Sayfadan 1 2
 
Seçenekler Stil
Alt 02 Şubat 2020, 22:07   #1
ZirveShell Sahibi
Emrehan - ait Kullanıcı Resmi (Avatar)
Standart Çaylar / Kahveler (Eğlence) Komutu
Merhaba,

Kullanım: [!.]çaylar - [!.]kahveler

Kanaldaki herkese çay veya kahve dağıtır.

Kod

on *:text:*:#: {
  if $regex($1,/^[!.]([cçÇ]aylar|kah[fv]eler)$/Si) {
    msg # $+(1,$replace($regml(1),c,Ç,ç,Ç,k,K)) hazırlanıyor...
    $+(.timer,$regml(1)) 1 3 caykahve $regml(1) $chan $nick
  }
}
alias caykahve {
  var %k $1, %c $2, %n $3, %r 2 3 4 5 6 10 12 13, %rnk $gettok(%r,$rand(1,8),32), %renkver $+(,$chr(3),%rnk), %cay 1|1,4_1|>, %kahve 1|1,5_1|>
  if $regex(%k,/[cçÇ]aylar/Si) {
    msg %c $+(4,%n) 1tüm kanala 4Çay 1ısmarladı. Buyurun $+ $regsubex($str(-,$nick(%c,0)),/./g,$+(%renkver,$iif($nick(%c,\n) != %n,$+($chr(32),$nick(%c,\n))))) 1çaylarınız...
    msg %c $+($str($+(%cay,$chr(32)),$calc($nick(%c,0) - 1)))
    msg %c 1Afiyet olsun.
  }
  elseif $regex(%k,/kah[fv]eler/Si) {
    msg %c $+(4,%n) 1tüm kanala 5Kahve 1ısmarladı. Buyurun $+ $regsubex($str(-,$nick(%c,0)),/./g,$+(%renkver,$iif($nick(%c,\n) != %n,$+($chr(32),$nick(%c,\n))))) 1kahveleriniz...
    msg %c $+($str($+(%kahve,$chr(32)),$calc($nick(%c,0) - 1)))
    msg %c 1Afiyet olsun.
  }
}
Kendi botum/müşterilerim için yazdığım bir eklenti idi, ayıklayıp paylaşıyorum işine yarayan kullansın.

İyi forumlar.
Konu Emrehan tarafından (02 Şubat 2020 Saat 22:18 ) değiştirilmiştir..
 
Alıntı Yap
Alt 02 Şubat 2020, 22:14   #2
Pope Pius XIII
Swat - ait Kullanıcı Resmi (Avatar)
Standart
ellerine sağlık ustam

________________
 
Alıntı Yap
Alt 02 Şubat 2020, 22:21   #3
L_
~ Kekkei Genkai ~
L_ - ait Kullanıcı Resmi (Avatar)
Standart
Eline sağlık @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] hocam

________________

Sayonaraaa..
 
Alıntı Yap
Alt 03 Şubat 2020, 15:21   #4
✰ ÖzeL..
oMeN - ait Kullanıcı Resmi (Avatar)
Standart
Alıntı:
L_ Nickli Üyeden Alıntı Mesajı göster
Eline sağlık @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] hocam
Bol bol çay ikram eder durursun :d Emeğine sağlık kardeşim

________________

Edep; aklın Tercümanıdır. İnsan edebi kadar akıllı, Aklı kadar şerefli, Şerefi kadar Kıymetlidir. Massive..




~ E & B ~
 
Alıntı Yap
Alt 03 Şubat 2020, 23:33   #5
She
✰ ÖzeL..
She - ait Kullanıcı Resmi (Avatar)
Standart
Emeğinize sağlık güzel paylaşım için.

________________

~ E & B ~
 
Alıntı Yap
Alt 09 Nisan 2020, 11:15   #6
Özel Üye
Free_EyeS - ait Kullanıcı Resmi (Avatar)
Standart
Alıntı:
Emrehan Nickli Üyeden Alıntı Mesajı göster
Merhaba,

Kullanım: [!.]çaylar - [!.]kahveler

Kanaldaki herkese çay veya kahve dağıtır.

Kod

on *:text:*:#: {
  if $regex($1,/^[!.]([cçÇ]aylar|kah[fv]eler)$/Si) {
    msg # $+(1,$replace($regml(1),c,Ç,ç,Ç,k,K)) hazırlanıyor...
    $+(.timer,$regml(1)) 1 3 caykahve $regml(1) $chan $nick
  }
}
alias caykahve {
  var %k $1, %c $2, %n $3, %r 2 3 4 5 6 10 12 13, %rnk $gettok(%r,$rand(1,8),32), %renkver $+(,$chr(3),%rnk), %cay 1|1,4_1|>, %kahve 1|1,5_1|>
  if $regex(%k,/[cçÇ]aylar/Si) {
    msg %c $+(4,%n) 1tüm kanala 4Çay 1ısmarladı. Buyurun $+ $regsubex($str(-,$nick(%c,0)),/./g,$+(%renkver,$iif($nick(%c,\n) != %n,$+($chr(32),$nick(%c,\n))))) 1çaylarınız...
    msg %c $+($str($+(%cay,$chr(32)),$calc($nick(%c,0) - 1)))
    msg %c 1Afiyet olsun.
  }
  elseif $regex(%k,/kah[fv]eler/Si) {
    msg %c $+(4,%n) 1tüm kanala 5Kahve 1ısmarladı. Buyurun $+ $regsubex($str(-,$nick(%c,0)),/./g,$+(%renkver,$iif($nick(%c,\n) != %n,$+($chr(32),$nick(%c,\n))))) 1kahveleriniz...
    msg %c $+($str($+(%kahve,$chr(32)),$calc($nick(%c,0) - 1)))
    msg %c 1Afiyet olsun.
  }
}
Kendi botum/müşterilerim için yazdığım bir eklenti idi, ayıklayıp paylaşıyorum işine yarayan kullansın.

İyi forumlar.

Kod

on *:text:*:#: {
  if $regex($1,/^[!.]([cçÇ]aylar|kah[fv]eler)$/Si) {
    msg # $+(4,$replace($regml(1),c,Ç,ç,Ç,k,K)) hazırlanıyor...
    $+(.timer,$regml(1)) 1 3 caykahve $regml(1) $chan $nick
  }
}
alias caykahve {
  var %k $1, %c $2, %n $3, %r 2 3 4 5 6 10 12 13, %rnk $gettok(%r,$rand(1,8),32), %renkver $+(,$chr(3),%rnk), %cay 4,0)4_4,0(>0,0_ , %kahve 5,0|5,0_5|>
  if $regex(%k,/[cçÇ]aylar/Si) {
    msg %c $+(4,%n) 1Tüm kanala 4Çay 1ısmarladı. Buyurun $+ $regsubex($str(-,$nick(%c,0)),/./g,$+(%renkver,$iif($nick(%c,\n) != %n,$+($chr(32),$nick(%c,\n))))) 4çaylarınız...
    msg %c $+($str($+(%cay,$chr(32)),$calc($nick(%c,0) - 1)))
    msg %c 4Afiyet olsun.
  }
  elseif $regex(%k,/kah[fv]eler/Si) {
    msg %c $+(4,%n) 1Tüm kanala 5Kahve 1ısmarladı. Buyurun $+ $regsubex($str(-,$nick(%c,0)),/./g,$+(%renkver,$iif($nick(%c,\n) != %n,$+($chr(32),$nick(%c,\n))))) 4kahveleriniz...
    msg %c $+($str($+(%kahve,$chr(32)),$calc($nick(%c,0) - 1)))
    msg %c 4Afiyet Bal Şeker olsun.
  }
}
Renk kodları düzenleyerek verıyorum @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] buna dakika eklemek ıcın ne lazım yanı komutu bır dakıka da bır uygulasın kahvehaneye donmesın ortalık :)

 
Alıntı Yap
Alt 09 Nisan 2020, 11:42   #7
Alper - ait Kullanıcı Resmi (Avatar)
Standart
Alıntı:
Free_EyeS Nickli Üyeden Alıntı Mesajı göster

Kod

on *:text:*:#: {
  if $regex($1,/^[!.]([cçÇ]aylar|kah[fv]eler)$/Si) {
    msg # $+(4,$replace($regml(1),c,Ç,ç,Ç,k,K)) hazırlanıyor...
    $+(.timer,$regml(1)) 1 3 caykahve $regml(1) $chan $nick
  }
}
alias caykahve {
  var %k $1, %c $2, %n $3, %r 2 3 4 5 6 10 12 13, %rnk $gettok(%r,$rand(1,8),32), %renkver $+(,$chr(3),%rnk), %cay 4,0)4_4,0(>0,0_ , %kahve 5,0|5,0_5|>
  if $regex(%k,/[cçÇ]aylar/Si) {
    msg %c $+(4,%n) 1Tüm kanala 4Çay 1ısmarladı. Buyurun $+ $regsubex($str(-,$nick(%c,0)),/./g,$+(%renkver,$iif($nick(%c,\n) != %n,$+($chr(32),$nick(%c,\n))))) 4çaylarınız...
    msg %c $+($str($+(%cay,$chr(32)),$calc($nick(%c,0) - 1)))
    msg %c 4Afiyet olsun.
  }
  elseif $regex(%k,/kah[fv]eler/Si) {
    msg %c $+(4,%n) 1Tüm kanala 5Kahve 1ısmarladı. Buyurun $+ $regsubex($str(-,$nick(%c,0)),/./g,$+(%renkver,$iif($nick(%c,\n) != %n,$+($chr(32),$nick(%c,\n))))) 4kahveleriniz...
    msg %c $+($str($+(%kahve,$chr(32)),$calc($nick(%c,0) - 1)))
    msg %c 4Afiyet Bal Şeker olsun.
  }
}
Renk kodları düzenleyerek verıyorum @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] buna dakika eklemek ıcın ne lazım yanı komutu bır dakıka da bır uygulasın kahvehaneye donmesın ortalık :)

Kod

on *:text:*:#: {
  if $regex($1,/^[!.]([cçÇ]aylar|kah[fv]eler)$/Si) {
    if $hget(caylarkahveler,$nick) { .notice $nick $hget(caylarkahveler,$nick).unset saniye içersinde, Yalnız 1 defa [.!][Çaylar|Kahveler] Komutunu Kullanabilirsiniz. }
    else {
      msg # $+(4,$replace($regml(1),c,Ç,ç,Ç,k,K)) hazırlanıyor...
      $+(.timer,$regml(1)) 1 3 caykahve $regml(1) $chan $nick
      .hinc -mu120 caylarkahveler $nick
    }
  }
}
alias caykahve {
  var %k $1, %c $2, %n $3, %r 2 3 4 5 6 10 12 13, %rnk $gettok(%r,$rand(1,$numtok(%r,32)),32), %renkver $+(,$chr(3),%rnk), %cay 4,0)4_4,0(>0,0_ , %kahve 5,0|5,0_5|>
  if $regex(%k,/[cçÇ]aylar/Si) {
    msg %c $+(4,%n) 1Tüm kanala 4Çay 1ısmarladı. Buyurun $+ $regsubex($str(-,$nick(%c,0)),/./g,$+(%renkver,$iif($nick(%c,\n) != %n,$+($chr(32),$nick(%c,\n))))) 4çaylarınız...
    msg %c $+($str($+(%cay,$chr(32)),$calc($nick(%c,0) - 1)))
    msg %c 4Afiyet olsun.

  }
  elseif $regex(%k,/kah[fv]eler/Si) {
    msg %c $+(4,%n) 1Tüm kanala 5Kahve 1ısmarladı. Buyurun $+ $regsubex($str(-,$nick(%c,0)),/./g,$+(%renkver,$iif($nick(%c,\n) != %n,$+($chr(32),$nick(%c,\n))))) 4kahveleriniz...
    msg %c $+($str($+(%kahve,$chr(32)),$calc($nick(%c,0) - 1)))
    msg %c 4Afiyet Bal Şeker olsun.
  }
}
.hinc -mu120 caylarkahveler $nick => 120 saniyeyi temsil eder isteğin şekilde değiştirirsin.

%r 2 3 4 5 6 10 12 13 => bu kısım renk kodlarını temsil eder ekleme veya çıkarma yapabilmeniz için ufak bir düzenleme yaptım. Yani random gelecek renkleri arttırabilir veya eksiltebilirsiniz.

Ha renk kodlarını nereden bileceğim diye düşünüyorsanız,

Çaylar / Kahveler (Eğlence) Komutu

 
Alıntı Yap
Alt 09 Nisan 2020, 11:49   #8
Özel Üye
Free_EyeS - ait Kullanıcı Resmi (Avatar)
Standart
tesekkur ederim Alper :) ıyı oldu sımdı.

 
Alıntı Yap
Alt 15 Ekim 2020, 00:32   #9
"Mizantrop"
Rima - ait Kullanıcı Resmi (Avatar)
Standart
Emeğinize sağlık

________________

.
 
Alıntı Yap
Alt 15 Ekim 2020, 00:52   #10
Cumhuriyet Kadını
Reyhan - ait Kullanıcı Resmi (Avatar)
Standart
Emeğinize sağlık

________________

bazen insanlar iyilesmek istemez.
cünkü ,
icindeki acı sevdiklerinin son hatirasidir..


per aspera ad astra ✨
 
Alıntı Yap
Cevap Yaz
Sayfa 1 Toplam 2 Sayfadan 1 2

« Ip den şehir bulma remotesi !Who nick | !Söz Addonu »

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

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 Kapalı
Pingbacks are Kapalı
Refbacks are Kapalı




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

İçerik sağlayıcı paylaşım forumlarından biri olan ircrehberi.net sitemizde T.C.K 20.ci Madde ve 5651 Sayılı Kanun'un 4.cü maddesinin (2).ci fıkrasına göre TÜM ÜYELERİMİZ yaptıkları paylaşımlardan sorumludur. ircrehberi.net hakkında yapılacak tüm hukuki şikayetlere ilişkin iletişim sayfasından Veya E-Mail ile irtibata geçilmesi halinde ilgili kanunlar ve yönetmelikler çerçevesinde en geç 15 (On beş) gün içinde tarafımızca gerekli aksiyon alınacak ve size dönüş yapılacaktır.
Chat Chat Sohbet Okey Oyna sohbet mobil sohbet Uğur Ücretsiz Sohbet odalari Sohbetci SohbetBaslar
IRCRehberi.Net- Türkiyenin En iyi IRC ve Genel Forum Sitesi Arşiv Gizlilik Bildirimi Kullanım Koşulları İletişim
Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Copyright ©2019 - 2023 | IRCRehberi