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

Yeni Konu aç Konu Kapatılmıştır
 
LinkBack Seçenekler Stil
Alt 18 Ekim 2010, 15:12   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Yardım : Identi Belirli Usere Oto Zline ( Diyalog Halinde )




Merhana IF üyeleri. Bir kod gerek duyuyorum .

Örnek : Ahmet
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Kendi mircimde ben bu "Deneme" identini Bad List diyaloğum gibi identi eklicem ve eklediğim zaman otomatik serverdan zline atıcam.

Mircimdeki Kanal Koruması Diyaloğumun Kodlarını Size veriyorum. Buna İdent Koruması Buton ve Diyaloğum eklenicek.


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog genel { title "Unique Menu" size -1 -1 179 139 option dbu button "Tamam", 14, 69 121 37 12, flat ok cancel tab "Ayarlar", 20, 4 3 170 131 box "Ayarlar", 25, 7 20 162 100, flat tab 20 box "", 26, 102 25 57 87, flat tab 20 box "", 27, 17 25 57 87, flat tab 20 check "IP Kontrolu", 28, 20 31 50 10, flat flat tab 20 check "Özelleri Kapat", 29, 20 46 50 10, flat tab 20 check "Isteyeni Pingle", 30, 20 61 50 10, flat tab 20 check "Bağlantı Menüsü", 31, 20 77 50 10, flat tab 20 check "Notice Penceresi", 32, 20 93 50 10, flat tab 20 check "Ses Efektleri", 33, 105 31 50 10, flat tab 20 check "Nick Uyarıcı", 34, 105 46 50 10, flat tab 20 check "Op+Voice Teşk.", 35, 105 61 50 10, flat tab 20 check "Clone Dedectörü", 36, 105 77 50 10, flat tab 20 check "Kelime tamamla.", 37, 105 93 50 10, flat tab 20 tab "Kanal Koruması", 21 check "Tekrar Kor.", 39, 11 28 50 10, flat tab 21 check "Flood Kor.", 40, 11 38 50 10, flat tab 21 check "Küfür Kor.", 41, 11 48 50 10, flat tab 21 check "Büy. Harf Kor.", 42, 11 58 50 10, flat tab 21 check "Otomsg Kor.", 43, 11 77 50 10, flat tab 21 check "Invite Kor.", 44, 11 67 50 10, flat tab 21 check "Badnick Kor.", 45, 11 87 50 10, flat tab 21 check "Uzun Y. Kor.", 46, 11 97 50 10, flat tab 21 check "Cizgili Y. Kor.", 47, 65 28 50 10, flat tab 21 check "JoinPart Kor.", 48, 65 38 50 10, flat tab 21 check "Tel Num. Kor.", 49, 65 48 50 10, flat tab 21 check "Dcc/Virus Kor.", 50, 65 58 50 10, flat tab 21 check "Mass Kic Kor.", 51, 65 68 50 10, flat tab 21 check "Mass Ban Kor.", 52, 65 78 50 10, flat tab 21 check "Mass Op Kor.", 53, 65 88 50 10, flat tab 21 check "Mass Deop Kor.", 54, 65 97 50 10, flat tab 21 check "Banlanınca Kick", 56, 117 28 50 10, flat tab 21 check "Renkli Y. Kor.", 57, 117 38 50 10, flat tab 21 check "Kalın Y. Kor.", 58, 117 48 50 10, flat tab 21 button "Küfür Listesi", 60, 118 68 45 11, flat tab 21 button "KötüNick Listesi", 61, 119 86 45 11, flat tab 21 box "Kanal Koruması", 38, 7 20 162 100, flat tab 21 tab "Kişisel Koruma", 22 box "", 62, 17 25 57 87, flat tab 22 box "", 63, 102 25 57 87, flat tab 22 check "Flood Koruması", 64, 20 31 50 10, flat flat tab 22 check "Küfür Koruması", 65, 20 46 50 10, flat tab 22 check "Reklam Koruması", 66, 20 61 50 10, flat tab 22 check "Notice Koruması", 67, 20 77 50 10, flat tab 22 check "Ctcp Koruması", 68, 20 93 50 10, flat tab 22 check "Kick Koruması", 69, 105 31 50 10, flat tab 22 check "Ban Koruması", 70, 105 45 50 10, flat tab 22 check "Deop Koruması", 71, 105 61 50 10, flat tab 22 check "Bandan Kaçma", 72, 105 77 50 10, flat tab 22 check "KickBan Koruması", 73, 105 94 50 10, flat tab 22 box "Kişisel Koruma", 74, 7 20 162 100, flat tab 22 tab "Diğer İşlemler", 23 button "Mp3 Player", 75, 12 29 70 12, flat tab 23 button "Auto Join", 76, 12 74 70 12, flat tab 23 button "Log Kayıtları", 77, 95 29 70 12, flat flat tab 23 button "AntiSpam Bot", 78, 12 104 70 12, flat tab 23 button "Auto Identify", 79, 12 59 70 12, flat tab 23 button "Auto Mesaj", 80, 12 89 70 12, flat tab 23 button "Away Islemleri", 82, 12 44 70 12, flat tab 23 button "Programlar", 83, 95 44 70 12, flat tab 23 button "Lag Gösterici", 86, 95 59 70 12, flat tab 23 button "Ircop Taraması", 87, 95 74 70 12, flat tab 23 button "Arama Motoru", 88, 95 89 70 12, flat tab 23 button "Yazı Tipi", 89, 95 104 70 12, flat tab 23 box "Ekstra", 85, 7 20 162 99, flat tab 23 } on 1:dialog:genel:sclick:*:{ if ($did == 87 ) { .opendl c ircop 260 190 489 336 } if ($did == 86 ) { .lag } if ($did == 83 ) { .opendl a prog 260 190 280 400 } if ($did == 78 ) { .opendl j asb 260 190 380 302 } if ($did == 80 ) { opendl i automsg 260 190 300 160 } if ($did == 79 ) { .opendl e autoid 260 190 260 300 } if ($did == 76 ) { .opendl h auto.chanjoin 260 190 292 216 } if ($did == 82 ) { .opendl e awayset 260 190 333 151 } if ($did == 77 ) { .opendl k logsys 260 190 272 300 } if ($did == 75 ) { opendl d Uniquemp3s 260 190 470 255 } if ($did == 88 ) { .opendl h Webpagedial 450 190 200 240 } if ($did == 89 ) { .opendl f yazitip 260 190 234 342 } if ($did(39).state == 1) { .enable #tekrar } | else { .disable #tekrar } if ($did(40).state == 1) { .enable #flood } | else { .disable #flood } if ($did(42).state == 1) { .enable #caps } | else { .disable #caps } if ($did(57).state == 1) { .enable #renk } | else { .disable #renk } if ($did(58).state == 1) { .enable #bold } | else { .disable #bold } if ($did(46).state == 1) { .enable #uzunyazi } | else { .disable #uzunyazi } if ($did(45).state == 1) { .enable #reklam } | else { .disable #reklam } if ($did(44).state == 1) { .enable #invite } | else { .disable #invite } if ($did(56).state == 1) { .enable #banlama } | else { .disable #banlama } if ($did(50).state == 1) { .enable #virus } | else { .disable #virus } if ($did(41).state == 1) { .enable #kufur } | else { .disable #kufur } if ($did(45).state == 1) { .enable #kotunick } | else { .disable #kotunick } if ($did(43).state == 1) { .enable #otomesaj } | else { .disable #otomesaj } if ($did(48).state == 1) { .enable #jpart } | else { .disable #jpart } if ($did(47).state == 1) { .enable #cizgili } | else { .disable #cizgili } if ($did(49).state == 1) { .enable #telefonpro } | else { .disable #telefonpro } if ($did(51).state == 1) { .enable #masskick } | else { .disable #masskick } if ($did(52).state == 1) { .enable #massban } | else { .disable #massban } if ($did(53).state == 1) { .enable #massop } | else { .disable #massop } if ($did(54).state == 1) { .enable #massdeop } | else { .disable #massdeop } if ($did == 60 ) { .dialog -m swear swear } if ($did == 61 ) { .kotunicklist } if ($did(64).state == 1) { .enable #ozelflood } | else { .disable #ozelflood } if ($did(65).state == 1) { .enable #ozelekufur } | else { .disable #ozelekufur } if ($did(66).state == 1) { .enable #inviter } | else { .disable #inviter } if ($did(67).state == 1) { .enable #ozelnotice } | else { .disable #ozelnotice } if ($did(68).state == 1) { .enable #ctcp } | else { .disable #ctcp } if ($did(73).state == 1) { .enable #ozelmesaj } | else { .disable #ozelmesaj } if ($did(72).state == 1) { .enable #bankac } | else { .disable #bankac } if ($did(71).state == 1) { .enable #pdeop } | else { .disable #pdeop } if ($did(70).state == 1) { .enable #pban } | else { .disable #pban } if ($did(69).state == 1) { .enable #pkick } | else { .disable #pkick } } on 1:dialog:genel:init:0:{ if ($devent == init) { mdx SetMircVersion $version mdx MarkDialog $dname mdx SetBorderStyle 60,61,75,76,77,78,79,80,82,83,86,87,88,89 staticedge mdx SetFont 60,61,75,76,77,78,79,80,82,83,86,87,88,89 tahoma mdx SetFont 17 700 tahoma mdx SetFont 75 700 tahoma mdx SetFont 3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26 14 550 arial } if ($group(#tekrar) == on) { did -c genel 39 } if ($group(#flood) == on) { did -c genel 40 } if ($group(#caps) == on) { did -c genel 42 } if ($group(#renk) == on) { did -c genel 57 } if ($group(#bold) == on) { did -c genel 58 } if ($group(#uzunyazi) == on) { did -c genel 46 } if ($group(#reklam) == on) { did -c genel 45 } if ($group(#invite) == on) { did -c genel 44 } if ($group(#banlama) == on) { did -c genel 56 } if ($group(#virus) == on) { did -c genel 50 } if ($group(#kufur) == on) { did -c genel 41 } if ($group(#kotunick) == on) { did -c genel 45 } if ($group(#otomesaj) == on) { did -c genel 43 } if ($group(#jpart) == on) { did -c genel 48 } if ($group(#cizgili) == on) { did -c genel 47 } if ($group(#telefonpro) == on) { did -c genel 49 } if ($group(#masskick) == on) { did -c genel 51 } if ($group(#massban) == on) { did -c genel 52 } if ($group(#massop) == on) { did -c genel 53 } if ($group(#massdeop) == on) { did -c genel 54 } if ($group(#ozelflood) == on) { did -c genel 64 } if ($group(#ozelekufur) == on) { did -c genel 65 } if ($group(#inviter) == on) { did -c genel 66 } if ($group(#ozelnotice) == on) { did -c genel 67 } if ($group(#ctcp) == on) { did -c genel 68 } if ($group(#ozelmesaj) == on) { did -c genel 73 } if ($group(#bankac) == on) { did -c genel 72 } if ($group(#pdeop) == on) { did -c genel 71 } if ($group(#pban) == on) { did -c genel 70 } if ($group(#pkick) == on) { did -c genel 69 } } alias mdx_fullpath { return $+(",System\DLL\mdx.dll,") } alias mdx { dll $mdx_fullpath $1- } alias mdxinit { dll $mdx_fullpath SetMircVersion $version dll $mdx_fullpath MarkDialog $dname }


Bad Nick List Diyaloğum Da Şöyle :
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias kotunicklist { if ($dialog(karalist)) { dialog -c karalist } | dialog -ma karalist karalist } dialog karalist { title "Unique BadNick Listesi" size -1 -1 281 294 option pixels box "", 7, 10 4 261 280 text "", 8, 10 9 261 274 combo 1, 19 38 168 223, vsbar button "&Ekle", 2, 196 41 61 22 button "&Sil", 3, 196 68 61 22 button "&Tamam", 4, 196 231 61 27, ok check "Korumayı Aktif Et", 5, 19 263 110 18, disable text "Kötü Nick Ekleme", 6, 32 17 115 16, disable center } on *:dialog:karalist:*:*: { if ($devent == init) { mdx SetMircVersion $version mdx MarkDialog $dname mdx SetBorderStyle 1,2,3,4 staticedge mdx SetFont 2,3,4,5 14 550 arial mdx SetFont 6 14 550 arial mdx SetFont 1 14 550 arial mdx SetColor 6 16 text $rgb(255,030,010) mdx SetColor text $rgb(010,050,255) .karalist.init } if ($devent == sclick) { if ($did == 2) { if ($did(1) != $null) { /.auser 10 $did(1) | karalist.init } } if ($did == 3) { if ($did(1) != $null) { /.ruser $did(1) | karalist.init } } if ($did == 5) { if ($did(5).state == 1) { writeini " $+ $mircini $+ " karalist karalist on } if ($did(5).state == 0) { writeini " $+ $mircini $+ " karalist karalist off } } } } alias karalist.init { did -r karalist 1 if ($readini " $+ $mircini $+ " karalist karalist == on) { did -c karalist 5 } set %ul 1 while (%ul <= $ulist(*,0)) { if ($level($ulist(*,%ul)) == 10) { did -a karalist 1 $ulist(*,%ul) } inc %ul 1 } unset %ul } alias kotunickbans { .mode $chan +b $nick | .kick # $nick 12Bad14 & 12Kötü Nick 3Kullandığınızdan 12 $+ $chan 3 Kanalına Girişiniz Süresiz Yasaklanmıştır! 4,1 Unique Script  } #kotunick on on 10:join:#: { if ($readini " $+ $mircini $+ " karalist karalist == on) { if (($me isop $chan) || ($me ishelp $chan)) { kotunickbans $nick } } }

Buda Görüntüsü.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kanal kontrol paneLinde . İşaretleyebileceğim ßir ident Koruması Ve de Bad Nick diyaloğum gb identi koruması diyaloğu lazım .

Hepinize Kolay Gelsin.

 

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 18 Ekim 2010, 20:33   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Yardım : Identi Belirli Usere Oto Zline ( Diyalog Halinde )




Selamlar; Vermiş olduğun koddan çıkarak birşeyler yapmaya çalıştım.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog genel { title "Unique Menu" size -1 -1 179 139 option dbu button "Tamam", 14, 69 121 37 12, flat ok cancel tab "Ayarlar", 20, 4 3 170 131 box "Ayarlar", 25, 7 20 162 100, flat tab 20 box "", 26, 102 25 57 87, flat tab 20 box "", 27, 17 25 57 87, flat tab 20 check "IP Kontrolu", 28, 20 31 50 10, flat flat tab 20 check "Özelleri Kapat", 29, 20 46 50 10, flat tab 20 check "Isteyeni Pingle", 30, 20 61 50 10, flat tab 20 check "Bağlantı Menüsü", 31, 20 77 50 10, flat tab 20 check "Notice Penceresi", 32, 20 93 50 10, flat tab 20 check "Ses Efektleri", 33, 105 31 50 10, flat tab 20 check "Nick Uyarıcı", 34, 105 46 50 10, flat tab 20 check "Op+Voice Teşk.", 35, 105 61 50 10, flat tab 20 check "Clone Dedectörü", 36, 105 77 50 10, flat tab 20 check "Kelime tamamla.", 37, 105 93 50 10, flat tab 20 tab "Kanal Koruması", 21 check "Tekrar Kor.", 39, 11 28 50 10, flat tab 21 check "Flood Kor.", 40, 11 38 50 10, flat tab 21 check "Küfür Kor.", 41, 11 48 50 10, flat tab 21 check "Büy. Harf Kor.", 42, 11 58 50 10, flat tab 21 check "Otomsg Kor.", 43, 11 77 50 10, flat tab 21 check "Invite Kor.", 44, 11 67 50 10, flat tab 21 check "Badnick Kor.", 45, 11 87 50 10, flat tab 21 check "Uzun Y. Kor.", 46, 11 97 50 10, flat tab 21 check "Cizgili Y. Kor.", 47, 65 28 50 10, flat tab 21 check "JoinPart Kor.", 48, 65 38 50 10, flat tab 21 check "Tel Num. Kor.", 49, 65 48 50 10, flat tab 21 check "Dcc/Virus Kor.", 50, 65 58 50 10, flat tab 21 check "Mass Kic Kor.", 51, 65 68 50 10, flat tab 21 check "Mass Ban Kor.", 52, 65 78 50 10, flat tab 21 check "Mass Op Kor.", 53, 65 88 50 10, flat tab 21 check "Mass Deop Kor.", 54, 65 97 50 10, flat tab 21 check "Banlanınca Kick", 56, 117 28 50 10, flat tab 21 check "Renkli Y. Kor.", 57, 117 38 50 10, flat tab 21 check "Kalın Y. Kor.", 58, 117 48 50 10, flat tab 21 button "Küfür Listesi", 60, 118 68 45 11, flat tab 21 button "KötüNick Listesi", 61, 119 86 45 11, flat tab 21 button "İdent Koruma", 99, 119 105 45 11, flat tab 21 box "Kanal Koruması", 38, 7 20 162 100, flat tab 21 tab "Kişisel Koruma", 22 box "", 62, 17 25 57 87, flat tab 22 box "", 63, 102 25 57 87, flat tab 22 check "Flood Koruması", 64, 20 31 50 10, flat flat tab 22 check "Küfür Koruması", 65, 20 46 50 10, flat tab 22 check "Reklam Koruması", 66, 20 61 50 10, flat tab 22 check "Notice Koruması", 67, 20 77 50 10, flat tab 22 check "Ctcp Koruması", 68, 20 93 50 10, flat tab 22 check "Kick Koruması", 69, 105 31 50 10, flat tab 22 check "Ban Koruması", 70, 105 45 50 10, flat tab 22 check "Deop Koruması", 71, 105 61 50 10, flat tab 22 check "Bandan Kaçma", 72, 105 77 50 10, flat tab 22 check "KickBan Koruması", 73, 105 94 50 10, flat tab 22 box "Kişisel Koruma", 74, 7 20 162 100, flat tab 22 tab "Diğer İşlemler", 23 button "Mp3 Player", 75, 12 29 70 12, flat tab 23 button "Auto Join", 76, 12 74 70 12, flat tab 23 button "Log Kayıtları", 77, 95 29 70 12, flat flat tab 23 button "AntiSpam Bot", 78, 12 104 70 12, flat tab 23 button "Auto Identify", 79, 12 59 70 12, flat tab 23 button "Auto Mesaj", 80, 12 89 70 12, flat tab 23 button "Away Islemleri", 82, 12 44 70 12, flat tab 23 button "Programlar", 83, 95 44 70 12, flat tab 23 button "Lag Gösterici", 86, 95 59 70 12, flat tab 23 button "Ircop Taraması", 87, 95 74 70 12, flat tab 23 button "Arama Motoru", 88, 95 89 70 12, flat tab 23 button "Yazı Tipi", 89, 95 104 70 12, flat tab 23 box "Ekstra", 85, 7 20 162 99, flat tab 23 } on 1:dialog:genel:sclick:*:{ if ($did == 87 ) { .opendl c ircop 260 190 489 336 } if ($did == 86 ) { .lag } if ($did == 83 ) { .opendl a prog 260 190 280 400 } if ($did == 78 ) { .opendl j asb 260 190 380 302 } if ($did == 80 ) { opendl i automsg 260 190 300 160 } if ($did == 79 ) { .opendl e autoid 260 190 260 300 } if ($did == 76 ) { .opendl h auto.chanjoin 260 190 292 216 } if ($did == 82 ) { .opendl e awayset 260 190 333 151 } if ($did == 77 ) { .opendl k logsys 260 190 272 300 } if ($did == 75 ) { opendl d Uniquemp3s 260 190 470 255 } if ($did == 88 ) { .opendl h Webpagedial 450 190 200 240 } if ($did == 89 ) { .opendl f yazitip 260 190 234 342 } if ($did(39).state == 1) { .enable #tekrar } | else { .disable #tekrar } if ($did(40).state == 1) { .enable #flood } | else { .disable #flood } if ($did(42).state == 1) { .enable #caps } | else { .disable #caps } if ($did(57).state == 1) { .enable #renk } | else { .disable #renk } if ($did(58).state == 1) { .enable #bold } | else { .disable #bold } if ($did(46).state == 1) { .enable #uzunyazi } | else { .disable #uzunyazi } if ($did(45).state == 1) { .enable #reklam } | else { .disable #reklam } if ($did(44).state == 1) { .enable #invite } | else { .disable #invite } if ($did(56).state == 1) { .enable #banlama } | else { .disable #banlama } if ($did(50).state == 1) { .enable #virus } | else { .disable #virus } if ($did(41).state == 1) { .enable #kufur } | else { .disable #kufur } if ($did(45).state == 1) { .enable #kotunick } | else { .disable #kotunick } if ($did(43).state == 1) { .enable #otomesaj } | else { .disable #otomesaj } if ($did(48).state == 1) { .enable #jpart } | else { .disable #jpart } if ($did(47).state == 1) { .enable #cizgili } | else { .disable #cizgili } if ($did(49).state == 1) { .enable #telefonpro } | else { .disable #telefonpro } if ($did(51).state == 1) { .enable #masskick } | else { .disable #masskick } if ($did(52).state == 1) { .enable #massban } | else { .disable #massban } if ($did(53).state == 1) { .enable #massop } | else { .disable #massop } if ($did(54).state == 1) { .enable #massdeop } | else { .disable #massdeop } if ($did == 60 ) { .dialog -m swear swear } if ($did == 61 ) { .kotunicklist } if ($did == 99 ) { .shitconf } if ($did(64).state == 1) { .enable #ozelflood } | else { .disable #ozelflood } if ($did(65).state == 1) { .enable #ozelekufur } | else { .disable #ozelekufur } if ($did(66).state == 1) { .enable #inviter } | else { .disable #inviter } if ($did(67).state == 1) { .enable #ozelnotice } | else { .disable #ozelnotice } if ($did(68).state == 1) { .enable #ctcp } | else { .disable #ctcp } if ($did(73).state == 1) { .enable #ozelmesaj } | else { .disable #ozelmesaj } if ($did(72).state == 1) { .enable #bankac } | else { .disable #bankac } if ($did(71).state == 1) { .enable #pdeop } | else { .disable #pdeop } if ($did(70).state == 1) { .enable #pban } | else { .disable #pban } if ($did(69).state == 1) { .enable #pkick } | else { .disable #pkick } } on 1:dialog:genel:init:0:{ if ($devent == init) { mdx SetMircVersion $version mdx MarkDialog $dname mdx SetBorderStyle 60,61,75,76,77,78,79,80,82,83,86,87,88,89 staticedge mdx SetFont 60,61,75,76,77,78,79,80,82,83,86,87,88,89 tahoma mdx SetFont 17 700 tahoma mdx SetFont 75 700 tahoma mdx SetFont 3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26 14 550 arial } if ($group(#tekrar) == on) { did -c genel 39 } if ($group(#flood) == on) { did -c genel 40 } if ($group(#caps) == on) { did -c genel 42 } if ($group(#renk) == on) { did -c genel 57 } if ($group(#bold) == on) { did -c genel 58 } if ($group(#uzunyazi) == on) { did -c genel 46 } if ($group(#reklam) == on) { did -c genel 45 } if ($group(#invite) == on) { did -c genel 44 } if ($group(#banlama) == on) { did -c genel 56 } if ($group(#virus) == on) { did -c genel 50 } if ($group(#kufur) == on) { did -c genel 41 } if ($group(#kotunick) == on) { did -c genel 45 } if ($group(#otomesaj) == on) { did -c genel 43 } if ($group(#jpart) == on) { did -c genel 48 } if ($group(#cizgili) == on) { did -c genel 47 } if ($group(#telefonpro) == on) { did -c genel 49 } if ($group(#masskick) == on) { did -c genel 51 } if ($group(#massban) == on) { did -c genel 52 } if ($group(#massop) == on) { did -c genel 53 } if ($group(#massdeop) == on) { did -c genel 54 } if ($group(#ozelflood) == on) { did -c genel 64 } if ($group(#ozelekufur) == on) { did -c genel 65 } if ($group(#inviter) == on) { did -c genel 66 } if ($group(#ozelnotice) == on) { did -c genel 67 } if ($group(#ctcp) == on) { did -c genel 68 } if ($group(#ozelmesaj) == on) { did -c genel 73 } if ($group(#bankac) == on) { did -c genel 72 } if ($group(#pdeop) == on) { did -c genel 71 } if ($group(#pban) == on) { did -c genel 70 } if ($group(#pkick) == on) { did -c genel 69 } } alias mdx_fullpath { return $+(",System\DLL\mdx.dll,") } alias mdx { dll $mdx_fullpath $1- } alias mdxinit { dll $mdx_fullpath SetMircVersion $version dll $mdx_fullpath MarkDialog $dname }

Buda Kötü Nick listesi kodun..

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias kotunicklist { if ($dialog(karalist)) { dialog -c karalist } | dialog -ma karalist karalist } dialog karalist { title "Unique BadNick Listesi" size -1 -1 281 294 option pixels box "", 7, 10 4 261 280 text "", 8, 10 9 261 274 combo 1, 19 38 168 223, vsbar button "&Ekle", 2, 196 41 61 22 button "&Sil", 3, 196 68 61 22 button "&Tamam", 4, 196 231 61 27, ok check "Korumayı Aktif Et", 5, 19 263 110 18, disable text "Kötü Nick Ekleme", 6, 32 17 115 16, disable center } on *:dialog:karalist:*:*: { if ($devent == init) { mdx SetMircVersion $version mdx MarkDialog $dname mdx SetBorderStyle 1,2,3,4 staticedge mdx SetFont 2,3,4,5 14 550 arial mdx SetFont 6 14 550 arial mdx SetFont 1 14 550 arial mdx SetColor 6 16 text $rgb(255,030,010) mdx SetColor text $rgb(010,050,255) .karalist.init } if ($devent == sclick) { if ($did == 2) { if ($did(1) != $null) { /.auser 10 $did(1) | karalist.init } } if ($did == 3) { if ($did(1) != $null) { /.ruser $did(1) | karalist.init } } if ($did == 5) { if ($did(5).state == 1) { writeini " $+ $mircini $+ " karalist karalist on } if ($did(5).state == 0) { writeini " $+ $mircini $+ " karalist karalist off } } } } alias karalist.init { did -r karalist 1 if ($readini " $+ $mircini $+ " karalist karalist == on) { did -c karalist 5 } set %ul 1 while (%ul <= $ulist(*,0)) { if ($level($ulist(*,%ul)) == 10) { did -a karalist 1 $ulist(*,%ul) } inc %ul 1 } unset %ul } alias kotunickbans { .mode $chan +b $nick | .kick # $nick 12Bad14 & 12Kötü Nick 3Kullandığınızdan 12 $+ $chan 3 Kanalına Girişiniz Süresiz Yasaklanmıştır! 4,1 Unique Script  } #kotunick off on 10:join:#: { if ($readini " $+ $mircini $+ " karalist karalist == on) { if (($me isop $chan) || ($me ishelp $chan)) { kotunickbans $nick } } }

Buda en son olarak, istemiş olduğun GZLİNE ident koruması.


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on 8:join:#:{ if $nick ison #Admin { halt } } | { .gzline $nick 4Açıklama: 1Lutfen Nickinizi Degistiriniz! } } alias shitconf if $dialog(Shitlist) == $null dialog -m shitlist shitlist dialog shitlist { title "BadNick\İdent Koruma" size -1 -1 200 265 button "Tamam", 1, 110 200 70 20,ok list 2, 10 20 180 135, sort box "Kotu Nick", 3, 5 5 190 145 edit "*", 4, 10 165 180 20, autohs box "Eklenecek Nick'i Girin", 5, 5 150 190 45 button "Ekle", 6, 20 200 70 20 box "Not:", 7, 5 225 190 35 text "Nick Silmek İcin Nick'e Cift Tiklayin", 8, 25 240 180 45 } alias shitsetup if $dialog(shitlist) == $null dialog -m shitlist shitlist on *:dialog:shitlist:dclick:2:{ .ruser 8 $did(2).seltext | did -d shitlist 2 $did(2).sel } on *:dialog:shitlist:sclick:6:{ if ($did(4) != $null) { did -a shitlist 2 $did(4) | .auser 8 $did(4) | did -fr shitlist 4 } } on *:dialog:shitlist:init:*:{ if ($ulist(*,8,0) != $null) { set %cnt.shit 0 while (%cnt.shit < $ulist(*,8,0)) { inc %cnt.shit 1 did -a shitlist 2 $ulist(*,8,%cnt.shit) } unset %cnt.shit } }

Remotene eklediğinde, yeni bir sayfaya işini görecektir. Diğerleriyle bunların yerlerini değiştirerek.

Normalde en son verdiğim, badnick\ident korumasıdır. Sen istemediğin Nick veya identleri açılan yere yazdığında, işleme girecek ve GZLİNE atacaktır.

Hoşça forumlar..

__________________
Lucifer dediler bana, kötülüğü anlatmak için. Halbuki, ışık ve güzelliği anlatırdı Lucifer. Ben kötüyüm bu düzen için; ama değilim asla kötülük.
 

Alt 19 Ekim 2010, 04:07   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Yardım : Identi Belirli Usere Oto Zline ( Diyalog Halinde )




A.Selam Lucifer . Ellerine sağlık remote işimi gördü. Buna Ek olarak identi korumamızı ON-OFF konumuna getirmek için benim kanal koruma diyaloğumda bad nick listesini işaretlediğim gibi ek özellik koyma imkanımı varmıdır.

if ($group(#ident koruma) == on) { did -c genel ?? }

 

Alt 07 Ağustos 2013, 13:14   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Yardım : Identi Belirli Usere Oto Zline ( Diyalog Halinde )




Aynı Diyalog üzerinde Kötü İdent 'e Ban

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on 8:join:#:{ if $nick ison #Admin { halt } } | { .mode $chan +b $nick | .kick # $nick 12Bad } } alias shitconf if $dialog(Shitlist) == $null dialog -m shitlist shitlist dialog shitlist { title "BadNick\İdent Koruma" size -1 -1 200 265 button "Tamam", 1, 110 200 70 20,ok list 2, 10 20 180 135, sort box "Kotu Nick", 3, 5 5 190 145 edit "*", 4, 10 165 180 20, autohs box "Eklenecek Nick'i Girin", 5, 5 150 190 45 button "Ekle", 6, 20 200 70 20 box "Not:", 7, 5 225 190 35 text "Nick Silmek İcin Nick'e Cift Tiklayin", 8, 25 240 180 45 } alias shitsetup if $dialog(shitlist) == $null dialog -m shitlist shitlist on *:dialog:shitlist:dclick:2:{ .ruser 8 $did(2).seltext | did -d shitlist 2 $did(2).sel } on *:dialog:shitlist:sclick:6:{ if ($did(4) != $null) { did -a shitlist 2 $did(4) | .auser 8 $did(4) | did -fr shitlist 4 } } on *:dialog:shitlist:init:*:{ if ($ulist(*,8,0) != $null) { set %cnt.shit 0 while (%cnt.shit < $ulist(*,8,0)) { inc %cnt.shit 1 did -a shitlist 2 $ulist(*,8,%cnt.shit) } unset %cnt.shit }


 

Alt 07 Ağustos 2013, 13:31   #5
Deep
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: Yardım : Identi Belirli Usere Oto Zline ( Diyalog Halinde )




konu güncelliğini yitirdiğinden dolayı kilit.

 

Konu Kapatılmıştır

Etiketler
belirli, diyalog, halinde, identi, oto, usere, zline


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

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


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Elektrik çarpması halinde yapılacak ilk yardım nedir? Violent İlk Yardım 0 15 Mayıs 2013 19:52
Belirli Idenlere zLine AtiLinca UnzLine Yapma POSOFxBELA mIRC Scripting Sorunları 6 03 Şubat 2011 22:51
jawa identi ile 6667-7000 girişine zline ufulli1 Unreal IRCd 15 16 Kasım 2010 04:04
belirli bir url adresinden txt. dosyasından irc (yardım ) AraSh34 mIRC Scripting Sorunları 2 09 Mart 2010 11:14
jawa identi ile giren 6667 & 7000 portuna zline ufulli1 mIRC Scripting Sorunları 11 14 Haziran 2009 13:44