mIRC Scripting  


Geri dön   mIRC Scripting > IRCd Sistemleri > ConferenceRoom

ConferenceRoom Conferenceroom hakkında yenilikler, korumalar, sistem sorunları, bilinmeyenler ve niceleri...

Cevapla
 
LinkBack Seçenekler
  #1  
Alt 23 Ağustos 2015, 10:24
Avatar Yok

mS Puan: 311
mS Derece: Goemon MeraklıGoemon MeraklıGoemon MeraklıGoemon Meraklı
 
Üyelik tarihi: 05 Ekim 2012
Mesajlar: 91
Konular: 70
Eklentiler: 0
Alınan Teşekkür: 5
Yapılan Teşekkür: 28
Arrow CR Link Ekle, Link Sil, Link List, Link Bilgi Komutu ve Kodu

Merhaba Sevgili mİRCScripting.NET Forum Üyeleri.

Link Ekleme

Merhaba Sevgili ConferenceRoom Sevenleri Sizler İçin Kolaylık Sağlarmı Bilmem Ama Pratik Olması İçin İşinizi Kolaylaştırmanız Açısından Böyle Bir Çalışma Yaptım Buyrun Kullanın Karar Sizin.

Sunucunuzda Link Eklemeye Yarar Linki Silmeye Yarar Linki Listelemeye Yarar Link Hakkında Bilgi Almaya Yarar.

Not: KIRMIZI Renkte Belirttiğim #Opers Kanallarını Kendinize Göre Ayarlıya Bilirsiniz.Ayrıcada Bu Codeleri Kullana Bilmeniz İçin Yönetici Olmanız Şart ve Adminserv Komutunu Kullanma Flagınız Açık Olmsı Lazım.Ve #Opers Kanalında Bulunmanız Şart

Code Bir TEXT Eventiyle Alakalı Botunuza Ekliyerek Kullana Bilirsiniz.Yöneticilerin Kullanmalarında İşlerine Yarıyacaktır.

Kullanma Komutu: !linkekle Goemon 123654 stats.goemon.com Gibi

Code 1
Kod:
alias linkekle return /^(!|.)linkekle/i
on $*:text:$($linkekle):#opers: {
  if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
  elseif (!$2) { msg $chan 4HATA 2Eksik Komut Kullandınız! Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt }
  elseif $regex($2,/[[:digit:]]/i) { msg $chan 4HATA 2"ProfiLName" Seçeneğinde Renkli Yazı veya Rakam Kullanamazsınız.4Örn:1Likadını Yaz! | msg $chan 4Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt } 
  elseif (!$3) { msg $chan 4HATA 2Eksik Komut Kullandınız! Şifreyi Yazmadınız. | msg $chan 4Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt }
  elseif (!$4) || !$regex($4,/^\w+\.\w+\.\w+$)/i { msg $chan 4HATA 2Komutu Hatalı Kullandınız! Doğru Kullanımı:1 !linkekle <ProfiLName Şifre ServerName> | halt }
  elseif $regex($4,/[[:digit:]]/i) { msg $chan 4HATA 2"ServerName" Seçeneğinde Rakam Kullanamazsınız.4Örn:1stats.goemon.com | msg $chan 4Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt } 
  set -e %link.name $2 | set -e %inoutpass $3 | set -e %link.chan1 $chan | enable #linkkur | as server $2 add | as server %link.name set inpass $3 | as server %link.name set outpass $3 | as server %link.name set name $4 | as server %link.name set ping  240 | as server %link.name enable | as general set hub | /timer 1 3 /disable #linkkur 
}
#linkkur off
on *:snotice:*: { 
  if (*Success -- Server* iswm $1-) && ($5 == disabled) { msg %link.chan1 4LinkAdı:2 $4 }
  if (*Success -- Receive* iswm $1-) && ($4 == password) { msg %link.chan1 4Inpass :2 %inoutpass }
  if (*Success -- Transmit* iswm $1-) && ($4 == password) { msg %link.chan1 4Outpass:2 %inoutpass }
  if (*Success -- The server name* iswm $1-) && ($9 == been) { msg %link.chan1 4Name Adı:2 $12 | /msg %link.chan1 2Link Oluşturuldu } 
}
#linkkur end
Code İki İNPUT Eventiyle Alakalı Kendi Scriptinize Ekliyerek Kendiniz Kullana Bilirsiniz.

Kullanma Komutu: !linkekle Goemon 123654 stats.goemon.com Gibi

