Mirc indir

Türkiyenin Mirc indir'me Merkezi

mIRC'imiz Kaspersky,Nod32,Antivir,PcClin,Norton gibi birçok Antivirüs programı tarafından taratılmış ve tamamen güvenilir bir şekilde hizmetinize sunulmuştur. Kullanımı tamamen ücretsizdir.mIRC'i indirmek için link'e tıklayıp "Çalıştır" seçeneğini seçmeniz yeterli olacaktır.Max. download süresi 30 saniyedir.Mircindir.Biz.TR mIRC Team™ olarak keyifli sohbetler dileriz.

TÜRKÇE ÜCRETSİZ MİRC İNDİRME MERKEZİ

Mirc indir | Türkce Mirc indir | Bedava Mirc indir | Mirc indir | Mirc indir 2011

Archive for Mirc Addonları

mirc indir ircservices kurulum

23 Kas, 2011  Yorum

Merhaba;

Makalemizde ircservices\’i nasıl kuracağımızı anlatacağım;

SSH ile bağlantı kurduktan sonra
Ana dizinde ( pwd yazarak nerede olduğumuzu öğrenebiliriz.)
wget komutuyla gerekli olan dosyaları açıyoruz.
wget http://www.mircindir.biz.tr/ircservices-5.0.44.tar.gz
cd ircservices-5.0.44
./configure
make
make install

komutlarını uygulayarak gerekli olan tüm kurulumları gerçekleştiriyoruz..
ircservices.conf ve modules.conf örnekleri için aşağıdaki makalelere girebilirsiniz.

mirc indir mirc indir mirc indir mirc indir

mIRC indir | Helperlere özel popups

8 Ara, 2010  Yorum

»Helper Menü
.Hitaplar
..(+) Ver Yardım Et:/mode # +v $$1 2 | /say Merhaba $$1 : YardIm kanaLı # `e HoşgeLdin. Size ServisLer hakkında nasıL yardImcı oLaßiLirim?
..SoRun ßeLirt:/say $$1 : Sorunuz Yoksa GerekSiz ßekLeme yapmayın. Aksi haLde kanaLdan ßanLanacakSınız. mirc indir
..(-) Al Bye:/mode # -v $$1 2 | /say $$1 : Hoş Sohbetler Dileriz..
.-
.ChanServ Yardım
..Sık Kullanılan Komutlar
…Kayıt Et:/say $$1 : /Cs Register #Kanal Şifreniz Açıklamanız | /say Başka Yardım edeßiLeceğim ßir Konu varmı?
…Şifre Tanıt:/say $$1 : /Cs identify #Kanal Şifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Topic At:/say $$1 : /Cs Topic #Kanal Topiciniz | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…İnfo Çek:/say $$1 : /Cs info #Kanal | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Dropla Düşür:/say $$1 : Once : /Cs identify #KanaL Şifre | /Say DoğRu Şifreyi Girdikten Sonra : /Cs Drop #Kanal | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Şifre Gönder:/say $$1 : /Cs Sendpass #Kanal | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…İnvite:/say $$1 : /Cs invite #Kanal Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Unban:/say $$1 : /Cs unban #Kanal Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Access Ayarları
…Ekle:/say $$1 : /Cs Access #Kanal Add Nick Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Sil:/say $$1 : /Cs Access #Kanal Del Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Tümünü Sil:/say $$1 : /Cs Access #Kanal Del 1-999 | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Listele:/say $$1 : /Cs Access #Kanal List | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Status:/say $$1 : /Cs Status #Kanal Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Set Ayarları
…Şifre Değiştirme:/say $$1 : /Cs Set #Kanal Password YeniŞifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Founder Değiştirme:/say $$1 : /Cs Set #Kanal Founder Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Açıklama Değiştirme:/say $$1 : /Cs Set #Kanal Desc Açıklamanız | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…E-mail Değiştirme:/say $$1 : /Cs Set #Kanal Email YeniEmail | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…URL Değiştirme:/say $$1 : /Cs Set #Kanal URL WebSitesi | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Giriş Mesajı:/say $$1 : /Cs Set #Kanal EntryMsg Mesajınız | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Acc’siz Giremez:/say $$1 : /Cs Set #Kanal Restricted On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Gizleme:/say $$1 : /Cs Set #Kanal Private On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Topic Hatırlatma:/say $$1 : /Cs Set #Kanal KeepTopic On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Topic Kilit:/say $$1 : /Cs Set #Kanal TopicLock On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Kısıtlı Op:/say $$1 : /Cs Set #Kanal SecureOps On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…İlk Giren Op:/say $$1 : /Cs Set #Kanal LeaveOps On | /sayYardım Edebileceğim Başka Bir Konu var mı ?
…Güvenlik:/say $$1 : /Cs Set #Kanal Secure On | /sayYardım Edebileceğim Başka Bir Konu var mı ?
…Linkleme:/say $$1 : /Cs Set #KanaL +lL 1 #2.KanaL | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Memo Seviyesi:/say $$1 : /Cs Set #Kanal Memo Level | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Entrymsg:/Say $$1 : /cs set #kanaL entrymsg Mesaj | /Say yardım edebiLeceğim farkLı ßir Konu varmı ?
..Levels Ayarları
…Her Giren Op:/say $$1 : /Cs Levels #Kanal Set AutoOp 0 ( Eski Haline Getirmek İçin ise /Cs Levels #Kanal Set AutoOp 50 Yazınız ) | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Her Giren HaLfOp:/say $$1 : /Cs Levels #Kanal Set AutoHalfOp 0 ( Eski Haline Getirmek İçin ise /Cs Levels #Kanal Set AutoHaLfOp 40 Yazınız ) | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Her Giren Voice:/say $$1 : /Cs Levels #Kanal Set AutoVoice 0 ( Eski Haline Getirmek İçin ise /Cs Levels #Kanal Set AutoVoice 30 Yazınız ) | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Op-Deop Seviyesi:/say $$1 : /Cs Levels #Kanal Set OpDeop Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Ban Seviyesi:/say $$1 : /Cs Levels #Kanal Set Ban Seviye | /say Yardım EdebiLecegim Baska Bir Konu var mi ?
…Unban Seviyesi:/say $$1 : /Cs Levels #Kanal Set Unban Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Access Listeleme:/say $$1 : /Cs Levels #Kanal Set Acc-List Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Access Değiştirme:/say $$1 : /Cs Levels #Kanal Set Acc-Change Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…İnvite Seviyesi:/say $$1 : /Cs Levels #Kanal Set invite Seviye | /say Yardım Edebileceğim Baika Bir Konu var mı ?
…Akick Seviyesi:/say $$1 : /Cs Levels #Kanal Set Akick Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Clear Seviyesi:/say $$1 : /Cs Levels #Kanal Set Clear Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Topic Seviyesi :/say $$1 : /Cs Levels #Kanal Set Topic Seviye | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Level Listesi:/say $$1 : /Cs Levels #Kanal List | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…-
…Disable Ayarları
….Op İptal:/say $$1 : /Cs Levels #Kanal Dis AutoOp | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….HalfOp İptal:/say $$1 : /Cs Levels #Kanal Dis AutoHalfOp | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Voice İptal:/say $$1 : /Cs Levels #Kanal Dis AutoVoice | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Protect İptal:/say $$1 : /Cs Levels #Kanal Dis AutoProtect | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Set İptal:/say $$1 : /Cs Levels #Kanal Dis Set | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Access Değiştirme İptal:/say $$1 : /Cs Levels #Kanal Dis Acc-Change | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Access List İptal:/say $$1 : /Cs Levels #Kanal Dis Acc-List | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Clear İptal:/say $$1 : /Cs Levels #Kanal Dis Clear | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Akick İptal:/say $$1 : /Cs Levels #Kanal Dis Akick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Topic İptal:/say $$1 : /Cs Levels #Kanal Dis Topic | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Ban İptal:/say $$1 : /Cs Levels #Kanal Dis Ban | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….Unban İptal:/say $$1 : /Cs Levels #Kanal Dis Unban | /say Yardım Edebileceğim Başka Bir Konu var mı ?
….İnvite İptal:/say $$1 : /Cs Levels #Kanal Dis invite | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Clear Ayarları
…Opları Al:/say $$1 : /Cs Clear #Kanal Ops | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…HalfOpları Al:/say $$1 : /Cs Clear #Kanal HalfOps | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Voiceleri Al:/say $$1 : /Cs Clear #Kanal Voices | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Banları Temizle:/say $$1 : /Cs Clear #Kanal Bans | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Userleri Temizle:/say $$1 : /Cs Clear #Kanal Users | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Modları Sıfırla:/say $$1 : /Cs Clear #Kanal Modes | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Akick Ayarları
…Ekle:/say $$1 : /Cs Akick #Kanal Add Nick*!*@* (İsterseniz Sebep) IP Adresinden Almak İçin İse /Cs Akick #Kanal Add *!*@IP Örneğin : *!*@127.0.0.1 ) | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Sil:/say $$1 : /Cs Akick #Kanal Del Nick*!*@* | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Tümünü Sil:/say $$1 : /Cs Akick #Kanal Del 1-50 | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Listele:/say $$1 : /Cs Akick #Kanal List | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Kim Akick Atmış:/say $$1 : /Cs Akick #Kanal view | /say Yardım Edebileceğim Başka Bir Konu var mı ?
…Kaç Akick Var:/say $$1 : /Cs Akick #Kanal Enforce | /say Yardım Edebileceğim Başka Bir Konu var mı ?
.-
.NickServ Yardım
..Kayıt Et:/say $$1 : /Ns Register Şifren EmaiL@adresin | /Say Kayıt işLemini takip ederek Size GeLen onay (AUTH) Kodunu Girince kayıt işLemi tamamLanacaktır. | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..İdentify Et:/say $$1 : /Ns identify Şifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Şifre Değiştir:/say $$1 : /Ns Set Password YeniŞifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..İnfo Çek:/say $$1 : /Ns info Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Sendpass:/say $$1 : /Ns Sendpass Nick | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Mail Değiştir:/say $$1 : /Ns Set Email YeniEmail | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..URL Değiştir:/say $$1 : /Ns Set URL WebSite | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Quit Gizleme:/say $$1 : /Ns Set Hide Quit On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Email Gizleme:/say $$1 : /Ns Set Hide Email On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Ghost:/say $$1 : /Ns Ghost Nick Şifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Release:/say $$1 : /Ns Release Nick Şifre | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..İdentify Zaman Aktif:/say $$1 : /Ns Set Kill On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Güvenlik:/say $$1 : /Ns Set Secure On | /say Yardım Edebileceğim Başka Bir Konu var mı ?
..Saat Tabanı:/say $$1 : /Ns Set Timezone +?:?? ( Örneğin : Timezone +2:40 ) | /say Yardım Edebileceğim Başka Bir Konu var mı ?
../Nick’siz Nick Değişme:/say $$1 : /Quote Nick YeniNick veya /Raw Nick YeniNick ya da /!nick YeniNick | /say Yardım Edebileceğim Baika Bir Konu var mı

