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/)
-   -   Add-on ve snippet(parça) kod istekleri buraya (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/523479-add-ve-snippetparca-kod-istekleri-buraya.html)

Feragat 31 Ağustos 2014 12:59

Cevap: Mirc kod ayarı
 
Forumda buna benzer çok fazla kod var.
Cümlenin ilk harfini büyük yapmak için regex ile cümlenin başlangıcını temsil eden karakteri baz alman gerekiyor. Regex'te cümlenin başlangıcını temsil eden karakter ^ budur. Mantık şu; ^\S Cümlenin ilk harfi \S (Non-Space) yani "boşluk olmayan" ilk karakteri yakala ve regexin çıkışında $upper(\1) büyük harf olarak döndür.

Küçük bir örnek:
Kod:

on *:input:*:if $regex($1-,^[^/]) { msg $active $replacecs($regsubex($1-,/(^\S)/, $upper(\1)), s,S,l,L,b,ß,B,ß,g,q,?,¿,g,q,ş,$,Ş,$, I,i) $+ . | halt }
Sonuç:
Kod:

[12:56] <Feragat> SeLam naßer naSıLSın.
[12:56] <Feragat> $arkı SöyLemek Lazım.
[12:56] <Feragat> Deneme 1223434 SeLam.

Üstteki örneği inceleyerek ve biraz da araştırma yaparak geliştirebilirsin. İyi forumlar.

Dahimurat 31 Ağustos 2014 13:24

mirc yazı ayari
 
Toprak hocam ordaki yazı şekli her kelimenin baş harfi büyük dikkat ederseniz ben Her cümlenin baş harfi ve sonuna nokta işareti demişim. oradaki kod farklıdır. tşkler.

KuL 31 Ağustos 2014 13:41

Cevap: mirc yazı ayari
 
Alıntı:

Dahimurat Nickli Üyeden Alıntı (Mesaj 1041483299)
Toprak hocam ordaki yazı şekli her kelimenin baş harfi büyük dikkat ederseniz ben Her cümlenin baş harfi ve sonuna nokta işareti demişim. oradaki kod farklıdır. tşkler.

Dahimurat Feragat Arkadasimda zaten, Kodu vermedi Dikkat edersen.

Alıntı:

Feragat Nickli Üyeden Alıntı (Mesaj 1041483290)

Küçük bir örnek:
Kod:

on *:input:*:if $regex($1-,^[^/]) { msg $active $replacecs($regsubex($1-,/(^\S)/, $upper(\1)), s,S,l,L,b,ß,B,ß,g,q,?,¿,g,q,ş,$,Ş,$, I,i) $+ . | halt }
Üstteki örneği inceleyerek ve biraz da araştırma yaparak geliştirebilirsin. İyi forumlar.


Size Örnek vermis, bu Örnekten Yola cikarak Dilediginiz Sonuca ulasabilirsiniz.

Lütfen Sizde anlamaya calisin, malesef nerdeyse Hergün bir Konu acilmakta. Forumda Arama yapip zaten benzer Kodlar cok var. Biraz degistirme ile istediginize ulasmaniz o kadarda zor olmasa gerek.

Hayirli Forumlar dilerim

aLone 01 Eylül 2014 16:41

Cevap: İdent Sayaç
 
Alıntı:

TatLiCadi Nickli Üyeden Alıntı (Mesaj 1041481730)
Sunucuma girenlerin kaçı Sohbet identli, kaçı mynet identli, kaçı geveze identli onu görmek istiyorum bunun içinde sayaç varmıdır !rapor cektiğimde kaç giriş olmus hangi identten?
birde haftalık sayaç sıfırlasın kendini veri.txt verileri toplasın #x kanalına !rapor dediğimizde rapor olarak versin.

Kod:

on *:join:#Kanal:{ $iif(!$hget(ident),hmake ident 100) | var %ident $remove($gettok($address($nick,1),1,64),*!*) | hinc ident %ident | hsave -i ident ident.ini }
on *:start: { hmake ident 100 | hload -i ident ident.ini } | else { hmake ident 100 | hsave -i ident ident.ini }
on *:text:!rapor:#x:{ msg #x 1 Kayıtlı identler listeleniyor | play #x ident.ini 1 }
on *:text:!sil:#x:{ msg #x 1 Ident listesi silindi. | ups }
alias ups {
write -c ident.ini | hfree ident  }