Code 2
Kod:
on *:input:#opers: {
  if $regex($1,/^(!|.)linkekle/i) { 
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    elseif (!$2) { msg $chan 4HATA 2Eksik Komut Kullandınız! Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt }
    elseif $regex($2,/[[:digit:]]/i) { msg $chan 4HATA 2"ProfiLName" Seçeneğinde Renkli Yazı veya Rakam Kullanamazsınız.4Örn:1Likadını Yaz! | msg $chan 4Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt } 
    elseif (!$3) { msg $chan 4HATA 2Eksik Komut Kullandınız! Şifreyi Yazmadınız. | msg $chan 4Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt }
    elseif (!$4) || !$regex($4,/^\w+\.\w+\.\w+$)/i { msg $chan 4HATA 2Komutu Hatalı Kullandınız! Doğru Kullanımı:1 !linkekle <ProfiLName Şifre ServerName> | halt }
    elseif $regex($4,/[[:digit:]]/i) { msg $chan 4HATA 2"ServerName" Seçeneğinde Rakam Kullanamazsınız.4Örn:1stats.goemon.com | msg $chan 4Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt } 
    set -e %link.name $2 | set -e %inoutpass $3 | set -e %link.chan1 $chan | enable #linkkur | as server $2 add | as server %link.name set inpass $3 | as server %link.name set outpass $3 | as server %link.name set name $4 | as server %link.name set ping  240 | as server %link.name enable | as general set hub | /timer 1 3 /disable #linkkur 
  }
}
#linkkur off
on *:snotice:*: { 
  if (*Success -- Server* iswm $1-) && ($5 == disabled) { msg %link.chan1 4LinkAdı:2 $4 }
  if (*Success -- Receive* iswm $1-) && ($4 == password) { msg %link.chan1 4Inpass :2 %inoutpass }
  if (*Success -- Transmit* iswm $1-) && ($4 == password) { msg %link.chan1 4Outpass:2 %inoutpass }
  if (*Success -- The server name* iswm $1-) && ($9 == been) { msg %link.chan1 4Name Adı:2 $12 | /msg %link.chan1 2Link Oluşturuldu } 
}
#linkkur end
Code Üç İNPUT Eventiyle Alakalı Kendi Scriptimize Ekliyerek Biz Kullana Biliriz.Ve Bilgiler Kanala Değilde ECHO Olarak Bize Yansıyacaktır.

Kullanma Komutu: !linkekle Goemon 123654 stats.goemon.com Gibi

Code 3
Kod:
on *:input:#opers: {
  if $regex($1,/^(!|.)linkekle/i) { 
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { echo -a 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    elseif (!$2) { echo -a 4HATA 2Eksik Komut Kullandınız! Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt }
    elseif $regex($2,/[[:digit:]]/i) { echo -a 4HATA 2"ProfiLName" Seçeneğinde Renkli Yazı veya Rakam Kullanamazsınız.4Örn:1Likadını Yaz! | msg $chan 4Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt } 
    elseif (!$3) { echo -a 4HATA 2Eksik Komut Kullandınız! Şifreyi Yazmadınız. | msg $chan 4Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt }
    elseif (!$4) || !$regex($4,/^\w+\.\w+\.\w+$)/i { echo -a 4HATA 2Komutu Hatalı Kullandınız! Doğru Kullanımı:1 !linkekle <ProfiLName Şifre ServerName> | halt }
    elseif $regex($4,/[[:digit:]]/i) { echo -a 4HATA 2"ServerName" Seçeneğinde Rakam Kullanamazsınız.4Örn:1stats.goemon.com | msg $chan 4Doğru Kullanımı: 1!linkekle <ProfiLName Şifre ServerName> | halt } 
    set -e %link.name $2 | set -e %inoutpass $3 | enable #linkkur | as server $2 add | as server %link.name set inpass $3 | as server %link.name set outpass $3 | as server %link.name set name $4 | as server %link.name set ping  240 | as server %link.name enable | as general set hub | /timer 1 3 /disable #linkkur 
  }
}
#linkkur off
on *:snotice:*: { 
  if (*Success -- Server* iswm $1-) && ($5 == disabled) { echo -a 4LinkAdı:2 $4 }
  if (*Success -- Receive* iswm $1-) && ($4 == password) { echo -a 4Inpass :2 %inoutpass }
  if (*Success -- Transmit* iswm $1-) && ($4 == password) { echo -a 4Outpass:2 %inoutpass }
  if (*Success -- The server name* iswm $1-) && ($9 == been) { echo -a 4Name Adı:2 $12 | /msg %link.chan1 2Link Oluşturuldu } 
}
#linkkur end
Code Dörd ALİAS la Alakalı Kendi Scriptimize Ekliyerek Biz Kullana Biliriz.

Kullanma Komutu: /linkekle Goemon 123654 stats.goemon.com Gibi

