Türkiye'nin IRCd ve LaMeR Forumu Sitesi
Hoşgeldin, Ziyaretçi
Sitemizden yararlanabilmek için Kayıt olmalısınız.

Kullanıcı Adınız:
  

Şifreniz:
  





Forumda Ara

(Gelişmiş Arama)

Forum İstatistikleri
» Toplam Üyeler: 2,481
» Son Üye: Qebby
» Toplam Konular: 4,686
» Toplam Yorumlar: 9,116

Detaylı İstatistikler

Kimler Çevrimiçi
Toplam: 92 kullanıcı aktif
» 0 Kayıtlı
» 91 Ziyaretçi
Google

Son Aktiviteler
BYMMB Bilişim Akademi: Eğ...
Forum: Web Site Tanıtımı
Son Yorum: Kenan06
1 saat önce
» Yorumlar: 0
» Okunma: 2
Drbahis
Forum: Web Site Tanıtımı
Son Yorum: chaos415
4 saat önce
» Yorumlar: 0
» Okunma: 11
Betpool
Forum: Web Site Tanıtımı
Son Yorum: chaos415
5 saat önce
» Yorumlar: 0
» Okunma: 14
Dedeslot
Forum: Web Site Tanıtımı
Son Yorum: chaos415
5 saat önce
» Yorumlar: 0
» Okunma: 14
Bigbro
Forum: Web Site Tanıtımı
Son Yorum: chaos415
6 saat önce
» Yorumlar: 0
» Okunma: 14
Roxenbet
Forum: Web Site Tanıtımı
Son Yorum: chaos415
6 saat önce
» Yorumlar: 0
» Okunma: 13
Keonbet
Forum: Web Site Tanıtımı
Son Yorum: chaos415
7 saat önce
» Yorumlar: 0
» Okunma: 14
Bayspin
Forum: Web Site Tanıtımı
Son Yorum: chaos415
7 saat önce
» Yorumlar: 0
» Okunma: 14
Goldenbahis
Forum: Web Site Tanıtımı
Son Yorum: chaos415
7 saat önce
» Yorumlar: 0
» Okunma: 12
Purplebet
Forum: Web Site Tanıtımı
Son Yorum: chaos415
9 saat önce
» Yorumlar: 0
» Okunma: 15

 
Bug GünceL Altın Ve Döviz Kodu
Yazar: Admin - 05-13-2020, 09:06 PM - Forum: mIRC Scripting Hazır Kodlar - Yorum Yok

Bu mirc kodu ile en güncel altın ve döviz fiyatlarını altın fiyatlarını yarım , çeyrek , gram ve cumhuriyet altını olarak bunun yanında dolar ve euro güncel kurunu size yansıtır.Kod döviz bilgilerini hurriyet.com.tr den çekmektedir.

Kod sadece mirce ekleyen tarafından kullanılabilir.Kullanımı ise /exchange komutu ile yapılır.


