GESTION DES PSEUDO

menu channel {
  .GestioN dEs PseudoS:/dialog -m huhu huhu
}

dialog huhu {
  title "-×× PseuDo ××- By SefiX"
  size -1 -1 123 229
  option dbu 
  box "ChoiSi ToN PseuDo", 1, 7 3 110 218
  icon 2, 16 14 87 15
  radio "Counter Strike", 3, 16 39 50 10, flat
  radio "ManGeuH", 4, 16 51 50 10, flat
  radio "Po La", 5, 16 63 50 10, flat
  radio "ReGardE Mail", 6, 16 75 50 10, flat
  radio "oQp", 7, 16 88 50 10, flat
  radio "VNR", 8, 16 100 50 10, flat
  radio "ToiLeTTe", 9, 16 112 50 10, flat
  radio "DoDo", 10, 16 124 50 10, flat
  radio "Away", 11, 16 136 50 10, flat
  radio "En CouR", 12, 16 148 50 10, flat
  edit "", 13, 16 165 50 10
  radio "Autre", 14, 68 165 45 10, flat
  button "Ok", 15, 14 200 37 12, flat ok
  button "PseuDo Par DefauT", 16, 32 182 62 12, flat
  button "ReTouR", 17, 74 200 37 12, flat ok cancel
  button "UtiliSé", 18, 72 71 39 43, flat
}

on *:dialog:huhu:sclick:16:{ nick me }

on *:dialog:huhu:sclick:18: {
  if ( $did(huhu, 11).state == 1 ) { nick AwAy  }
  if ( $did(huhu, 5).state == 1 ) { nick Pas-La    }
  if ( $did(huhu, 9).state == 1 ) { nick Wc     }
  if ( $did(huhu, 4).state == 1 ) { nick Miam }
  if ( $did(huhu, 3).state == 1 ) { nick Cs }
  if ( $did(huhu, 10).state == 1 ) { nick DoDo  }
  if ( $did(huhu, 8).state == 1 ) { nick NRV }
  if ( $did(huhu, 1).state == 1 ) { nick Cs }
  if ( $did(huhu, 6).state == 1 ) { nick MaiL }
  if ( $did(huhu, 14).state == 1 ) { nick %autre }
  if ( $did(huhu, 12).state == 1 ) { nick CouR  }
  if ( $did(huhu, 7).state == 1 ) { nick oQp  }
}

on 1:dialog:huhu:init:0: { 

  dll mdx.dll SetMircVersion $version 
  dll mdx.dll MarkDialog huhu
  dll mdx.dll SetDialog huhu bgcolor $rgb(149,149,149)
  dll mdx.dll SetDialog huhu style staticedge title sysmenu
}