Code 4
Kod:
alias linkekle {
  if !$1 { echo -a 4HATA 2Eksik Komut Kullandınız! Doğru Kullanımı: 1/linkekle <ProfiLName Şifre ServerName> | halt }
  elseif $regex($1,/[[:digit:]]/i) { echo -a 4Doğru Kullanımı: 1/linkekle <ProfiLName Şifre ServerName> | echo -a 4HATA 2"ProfiLName" Seçeneğinde Renkli Yazı veya Rakam Kullanamazsınız.4Not:1Likadını Sade Yaz! | halt }
  elseif !$2 { echo -a 4HATA 2Eksik Komut Kullandınız! Şifreyi Yazmadınız. | echo -a 4Doğru Kullanımı: 1/linkekle <ProfiLName 4Şifre 1ServerName> | halt }
  elseif !$3 { echo -a 4HATA 2Eksik Komut Kullandınız! ServerName Yazmadınız. | echo -a 4Doğru Kullanımı: 1/linkekle <ProfiLName Şifre 4ServerName> | halt }
  elseif $regex($3,/[[:digit:]]/i) { echo -a 4HATA 2"ServerName" Seçeneğinde Renkli Yazı veya Rakam Kullanamazsınız.4Örn:1stats.goemon.com | echo -a 4Doğru Kullanımı: 1/linkekle <ProfiLName Şifre 4ServerName> | halt } 
  elseif $4 { echo -a 4HATA 2Komutu Hatalı Kullandınız! Doğru Kullanımı:4/linkekle <ProfiLName Şifre ServerName> | halt }
  set -e %link.name $1 
  set -e %inoutpass $2
  enable #linkkur 
  as server $1 add 
  as server %link.name set inpass $2
  as server %link.name set outpass $2
  as server %link.name set name $3
  as server %link.name set ping  240 
  as server %link.name enable 
  as general set hub 
  .timer 1 3 /disable #linkkur 
}
#linkkur off
on *:snotice:*: { 
  if (*Success -- Server* iswm $1-) && ($5 == disabled) { echo -a 4LinkAdı:2 $4 }
  if (*Success -- Receive* iswm $1-) && ($4 == password) { echo -a 4Inpass :2 %inoutpass }
  if (*Success -- Transmit* iswm $1-) && ($4 == password) { echo -a 4Outpass:2 %inoutpass }
  if (*Success -- The server name* iswm $1-) && ($9 == been) { echo -a 4Name Adı:2 $12 5Link Oluşturuldu } 
}
#linkkur end
Code Beş Ef Tuşlarıyla Alakalı Code Beşi mIRC Scriptinizde ALT + R Tuşlarına Basarak Açtığınızda Aliases Kısmına Ekliyeceksiniz.Code Beşin Snoticeli Olan Kodunuda Remoteye Ekliyeceksiniz.

Kullanma Komutu: F1 Tuşuna Basarak Sizden Yapılmasını İstenilenleri Yazınız.

Yada

Kullanma Komutu: CTRL + F1 Tuşlarına Basarakda Sizden Yapılmasını İstenilenleri Yazınız.

Ve Yahutda

Kullanma Komutu: Shift + F1 Tuşlarına Basarakda Sizden İstenilenleri Yazınız

Code 5 Aliases Kısmına Eklencek
Kod:
F1 set -e %link.name $$?="Linkadını Yaz. Örn: Goemon:" | set -e %inoutpass $$?="Link Şifresini Yaz Örn: 123654789 Gibi:" |  set -e %names  $$?="Linki Yaz Örn: stats.goemon.com Gibi:" | enable #linkkur | as server %link.name add | as server %link.name set inpass %inoutpass | as server %link.name set outpass %inoutpass | as server %link.name set name %names | as server %link.name set ping  240 | as server %link.name enable | as general set hub | .timer 1 3 /disable #linkkur
CF1 set -e %link.name $$?="Linkadını Yaz. Örn: Goemon:" | set -e %inoutpass $$?="Link Şifresini Yaz Örn: 123654789 Gibi:" |  set -e %names  $$?="Linki Yaz Örn: stats.goemon.com Gibi:" | enable #linkkur | as server %link.name add | as server %link.name set inpass %inoutpass | as server %link.name set outpass %inoutpass | as server %link.name set name %names | as server %link.name set ping  240 | as server %link.name enable | as general set hub | .timer 1 3 /disable #linkkur
SF1 set -e %link.name $$?="Linkadını Yaz. Örn: Goemon:" | set -e %inoutpass $$?="Link Şifresini Yaz Örn: 123654789 Gibi:" |  set -e %names  $$?="Linki Yaz Örn: stats.goemon.com Gibi:" | enable #linkkur | as server %link.name add | as server %link.name set inpass %inoutpass | as server %link.name set outpass %inoutpass | as server %link.name set name %names | as server %link.name set ping  240 | as server %link.name enable | as general set hub | .timer 1 3 /disable #linkkur
Code 5 Remoteye Eklencek
Kod:
#linkkur off
on *:snotice:*: { 
  if (*Success -- Server* iswm $1-) && ($5 == disabled) { echo -a 4LinkAdı:2 $4 }
  if (*Success -- Receive* iswm $1-) && ($4 == password) { echo -a 4Inpass :2 %inoutpass }
  if (*Success -- Transmit* iswm $1-) && ($4 == password) { echo -a 4Outpass:2 %inoutpass }
  if (*Success -- The server name* iswm $1-) && ($9 == been) { echo -a 4Name Adı:2 $12 5Link Oluşturuldu } 
}
#linkkur end
Code Altıyı Remotenize ekleyip Komutları Yazarakda Bilgileri Öğrene Biliriz

Kullanma Komutları:
/as server goemon add
/as server goemon set inpass 123456
/as server goemon outpass 123456
/as server goemon set name stats.goemon.com
/as server goemon set ping 240
/as server goemon enable
/as general set hub

Code 6
Kod:
on *:snotice:*: { 
  if (*Success -- Server* iswm $1-) && ($5 == disabled) { echo -a 4LinkAdı:2 $4 }
  if (*Success -- Receive* iswm $1-) && ($4 == password) { echo -a 4Inpass :2 %inoutpass }
  if (*Success -- Transmit* iswm $1-) && ($4 == password) { echo -a 4Outpass:2 %inoutpass }
  if (*Success -- The server name* iswm $1-) && ($9 == been) { echo -a 4Name Adı:2 $12 5Link Oluşturuldu } 
}
Açıklama:

