alias croxyy dialog -m croxy croxy
dialog croxy {
  title "Muaf IP Ekleme"
  size -1 -1 165 104
  option dbu
  box " Muaf IP Listesi ", 1, 4 6 103 91
  box " İşlemler ", 2, 110 6 50 91
  button "+ EKLE", 3, 116 16 37 12
  text "İp Adres", 4, 7 15 25 8
  edit "110.77.* örnek", 5, 35 14 68 10
  list 6, 7 26 96 67, size
  button "- SİL", 7, 116 33 37 12
  button "TAMAM", 8, 116 50 37 12, ok
}

on *:dialog:croxy:sclick:*:{
  if ($did = 7) {
    ruser muafip $did($dname,6).seltext | did -d croxy 6 $did($dname,6).sel
  }
  if ($did = 3) { if ($did($dname,5) != $null ) { .auser muafip $did($dname,5) | did -a croxy 6 $did($dname,5) } }
}

on *:dialog:croxy:init:0: {
  mdx.dll MarkDialog $dname
  mdx SetFont 1,2,3,4,5,6,7,8 14 700 arial
  mdx SetColor $dname 5,6 textbg $rgb(218,218,218)
  mdx SetColor $dname 4 textbg $rgb(010,180,255)
  mdx.dll SetColor $dname 5,6 background $rgb(218,218,218)
  mdx.dll SetColor $dname 1,2,3,4,7,8 background $rgb(010,180,255)
  mdx SetDialog [ $dname ] bgcolor $rgb(010,180,255)
  var %x = 1
  while (%x <= $ulist(*,muafip,0)) { 
    did -a croxy 6 $ulist(*,muafip,%x)
    inc %x 
  }
}

alias kroxyy dialog -m kroxy kroxy
dialog kroxy {
  title "Muaf Nick Ekleme"
  size -1 -1 165 104
  option dbu
  box " Muaf Nick Listesi ", 1, 4 6 103 91
  box " İşlemler ", 2, 110 6 50 91
  button "+ EKLE", 3, 116 16 37 12
  text "Nick", 4, 7 15 25 8
  edit "Aytac", 5, 35 14 68 10
  list 6, 7 26 96 67, size
  button "- SİL", 7, 116 33 37 12
  button "TAMAM", 8, 116 50 37 12, ok
}

on *:dialog:kroxy:sclick:*:{
  if ($did = 7) {
    ruser muafnlist $did($dname,6).seltext | did -d kroxy 6 $did($dname,6).sel
  }
  if ($did = 3) { if ($did($dname,5) != $null ) { .auser muafnlist $did($dname,5) | did -a kroxy 6 $did($dname,5) } }
}

on *:dialog:kroxy:init:0: {
  mdx.dll MarkDialog $dname
  mdx SetFont 1,2,3,4,5,6,7,8 14 700 arial
  mdx SetColor $dname 5,6 textbg $rgb(218,218,218)
  mdx SetColor $dname 4 textbg $rgb(010,180,255)
  mdx.dll SetColor $dname 5,6 background $rgb(218,218,218)
  mdx.dll SetColor $dname 1,2,3,4,7,8 background $rgb(010,180,255)
  mdx SetDialog [ $dname ] bgcolor $rgb(010,180,255)
  var %x = 1
  while (%x <= $ulist(*,muafnlist,0)) { 
    did -a kroxy 6 $ulist(*,muafnlist,%x)
    inc %x 
  }
}