IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Korumalar Penceresi (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/315318-korumalar-penceresi.html)

NycX 06 Şubat 2010 01:38

Korumalar Penceresi
 
İşte Size Koruma Dialog Penceresi
Bu Kod sayesinde Korumalarınızı ayarlıyabilirsiniz
Buyrun Kodunuz;

Kod:

alias script1 { if ($dialog(script1)) { dialog -c script1 } | dialog -ma script1 script1 }
dialog script1 {
  title " Askkafe.Com - Korumalar"
  size -1 -1 116 128
  option dbu
  button "Genel Kanal Korumaları", 1, 6 10 103 12
  button "Script Yazı Korumaları", 2, 6 24 103 12
  button "Mass Menü Korumaları", 3, 6 38 103 12
  button "Genel Kullanıcı Korumaları", 4, 6 66 103 12
  box "Kanal Korumaları", 5, 2 1 112 55
  box "Kullanıcı Korumaları", 6, 2 58 112 24
  box "Script Ayarları", 7, 2 83 112 29
  check "Özelleri Kapat", 8, 6 91 45 10, flat
  check "Nick Uyarıcı", 9, 6 99 50 10, flat
  check "Ses Efekteri", 10, 59 91 50 10, flat
  check "Clone Uyarıcı", 11, 59 99 50 10, flat
  button "Ayarları Kaydet ve Kapat", 12, 2 114 112 12, ok
}
on 1:dialog:script1:sclick:*:{
  if ($did == 1 ) { /dialog -m krm krm }
  if ($did == 2 ) { /dialog -m krm2 krm2 }
  if ($did == 3 ) { /dialog -m krm3 krm3 }
  if ($did == 4 ) { /dialog -m krm4 krm4 }
  if ($did(8).state == 1) { .enable #ozelkapat } | else { .disable #ozelkapat }
  if ($did(9).state == 1) { .enable #nickuyar } | else { .disable #nickuyar }
  if ($did(10).state == 1) { .enable #sesefect } | else { .disable #sesefect }
  if ($did(11).state == 1) { .enable #cloneuyar } | else { .disable #cloneuyar }
}
on 1:dialog:script1:init:0:{
  if ($group(#ozelkapat) == on) { did -c script1 8 }
  if ($group(#nickuyar) == on) { did -c script1 9 }
  if ($group(#sesefect) == on) { did -c script1 10 }
  if ($group(#cloneuyar) == on) { did -c script1 11 }
}
;--------------------------------------------------------------------------------
 
alias krm { if ($dialog(krm)) { dialog -c krm } | dialog -ma krm krm }
dialog krm {
  title " Askkafe.Com- Genel Kanal Korumaları"
  size -1 -1 178 88
  option dbu
  box "Genel Kanal Korumaları", 1, 1 2 136 84
  check "Telefon No Koruması", 2, 3 11 61 10, flat
  check "Küfür Koruması", 3, 3 20 59 10, flat
  check "Reklam Koruması", 4, 3 29 53 10, flat
  check "Tekrar Koruması", 5, 3 38 50 10, flat
  check "Flood Koruması", 6, 3 47 50 10, flat
  check "Bad Nick Koruması", 7, 71 12 57 10, flat
  check "Bad Ident Koruması", 8, 71 21 58 10, flat
  check "Oto Mesaj Koruması", 9, 71 30 59 10, flat
  check "URL Reklam Koruması", 10, 71 39 63 10, flat
  check "Özele Reklam", 11, 71 48 64 10, flat
  check "Özele Küfür", 12, 3 56 57 10, flat
  check "İnvite Koruması", 13, 71 57 55 10, flat
  check "Join/Part Flood", 14, 3 65 50 10, flat
  check "Virüs Koruması", 15, 71 66 50 10, flat
  check "Guest Nick Koruması", 16, 3 74 62 10, flat
  check "Banlananları Kickle", 17, 71 75 57 10, flat
  button "Ayarı Kaydet", 18, 139 5 37 80, ok
}
on 1:dialog:krm:sclick:*:{
  if ($did(2).state == 1) { .enable #telno } | else { .disable #telno }
  if ($did(3).state == 1) { .enable #kkufur } | else { .disable #kkufur }
  if ($did(4).state == 1) { .enable #reklampro } | else { .disable #reklampro }
  if ($did(5).state == 1) { .enable #tekrar } | else { .disable #tekrar }
  if ($did(6).state == 1) { .enable #kflood } | else { .disable #kflood }
  if ($did(7).state == 1) { .enable #badnick } | else { .disable #badnick }
  if ($did(8).state == 1) { .enable #badident } | else { .disable #badident }
  if ($did(9).state == 1) { .enable #amsgpro } | else { .disable #amsgpro }
  if ($did(10).state == 1) { .enable #URLPRO } | else { .disable #URLPRO }
  if ($did(11).state == 1) { .enable #ozelreklam } | else { .disable #ozelreklam }
  if ($did(12).state == 1) { .enable #qswear } | else { .disable #qswear }
  if ($did(13).state == 1) { .enable #invitim } | else { .disable #invitim }
  if ($did(14).state == 1) { .enable #jflood } | else { .disable #jflood }
  if ($did(15).state == 1) { .enable #exepro } | else { .disable #exepro }
  if ($did(16).state == 1) { .enable #guest } | else { .disable #guest }
  if ($did(17).state == 1) { .enable #bank } | else { .disable #bank }
}
on 1:dialog:krm:init:0:{
  if ($group(#telno) == on) { did -c krm 2 }
  if ($group(#kkufur) == on) { did -c krm 3 }
  if ($group(#reklampro) == on) { did -c krm 4 }
  if ($group(#tekrar) == on) { did -c krm 5 }
  if ($group(#kflood) == on) { did -c krm 6 }
  if ($group(#badnick) == on) { did -c krm 7 }
  if ($group(#badident) == on) { did -c krm 8 }
  if ($group(#amsgpro) == on) { did -c krm 9 }
  if ($group(#URLPRO) == on) { did -c krm 10 }
  if ($group(#ozelreklam) == on) { did -c krm 11 }
  if ($group(#qswear) == on) { did -c krm 12 }
  if ($group(#invitim) == on) { did -c krm 13 }
  if ($group(#jflood) == on) { did -c krm 14 }
  if ($group(#exepro) == on) { did -c krm 15 }
  if ($group(#guest) == on) { did -c krm 16 }
  if ($group(#bank) == on) { did -c krm 17 }
}
;--------------------------------------------------------------------------------
alias krm2 { if ($dialog(krm2)) { dialog -c krm2 } | dialog -ma krm2 krm2 }
dialog krm2 {
  title " Yazı Koruması"
  size -1 -1 72 75
  option dbu
  box "Script Yazı Korumaları", 1, 1 1 70 57
  check "Renkli Yazı Koruması", 2, 5 9 61 10,flat
  check "Çizgili Yazı Koruması", 3, 5 18 59 10,flat
  check "Büyük Harf Koruması", 4, 5 27 62 10,flat
  check "Uzun Yazı Koruması", 5, 5 36 58 10,flat
  check "Kalın Yazı Koruması", 6, 5 45 58 10,flat
  button "Kaydet", 7, 1 60 70 12, ok
}
on 1:dialog:krm2:sclick:*:{
  if ($did(2).state == 1) { .enable #renk } | else { .disable #renk }
  if ($did(3).state == 1) { .enable #underline } | else { .disable #underline }
  if ($did(4).state == 1) { .enable #caps } | else { .disable #caps }
  if ($did(5).state == 1) { .enable #msgpro } | else { .disable #msgpro }
  if ($did(6).state == 1) { .enable #kalinyazi } | else { .disable #kalinyazi }
}
on 1:dialog:krm2:init:0:{
  if ($group(#renk) == on) { did -c krm2 2 }
  if ($group(#underline) == on) { did -c krm2 3 }
  if ($group(#caps) == on) { did -c krm2 4 }
  if ($group(#msgpro) == on) { did -c krm2 5 }
  if ($group(#kalinyazi) == on) { did -c krm2 6 }
}
;--------------------------------------------------------------------------------
alias krm3 { if ($dialog(krm3)) { dialog -c krm3 } | dialog -ma krm3 krm3 }
dialog krm3 {
  title " Mass Koruması"
  size -1 -1 72 63
  option dbu
  box "Script Yazı Korumaları", 1, 1 1 70 48
  check "Mass Kick Koruması", 2, 5 9 61 10,flat
  check "Mass Ban Koruması", 3, 5 18 59 10,flat
  check "Mass Op Koruması", 4, 5 27 62 10,flat
  check "Mass Deop Koruması", 5, 5 36 62 10,flat
  button "Kaydet", 7, 1 50 70 12, ok
}
on 1:dialog:krm3:sclick:*:{
  if ($did(2).state == 1) { .enable #makick } | else { .disable #makick }
  if ($did(3).state == 1) { .enable #maban } | else { .disable #maban }
  if ($did(4).state == 1) { .enable #maop } | else { .disable #maop }
  if ($did(5).state == 1) { .enable #madeop } | else { .disable #madeop }
}
on 1:dialog:krm3:init:0:{
  if ($group(#makick) == on) { did -c krm3 2 }
  if ($group(#maban) == on) { did -c krm3 3 }
  if ($group(#maop) == on) { did -c krm3 4 }
  if ($group(#madeop) == on) { did -c krm3 5 }
}
;--------------------------------------------------------------------------------
alias krm4 { if ($dialog(krm4)) { dialog -c krm4 } | dialog -ma krm4 krm4 }
dialog krm4 {
  title "Kullanıcı Menü"
  size -1 -1 72 81
  option dbu
  box "Kullanıcı Korumaları", 1, 1 1 70 65
  check "Reklam Koruması", 2, 5 9 61 10, flat
  check "Küfür Koruması", 3, 5 18 59 10, flat
  check "CTCP Flood Koruması", 4, 5 27 62 10, flat
  check "Deop Koruması", 5, 5 36 62 10, flat
  button "Kaydet", 7, 1 68 70 12, ok
  check "Ban Koruması", 6, 5 45 50 10, flat
  check "Notice Flood Koruması", 8, 5 54 63 10, flat
}
on 1:dialog:krm4:sclick:*:{
  if ($did(2).state == 1) { .enable #ozel } | else { .disable #ozel }
  if ($did(3).state == 1) { .enable #ozkufur } | else { .disable #ozkufur }
  if ($did(4).state == 1) { .enable #ctcpf } | else { .disable #ctcpf }
  if ($did(5).state == 1) { .enable #deops } | else { .disable #deops }
  if ($did(6).state == 1) { .enable #bkoruma } | else { .disable #bkoruma }
  if ($did(8).state == 1) { .enable #noticeflo } | else { .disable #noticeflo }
}
on 1:dialog:krm4:init:0:{
  if ($group(#ozel) == on) { did -c krm4 2 }
  if ($group(#ozkufur) == on) { did -c krm4 3 }
  if ($group(#ctcpf) == on) { did -c krm4 4 }
  if ($group(#deops) == on) { did -c krm4 5 }
  if ($group(#bkoruma) == on) { did -c krm4 6 }
  if ($group(#noticeflo) == on) { did -c krm4 8 }
}

Bi Teşekkürü Hakettim Sanırım..!

NycX 06 Şubat 2010 14:26

Cevap: Korumalar Penceresi
 
Arkadaşlar Yorumlarınızı bekliyorum

SabotaJ_ 06 Şubat 2010 16:58

Cevap: Korumalar Penceresi
 
Koda bakmadım ama arkadas paylaşımın için teşekkurler ;)

NycX 06 Şubat 2010 17:10

Cevap: Korumalar Penceresi
 
Bişi Deil Nedemek Kendim hazırladım Kodu Çok şanşanlı bi görünüşü yoq ama Özellikli

DenperaS 06 Şubat 2010 21:53

Cevap: Korumalar Penceresi
 
ellerine sağlık lakin devreye soktuğunda girmiyor ve tıklıyorum kaydet diyorum olmuyor diyalou kapattığımda sıfırlanıyor.
ama çok güzel olmuş ellerine sağlık

NycX 07 Şubat 2010 12:50

Cevap: Korumalar Penceresi
 
Not defteri aç Dosyasının içine at kodu sonra Kodu Devreye Sok Bide Ole dene.'

SovaLyem 07 Şubat 2010 13:19

Cevap: Korumalar Penceresi
 
Menu görüntüsü, koruma çeşitleri ve ekstra özelliklerle gayet güzel görünüyor. Kanalda denemedim ancak korumalar söz konusu olduğunda aç/kapa harici müdahale imkanım olmasını tercih ederim. Örneğin; küfür korumasında hangi kelimelere göre atacak, bunları bilmek isterim. Ya da birini attı ama hangi kelime yüzünden attı. Demek istediğim listeyi de düzenlemek isterim. Bu haliyle çok şık görünüyor. Eline sağlık.

Bir de popup penceresi sağ tıklama için bir menü koyarsan sanırım daha kolay olur. Ben açmak için /script1 yazdım, çünkü başka bir şekilde ulaşamadım.

Ayrıca yukarıdaki yorumda da belirtilmiş; örneğin kutucukları devreye koyup kaydettikten sonra yeniden açtığında işaret kalkmış oluyor. Diyalogu kanalda denemediğim için hala o özelliğin aktif olup olmadığını da bilemiyorum.

NycX 07 Şubat 2010 14:11

Cevap: Korumalar Penceresi
 
Arkadaşım En başta denediğin İçin Teşekkür ederim ama ben bu Korumalar Penceresini Toolbar için yaptım mesela Toolbarı Sen düzenliyeceksin neye ihtiyacın var Korumalara Ordan toolbarın içine girip Korumalar Yazan Menünün Üzerine Neyin açılacağını yazacaksın oraya /script1 yazdınmı sen O korumalar menüsnün üzerine tıkladığında açılacaktır.. Ben Scriptlerimde ole yapıyorum..! Ama kendi Zevkin Tabbiki

Slipknot 07 Şubat 2010 16:44

Cevap: Korumalar Penceresi
 
Yanılıyorsam kusura bakma,ama bence EDIT yapmış gibi gözüküyor burdan.:DDaha neler göreceğiz bakalım,görmediğimiz birşey değil ama.Hoş editler.

egemel 08 Şubat 2010 11:29

Cevap: Korumalar Penceresi
 
Bunlar dialog. Korumalar olsa daha iyi olurdu..


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

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