Goemon Profil Adını Belirtir.
123456 Profilin Şifresini Belirleriz.
stats.goemon.com da Sunucu Adını Belirtir.


-----------------------------------------------------------------------------

Link SiL

Code Bir TEXT Eventiyle Alakalı Botunuza Ekliyerek Kullana Bilirsiniz.

Kullanma Komutu: !linksil Goemon Gibi

Code 1
Kod:
alias link_sil return /^(!|.)linksil/i
on $*:text:$($link_sil):#opers: {
  if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { /msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
  elseif (!$2) { /msg $chan 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1!linksil <LinkAdı> | halt }
  elseif $regex($2,/[[:digit:]]/i) { msg $chan 4HATA 2Renkli Yazı veya Rakam Kullanamazsınız.4Örn:1Likadını Yaz! | msg $chan 4Doğru Kullanımı: 1!linksil <Linkadı> | halt } 
  set -e %lnk.c $chan | set -e %lnk.n $2 | .enable #linksil | /as server $2 del 
}
#linksil off
on *:snotice:*: { 
  if $regex($1-,/^Success -- Server/i) && ($5 == removed) { 
  /msg %lnk.c 44LinkAdı:2 $4 5Silinmiştir. }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  /msg %lnk.c 4HATA22 %lnk.n 55 $+ 2Adında Link Bulunmamaktadır. }
  .disable #linksil 
}
#linksil end
Code İki İNPUT Eventiyle Alakalı Kendi Scriptimize Ekliyerek Biz Kullana Biliriz.

Kullanma Komutu: !linksil Goemon Gibi

Code 2
Kod:
on *:input:#opers: { 
  if $regex($1,/^(!|.)linksil/i) {
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { /msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    elseif (!$2) { /msg $chan 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1!linksil <LinkAdı> | halt }
    elseif $regex($2,/[[:digit:]]/i) { msg $chan 4HATA 2Renkli Yazı veya Rakam Kullanamazsınız.4Örn:1Likadını Yaz! | msg $chan 4Doğru Kullanımı: 1!linksil <Linkadı> | halt } 
    set -e %lnk.c $chan | set -e %lnk.n $2 | .enable #linksil | /as server $2 del 
  }
}
#linksil off
on *:snotice:*: { 
  if $regex($1-,/^Success -- Server/i) && ($5 == removed) { 
  /msg %lnk.c 44LinkAdı:2 $4 5Silinmiştir. }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  /msg %lnk.c 4HATA22 %lnk.n 55 $+ 2Adında Link Bulunmamaktadır. }
  .disable #linksil 
}
#linksil end
Code Üç İNPUT Eventiyle Alakalı Kendi Scriptimize Ekliyerek Kullana Biliriz.ve Bilgiler Bize ECHO Olarak Yansıtılacaktır.

Kullanma Komutu: !linksil Goemon Gibi

Code 3
Kod:
on *:input:#opers: { 
  if $regex($1,/^(!|.)linksil/i) {
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { echo -a 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    elseif (!$2) { echo -a 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1!linksil <LinkAdı> | halt }
    elseif $regex($2,/[[:digit:]]/i) { echo -a 4HATA 2Renkli Yazı veya Rakam Kullanamazsınız.4Örn:1Likadını Yaz! | echo -a 4Doğru Kullanımı: 1!linksil <Linkadı> | halt } 
    set -e %lnk.n $2 | .enable #linksil | /as server $2 del 
  }
}
#linksil off
on *:snotice:*: { 
  if $regex($1-,/^Success -- Server/i) && ($5 == removed) { 
  echo -a 44LinkAdı:2 $4 5Silinmiştir. }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  echo -a 4HATA22 %lnk.n 55 $+ 2Adında Link Bulunmamaktadır. }
  .disable #linksil 
}
#linksil end
Code Dört ALİAS la Alakalı Kendi Scriptimize Ekliyerek Kullana Biliriz.

Kullanma Komutu: /linksil Goemon Gibi

Code 4
Kod:
alias linksil {
  if (!$1) { echo -a 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1/linksil <LinkAdı> | halt }
  elseif $regex($1,/[[:digit:]]/i) { echo -a 4HATA 2Renkli Yazı veya Rakam Kullanamazsınız.4Örn:1Likadını Yaz! | echo -a 4Doğru Kullanımı: 1/linksil <Linkadı> | halt } 
  set -e %lnk.n $1 | .enable #linksil | /as server $1 del 
}

#linksil off
on *:snotice:*: { 
  if $regex($1-,/^Success -- Server/i) && ($5 == removed) { 
  echo -a 44LinkAdı:2 $4 5Silinmiştir. }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  echo -a 4HATA22 %lnk.n 55 $+ 2Adında Link Bulunmamaktadır. }
  .disable #linksil 
}
#linksil end
Code Beş Ef Tuşlarıyla Alakalı Code Beşi mIRC Scriptinizde ALT + R Tuşlarına Basarak Açtığınızda Aliases Kısmına Ekliyeceksiniz.Code Beşin Snoticeli Olan Kodunuda Remoteye Ekliyeceksiniz.

Kullanma Komutu: F2 Tuşuna Basarak Sizden Yapılmasını İstenilenleri Yazınız.

Yada