!sil listeyisi temizler !rapor #x kanalına listeyi yansıtır

Örnek
[16:40:10] <05aLone> !rapor
[16:40:11] <04Botcuk> 1 Kayıtlı identler listeleniyor
[16:40:11] <04Botcuk> [hashtable]
[16:40:11] <04Botcuk> DarkNeSs=4
[16:40:11] <04Botcuk> muhabbet=97
[16:40:11] <04Botcuk> Sohbet=2026
[16:40:11] <04Botcuk> Kaan=2
[16:40:11] <04Botcuk> kelebek=81
[16:40:11] <04Botcuk> TmIRC=88
[16:40:11] <04Botcuk> Help=1
[16:40:11] <04Botcuk> mIRC=47
[16:40:11] <04Botcuk> Sohbetaski=7
[16:40:11] <04Botcuk> Lost=1
[16:40:11] <04Botcuk> yAkLaSmA=1
[16:40:11] <04Botcuk> Zurna=15
[16:40:11] <04Botcuk> Kalpfm=79
[16:40:57] <05aLone> !sil
[16:40:57] <04Botcuk> 1 Ident listesi silindi.

Gibi..

aLone 01 Eylül 2014 17:44

Cevap: Add-on istekleri buraya
 
Kod:

on *:input:*:if $regex($1-,^[^/]) { msg $active  $replacecs($regsubex($1-,/(^\S)/, $upper(\1)), s,S,l,L,b,ß,B,ß,g,q,?,¿,g,q,ş,$,Ş,$, I,i) $+ . | halt }
Dahimurat Bunu dene bakalım

sEntieL 12 Eylül 2014 05:31

op olunca otomatik host
 
Merhaba arkadaşlar,

Kanalda halfop olunca op olunca ayrı sop olunca ayrı founder olunca ayrı hostlar vermesini istiyorum botun kodu nedir bunun yardımcı olabilirmisiniz?

Hangman 12 Eylül 2014 08:55

Cevap: op olunca otomatik host
 
Bu ve buna benzer binlerce konu var forumda birazcık arama yapsanız emin olun bulabilirsiniz. Hatta üzerinde kafa yorduğunuzda kendi kendinize " bunu bende yaparım yahu çok kolaymış " dediğinizi göreceksiniz.

IRC-Dancer 12 Eylül 2014 11:32

Cevap: op olunca otomatik host
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 'ın dediğine katılıyorum , lakin kayıt'ın eski diğe saygı duydum.
Ve bu gibi benzeri kod şimdilik işini görür. '' Nomercy '' Bot'unda ; Bu dediğin özellik var , onu kurup kullana bilirsin. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:

on *:rawmode:#Kanal:{
  if $istok(IRC-Dancer Muafnick-1 Muafnick-2,$nick,32) { return }
  if *+h* iswm $1  { chghost $2 Halfop. $+ $Network }
}
on *:rawmode:#Kanal:{
  if $istok(IRC-Dancer Muafnick-1 Muafnick-2,$nick,32) { return }
  if *+o* iswm $1  { chghost $2 Aop. $+ $Network }
}
on *:rawmode:#Kanal:{
  if $istok(IRC-Dancer Muafnick-1 Muafnick-2,$nick,32) { return }
  if *+a* iswm $1  { chghost $2 Sop. $+ $Network }
}
on *:rawmode:#Kanal:{
  if $istok(IRC-Dancer Muafnick-1 Muafnick-2,$nick,32) { return }
  if *+q* iswm $1  { chghost $2 Founder. $+ $Network }
}


Toprak 12 Eylül 2014 12:07

Cevap: op olunca otomatik host
 
Event bollugu var masallah :)

aLone 12 Eylül 2014 14:29

Cevap: op olunca otomatik host
 
Kod:

on *:rawmode:#kanal:{
  if $istok(IRC-Dancer Muafnick-1 Muafnick-2,$nick,32) { return }
  if (+o iswm $1 ) { chghost $2 Aop. $+ $Network }
  if (+a iswm $1 ) { chghost $2 Sop. $+ $Network }
  if (+q iswm $1 ) { chghost $2 Founder. $+ $Network }
  if (+oa iswm $1 ) { chghost $2 Sop. $+ $Network }
  if (+oq iswm $1 ) { chghost $2 Founder. $+ $Network }
  if (+h iswm $1 ) { chghost $2 Halfop. $+ $Network }
}

eventlerden çaldım [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :)


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

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