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