Kullanma Komutu: CTRL + F2 Tuşlarına Basarakda Sizden Yapılmasını İstenilenleri Yazınız.

Ve Yahutda

Kullanma Komutu: Shift + F2 Tuşlarına Basarakda Sizden İstenilenleri Yazınız

Code 5 Aliases Kısmına Eklencek
Kod:
F2 set -e %lnk.n $$?="Link Adını Yaz Örn: Goemon Gibi:" | .enable #linksil | /as server %lnk.n del 
CF2 set -e %lnk.n $$?="Link Adını Yaz Örn: Goemon Gibi:" | .enable #linksil | /as server %lnk.n del 
SF2 set -e %lnk.n $$?="Link Adını Yaz Örn: Goemon Gibi:" | .enable #linksil | /as server %lnk.n del
Code 5 Remoteye Eklenecek
Kod:
#linksil off
on *:snotice:*: { 
  if $regex($1-,/^Success -- Server/i) && ($5 == removed) { 
  echo -a 44LinkAdı:2 $4 5Silinmiştir. }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  echo -a 4HATA22 %lnk.n 55 $+ 2Adında Link Bulunmamaktadır. }
  .disable #linksil 
}
#linksil end
Code Altıyı Remotenize ekleyip Komutları Yazarakda Bilgileri Öğrene Biliriz

Kullanma Komutu: /as server goemon del Gibi

Code 6
Kod:
on *:snotice:*: { 
  if $regex($1-,/^Success -- Server/i) && ($5 == removed) { 
  echo -a 44LinkAdı:2 $4 5Silinmiştir. }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  echo -a 4HATA 1Böyle Bir Bilgide 2Link Bulunmamaktadır. }
  .disable #linksil 
}
-----------------------------------------------------------------------------

Link List

Code Bir TEXT Eventiyle Alakalı Botunuza Ekliyerek Kullana Bilirsiniz.

Kullanma Komutu: !linklist Gibi

Code 1
Kod:
on $*:text:*:#opers: {
  if $regex($1,/^(!|.)linklist/i) {
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { /msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    elseif ($2) { /msg $chan 4HATA 2Yanlış Komut Kullandınız!. Komutun Doğru Kullanımı:1 !linklist | halt }
    msg $chan 4Sunucu Link Listesi Alınıyor.
    set %link.chan $chan | .enable #linkliste | /stats c | .timer 1 2 .disable #linkliste | .timer 1 2 /msg $chan 4Sunucu Link Listesi Sıralandı 12 $+ $nick 
  }
}
#linkliste off
raw 213:*: { 
  msg %link.chan  4LinkAdı:2 $+ $gettok($1-,2,42)
  halt
}
#linkliste end
Code İki İNPUT Eventiyle Alakalı Kendi Scriptinize Ekliyerek Kullana Bilirsiniz.

Kullanma Komutu: !linklist Gibi

Code 2
Kod:
on $*:input:#opers {
  if $regex($1,/^(!|.)linklist/i) {
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { /msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    elseif ($2) { /msg $chan 4HATA 2Yanlış Komut Kullandınız!. Komutun Doğru Kullanımı:1 !linklist | halt }
    msg $chan 4Sunucu Link Listesi Alınıyor.
    set %link.chan $chan | .enable #linkliste | /stats c | .timer 1 2 .disable #linkliste | .timer 1 2 /msg $chan 4Sunucu Link Listesi Sıralandı 12 $+ $nick 
  }
}
#linkliste off
raw 213:*: { 
  msg %link.chan  4LinkAdı:2 $+ $gettok($1-,2,42)
  halt
}
#linkliste end
Code Üç İNPUT Eventiyle Alakalı Kendi Scriptinize Ekliyerek Kullana Bilirsiniz.

Kullanma Komutu: !linklist Gibi

Code 3
Kod:
on $*:input:#opers {
  if $regex($1,/^(!|.)linklist/i) {
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { echo -a 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    elseif ($2) { echo -a 4HATA 2Yanlış Komut Kullandınız!. Komutun Doğru Kullanımı:1 !linklist | halt }
    echo -a 4Sunucu Link Listesi Alınıyor.
    .enable #linkliste | stats c | .timer 1 2 .disable #linkliste | .timer 1 2 echo -a 4Sunucu Link Listesi Sıralandı 12 $+ $me
  }
}
#linkliste off
raw 213:*: { 
  echo -a 4LinkAdı:2 $+ $gettok($1-,2,42)
  halt
}
#linkliste end
Code Dört ALİAS la Alakalı Kendi Scriptinize Ekliyerek Kullana Bilirsiniz.

Kullanma Komutu: /linklist Gibi

Code 4
Kod:
alias linklist {
  if ($1) { echo -a 4HATA 2Yanlış Komut Kullandınız!. Komutun Doğru Kullanımı:1/linklist | halt }
  echo -a 4Sunucu Link Listesi Alınıyor.
  .enable #linkliste | stats c | .timer 1 2 .disable #linkliste | .timer 1 2 echo -a 4Sunucu Link Listesi Sıralandı 12 $+ $me
}
#linkliste on
raw 213:*: { 
  echo -a 4LinkAdı:2 $+ $gettok($1-,2,42)
  halt
}
#linkliste end
Code Beş Ef Tuşlarıyla Alakalı Code Beşi mIRC Scriptinizde ALT + R Tuşlarına Basarak Açtığınızda Aliases Kısmına Ekliyeceksiniz.Code Beşin Rawlı Olan Kodunuda Remoteye Ekliyeceksiniz.