Kod:
alias d_exc_total return $+(=,$chr(3),12) $remove($replace($gettok($gettok($1,15-,$asc(“)),2-1,44),$chr(44),$+($chr(32),TL,$chr(32),$chr(3),4),:,$+(:,$chr(32))),”) TL
alias exchange {
sockopen exchange bigpara.hurriyet.com.tr 80
sockmark exchange http://bigpara.hurriyet.com.tr/altin/ }
on *:sockopen:exchange: {
if ($sockerr) { echo $color(notice) -a *** Siteye bağlantı sağlanamadı! | return }
sockwrite -n $sockname GET $sock($sockname).mark HTTP/1.1
sockwrite -n $sockname Host: $sock($sockname).addr
sockwrite -n $sockname User-Agent: */*
sockwrite -n $sockname Connection: Close
sockwrite -n $sockname }
on *:sockread:exchange: { if ($sockerr) { echo $color(notice) -a *** Veriler alinamadi! | return }
var %d_exc | sockread %d_exc | if ($sockbr) {
if $regex(%d_exc,/var \$altindata =/i) { var %r 1 | while %r <= $numtok(%d_exc,123) { %total = $gettok(%d_exc,%r,123)
if *”sembolid”:2199* iswm $gettok(%total,1-1,123) { echo $color(notice) -a *** GRAM ALTIN $d_exc_total($v2) }
if *”sembolid”:473* iswm $gettok(%total,1-1,123) { echo $color(notice) -a *** CUMHURİYET ALTINI $d_exc_total($v2) }
if *”sembolid”:2356* iswm $gettok(%total,1-1,123) { echo $color(notice) -a *** CEYREK ALTIN $d_exc_total($v2) }
if *”sembolid”:2640* iswm $gettok(%total,1-1,123) { echo $color(notice) -a *** 22 AYAR BİLEZİK $d_exc_total($v2) }
if *”sembolid”:2355* iswm $gettok(%total,1-1,123) { echo $color(notice) -a *** YARIM ALTIN $d_exc_total($v2) }
if *”sembolid”:1302* iswm $gettok(%total,1-1,123) { echo $color(notice) -a *** DOLAR $d_exc_total($v2) }
if *”sembolid”:1639* iswm $gettok(%total,1-1,123) { echo $color(notice) -a *** EURO $d_exc_total($v2) }
inc %r } } } }
on *:sockclose:exchange: { echo $color(notice) -a *** $+($chr(3),4) $time $chr(3) itibari ile güncel fiyatlar listelendi. }

Bu konuyu yazdır

Bug Özel Karşılama Kodları
Yazar: Admin - 05-13-2020, 09:03 PM - Forum: mIRC Scripting Hazır Kodlar - Yorum Yok

ÖZEL KARŞILAMA ADDONLARI  

Kod:
on *:open:?:{
var %:idle $replace($duration($idle),secs,Saniye,mins,Dakika,hrs,Saat,day,Gün,wk,Hafta,min,Dakika,Hr,Saat,sec,Saniye)
msg $nick Selam $nick
msg $nick Özel penceresini açtığınız kişi $me !
msg $nick Bugün $date Saat $time
msg $nick Konuşmadığım süre: %:idle
if $away { msg $nick Şuanda away'ım Sebep: $strip($awaymsg) }
inc %:pen
msg $nick Toplam açılan özel pencerem sayısı %:pen
msg $nick Şu an özelimdeki $+($query(0),.) kişisin
msg $nick Müsait olduğumda cevap verilecektir..
}


Kod:
on *:text:*:*:{
if ($nick == $nick) || ($nick == GamZe) {
if !Zline == $1 { msg $nick 13 Açtırmak iStediginiz Ip numarasını Özelime Yazabilirsiniz.. }
if !şikayet == $1 { msg $nick 13 !ŞikayetEdene EttiĞiniz Kişiye EttiĞiniz Konuya ßaqLı oLarak DeqerLendiriLiCekdir. }
if !Help == $1 { msg $nick 13 !help Komut SorCaksanız HeLp KanaLını KuLLanınız. O KanaL Sizin İçin Var. /join #help YapaßiLirsiniz. } if !sohbet == $1 { msg $nick 13 !Sohbet iStiOsan ßoSuna ßekLeme GLoßaL KanaLLarı KuLLan. /  }
if !aşk == $1 { msg $nick 13 !Aşk'a ayırıCak vakdIm yoq Ben Aradığım aŞkı Buldum }
if !access == $1 { msg $nick  13 !Access iStediĞiniz KanaLın HeLp KanaLına ve/veya SopLarına Gidiniz.
}
}
}

Kod:
menu status,menubar,channel {
  Korumalar
  .-
  .» Özel Karşılama
  ..Acık:.enable #kaarsıla | .echo -a Özel karşılama açıldı.
  ..Kapalı:.disable #kaarsıla | .echo -a Özel karşılama kapatıldı.
  .-
}
#kaarsıla on
on !*:open:?:*:{
  if $nick == NoMercy { halt }
  msg $nick  4 Merhaba 2 $nick
  msg $nick  4 Bugün Saat ; 10 $time Tarih ; $date
  msg $nick  4 Konuşmadığım Süre   10 $replace($duration($idle),mins,Dakika,secs,Saniye, hr,Saat,days,Gün)
  msg $nick  4 İsim : 2 Dogan can
  msg $nick  4 Şehir : 2 İSTANBUL
  msg $nick  4 Yaş : 2 30
  msg $nick  4 Takım : 2 BEŞİKTAŞ!
}
#karsıla end


Kod:
on *open:?:{
msg $nick 1,7Selam 0,2Hg 3,1 $nick 
msg $nick 7,1Bugün0,12 $date 7,1 ve Saat 0,12 $time(HH:nn.ss) 
msg $nick 11,1Toplam Açılan Özel Pencerem Sayısı 0,4 %q!
msg $nick 7,1Şu an Özelimdeki015,1 $+($query(0)15.)15 . 15 Kişisin. 9,1 Ben server görevlisi.7 $me 
msg $nick 13,1Sizede Diğerleri Gibi 8,1 En Kısa Sürede 11,1 Bakmaya Çalışıcam. 4,1 Bakmazsam Israr Etme LÜtfen Olurmu !!!..
inc %q! 
}

özelinize gelen insanlara sizinle görüşmek istedikleri kategori hakkında hazır komutlarla cevaplarla yardım etmek yada özelden karşılamaktır.
Siz bu komutlara dilediğiniz gibi eklemeler yapabileceğiniz gibi yada kısa kısa kendinize uyumlu hale de getirebilirsiniz.
Kod:
on *:OPEN:?:*: {
/msg $nick Görüşmek İstediğiniz Kategoriyi Seçiniz (!kategori adı ) !access !şikayet !help !ircd !sohbet !ssl !raw !ircarabirim !ping !lag !operhelp !khaled !bnc !eggdrop !shell | halt }
on *:text:*:?:{
if !access iswm $1 { msg $nick Muhabbet KanaLı Dı$ında ßir KanaLın Acc-Change ini KuLLanmıyorum. Muhabbet KanaLı içinde Ki$iseL gözLem ve ki$inin kanaL performansına göre değerLendiriyorum.}
if !şikayet iswm $1 { msg $nick KanaL GeneL ŞikayetLeriniz İçin /ms <Notunuz/Mesajınız> yazıp gönderiniz.}
if !help iswm $1 { msg $nick ServisLer için ExampLe : /cs help /ns help /ms help yapabilirsiniz. MeşkuL deyiLsem sizinLe iLgiLeneßilirim.}
if !ircd iswm $1 { msg $nick ircd komutLarı için /helpop yapaßiLirsiniz. DetayLı ßiLgi için meşkuL deyilsem ßirebir yardımcı olabilirim. }
if !sohbet iswm $1 { msg $nick MeşkuL değilsem herzaman sohbete açığım. }
if !ssl iswm $1 { msg $nick SSL(secure socket layer) network üzerindeki bilgi transferi sırasında güvenlik ve gizliliğin sağlanması amacıyla Netscape tarafından geliştirilmiş bir güvenlik protokolüdür.Bu şekilde bağlanmak için kendi donanımınız kurup server özel portu(6697) ile bağlanabilirsiniz. Yüklü oLdugunu //echo -s $ ssl komutunu kullandıktan sonra $true cevabını alırsanız anlayabilirsiniz.}
if !raw iswm $1 { msg $nick RAW:çiğmemiş,pişmemiş sözlük anlamı. IRC’de ise Rawlar “Serverin Diri mesajları” anlamına gelmektedir.Yani bu mesajlar, IRC server programının içine düzenli bir şekilde yerleştirilip, program tarafından belirli zamanlarda kullanıcılara iletiliyor.Raw’larla ilgili ilk belgelerin sahibi Jarkko Oikarinen ve S. M. Allen Rawları 6 ana bölüme ayırıyorlar.}
if !ircarabirim iswm $1 { msg $nick Sık KuLLanıLan ÖrnekLerdir: Mirc, Xchat, Bersirc, Bitchx, Klient, GLChat, PircH, Chat Space,Miranda IM,Trillian }
if !ping iswm $1 { msg $nick Pocket Internet Network Group /ping nick & /raw ping nick }
if !lag iswm $1 { msg $nick Lag, gönderdiğiniz mesajın başkaları tarafından okunmasında yaşanan gecikmedir. Normalde bu sadece bir kaç saniye sürer, ancak ağ çok meşgul olduğunda bu süre daha da uzayabilir ve bu duruma da LAG denir. PING komutuyla, iki kişi arasındaki lag süresini ölçebilirsiniz. Sunucuları değiştirmek, yoğun olan lagı azaltmanıza yardımcı olabilir.}
if !operhelp iswm $1 { msg $nick Yardım almak icin #ircop kanalına qiriniz. (/j ircop)}
if !khaled iswm $1 { msg $nick Khaled Mardam Bey.1968’de Jordan’ın (Ürdün) Amman şehrinde doğdu. İsminin ilginç olmasının sebebi ise Suriye’li bir babası, Filistinli bir annesi ve Danimarka’lı bir büyükannesinin olması. Ama şuan kendisi bir İngiliz vatandaşı. İngiltere de oturuyor ve 1995’te kurduğu mIRC Co.Ltd şirketinde çalışıyor.}
if !bnc iswm $1 { msg $nick BNC (BouNCer), kullanıcıların shell üzerinden IRC sunucularına bağlanmasını sağlar. BNC, bir proxy server kurmanızı sağlamaz, kendisi proxy sunucur. BNC bu hizmeti verirken sizin shell hesabınıza bağlanmanız gerekmez. Mirc, IRC programlarını kullanarak BNC üzerinden istediğiniz sunucuya bağlanırsınız.Shell alıdığınız şirketin size verdiği imkanlarla yüzlerlerce vhost ve IP kullanabilir, yaratabilirsiniz.}
if !eggdrop iswm $1 { msg $nick Aslında eggdrop da bir irc bottur ancak shell ile çalıştırılabilen, geliştirilebilen bir programdır. IRC Bot gibi kanalınızda 24 saat durmanın yanında (yüklediğiniz scriptlere göre) kendi listesinde bulunan kullanıcılara op veya voice verme, kanal koruma (küfür, flood vs), kanalda olan yazışmaları kayıt etme gibi değiştirilebilir ve programlanabilir özellikleri vardır.}
if !shell iswm $1 { msg $nick Basitçe, bir shell hesabı aldığınızda sürekli ve yüksek hızda(T1,T3,Kablo vs.) internete bağlı bir bilgisayarınız olacak diyebiliriz. İrc sunucusu kurmak, eggdrop kurmak yada bir bouncer kurmak için sheller ideal olabilir. Shell hesabınızın olduğu bilgisayarlar donanım ve yazılım olarak üst seviye bilgisayarlardır. Genellikle Unix, Linux ve FreeBSD gibi işletim sistemleri kullanılır.}

Bu konuyu yazdır

Bug Sqline Listesini Temizleme Addonu
Yazar: Admin - 05-13-2020, 08:51 PM - Forum: mIRC Scripting Hazır Kodlar - Yorum Yok

Sunucunuzdaki sqline listesini tek tek silmek yerine, bu kod sayesinde sqlineyi temizleyebileceksiniz. mIRC Remote kısmına ekleyin ve /_temizle yazarak sqline listesini temizleyin..

Kod:
alias _temizle { .set -u3 %:sqline on | echo -a Sqline List Temizleniyor.. | os sqline list }
on *:notice:*:?:{
  if %:sqline == on {
    if ($nick == OperServ) && (SQLINE listesinden silindi !isin $strip($1-)) {
      if (Aktüel liste: isin $1-) { return }
      os sqline del $1
    }
  }
}

Bu konuyu yazdır

Bug Mass Repeat & Repeat | Kollektif Tekrar ve Tekrar koruması.
Yazar: Admin - 05-13-2020, 08:45 PM - Forum: mIRC Scripting Hazır Kodlar - Yorum Yok

Adından da anlaşılacağı gibi.. Toplu tekrar ve tekrar koruması..

olayımız şu..


birden fazla nick'in aynı metni tekrar etmesi durumundan korur..


ayrıca bir nick içinde yine aynı durum geçerlidir..


farklı nick'lerin tekrar taşkınlıkların da banlar tek,tek degil +bbb şeklinde atılır.. böylece zaten tekrar durumlarında kirlenen kanalı ban ve kick notlarıyla işgal etmez..


kırmızı alan ne kadar süre içinde; mavi alan kaç tekrara izin verildiğini gösterir.. musahamanıza göre ayalarını yapabilirsiniz..


Çalışma örneği:




3A42Yr.png


Kod:
on *:text:*:#: mul $chan $nick $1-
alias -l mul {
  ;<#chan> <nick> <text>
  hinc -mu10 $+(f:,$1) $md5($3-) | hadd -mu10 $+(n:,$1) $2 $1
  if $hget($+(f:,$1),1).data >= 2 && $hget($+(n:,$1),0).item  {
    var %i $v1 | while (%i) { var %b´ $addtok(%b´,$hget($+(n:,$1),%i).item,32) | dec %i }
    var %r´ /((\w+\s|\w+){ $+ $modespl $+ })/g,%b~ $regsubex(%b´,%r`,&\1)),%i 1,%c´ $1
    while %i <= $token(%b~,0,38) {
      mode $1 $+(+,$str(b,$token($token(%b~,%i,38),0,32))) $regsubex($token(%b~,%i,38),/(\S+)/g,$address(\t,2))
      tokenize 32 $token(%b~,%i,38)
      kick $chan $* Stop $iif($token(%b~,0,32) > 1,Mass Repeat,Repeat)
      inc %i
    } 
  }
}

Bu konuyu yazdır

Bug Spamfilter Analiz v1
Yazar: Admin - 05-13-2020, 08:37 PM - Forum: mIRC Scripting Hazır Kodlar - Yorumlar (2)

3 Farklı seçenek ile paylaşımdır.
Spamfilter kullanıcıları için takip\analiz sonuçu çıkarmalarında zorluk çeken yöneticiler için tasarlanmış takip sistemi;
@Reklam - Bilgi pençere sonuçlandırılmış halindedir.

Kod:
On &^*:SNOTICE:*: {
If ($strip($1) == [Spamfilter]) && ($3 == matches) && ($4 == filter) {
If ($gettok($7,1,58) == $me) {
If (!$query($gettok($2,1,33))) {
Query $gettok($2,1,33)
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,10)) 4Sayın Yöneticim 2[ 4 $gettok($2,1,33) 2] 4 Nickini Kullanan KişI Bu Mesajı Size Göndermeye Çalışırken Sunucu Korumalarına Yakalandı. $+($chr(3),3,$str(-,10))
Echo -tm $gettok($2,1,33) $8-
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,30))
}
Else {
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,10)) 4Sayın Yöneticim 11[ 4 $gettok($2,1,33) 11] 4 Nickini Kullanan KişI Bu Mesajı Size Göndermeye Çalışırken Sunucu Korumalarına Yakalandı. $+($chr(3),3,$str(-,10))
Echo -tm $gettok($2,1,33) $8-
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,30))
}
Halt.
}
If (!$window(reklam)) {
Window -ekb @Reklam
}
If (%otogline [ $+ [ $gettok($2,1,33) ] ] == $null) {
Set -u17 %otogline [ $+ [ $gettok($2,1,33) ] ] 1
}
Echo -tm @Reklam $+($chr(3),3,$str(-,10)) Reklam istatistiğI $+($chr(3),3,$str(-,10))
Echo -tm @Reklam $chr(160)
Echo -tm @Reklam $+($chr(3),4,1[ Şüpheli Nick ]: ,$chr(3)) $gettok($2,1,33)
Echo -tm @Reklam $+($chr(3),4,1[ IP ]:,$chr(3)) $gettok($2,2,64)
Echo -tm @Reklam $+($chr(3),4,1[ Kime ]:,$chr(3)) $gettok($7,1,58)
Echo -tm @Reklam $+($chr(3),4,1[ Kullanılan Cümle ve Sebebi ]:,$chr(3)) $8-
Echo -tm @Reklam $+($chr(3),4,1[ Yasak İçeren Kelime ]:,$chr(3)) $5
Echo -tm @Reklam $chr(160)
Halt.
}
}

Kod:
On &^*:SNOTICE:*: {
If ($strip($1) == [Spamfilter]) && ($3 == matches) && ($4 == filter) {
If ($gettok($7,1,58) == $me) {
If (!$query($gettok($2,1,33))) {
Query $gettok($2,1,33)
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,10)) 4Sayın Yöneticim 2[ 4 $gettok($2,1,33) 2] 4 Nickini Kullanan KişI Bu Mesajı Size Göndermeye Çalışırken Sunucu Korumalarına Yakalandı. $+($chr(3),3,$str(-,10))
Echo -tm $gettok($2,1,33) $8-
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,30))
}
Else {
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,10)) 4Sayın Yöneticim 11[ 4 $gettok($2,1,33) 11] 4 Nickini Kullanan KişI Bu Mesajı Size Göndermeye Çalışırken Sunucu Korumalarına Yakalandı. $+($chr(3),3,$str(-,10))
Echo -tm $gettok($2,1,33) $8-
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,30))
}
Halt.
}
If (!$window(reklam)) {
Window -ekb @Reklam
}
If (%otogline [ $+ [ $gettok($2,1,33) ] ] == $null) {
Set -u17 %otogline [ $+ [ $gettok($2,1,33) ] ] 1
}
Echo -tm @Reklam $+($chr(3),3,$str(-,10)) Reklam istatistiğI $+($chr(3),3,$str(-,10))
Echo -tm @Reklam $chr(160)
Echo -tm @Reklam $+($chr(3),4,1[ Şüpheli Nick ]: ,$chr(3)) $gettok($2,1,33)
Echo -tm @Reklam $+($chr(3),4,1[ IP ]:,$chr(3)) $gettok($2,2,64)
Echo -tm @Reklam $+($chr(3),4,1[ Kime ]:,$chr(3)) $gettok($7,1,58)
Echo -tm @Reklam $+($chr(3),4,1[ Kullanılan Cümle ve Sebebi ]:,$chr(3)) $8-
Echo -tm @Reklam $+($chr(3),4,1[ Yasak İçeren Kelime ]:,$chr(3)) $5
Echo -tm @Reklam $chr(160)
Halt.
}
}

  
Kod:
On &^*:SNOTICE:*: {
If ($strip($1) == [Spamfilter]) && ($3 == matches) && ($4 == filter) {
If ($gettok($7,1,58) == $me) {
If (!$query($gettok($2,1,33))) {
Query $gettok($2,1,33)
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,10)) 4Sayın Yöneticim 2[ 4 $gettok($2,1,33) 2] 4 Nickini Kullanan KişI Bu Mesajı Size Göndermeye Çalışırken Sunucu Korumalarına Yakalandı. $+($chr(3),3,$str(-,10))
Echo -tm $gettok($2,1,33) $8-
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,30))
}
Else {
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,10)) 4Sayın Yöneticim 11[ 4 $gettok($2,1,33) 11] 4 Nickini Kullanan KişI Bu Mesajı Size Göndermeye Çalışırken Sunucu Korumalarına Yakalandı. $+($chr(3),3,$str(-,10))
Echo -tm $gettok($2,1,33) $8-
Echo -tm $gettok($2,1,33) $+($chr(3),3,$str(-,30))
}
Halt.
}
If (!$window(reklam)) {
Window -ekb @Reklam
}
If (%otogline [ $+ [ $gettok($2,1,33) ] ] == $null) {
Set -u17 %otogline [ $+ [ $gettok($2,1,33) ] ] 1
}
Echo -tm @Reklam $+($chr(3),3,$str(-,10)) Reklam istatistiğI $+($chr(3),3,$str(-,10))

Bu konuyu yazdır

Bug Nick'inizi Söyleyene Notice mesaj
Yazar: Admin - 05-13-2020, 08:31 PM - Forum: mIRC Scripting Hazır Kodlar - Yorum Yok

Nick'inizi Söyleyene Notice mesaj atar
S-bot ve admin olarak belirtiklerim muaf almak istediniz kişiler yanı kimlere mesaj gitmesin

Kod:
  menu menubar {
.Nickini söleyene söz (Notice)
  ..• Açık :.enable #noticesoz | .echo -a 0,4 notice söz acildi.
  ..• Kapalı :.disable #noticesoz | .echo -a 0,4 notice söz Kapatildi..>
  .-
}
#noticesoz off
on 1*:text:$( * $+ $me $+ * ):#:{
  if $nick == S-Bot { halt }
  if $nick == Admin { halt }
  notice $nick $read(system/söz.txt)
}
#noticesoz end

Bu konuyu yazdır

Bug Noticeleri Tek Pencere'de Toplama.
Yazar: Admin - 05-13-2020, 08:26 PM - Forum: mIRC Scripting Hazır Kodlar - Yorum Yok

Noticeleri Tek Pencere'de Toplama.

Kod:
on ^*:snotice:*: { $iif(!$window(@Snotice),window -n @Snotice) | echo -t @Snotice $1- | halt }

Bu konuyu yazdır

Bug Whois Çekeni Sajoinlemek
Yazar: Admin - 05-13-2020, 08:23 PM - Forum: mIRC Scripting Hazır Kodlar - Yorum Yok

Whois Çekeni Sajoin ile istediniz kanala çekersiniz

Kod:
On *:SNOTICE:*did a /whois on you*:{ /sajoin $2 #KANAL } 
kanal yazan bölüme istediniz kanalı yazınız

Bu konuyu yazdır

Bug Txt Den Okutmalı Küfür ve reklam koruması
Yazar: Admin - 05-13-2020, 08:20 PM - Forum: mIRC Scripting Hazır Kodlar - Yorum Yok

İndirme linklerini görebilmek için sitemize üye ol manız veya giriş yapmanız gerekiyor.Sitemize üyelikler ücretsizdir!

Kod:
on *:TEXT:*:#:{
if ($me isop $chan) {
var %i 1
while $read(kufurler.txt,%i) {
if ($read(kufurler.txt,%i) iswm $remove($1-,$chr(32),*,/,\,.,$chr(44),-,_,!,) { /kick $chan $nick Küfür Etmek Yasaktır! | /mode $chan +b $nick }
inc %i
}
}
ziqerim
siqerim
gibi ekleyiniz txt dosyasına

Txt Den Okutmalı Reklam Koruması
Kod:
on *:TEXT:*:#:{
if ($me isop $chan) {
var %i 1
while $read(reklam.txt,%i) {
if ($read(reklam.txt,%i) iswm $remove($1-,$chr(32),*,/,\,.,$chr(44),-,_,!,) { /kick $chan $nick Reklam Yapmak Yasaktır..! | /mode $chan +b $nick }
inc %i
}
}
Script Klasörünüzde Reklam.Txt Ye Reklam Sözcüklerini Alt Alta Yazın. Örnek ;
050
054
www
hotm
Gibi..

Bu konuyu yazdır

Bug kanala 15 saniyede 4 join part olursa +R alır 1 dk. sonrada -R
Yazar: Admin - 05-13-2020, 08:10 PM - Forum: mIRC Scripting Hazır Kodlar - Yorum Yok

kanala 15 saniyede 4 join part olursa +R alır 1 dk. sonrada -R

Kod:
on @1:join:#: {
inc -u15 %join [ $+ [ $nick ] ] [ $+ [ $chan ] ]
if %join [ $+ [ $nick ] ] [ $+ [ $chan ] ] < 5 halt
unset %join [ $+ [ $nick ] ] [ $+ [ $chan ] ]
mode $chan +R | .timer 0 60 /mode $chan -R
}

Bu konuyu yazdır