Alt + P yaparak Nicklist bölümüne ekleyiniz. mirc

mIRC indir | Nicklist Renklendirici ( dijital )

8 Ara, 2010  Yorum

on 1:ACTIVE:*: { if ($target ischan) && (%dcn-state == ON) { dcn.chan | haltdef } }
on 1:LOAD: {
if ($version < 6.0) { .unload -rs $script | echo -s 1 »14»15» 12 Mirc Version Düşük Version Yükselt http://www.mircindir.Biz.TR | halt }
else { dcn.first | dcn.update }
}
on *:CONNECT: {
set %dcn-me $me
if (%dcn-state == ON) {
echo -s 2,15 $+ $+(-=,$chr(123),4NOTICE2,$chr(125),=–>12) Dijital Nick Renklendirici Açık
var %dcn-cnt = $cnick(0)
while ( $cnick(%dcn-cnt) > 0 ) {
.cnick -r $cnick(%dcn-cnt)
dec %dcn-cnt
}
}
}
on ^*:DEHELP:#: {
if (%dcn-state == ON) {
if ($cnick($nick).color == %dcn-ic) || ($cnick($nick).color == %dcn-on) || ($cnick($nick).color == %dcn-hn) || ($cnick($nick).color == %dcn-an) || ($cnick($nick).color == %dcn-mn) { haltdef }
else {
if (($hnick == %dcn-me) && (%dcn-mn.chk == 1)) { .cnick $hnick %dcn-mn | haltdef }
if (($hnick ishop #) && (%dcn-hn.chk == 1)) { .cnick -r $hnick | haltdef }
}
}
}
on ^*:DEOP:#: {
if (%dcn-state == ON) {
if ($cnick($nick).color == %dcn-ic) || ($cnick($nick).color == %dcn-on) || ($cnick($nick).color == %dcn-hn) || ($cnick($nick).color == %dcn-an) || ($cnick($nick).color == %dcn-mn) { haltdef }
else {
if (($nick == %dcn-me) && (%dcn-mn.chk == 1)) { .cnick $nick %dcn-mn | haltdef }
if (($nick ishop #) && (%dcn-hn.chk == 1)) { .cnick $hnick %dcn-hn | haltdef }
if (($nick != %dcn-me) && ($nick isvoice #) && (%dcn-vn.chk == 1)) { .cnick $vnick %dcn-vn | haltdef }
if (($nick != %dcn-me) && ($nick !isvoice #) && (%dcn-nv.chk == 1)) { .cnick $nick %dcn-nv | haltdef }
}
}
}
on ^*:DEVOICE:#: {
if (%dcn-state == ON) {
if ($cnick($nick).color == %dcn-ic) || ($cnick($nick).color == %dcn-on) || ($cnick($nick).color == %dcn-hn) || ($cnick($nick).color == %dcn-an) || ($cnick($nick).color == %dcn-mn) { haltdef }
else {
if (($nick == %dcn-me) && (%dcn-mn.chk == 1)) { .cnick $nick %dcn-mn | haltdef }
if (($nick != %dcn-me) && (%dcn-on.chk == 1)) { .cnick $nick %dcn-on | haltdef }
if (($nick ishop #) && (%dcn-hn.chk == 1)) { .cnick $hnick %dcn-hn | haltdef }
if (($nick != %dcn-me) && ($nick isvoice #) && (%dcn-vn.chk == 1)) { .cnick $nick %dcn-vn | haltdef }
if (($nick != %dcn-me) && ($nick !isvoice #) && (%dcn-nv.chk == 1)) { .cnick $nick %dcn-nv }
}
}
}
on ^*:HELP:#: {
if (%dcn-state == ON) {
if ($cnick($nick).color == %dcn-ic) || ($cnick($nick).color == %dcn-on) || ($cnick($nick).color == %dcn-hn) || ($cnick($nick).color == %dcn-an) || ($cnick($nick).color == %dcn-mn) { haltdef }
else {
if (($nick == %dcn-me) && (%dcn-mn.chk == 1)) { .cnick $nick %dcn-mn | haltdef }
if (($nick ishop #) && (%dcn-hn.chk == 1)) { .cnick $hnick %dcn-hn | haltdef }
if (($nick != %dcn-me) && ($nick !ishop #) && ($nick isvoice #) && (%dcn-vn.chk == 1)) { .cnick $vnick %dcn-vn | haltdef }
if (($nick != %dcn-me) && ($nick !ishop #) && ($nick !isvoice #) && (%dcn-nv.chk == 1)) { .cnick $nick %dcn-nv }
}
}
}
on ^*:JOIN:#: {
if (%dcn-state == ON) {
if ($cnick($nick).color == %dcn-ic) || ($cnick($nick).color == %dcn-on) || ($cnick($nick).color == %dcn-hn) || ($cnick($nick).color == %dcn-an) || ($cnick($nick).color == %dcn-mn) { haltdef }
else {
if (($nick == %dcn-me) && (%dcn-mn.chk == 1)) { .who # | haltdef }
if ((o isin $usermode) && (%dcn-ic.chk == 1)) { .cnick $nick %dcn-ic | haltdef }
if (($nick != %dcn-me) && (%dcn-nv.chk == 1)) { .cnick $nick %dcn-nv | haltdef }
}
}
}
on ^*:KICK:#: { if (%dcn-state == ON) { .cnick -r $knick } }
on ^*:NICK: {
if ($nick == $me) { set %dcn-me $newnick }
if (%dcn-state == ON) {
if (($newnick == %dcn-me) && ($newnick isop #) && (%dcn-mn.chk == 1)) { .cnick -r $nick | .cnick $newnick %dcn-mn | haltdef }
if (($newnick != %dcn-me) && ($newnick isop #) && (%dcn-on.chk == 1)) { .cnick -r $nick | .cnick $newnick %dcn-on | haltdef }
if (($newnick != %dcn-me) && ($newnick ishop #) && (%dcn-hn.chk == 1)) { .cnick -r $nick | .cnick $newnick %dcn-hn | haltdef }
if (($newnick != %dcn-me) && ($newnick isvoice #) && (%dcn-vn.chk == 1)) { .cnick -r $nick | .cnick $newnick %dcn-vn | haltdef }
if (($newnick != %dcn-me) && ($newnick !isvoice #) && (%dcn-nv.chk == 1)) { .cnick -r $nick | .cnick $newnick %dcn-nv | haltdef }
}
}
on ^*:OP:#: {
if (%dcnstate == ON) {
if ($cnick($nick).color == %dcn-ic) || ($cnick($nick).color == %dcn-on) || ($cnick($nick).color == %dcn-hn) || ($cnick($nick).color == %dcn-an) || ($cnick($nick).color == %dcn-mn) { haltdef }
else {
if (($nick == %dcn-me) && (%dcn-mn.chk == 1)) { .cnick $opnick %dcn-mn | haltdef }
if (($nick != %dcn-me) && (%dcn-on.chk == 1)) { .cnick $opnick %dcn-on | haltdef }
}
}
}
on ^*:PART:#: { if (%dcn-state == ON) { .cnick -r $nick } }
on ^*:QUIT: { if (%dcn-state == ON) { .cnick -r $nick } }
on ^*:TEXT:*:#: {
if ((%dcn-state == ON) && (%dcn-chr.chk == 1) && (%dcn-brk.chk == 1)) {
if (%dcn-strip == On) {
if ($target ischan) { echo -tmi2 # $+(,,%dcn-brk,%dcn-l,,,%dcn-nic,$chr(32),$remove($nick(#,$nick).pnick,@,+,%,!,&,~),$chr(32),,,%dcn-brk,%dcn-r,1,) $strip($1-,burc) | haltdef }
else { echo -tlmi2 $nick $+(,,%dcn-brk,%dcn-l,,,%dcn-nic,$nick,,,%dcn-brk,%dcn-r,1,) $strip($1-,burc) | haltdef }
}
else {
if ($target ischan) { echo -tmi2 # $+(,,%dcn-brk,%dcn-l,,,%dcn-nic,$chr(32),$remove($nick(#,$nick).pnick,@,+,%,!,&,~),$chr(32),,,%dcn-brk,%dcn-r,1,) $1- | haltdef }
else { echo -tlmi2 $nick $+(,,%dcn-brk,%dcn-l,,,%dcn-nic,$chr(32),$nick,$chr(32),,,%dcn-brk,%dcn-r,1,) $1- | haltdef }
}
}
}
on ^*:TEXT:*:?: {
if ((%dcn-state == ON) && (%dcn-chr.chk == 1) && (%dcn-brk.chk == 1)) {
if (%dcn-strip == On) {
if ($target ischan) { echo -tmi2 # $+(,,%dcn-brk,%dcn-l,,,%dcn-nic,$chr(32),$remove($nick(#,$nick).pnick,@,+,%,!,&,~),$chr(32),,,%dcn-brk,%dcn-r,1,) $strip($1-,burc) | haltdef }
else { echo -tlmi2 $nick $+(,,%dcn-brk,%dcn-l,,,%dcn-nic,$nick,,,%dcn-brk,%dcn-r,1,) $strip($1-,burc) | haltdef }
}
else {
if ($target ischan) { echo -tmi2 # $+(,,%dcn-brk,%dcn-l,,,%dcn-nic,$chr(32),$remove($nick(#,$nick).pnick,@,+,%,!,&,~),$chr(32),,,%dcn-brk,%dcn-r,1,) $1- | haltdef }
else { echo -tlmi2 $nick $+(,,%dcn-brk,%dcn-l,,,%dcn-nic,$chr(32),$nick,$chr(32),,,%dcn-brk,%dcn-r,1,) $1- | haltdef }
}
}
}
on ^*:VOICE:#: {
if ((%dcn-state == ON) && (%dcn-vn.chk == 1)) {
if ($cnick($nick).color == %dcn-ic) || ($cnick($nick).color == %dcn-on) || ($cnick($nick).color == %dcn-hn) || ($cnick($nick).color == %dcn-an) || ($cnick($nick).color == %dcn-mn) { haltdef }
else {
if (($nick == %dcn-me) && (%dcn-mn.chk == 1)) { .cnick $vnick %dcn-mn | haltdef }
if (($nick != %dcn-me) && (%dcn-vn.chk == 1)) { .cnick $vnick %dcn-vn | haltdef }
}
}
}
on *:UNLOAD: { dcn.reset | unset %dcn-* }
CTCP 1:VERSION:*: { .notice $nick 2,15 $+ $+(-=,$chr(123),4NOTICE2,$chr(125),=–>2 ÖzeL Edit by absolut :)  }
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Raw
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
raw 301:*: { if ((%dcn-state == ON) && (%dcn-an.chk == 1)) { .cnick $2 %dcn-an } }
raw 313:*: { if ((%dcn-state == ON) && (%dcn-nic.chk == 1)) { .cnick $2 %dcn-ic } }
raw 315:*: { haltdef }
raw 352:*: {
if (%dcn-state == ON) {
if ($cnick($6).color == %dcn-ic) || ($cnick($6).color == %dcn-on) || ($cnick($6).color == %dcn-hn) || ($cnick($6).color == %dcn-mn) || ($cnick($6).color == %dcn-an) { halt }
else {
if ((%dcn-me == $6) && (%dcn-mn.chk == 1)) { .cnick $6 %dcn-mn | halt }
if ((%dcn-me != $6) && (* isin $7) && (%dcn-ic.chk == 1)) { .cnick $6 %dcn-ic | halt }
if ((%dcn-me != $6) && (G isin $7) && (%dcn-an.chk == 1)) { .cnick $6 %dcn-an | halt }
if ((%dcn-me != $6) && ($6 isop $2) && ($6 !ishop $2) && ($6 !isvoice $2) && (%dcn-on.chk == 1)) { .cnick $6 %dcn-on | haltdef }
if ((%dcn-me != $6) && ($6 !isop $2) && ($6 ishop $2) && ($6 !isvoice $2) && (%dcn-hn.chk == 1)) { .cnick $6 %dcn-hn | haltdef }
if ((%dcn-me != $6) && ($6 !isop $2) && ($6 !ishop $2) && ($6 isvoice $2) && (%dcn-vn.chk == 1)) { .cnick $6 %dcn-vn | haltdef }
if ((%dcn-me != $6) && ($6 !isop $2) && ($6 !ishop $2) && ($6 !isvoice $2) && (%dcn-nv.chk == 1)) { .cnick $6 %dcn-nv | haltdef }
}
}
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Menues
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Menu channel,menubar,query,status {
Dijital Nick Renkleri
.Nick Renklendirici aç: dialog -mco dcn dcn
.-
.Script Renkleri %dcn-strip : { if (%dcn-strip == On) { set %dcn-strip OFF } | else { set %dcn-strip ON } }
.-
.Tara # : dcn.chan
.-
.Tara Tüm Kanallari : dcn.update
.-
.Nick Renklendirici Sıfırla: { dcn.reset }
.-
.Sıfırla variables: { dcn.first }
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Dialogs
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
dialog dcn {
title “Dijital Renk Ayarlayici”
size -1 -1 162 91
option dbu
edit “L-Brkt Nick R-Brkt”, 28, 2 1 157 10, autohs center
box “Nick Renkleri “, 1, 1 11 74 65
box “Other colors and brackets”, 2, 74 11 87 65
box “”, 3, 1 72 160 18
combo 4, 4 19 35 70, drop
check “Ops”, 5, 41 20 30 10
combo 6, 4 30 35 70, drop
check “Half-ops”, 7, 41 31 30 10
combo 8, 4 41 35 70, drop
check “Voices”, 9, 41 42 30 10
combo 10, 4 52 35 70, drop
check “Regulars”, 11, 41 53 30 10
combo 12, 4 63 35 70, drop
check “Nickim”, 13, 41 64 30 10
combo 14, 77 19 35 70, drop
check “Ircops”, 15, 114 20 45 10
combo 16, 77 30 35 70, drop
check “Away nick”, 17, 114 31 45 10
combo 18, 77 41 35 70, drop
check “Brackets color”, 21, 114 53 45 10
combo 20, 77 53 35 70, drop
check “Nick brackets”, 19, 114 42 45 10
combo 22, 77 64 35 70, drop
check “Kanal nick”, 23, 114 64 45 10
button “Açık/Kapali”, 25, 4 78 50 10
button “Geri”, 26, 110 78 50 10, cancel
button “Kapat”, 27, 57 78 50 10, default ok
}
on 1:dialog:dcn:init:0: {
if (%dcn-on.chk == 1) did -c dcn 5
if (%dcn-hn.chk == 1) did -c dcn 7
if (%dcn-nv.chk == 1) did -c dcn 9
if (%dcn-vn.chk == 1) did -c dcn 11
if (%dcn-mn.chk == 1) did -c dcn 13
if (%dcn-ic.chk == 1) did -c dcn 15
if (%dcn-an.chk == 1) did -c dcn 17
if (%dcn-chr.chk == 1) did -c dcn 19
if (%dcn-brk.chk == 1) did -c dcn 21
if (%dcn-nic.chk == 1) did -c dcn 23
didtok -a $dname 4 32 White Black Dk.Blue Green Red Maroon Purple Orange Yellow Lt.Green Teal Cyan Blue Pink Dk.Grey Lt.Grey
didtok -a $dname 6 32 White Black Dk.Blue Green Red Maroon Purple Orange Yellow Lt.Green Teal Cyan Blue Pink Dk.Grey Lt.Grey
didtok -a $dname 8 32 White Black Dk.Blue Green Red Maroon Purple Orange Yellow Lt.Green Teal Cyan Blue Pink Dk.Grey Lt.Grey
didtok -a $dname 10 32 White Black Dk.Blue Green Red Maroon Purple Orange Yellow Lt.Green Teal Cyan Blue Pink Dk.Grey Lt.Grey
didtok -a $dname 14 32 White Black Dk.Blue Green Red Maroon Purple Orange Yellow Lt.Green Teal Cyan Blue Pink Dk.Grey Lt.Grey
didtok -a $dname 12 32 White Black Dk.Blue Green Red Maroon Purple Orange Yellow Lt.Green Teal Cyan Blue Pink Dk.Grey Lt.Grey
didtok -a $dname 16 32 White Black Dk.Blue Green Red Maroon Purple Orange Yellow Lt.Green Teal Cyan Blue Pink Dk.Grey Lt.Grey
didtok -a $dname 18 32 $chr(60) $chr(62) $+($chr(60),$chr(62)) $+($chr(40),$chr(41)) $+($chr(91),$chr(93)) /\ $+($chr(123),@,$chr(125)) $+($chr(60),=-) $+(-=,$chr(62)) $+($chr(123),=-) $+(-=,$chr(125)) -==- *¤§ §¤* ©º°¨ °º© ¨°º© °º®§ °º©§ $+(3,$chr(123),4,@,3,$chr(125))
didtok -a $dname 20 32 White Black Dk.Blue Green Red Maroon Purple Orange Yellow Lt.Green Teal Cyan Blue Pink Dk.Grey Lt.Grey
didtok -a $dname 22 32 White Black Dk.Blue Green Red Maroon Purple Orange Yellow Lt.Green Teal Cyan Blue Pink Dk.Grey Lt.Grey
did -ck $dname 4 $didwm(4,%dcn-on.clr)
did -ck $dname 6 $didwm(6,%dcn-hn.clr)
did -ck $dname 8 $didwm(8,%dcn-vn.clr)
did -ck $dname 10 $didwm(10,%dcn-nv.clr)
did -ck $dname 12 $didwm(12,%dcn-mn.clr)
did -ck $dname 14 $didwm(14,%dcn-ic.clr)
did -ck $dname 16 $didwm(16,%dcn-an.clr)
did -ck $dname 18 $didwm(18,%dcn-l)
did -ck $dname 20 $didwm(20,%dcn-brk.clr)
did -ck $dname 22 $didwm(22,%dcn-nic.clr)
did -ra $dname 25 %dcn-state
did -ra $dname 28 %dcn-l %dcn-me %dcn-r
}
on *:dialog:dcn:*:*: {
if ($devent == sclick) {
if ($did == 4) { if ($did(4).seltext) { set %dcn-on.clr $did(4).seltext | dcn.on4 } }
if ($did == 6) { if ($did(6).seltext) { set %dcn-hn.clr $did(6).seltext | dcn.hn6 } }
if ($did == 8) { if ($did(8).seltext) { set %dcn-vn.clr $did(8).seltext | dcn.vn8 } }
if ($did == 10) { if ($did(10).seltext) { set %dcn-nv.clr $did(10).seltext | dcn.nv10 } }
if ($did == 12) { if ($did(12).seltext) { set %dcn-mn.clr $did(12).seltext | dcn.mn12 } }
if ($did == 14) { if ($did(14).seltext) { set %dcn-ic.clr $did(14).seltext | dcn.ic14 } }
if ($did == 16) { if ($did(16).seltext) { set %dcn-an.clr $did(16).seltext | dcn.an16 } }
if ($did == 18) { if ($did(18).seltext) { set %dcn-l $did(18).seltext | dcn.chr18 } }
if ($did == 20) { if ($did(20).seltext) { set %dcn-brk.clr $did(20).seltext | dcn.brk20 } }
if ($did == 22) { if ($did(22).seltext) { set %dcn-nic.clr $did(22).seltext | dcn.nic22 } }
if ($did == 25) { if (%dcn-state == OFF) { set %dcn-state ON | did -ra $dname 25 %dcn-state | dcn.update } | else { set %dcn-state OFF | dcn.reset | did -ra $dname 25 %dcn-state } }
if ($did == 27) { set %dcn-on.chk $did(5).state | set %dcn-hn.chk $did(7).state | set %dcn-vn.chk $did(9).state | set %dcn-nv.chk $did(11).state | set %dcn-mn.chk $did(13).state | set %dcn-ic.chk $did(15).state | set %dcn-an.chk $did(17).state | set %dcn-chr.chk $did(19).state | set %dcn-brk.chk $did(21).state | set %dcn-nic.chk $did(23).state | .timerdcn 1 1 dcn.update }
}
if ($devent == edit) {
if ($did == 28) { %dcn- = $did($dname,28).text }
var %i = 1
while (%i <= $numtok(%dcn-,32)) {
if (%i >= 4) { did -ra $dname 28 %dcn-l %dcn-me %dcn-r }
set %dcn-l $gettok(%dcn-,1,32)
set %dcn-r $gettok(%dcn-,3,32)
inc %i
}
}
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Aliases
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
alias -l dcn.on4 {
if (%dcn-on.clr == White) { set %dcn-on 00 | halt }
if (%dcn-on.clr == Black) { set %dcn-on 01 | halt }
if (%dcn-on.clr == Dk.Blue) { set %dcn-on 02 | halt }
if (%dcn-on.clr == Green) { set %dcn-on 03 | halt }
if (%dcn-on.clr == Red) { set %dcn-on 04 | halt }
if (%dcn-on.clr == Maroon) { set %dcn-on 05 | halt }
if (%dcn-on.clr == Purple) { set %dcn-on 06 | halt }
if (%dcn-on.clr == Orange) { set %dcn-on 07 | halt }
if (%dcn-on.clr == Yellow) { set %dcn-on 08 | halt }
if (%dcn-on.clr == Lt.Green) { set %dcn-on 09 | halt }
if (%dcn-on.clr == Teal) { set %dcn-on 10 | halt }
if (%dcn-on.clr == Cyan) { set %dcn-on 11 | halt }
if (%dcn-on.clr == Blue) { set %dcn-on 12 | halt }
if (%dcn-on.clr == Pink) { set %dcn-on 13 | halt }
if (%dcn-on.clr == Dk.Grey) { set %dcn-on 14 | halt }
if (%dcn-on.clr == Lt.Grey) { set %dcn-on 15 | halt }
}
alias -l dcn.hn6 {
if (%dcn-hn.clr == White) { set %dcn-hn 00 | halt }
if (%dcn-hn.clr == Black) { set %dcn-hn 01 | halt }
if (%dcn-hn.clr == Dk.Blue) { set %dcn-hn 02 | halt }
if (%dcn-hn.clr == Green) { set %dcn-hn 03 | halt }
if (%dcn-hn.clr == Red) { set %dcn-hn 04 | halt }
if (%dcn-hn.clr == Maroon) { set %dcn-hn 05 | halt }
if (%dcn-hn.clr == Purple) { set %dcn-hn 06 | halt }
if (%dcn-hn.clr == Orange) { set %dcn-hn 07 | halt }
if (%dcn-hn.clr == Yellow) { set %dcn-hn 08 | halt }
if (%dcn-hn.clr == Lt.Green) { set %dcn-hn 09 | halt }
if (%dcn-hn.clr == Teal) { set %dcn-hn 10 | halt }
if (%dcn-hn.clr == Cyan) { set %dcn-hn 11 | halt }
if (%dcn-hn.clr == Blue) { set %dcn-hn 12 | halt }
if (%dcn-hn.clr == Pink) { set %dcn-hn 13 | halt }
if (%dcn-hn.clr == Dk.Grey) { set %dcn-hn 14 | halt }
if (%dcn-hn.clr == Lt.Grey) { set %dcn-hn 15 | halt }
}
alias -l dcn.vn8 {
if (%dcn-vn.clr == White) { set %dcn-vn 00 | halt }
if (%dcn-vn.clr == Black) { set %dcn-vn 01 | halt }
if (%dcn-vn.clr == Dk.Blue) { set %dcn-vn 02 | halt }
if (%dcn-vn.clr == Green) { set %dcn-vn 03 | halt }
if (%dcn-vn.clr == Red) { set %dcn-vn 04 | halt }
if (%dcn-vn.clr == Maroon) { set %dcn-vn 05 | halt }
if (%dcn-vn.clr == Purple) { set %dcn-vn 06 | halt }
if (%dcn-vn.clr == Orange) { set %dcn-vn 07 | halt }
if (%dcn-vn.clr == Yellow) { set %dcn-vn 08 | halt }
if (%dcn-vn.clr == Lt.Green) { set %dcn-vn 09 | halt }
if (%dcn-vn.clr == Teal) { set %dcn-vn 10 | halt }
if (%dcn-vn.clr == Cyan) { set %dcn-vn 11 | halt }
if (%dcn-vn.clr == Blue) { set %dcn-vn 12 | halt }
if (%dcn-vn.clr == Pink) { set %dcn-vn 13 | halt }
if (%dcn-vn.clr == Dk.Grey) { set %dcn-vn 14 | halt }
if (%dcn-vn.clr == Lt.Grey) { set %dcn-vn 15 | halt }
}
alias -l dcn.nv10 {
if (%dcn-nv.clr == White) { set %dcn-nv 00 | halt }
if (%dcn-nv.clr == Black) { set %dcn-nv 01 | halt }
if (%dcn-nv.clr == Dk.Blue) { set %dcn-nv 02 | halt }
if (%dcn-nv.clr == Green) { set %dcn-nv 03 | halt }
if (%dcn-nv.clr == Red) { set %dcn-nv 04 | halt }
if (%dcn-nv.clr == Maroon) { set %dcn-nv 05 | halt }
if (%dcn-nv.clr == Purple) { set %dcn-nv 06 | halt }
if (%dcn-nv.clr == Orange) { set %dcn-nv 07 | halt }
if (%dcn-nv.clr == Yellow) { set %dcn-nv 08 | halt }
if (%dcn-nv.clr == Lt.Green) { set %dcn-nv 09 | halt }
if (%dcn-nv.clr == Teal) { set %dcn-nv 10 | halt }
if (%dcn-nv.clr == Cyan) { set %dcn-nv 11 | halt }
if (%dcn-nv.clr == Blue) { set %dcn-nv 12 | halt }
if (%dcn-nv.clr == Pink) { set %dcn-nv 13 | halt }
if (%dcn-nv.clr == Dk.Grey) { set %dcn-nv 14 | halt }
if (%dcn-nv.clr == Lt.Grey) { set %dcn-nv 15 | halt }
}
alias -l dcn.mn12 {
if (%dcn-mn.clr == White) { set %dcn-mn 00 | halt }
if (%dcn-mn.clr == Black) { set %dcn-mn 01 | halt }
if (%dcn-mn.clr == Dk.Blue) { set %dcn-mn 02 | halt }
if (%dcn-mn.clr == Green) { set %dcn-mn 03 | halt }
if (%dcn-mn.clr == Red) { set %dcn-mn 04 | halt }
if (%dcn-mn.clr == Maroon) { set %dcn-mn 05 | halt }
if (%dcn-mn.clr == Purple) { set %dcn-mn 06 | halt }
if (%dcn-mn.clr == Orange) { set %dcn-mn 07 | halt }
if (%dcn-mn.clr == Yellow) { set %dcn-mn 08 | halt }
if (%dcn-mn.clr == Lt.Green) { set %dcn-mn 09 | halt }
if (%dcn-mn.clr == Teal) { set %dcn-mn 10 | halt }
if (%dcn-mn.clr == Cyan) { set %dcn-mn 11 | halt }
if (%dcn-mn.clr == Blue) { set %dcn-mn 12 | halt }
if (%dcn-mn.clr == Pink) { set %dcn-mn 13 | halt }
if (%dcn-mn.clr == Dk.Grey) { set %dcn-mn 14 | halt }
if (%dcn-mn.clr == Lt.Grey) { set %dcn-mn 15 | halt }
}
alias -l dcn.ic14 {
if (%dcn-ic.clr == White) { set %dcn-ic 00 | halt }
if (%dcn-ic.clr == Black) { set %dcn-ic 01 | halt }
if (%dcn-ic.clr == Dk.Blue) { set %dcn-ic 02 | halt }
if (%dcn-ic.clr == Green) { set %dcn-ic 03 | halt }
if (%dcn-ic.clr == Red) { set %dcn-ic 04 | halt }
if (%dcn-ic.clr == Maroon) { set %dcn-ic 05 | halt }
if (%dcn-ic.clr == Purple) { set %dcn-ic 06 | halt }
if (%dcn-ic.clr == Orange) { set %dcn-ic 07 | halt }
if (%dcn-ic.clr == Yellow) { set %dcn-ic 08 | halt }
if (%dcn-ic.clr == Lt.Green) { set %dcn-ic 09 | halt }
if (%dcn-ic.clr == Teal) { set %dcn-ic 10 | halt }
if (%dcn-ic.clr == Cyan) { set %dcn-ic 11 | halt }
if (%dcn-ic.clr == Blue) { set %dcn-ic 12 | halt }
if (%dcn-ic.clr == Pink) { set %dcn-ic 13 | halt }
if (%dcn-ic.clr == Dk.Grey) { set %dcn-ic 14 | halt }
if (%dcn-ic.clr == Lt.Grey) { set %dcn-ic 15 | halt }
}
alias -l dcn.an16 {
if (%dcn-an.clr == White) { set %dcn-an 00 | halt }
if (%dcn-an.clr == Black) { set %dcn-an 01 | halt }
if (%dcn-an.clr == Dk.Blue) { set %dcn-an 02 | halt }
if (%dcn-an.clr == Green) { set %dcn-an 03 | halt }
if (%dcn-an.clr == Red) { set %dcn-an 04 | halt }
if (%dcn-an.clr == Maroon) { set %dcn-an 05 | halt }
if (%dcn-an.clr == Purple) { set %dcn-an 06 | halt }
if (%dcn-an.clr == Orange) { set %dcn-an 07 | halt }
if (%dcn-an.clr == Yellow) { set %dcn-an 08 | halt }
if (%dcn-an.clr == Lt.Green) { set %dcn-an 09 | halt }
if (%dcn-an.clr == Teal) { set %dcn-an 10 | halt }
if (%dcn-an.clr == Cyan) { set %dcn-an 11 | halt }
if (%dcn-an.clr == Blue) { set %dcn-an 12 | halt }
if (%dcn-an.clr == Pink) { set %dcn-an 13 | halt }
if (%dcn-an.clr == Dk.Grey) { set %dcn-an 14 | halt }
if (%dcn-an.clr == Lt.Grey) { set %dcn-an 15 | halt }
}
alias -l dcn.chr18 {
if (%dcn-l == $chr(62)) { set %dcn-r $chr(60) | goto end }
elseif (%dcn-l == $chr(60)) { set %dcn-r $chr(62) | goto end }
elseif (%dcn-l == $+($chr(60),$chr(62))) { set %dcn-r $+($chr(60),$chr(62)) | goto end }
elseif (%dcn-l == $+($chr(40),$chr(41))) { set %dcn-r $+($chr(40),$chr(41)) | goto end }
elseif (%dcn-l == $+($chr(91),$chr(93))) { set %dcn-r $+($chr(91),$chr(93)) | goto end }
elseif (%dcn-l == /\) { set %dcn-r /\ | goto end }
elseif (%dcn-l == $+($chr(123),@,$chr(125))) { set %dcn-r $+($chr(123),@,$chr(125)) | goto end }
elseif (%dcn-l == $+($chr(60),=-)) { set %dcn-r $+(-=,$chr(62)) | goto end }
elseif (%dcn-l == $+(-=,$chr(62))) { set %dcn-r $+($chr(60),=-) | goto end }
elseif (%dcn-l == -==-) { set %dcn-r -==- | goto end }
elseif (%dcn-l == $+($chr(123),=-)) { set %dcn-r $+(-=,$chr(125)) | goto end }
elseif (%dcn-l == $+(-=,$chr(125))) { set %dcn-r $+($chr(123),=-) | goto end }
elseif (%dcn-l == *¤§) { set %dcn-r §¤* | goto end }
elseif (%dcn-l == §¤*) { set %dcn-r *¤§ | goto end }
elseif (%dcn-l == ©º°¨) { set %dcn-r ¨°º© | goto end }
elseif (%dcn-l == ¨°º©) { set %dcn-r ©º°¨ | goto end }
elseif (%dcn-l == °º©) { set %dcn-r ©º° | goto end }
elseif (%dcn-l == °º®§) { set %dcn-r §®º° | goto end }
elseif (%dcn-l == °º©§) { set %dcn-r §©º° | goto end }
elseif (%dcn-l == $+(3,$chr(123),4,@,3,$chr(125))) { set %dcn-r $+(3,$chr(123),4,@,3,$chr(125)) | goto end }
:end {
did -ra $dname 28 %dcn-l %dcn-me %dcn-r
}
}
alias -l dcn.brk20 {
if (%dcn-brk.clr == White) { set %dcn-brk 00 | halt }
if (%dcn-brk.clr == Black) { set %dcn-brk 01 | halt }
if (%dcn-brk.clr == Dk.Blue) { set %dcn-brk 02 | halt }
if (%dcn-brk.clr == Green) { set %dcn-brk 03 | halt }
if (%dcn-brk.clr == Red) { set %dcn-brk 04 | halt }
if (%dcn-brk.clr == Maroon) { set %dcn-brk 05 | halt }
if (%dcn-brk.clr == Purple) { set %dcn-brk 06 | halt }
if (%dcn-brk.clr == Orange) { set %dcn-brk 07 | halt }
if (%dcn-brk.clr == Yellow) { set %dcn-brk 08 | halt }
if (%dcn-brk.clr == Lt.Green) { set %dcn-brk 09 | halt }
if (%dcn-brk.clr == Teal) { set %dcn-brk 10 | halt }
if (%dcn-brk.clr == Cyan) { set %dcn-brk 11 | halt }
if (%dcn-brk.clr == Blue) { set %dcn-brk 12 | halt }
if (%dcn-brk.clr == Pink) { set %dcn-brk 13 | halt }
if (%dcn-brk.clr == Dk.Grey) { set %dcn-brk 14 | halt }
if (%dcn-brk.clr == Lt.Grey) { set %dcn-brk 15 | halt }
}
alias -l dcn.nic22 {
if (%dcn-nic.clr == White) { set %dcn-nic 00 | halt }
if (%dcn-nic.clr == Black) { set %dcn-nic 01 | halt }
if (%dcn-nic.clr == Dk.Blue) { set %dcn-nic 02 | halt }
if (%dcn-nic.clr == Green) { set %dcn-nic 03 | halt }
if (%dcn-nic.clr == Red) { set %dcn-nic 04 | halt }
if (%dcn-nic.clr == Maroon) { set %dcn-nic 05 | halt }
if (%dcn-nic.clr == Purple) { set %dcn-nic 06 | halt }
if (%dcn-nic.clr == Orange) { set %dcn-nic 07 | halt }
if (%dcn-nic.clr == Yellow) { set %dcn-nic 08 | halt }
if (%dcn-nic.clr == Lt.Green) { set %dcn-nic 09 | halt }
if (%dcn-nic.clr == Teal) { set %dcn-nic 10 | halt }
if (%dcn-nic.clr == Cyan) { set %dcn-nic 11 | halt }
if (%dcn-nic.clr == Blue) { set %dcn-nic 12 | halt }
if (%dcn-nic.clr == Pink) { set %dcn-nic 13 | halt }
if (%dcn-nic.clr == Dk.Grey) { set %dcn-nic 14 | halt }
if (%dcn-nic.clr == Lt.Grey) { set %dcn-nic 15 | halt }
}
alias -l dcn.update {
if (%dcn-state != ON) { set %dcn-state ON }
var %i = 1, %c, %n, %dcn-nick
while ($scon(%i)) {
scon %i
%c = 1
while ($chan(%c)) {
%n = 1
while ($nick($chan(%c),%n)) {
%dcn-nick = $nick($chan(%c),%n)
if ($cnick(%dcn-nick).color == %dcn-ic) || ($cnick(%dcn-nick).color == %dcn-on) || ($cnick(%dcn-nick).color == %dcn-hn) || ($cnick(%dcn-nick).color == %dcn-an) || ($cnick(%dcn-nick).color == %dcn-mn) { haltdef }
else {
if ((%dcn-mn.chk == 1) && (%dcn-nick == %dcn-me)) { .cnick %dcn-nick %dcn-mn | inc %n | haltdef }
if ((%dcn-on.chk == 1) && (%dcn-nick != %dcn-me) && (%dcn-nick isop $chan(%c))) { .cnick %dcn-nick %dcn-on | haltdef }
if ((%dcn-hn.chk == 1) && (%dcn-nick != %dcn-me) && (%dcn-nick !isop $chan(%c)) && (%dcn-nick ishop $chan(%c)) && (%dcn-nick !isvoice $chan(%c))) { .cnick %dcn-nick %dcn-hn | haltdef }
if ((%dcn-vn.chk == 1) && (%dcn-nick != %dcn-me) && (%dcn-nick !isop $chan(%c)) && (%dcn-nick !ishop $chan(%c)) && (%dcn-nick isvoice $chan(%c))) { .cnick %dcn-nick %dcn-vn | haltdef }
if ((%dcn-nv.chk == 1) && (%dcn-nick != %dcn-me) && (%dcn-nick !isop $chan(%c)) && (%dcn-nick !ishop $chan(%c)) && (%dcn-nick !isvoice $chan(%c))) { .cnick %dcn-nick %dcn-nv | haltdef }
}
inc %n
}
inc %c
}
inc %i
}
scon -r
}
alias -l dcn.chan {
if (%dcn-state != ON) { set %dcn-state ON }
var %n = 1, %dcn-nick
while ($nick($chan,%n)) {
%dcn-nick = $nick($chan,%n)
if ($cnick(%dcn-nick).color == %dcn-ic) || ($cnick(%dcn-nick).color == %dcn-on) || ($cnick(%dcn-nick).color == %dcn-hn) || ($cnick(%dcn-nick).color == %dcn-an) || ($cnick(%dcn-nick).color == %dcn-mn) { haltdef }
else {
if ((%dcn-mn.chk == 1) && (%dcn-nick == %dcn-me)) { .cnick %dcn-nick %dcn-mn | haltdef }
if ((%dcn-on.chk == 1) && (%dcn-nick != %dcn-me) && (%dcn-nick isop $chan) && (%dcn-nick !ishop $chan)) { .cnick %dcn-nick %dcn-on | haltdef }
if ((%dcn-hn.chk == 1) && (%dcn-nick != %dcn-me) && (%dcn-nick !isop $chan) && (%dcn-nick ishop $chan)) { .cnick %dcn-nick %dcn-hn | haltdef }
if ((%dcn-vn.chk == 1) && (%dcn-nick != %dcn-me) && (%dcn-nick !isop $chan) && (%dcn-nick !ishop $chan) && (%dcn-nick isvoice $chan)) { .cnick %dcn-nick %dcn-vn | haltdef }
if ((%dcn-nv.chk == 1) && (%dcn-nick != %dcn-me) && (%dcn-nick !isop $chan) && (%dcn-nick !ishop $chan) && (%dcn-nick !isvoice $chan)) { .cnick %dcn-nick %dcn-nv | haltdef }
}
inc %n 1
}
}
alias -l dcn.reset {
var %dcn-cnt = $cnick(0)
while ( $cnick(%dcn-cnt) > 0 ) {
.cnick -r $cnick(%dcn-cnt)
dec %dcn-cnt
}
}
alias -l dcn.first {
set %dcn-on.chk 1 | set %dcn-on.clr Blue | set %dcn-on 12
set %dcn-hn.chk 1 | set %dcn-hn.clr Dk.Blue | set %dcn-hn 02
set %dcn-vn.chk 1 | set %dcn-vn.clr Green | set %dcn-vn 03
set %dcn-nv.chk 1 | set %dcn-nv.clr Maroon | set %dcn-nv 05
set %dcn-ic.chk 1 | set %dcn-ic.clr Purple | set %dcn-ic 06
set %dcn-an.chk 1 | set %dcn-an.clr Yellow | set %dcn-an 08
set %dcn-mn.chk 1 | set %dcn-mn.clr Orange | set %dcn-mn 07
set %dcn-brk.chk 1 | set %dcn-brk.clr Red | set %dcn-brk 04
set %dcn-nic.chk 1 | set %dcn-nic.clr Blue | set %dcn-nic 12
set %dcn-chr.chk 1 | set %dcn-strip OFF | set %dcn-state ON
set %dcn-l 3{4@3} | set %dcn-r 3{4@3} | set %dcn-me $me
dcn.update
}

mIRC indir | chanserv kontrol addonu

8 Ara, 2010  Yorum

alias cspanel { dialog -m cspanel cspanel }
dialog cspanel {
title ” ChanServ Kontrol – By mirc indir”
size -1 -1 279 202
option dbu
box “Ana İşlemler”, 1, 2 1 196 24
button “Kanal Kaydet”, 2, 6 9 43 12
button “Kanalı Tanıt”, 3, 52 9 42 12
button “Kaydını Düşür”, 4, 97 9 46 12
combo 5, 206 9 60 100, size drop
box “İşlem Yapılacak Kanal”, 6, 202 1 70 24
button “Kanal İnfo”, 7, 149 9 43 12
box “Access İşlemleri”, 8, 2 27 195 26
button “Access Ekle”, 9, 6 36 42 12
button “Access Sil”, 10, 52 36 42 12
button “Access Listele”, 11, 97 36 47 12
button “Access Count”, 12, 150 36 43 12
box “Akick İşlemleri”, 13, 2 54 195 26
button “Akick Ekle”, 14, 6 63 42 12
button “Akick Sil”, 15, 52 63 42 12
button “Akick Listele”, 16, 97 63 47 12
button “Akick View”, 17, 149 63 43 12
box “Kanal İşlemleri”, 18, 2 81 147 39
button “Founder Değiştir”, 19, 6 90 47 12
button “Açıklama Değiştir”, 20, 6 104 47 12
button “Şifre Değiştir”, 22, 56 90 39 12
button “URL Değiştir”, 23, 56 104 39 12
button “EMAIL Değiştir”, 25, 101 90 43 12
button “Giriş Mesajı”, 26, 101 104 43 12
box “Topic Lock”, 21, 199 27 74 26
button “Aç”, 24, 202 35 28 12
button “Kapa”, 27, 238 35 28 12
box “Keep Topic”, 28, 200 54 74 26
button “Aç”, 29, 202 63 28 12
button “Kapa”, 30, 238 63 28 12
box “Private”, 31, 151 81 46 39
button “Aç”, 32, 155 90 37 12
button “Kapa”, 33, 155 104 37 12
box “Restricted”, 34, 200 81 35 39
button “Aç”, 35, 202 90 28 12
button “Kapa”, 36, 202 104 28 12
box “SecureOps”, 37, 238 81 36 39
button “Aç”, 38, 242 90 28 12
button “Kapa”, 39, 242 105 28 12
box “Levels İşlemleri”, 40, 2 120 275 58
box “AutoProtect”, 41, 4 126 70 24
button “Seviye”, 42, 7 134 29 12
button “İptal Et”, 43, 39 134 29 12
box “AutoOp”, 44, 4 150 70 25
button “Seviye”, 45, 7 157 30 12
button “İptal Et”, 46, 40 157 29 12
box “AutoHalfop”, 47, 77 126 69 24
button “Seviye”, 48, 80 134 29 12
button “İptal Et”, 49, 112 134 29 12
box “AutoVoice”, 50, 77 150 69 25
button “Seviye”, 51, 80 157 30 12
button “İptal Et”, 52, 112 157 29 12
box “Acc-Change”, 53, 149 126 69 24
box “Acc-List”, 54, 149 150 69 25
button “Seviye”, 55, 153 134 29 12
button “İptal Et”, 56, 185 134 29 12
button “Seviye”, 57, 153 157 30 12
button “İptal Et”, 58, 186 157 29 12
box “Akick”, 59, 219 126 55 24
button “Seviye”, 60, 222 134 23 12
button “İptal Et”, 61, 248 134 23 12
box “Set”, 62, 219 150 55 24
button “Seviye”, 63, 222 157 23 12
button “İptal Et”, 64, 248 157 23 12
button “TAMAM/KAPAT”, 65, 222 180 55 20, ok
}
on *:dialog:cspanel:*:*: {
if ($devent == init) {
did -a $dname 5 $chan
var %q 1
var %p $chan(0)
while (%q <= %p) {
did -a cspanel 5 $chan(%q)
inc %q
}
}
if ($devent == sclick) {
if ($did == 2) {
cs register $did(5) $?=”Kanal İçin Şifre Giriniz” $?=”Kanal İçin Açıklama Giriniz”
}
if ($did == 3) {
cs identify $did(5) $?=”Kanal Şifresini Girin”
}
if ($did == 4) {
cs drop $did(5)
}
if ($did == 7) {
cs info $did(5)
}
if ($did == 9) {
cs access $did(5) add $?=”Access Eklenecek Nicki Yazın” $?=”Access Seviyesini Yazın”
}
if ($did == 10) {
cs access $did(5) del $?=”Access Silinecek Nicki Yazın”
}
if ($did == 11) {
cs access $did(5) list
}
if ($did == 12) {
cs access $did(5) count
}
if ($did == 14) {
cs akick $did(5) add $?=”Akicke Alınacak Nicki Yazın” $+ !*@* $?=”Akick Sebebi”
}
if ($did == 15) {
cs akick $did(5) del $?=”Akick Silinecek Nicki Yazın” $+ !*@*
}
if ($did == 16) {
cs akick $did(5) list
}
if ($did == 17) {
cs akick $did(5) view
}
if ($did == 19) {
cs set $did(5) founder $?=”Yeni Founder Nickini Yazın”
}
if ($did == 20) {
cs set $did(5) desc $?=”Yeni Açıklama Girin”
}
if ($did == 22) {
cs set $did(5) password $?=”Yeni Şifreyi Girin”
}
if ($did == 23) {
cs set $did(5) url http:// $+ $?=”Yeni URL Adresi Girin”
}
if ($did == 24) {
cs set $did(5) topiclock on
}
if ($did == 25) {
cs set $did(5) email $?=”Yeni EMAIL Adresi Girin”
}
if ($did == 26) {
cs set $did(5) entrymsg $?=”Yeni Giriş Mesajını Yazın”
}
if ($did == 27) {
cs set $did(5) topiclock off
}
if ($did == 29) {
cs set $did(5) keeptopic on
}
if ($did == 30) {
cs set $did(5) keeptopic off
}
if ($did == 32) {
cs set $did(5) private on
}
if ($did == 33) {
cs set $did(5) private off
}
if ($did == 35) {
cs set $did(5) restricted on
}
if ($did == 36) {
cs set $did(5) restricted off
}
if ($did == 38) {
cs set $did(5) secureops on
}
if ($did == 39) {
cs set $did(5) secureops off
}
if ($did == 42) {
cs levels $did(5) set autoprotect $?=”Seviye Girin”
}
if ($did == 43) {
cs levels $did(5) dis autoprotect
}
if ($did == 45) {
cs levels $did(5) set autoop $?=”Seviye Girin”
}
if ($did == 46) {
cs levels $did(5) dis autoop
}
if ($did == 48) {
cs levels $did(5) set autohalfop $?=”Seviye Girin”
}
if ($did == 49) {
cs levels $did(5) dis autohalfop
}
if ($did == 51) {
cs levels $did(5) set autovoice $?=”Seviye Girin”
}
if ($did == 52) {
cs levels $did(5) dis autovoice
}
if ($did == 55) {
cs levels $did(5) set acc-change $?=”Seviye Girin”
}
if ($did == 56) {
cs levels $did(5) dis acc-change
}
if ($did == 57) {
cs levels $did(5) set acc-list $?=”Seviye Girin”
}
if ($did == 58) {
cs levels $did(5) dis acc-list
}
if ($did == 60) {
cs levels $did(5) set akick $?=”Seviye Girin”
}
if ($did == 61) {
cs levels $did(5) dis akick
}
if ($did == 63) {
cs levels $did(5) set set $?=”Seviye Girin”
}
if ($did == 64) {
cs levels $did(5) dis set
}
}
}
« Onceki Sayfa Sonraki Sayfa »