Kullanma Komutu: F3 Tuşuna Basarak Sizden Yapılmasını İstenilenleri Yazınız.

Yada

Kullanma Komutu: CTRL + F3 Tuşlarına Basarakda Sizden Yapılmasını İstenilenleri Yazınız.

Ve Yahutda

Kullanma Komutu: Shift + F3 Tuşlarına Basarakda Sizden İstenilenleri Yazınız

Code 5 Aliases Kısmına Eklencek
Kod:
F3 echo -a 4Sunucu Link Listesi Alınıyor. | enable #linkliste | stats c | .timer 1 2 .disable #linkliste | .timer 1 2 echo -a 4Sunucu Link Listesi Sıralandı 12 $+ $me
CF3 echo -a 4Sunucu Link Listesi Alınıyor. | enable #linkliste | stats c | .timer 1 2 .disable #linkliste | .timer 1 2 echo -a 4Sunucu Link Listesi Sıralandı 12 $+ $me 
SF3 echo -a 4Sunucu Link Listesi Alınıyor. | enable #linkliste | stats c | .timer 1 2 .disable #linkliste | .timer 1 2 echo -a 4Sunucu Link Listesi Sıralandı 12 $+ $me
Code 5 Remoteye Eklencek.
Kod:
#linkliste off
raw 213:*: { 
  echo -a 4LinkAdı:2 $+ $gettok($1-,2,42)
  halt
}
#linkliste end
Code Altı Scriptinize Ekliyerek Komutu Yazarak Kullana Bilirsiniz.

Kullanma Komutu: /stats c

Code 6
Kod:
raw 213:*: { 
  echo -a 4LinkAdı:2 $+ $gettok($1-,2,42)
  halt
}
-----------------------------------------------------------------------------

Link Bilgi

Code Bir TEXT Eventiyle Alakalı Botunuza Ekliyerek Kullana Bilirsiniz.

Kullanma Komutu: !linkbilgi Goemon Gibi

Code 1
Kod:
on $*:text:*:#opers: {
  if $regex($1,/^(!|.)linkbilgi/i) {
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    elseif (!$2) { /msg $chan 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1!linkbilgi <LinkAdı> | halt }
    elseif $3 { /msg $chan 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1!linkbilgi <LinkAdı> | halt }
    elseif $regex($2,/^[[:digit:]]/i) { /msg $chan 4HATA 2Rakam Kullanamazsınız Hatalı Kullanıyorsunuz. Lütfen Sade Şekilde Yazın! 1!linkbilgi <LinkAdı> | halt }
    elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkliveya  ŞekilliYazı Tipi Kullanıyorsunuz. Lütfen Sade Şekilde Yazın! 1!linkbilgi <LinkAdı> | halt }
    /msg $chan 4LinkAdı:2 $2 5Araştırılıyor. | set -e %lb.c $chan |  set -e %lb.n $2 | .enable #linkbilgi | /as server $2 list | .timer 1 2 .disable #linkbilgi
  }
}
#linkbilgi off
on *:snotice:*: {
  if $regex($1-,/^-- server/i) && ($4 == add) { 
  /msg %lb.c 4LinkAdı:2 $3 }
  elseif $regex($1-,/^-- server/i) && ($5 == name) { 
  /msg %lb.c 4Server Adı:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == port) { 
  /msg %lb.c 4Port:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == ping) { 
  /msg %lb.c 4Ping:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == inpass) { 
  /msg %lb.c 4Inpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == outpass) { 
  /msg %lb.c 4Outpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($4 == enable) { 
  /msg %lb.c 4Server Bilgi:2 $4 }
  elseif $regex($1-,/^-- server/i) && ($5 == leaf) {
  /msg %lb.c 4Server Set:2 $5 }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  /msg %lb.c 4HATA2 %lb.n 5Adında Link Bulunmamaktatır.! }
}
#linkbilgi end
Code iki İNPUT Eventiyle Alakalı Kendi Scriptinize Ekliyerek Kullana Bilirsiniz.

Kullanma Komutu: !linkbilgi Goemon Gibi

