CR Link Ekle, Link Sil, Link List, Link Bilgi Komutu ve Kodu

Goemon · #1 23 Ağustos 2015, 10:24

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.! }
}

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