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 Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   IRCOP Koruması. (https://www.ircforumlari.net/mirc-scripting-sorunlari/205147-ircop-korumasi.html)

StanteaR 04 Mayıs 2009 12:43

IRCOP Koruması.
 
Arkadaslar forumdan faydalanarak kendımce bır dıyalog tasarladım korumalarıda ekledım fakat korumaları aktıf etmek ıcın tıklıyorum tamam a basıyorum yenıden actıgımda gerı eskı halıne donuyor işaretsız duruma enable yapıyorum disable oluyor. neden bende anlayamadım. yardımcı olabılırmısınız acaba ?

Alıntı:

dialog IRCopz {
title "IRCop"
size -1 -1 192 177
option dbu
text "Oper İşlem Merkezi -IRCop-", 1, 3 2 73 8
check "IRCop Reklam ", 2, 7 22 48 10
check "IRCop Küfür", 3, 7 34 50 10
check "IRCop Flood", 4, 7 45 50 10
check "IRCop Tekrar", 5, 7 55 50 10
check "IRCop Oto Temizleme", 6, 7 65 64 10
box "IRCop Sunucu [KanaL] Koruması", 8, 3 11 93 148
check "IRCop Whois", 7, 104 22 50 10
check "IRCop Akill", 9, 104 34 50 10
check "IRCop Özel Karsılama", 10, 104 47 64 10
check "IRCop HELP Yardım", 11, 104 58 61 10
box "IRCop Özel Menü", 12, 100 11 84 70
check "IRCop Whois Flood", 13, 7 75 64 10
check "IRCop Proxy ", 14, 7 85 69 10
button "Reklam", 15, 55 20 37 12
button "Küfür", 16, 55 34 37 12
check "IRCop Qline Bad Nick", 17, 7 95 66 10
check "IRCop Caps ", 18, 7 105 67 10
check "IRCop Join / Part ", 19, 7 116 77 10
check "IRCop Oto Shun", 20, 7 127 50 10
check "Oto +m", 21, 6 137 50 10
check "Küfür / Reklam Oto Shun", 22, 6 147 71 10
text "IRCop Koruması Kanallarda Güvenliği İyi Bir Şekilde Saglaması Icın Tasarlanmıstır. Reklam Küfür Flood Korumaları Akill Atmaktadır Diger Korumalar İse Samode +b Olarak İşlemini Yapmaktadır. Code By StanteaR", 23, 100 85 86 75
button "Tamam", 24, 72 162 37 12,ok
}
on *:dialog:IRCOpz:sclick:15: {
dialog -m reklamlist reklamlist
}
on *:dialog:IRCOpz:sclick:16: {
dialog -m küfürlist küfürlist
}
on *:dialog:IRCopz:*:*:{
dll mdx.dll SetMircVersion $version | dll mdx.dll MarkDialog $dname
dll mdx.dll SetFont 1,2,3,4,5,6,8,7,9,10,11,12,13,14,15,16,17,18,19,20 ,21,22,23,24, 12 700 Tahoma
dll mdx.dll SetFont +b 3,26,27 700 Tahoma
}
on *:dialog:IRCopz:init:*: {
if ($group(#IRCReklam).status == on ) did -c IRCopz 2
if ($group(#IRCKüfür).status == on ) did -c IRCopz 3
if ($group(#IRCflood).status == on ) did -c IRCopz 4
if ($group(#IRCTekrar).status == on ) did -c IRCopz 5
if ($group(#IRCtemizle).status == on ) did -c IRCopz 6
if ($group(#IRCwhois).status == on ) did -c IRCopz 7
if ($group(#IRCakill).status == on ) did -c IRCopz 9
if ($group(#IRCözel).status == on ) did -c IRCopz 10
if ($group(#IRChelp ).status == on ) did -c IRCopz 11
if ($group(#IRCwhoban).status == on ) did -c IRCopz 13
if ($group(#IRCproxy).status == on ) did -c IRCopz 14
if ($group(#IRCqline).status == on ) did -c IRCopz 17
if ($group(#IRCcapz).status == on ) did -c IRCopz 18
if ($group(#IRCjp).status == on ) did -c IRCopz 19
if ($group(#IRCshun).status == on ) did -c IRCopz 20
if ($group(#IRCotom).status == on ) did -c IRCopz 21
if ($group(#IRCshunz).status == on ) did -c IRCopz 22
}
on *:dialog:IRCopz:sclick:2: {
if ($group(#IRCReklam).status == on ) { .disable #IRCReklam }
else { /.enable #IRCReklam }
}
on *:dialog:IRCopz:sclick:3: {
if ($group(#IRCKüfür).status == on ) { .disable #IRCKüfür }
else { /.enable #IRCKüfür }
}
on *:dialog:IRCopz:sclick:4: {
if ($group(#IRCflood).status == on ) { .disable #IRCflood }
else { /.enable #IRCflood }
}
on *:dialog:IRCopz:sclick:5: {
if ($group(#IRCTekrar).status == on ) { .disable #IRCTekrar }
else { /.enable #IRCTekrar }
}
on *:dialog:IRCopz:sclick:6: {
if ($group(#IRCtemizle).status == on ) { .disable #IRCtemizle }
else { /.enable #IRCtemizle }
}
on *:dialog:IRCopz:sclick:7: {
if ($group(#IRCwhois).status == on ) { .disable #IRCwhois }
else { /.enable #IRCwhois }
}
on *:dialog:IRCopz:sclick:9: {
if ($group(#IRCakill).status == on ) { .disable #IRCakill }
else { /.enable #IRCakill }
}
on *:dialog:IRCopz:sclick:10: {
if ($group(#IRCözel).status == on ) { .disable #IRCözel }
else { /.enable #IRCözel }
}
on *:dialog:IRCopz:sclick:11: {
if ($group(#IRChelp).status == on ) { .disable #IRChelp }
else { /.enable #IRChelp }
}
on *:dialog:IRCopz:sclick:13: {
if ($group(#IRCwhoban).status == on ) { .disable #IRCwhoban }
else { /.enable #IRCwhoban }
}
on *:dialog:IRCopz:sclick:14: {
if ($group(#IRCproxy).status == on ) { .disable #IRCproxy }
else { /.enable #IRCproxy }
}
on *:dialog:IRCopz:sclick:17: {
if ($group(#IRCqline).status == on ) { .disable #IRCqline }
else { /.enable #IRCqline }
}
on *:dialog:IRCopz:sclick:18: {
if ($group(#IRCcapz).status == on ) { .disable #IRCcapz }
else { /.enable #IRCcapz }
}
on *:dialog:IRCopz:sclick:19: {
if ($group(#IRCjp).status == on ) { .disable #IRCjp }
else { /.enable #IRCjp }
}
on *:dialog:IRCopz:sclick:20: {
if ($group(#IRCshun).status == on ) { .disable #IRCshun }
else { /.enable #IRCshun }
}
on *:dialog:IRCopz:sclick:21: {
if ($group(#IRCotom).status == on ) { .disable #IRCotom }
else { /.enable #IRCotom }
}
on *:dialog:IRCopz:sclick:22: {
if ($group(#IRCshunz).status == on ) { .disable #IRCshunz }
else { /.enable #IRCshunz }
}

muratt_aziz 05 Mayıs 2009 08:38

Cevap: IRCOP Koruması.
 
Bu sekılde devam et

Kod:

dialog IRCopz {
  title "IRCop"
  size -1 -1 192 177
  option dbu
  text "Oper İşlem Merkezi -IRCop-", 1, 3 2 73 8
  check "IRCop Reklam ", 2, 7 22 48 10
  check "IRCop Küfür", 3, 7 34 50 10
  check "IRCop Flood", 4, 7 45 50 10
  check "IRCop Tekrar", 5, 7 55 50 10
  check "IRCop Oto Temizleme", 6, 7 65 64 10
  box "IRCop Sunucu [KanaL] Koruması", 8, 3 11 93 148
  check "IRCop Whois", 7, 104 22 50 10
  check "IRCop Akill", 9, 104 34 50 10
  check "IRCop Özel Karsılama", 10, 104 47 64 10
  check "IRCop HELP Yardım", 11, 104 58 61 10
  box "IRCop Özel Menü", 12, 100 11 84 70
  check "IRCop Whois Flood", 13, 7 75 64 10
  check "IRCop Proxy ", 14, 7 85 69 10
  button "Reklam", 15, 55 20 37 12
  button "Küfür", 16, 55 34 37 12
  check "IRCop Qline Bad Nick", 17, 7 95 66 10
  check "IRCop Caps ", 18, 7 105 67 10
  check "IRCop Join / Part ", 19, 7 116 77 10
  check "IRCop Oto Shun", 20, 7 127 50 10
  check "Oto +m", 21, 6 137 50 10
  check "Küfür / Reklam Oto Shun", 22, 6 147 71 10
  text "IRCop Koruması Kanallarda Güvenliği İyi Bir Şekilde Saglaması Icın Tasarlanmıstır. Reklam Küfür Flood Korumaları Akill Atmaktadır Diger Korumalar İse Samode +b Olarak İşlemini Yapmaktadır. Code By StanteaR", 23, 100 85 86 75
  button "Tamam", 24, 72 162 37 12,ok
}
 
on *:dialog:IRCOpz:sclick:15: {
dialog -m reklamlist reklamlist
}
on *:dialog:IRCOpz:sclick:16: {
dialog -m küfürlist küfürlist
}
on *:dialog:IRCopz:init:*: {
  if ($group(#IRCReklam).status == on ) did -c IRCopz 2
  if ($group(#IRCKüfür).status == on ) did -c IRCopz 3
}
on *:dialog:IRCopz:sclick:2: {
  if ($group(#IRCReklam).status == on ) { .disable #IRCReklam }
  else { /.enable #IRCReklam }
}
on *:dialog:IRCopz:sclick:3: {
  if ($group(#IRCKüfür).status == on ) { .disable #IRCKüfür }
  else { /.enable #IRCKüfür }
}
#IRCKüfür on
Küfür kodun burda olmasıgerekıyor
#IRCKüfür end
;*******
#IRCReklam on
Reklam kodun burda olmasıgerekıyor
#IRCReklam end


StanteaR 06 Mayıs 2009 11:55

Cevap: IRCOP Koruması.
 
Murat Cok Saol Tşk SImdı Bısı Sorcam Butun Korumaları Sadece 1 Text Sayfasında Nasıl Toplayabılırım?

CesuryureK 06 Mayıs 2009 12:47

Cevap: IRCOP Koruması.
 
aynı sayfada birden çok text kullanmak kodların çakışmasına bu yüzden çalışmamasına neden olabileceğinden tek bir text eventi altında var veya set kullanarak yapabilirsin.

örneğin,

PHP- Kodu:

on *:Text:*:#: {
if ($gruop(#kufur) == on) {  işlem }


gruop yerine dediğim gibi,
set kullanılabilir ki o da şu şekilde yapılabilir

kufur geçtiğinde | set %kufur on

şeklinde yapıp,

sonra
if (%kufur == on) { işlem }

karışık oldu ama uğraşırsan çözebilirsin..

ayrıca bi kere post attım aynı posttan 3 tane çıktı garip :)


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

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