Code 2
Kod:
on $*:input:#opers: { 
  if $regex($1,/^(!|.)linkbilgi/i) {
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { msg $chan 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    elseif (!$2) { /msg $chan 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1!linkbilgi <LinkAdı> | halt }
    elseif $3 { /msg $chan 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1!linkbilgi <LinkAdı> | halt }
    elseif $regex($2,/^[[:digit:]]/i) { /msg $chan 4HATA 2Rakam Kullanamazsınız Hatalı Kullanıyorsunuz. Lütfen Sade Şekilde Yazın! 1!linkbilgi <LinkAdı> | halt }
    elseif $regex($2,/^[[:cntrl:]]/i) { /msg $chan 4HATA 2Renkliveya  ŞekilliYazı Tipi Kullanıyorsunuz. Lütfen Sade Şekilde Yazın! 1!linkbilgi <LinkAdı> | halt }
    /msg $chan 4LinkAdı:2 $2 5Araştırılıyor. | set -e %lb.c $chan |  set -e %lb.n $2 | .enable #linkbilgi | /as server $2 list | .timer 1 2 .disable #linkbilgi
  }
}
#linkbilgi off
on *:snotice:*: {
  if $regex($1-,/^-- server/i) && ($4 == add) { 
  /msg %lb.c 4LinkAdı:2 $3 }
  elseif $regex($1-,/^-- server/i) && ($5 == name) { 
  /msg %lb.c 4Server Adı:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == port) { 
  /msg %lb.c 4Port:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == ping) { 
  /msg %lb.c 4Ping:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == inpass) { 
  /msg %lb.c 4Inpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == outpass) { 
  /msg %lb.c 4Outpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($4 == enable) { 
  /msg %lb.c 4Server Bilgi:2 $4 }
  elseif $regex($1-,/^-- server/i) && ($5 == leaf) {
  /msg %lb.c 4Server Set:2 $5 }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  /msg %lb.c 4HATA2 %lb.n 5Adında Link Bulunmamaktatır.! }
}
#linkbilgi end
Code Üç İNPUT Eventiyle Alakalı Kendi Scriptinize Ekliyerek Kullana Bilirsiniz.ECHO Olarak Bilgi Ala Bilirsiniz.

Kullanma Komutu: !linkbilgi Goemon Gibi

Code 3
Kod:
on $*:input:#opers: { 
  if $regex($1,/^(!|.)linkbilgi/i) {
    if (*@* $+ $token($server,2-,$asc(.)) $+ * !iswm $address($nick,2)) { echo -a 4HATA 2Komutu Kullanma Yetkiniz Yok! | halt }
    elseif (!$2) { echo -a 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1!linkbilgi <LinkAdı> | halt }
    elseif $3 { echo -a 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1!linkbilgi <LinkAdı> | halt }
    elseif $regex($2,/^[[:digit:]]/i) { echo -a 4HATA 2Rakam Kullanamazsınız Hatalı Kullanıyorsunuz. Lütfen Sade Şekilde Yazın! 1!linkbilgi <LinkAdı> | halt }
    elseif $regex($2,/^[[:cntrl:]]/i) { echo -a 4HATA 2Renkliveya  ŞekilliYazı Tipi Kullanıyorsunuz. Lütfen Sade Şekilde Yazın! 1!linkbilgi <LinkAdı> | halt }
    echo -a 4LinkAdı:2 $2 5Araştırılıyor. | set -e %lb.n $2 | .enable #linkbilgi | as server $2 list | .timer 1 2 .disable #linkbilgi
  }
}
#linkbilgi on
on *:snotice:*: {
  if $regex($1-,/^-- server/i) && ($4 == add) { 
  echo -a 4LinkAdı:2 $3 }
  elseif $regex($1-,/^-- server/i) && ($5 == name) { 
  echo -a 4Server Adı:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == port) { 
  echo -a 4Port:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == ping) { 
  echo -a 4Ping:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == inpass) { 
  echo -a 4Inpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == outpass) { 
  echo -a 4Outpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($4 == enable) { 
  echo -a 4Server Bilgi:2 $4 }
  elseif $regex($1-,/^-- server/i) && ($5 == leaf) {
  echo -a 4Server Set:2 $5 }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  echo -a 4HATA2 %lb.n 5Adında Link Bulunmamaktatır.! }
}
#linkbilgi end
Code Dört ALİAS la Alakalı Kendi Scriptinize Ekliyerek Kullana Bilirsiniz.

Kullanma Komutu: /linkbilgi Goemon Gibi

Code 4
Kod:
alias linkbilgi {
  if (!$1) { echo -a 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1!linkbilgi <LinkAdı> | halt }
  elseif $2 { echo -a 4HATA 2Eksik Komut Girdiniz. Doğru Kullanımı 1!linkbilgi <LinkAdı> | halt }
  elseif $regex($1,/^[[:digit:]]/i) { echo -a 4HATA 2Rakam Kullanamazsınız Hatalı Kullanıyorsunuz. Lütfen Sade Şekilde Yazın! 1!linkbilgi <LinkAdı> | halt }
  elseif $regex($1,/^[[:cntrl:]]/i) { echo -a 4HATA 2Renkli veya  ŞekilliYazı Tipi Kullanıyorsunuz. Lütfen Sade Şekilde Yazın! 1!linkbilgi <LinkAdı> | halt }
  echo -a 4LinkAdı:2 $2 5Araştırılıyor. | set -e %lb.n $1 | .enable #linkbilgi | as server $1 list | .timer 1 2 .disable #linkbilgi
}
#linkbilgi off
on *:snotice:*: {
  if $regex($1-,/^-- server/i) && ($4 == add) { 
  echo -a 4LinkAdı:2 $3 }
  elseif $regex($1-,/^-- server/i) && ($5 == name) { 
  echo -a 4Server Adı:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == port) { 
  echo -a 4Port:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == ping) { 
  echo -a 4Ping:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == inpass) { 
  echo -a 4Inpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == outpass) { 
  echo -a 4Outpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($4 == enable) { 
  echo -a 4Server Bilgi:2 $4 }
  elseif $regex($1-,/^-- server/i) && ($5 == leaf) {
  echo -a 4Server Set:2 $5 }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  echo -a 4HATA2 %lb.n 5Adında Link Bulunmamaktatır.! }
}
#linkbilgi end
Code Beş Ef Tuşlarıyla Alakalı Code Beşi mIRC Scriptinizde ALT + R Tuşlarına Basarak Açtığınızda Aliases Kısmına Ekliyeceksiniz.Code Beşin Snoticeli Olan Kodunuda Remoteye Ekliyeceksiniz.

Kullanma Komutu: F4 Tuşuna Basarak Sizden Yapılmasını İstenilenleri Yazınız.

Yada

Kullanma Komutu: CTRL + F4 Tuşlarına Basarakda Sizden Yapılmasını İstenilenleri Yazınız.

Ve Yahutda

Kullanma Komutu: Shift + F4 Tuşlarına Basarakda Sizden İstenilenleri Yazınız

Code 5 Aliases Kısmına Ekleyin
Kod:
F4 set -e %linkbilgi $$?="Link Adını Yaz Örn: Goemon Gibi:" | echo -a 4LinkAdı:2 %linkbilgi 5Araştırılıyor. | .enable #linkbilgi | as server %linkbilgi list | .timer 1 2 .disable #linkbilgi
CF4 set -e %linkbilgi $$?="Link Adını Yaz Örn: Goemon Gibi:" | echo -a 4LinkAdı:2 %linkbilgi 5Araştırılıyor. | .enable #linkbilgi | as server %linkbilgi list | .timer 1 2 .disable #linkbilgi
SF4 set -e %linkbilgi $$?="Link Adını Yaz Örn: Goemon Gibi:" | echo -a 4LinkAdı:2 %linkbilgi 5Araştırılıyor. | .enable #linkbilgi | as server %linkbilgi list | .timer 1 2 .disable #linkbilgi
Code 5 Remoteye Ekleyin
Kod:
#linkbilgi off
on *:snotice:*: {
  if $regex($1-,/^-- server/i) && ($4 == add) { 
  echo -a 4LinkAdı:2 $3 }
  elseif $regex($1-,/^-- server/i) && ($5 == name) { 
  echo -a 4Server Adı:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == port) { 
  echo -a 4Port:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == ping) { 
  echo -a 4Ping:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == inpass) { 
  echo -a 4Inpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == outpass) { 
  echo -a 4Outpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($4 == enable) { 
  echo -a 4Server Bilgi:2 $4 }
  elseif $regex($1-,/^-- server/i) && ($5 == leaf) {
  echo -a 4Server Set:2 $5 }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  echo -a 4HATA2 %linkbilgi 5Adında Link Bulunmamaktatır.! }
}
#linkbilgi end
Code Altı Kendi Scriptinize Ekliyerek Komutu Yazarakda Öğrene Bilirsiniz.

Kullanma Komutu: /as server goemon list Gibi

Code 6
Kod:
on *:snotice:*: {
  if $regex($1-,/^-- server/i) && ($4 == add) { 
  echo -a 4LinkAdı:2 $3 }
  elseif $regex($1-,/^-- server/i) && ($5 == name) { 
  echo -a 4Server Adı:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == port) { 
  echo -a 4Port:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == ping) { 
  echo -a 4Ping:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == inpass) { 
  echo -a 4Inpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($5 == outpass) { 
  echo -a 4Outpass:2 $6 }
  elseif $regex($1-,/^-- server/i) && ($4 == enable) { 
  echo -a 4Server Bilgi:2 $4 }
  elseif $regex($1-,/^-- server/i) && ($5 == leaf) {
  echo -a 4Server Set:2 $5 }
  elseif $regex($1-,/^Failure -- No such server/i) { 
  echo -a 4HATA 5Bu isimde Böyle Bir Link Bulunmamaktatır.! }
}
Alıntı ile Cevapla
Cevapla

Etiketler
bilgi, ekle, kodu, komutu, link, list, sil

Seçenekler

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 Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
CR de Chanserv Kanal List Komutu ve Kodu Goemon ConferenceRoom 3 29 Ağustos 2015 09:45
CR de Stats M Komutu ve Kodu Goemon ConferenceRoom 1 26 Ağustos 2015 01:48
CR de Kayıtsız Nickler Hakkında Bilgi Komutu Goemon ConferenceRoom 0 23 Ağustos 2015 10:04
Nick List * Komutu ve Kodu Goemon ConferenceRoom 0 23 Temmuz 2015 19:08
Bilgilendirme(dynamic link library/dll) mS-Desk Dynamic link library - Dll 0 12 Temmuz 2009 02:02


Yasal Uyarı

    5651 sayılı yasada belirtilen "Yer Sağlayıcı" olarak hizmet sunmaktadır. İlgili yasaya göre site yönetiminin tüm içerikleri kontrol etme yükümlülüğü yoktur. Bu sebep ile sitemiz, uyarıları dikkate alarak yasa dışı paylaşımlar hakkında gerekli işlemleri yapmaktadır. Oluşabilecek yasal sorumluluklar üyelerimize aittir. Gerekli şikayet bildirimleri yapabilmek için "burayı" tıklayarak gerekli alanları doldurup yapabilirsiniz.
mIRCScripting © 2015



1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76