Stuff

dialog open {
  title "Controlls"
  size -1 -1 182 244
  option dbu
  tab "Basic Controlls", 3, 0 -1 179 16
  tab "Scripts Controlls", 4
  button "Done", 5, 45 186 37 12, ok
  button "Cancel", 6, 101 186 37 12, cancel
  list 7, 78 78 95 50, size vsbar, tab 3
  text "Choose Server", 8, 105 68 36 8, tab 3
  edit "", 9, 8 124 50 10, autohs, tab 3
  text "Other Server", 10, 16 113 32 8, tab 3
  edit "", 1, 7 84 50 10, tab 3
  text "Enter Nick", 2, 14 76 25 8, tab 3
  check "Stats", 21, 11 25 50 10, tab 4
  check "Rsf", 20, 11 35 50 10, tab 4
  check "On Join", 19, 11 45 50 10, tab 4
  check "Commands", 18, 11 55 50 10, tab 4
  check "Popups", 17, 11 65 50 10, tab 4
  check "Death Match", 11, 11 125 50 10, tab 4
  check "8Ball", 14, 11 95 50 10, tab 4
  check "Whois", 15, 11 85 50 10, tab 4
  check "Price", 12, 11 115 50 10, tab 4
  check "Clan search", 16, 11 75 50 10, tab 4
  check "World Info", 13, 11 105 50 10, tab 4
  text "Check to unload", 22, 11 12 51 8, tab 4
  edit "", 25, 97 200 50 10, tab 4
  edit "", 24, 13 200 50 10, tab 4
  text "Public Trigger", 23, 23 210 32 8, tab 4
  text "Private Trigger", 26, 104 210 40 8, tab 4
  check "Stats", 211, 71 25 50 10, tab 4
  check "Rsf", 201, 71 35 50 10, tab 4
  check "On Join", 191, 71 45 50 10, tab 4
  check "Commands", 181, 71 55 50 10, tab 4
  check "Popups", 171, 71 65 50 10, tab 4
  check "Death Match", 111, 71 125 50 10, tab 4
  check "8Ball", 141, 71 95 50 10, tab 4
  check "Whois", 151, 71 85 50 10, tab 4
  check "Price", 121, 71 115 50 10, tab 4
  check "Clan search", 161, 71 75 50 10, tab 4
  check "World Info", 131, 71 105 50 10, tab 4
  text "Check to load", 221, 71 12 51 8, tab 4
}
on *:dialog:open:sclick:5:{ 
  echo -a  $iif($did(7,1).seltext,$did(7,1).seltext,no server)
  echo -a $iif($did(1,1).text,new nick $did(1,1),no new nick)
  $iif($did(11).state == 1,unload -rs deathmatch.txt)
  $iif($did(21).state == 1,unload -rs stats.txt)
  $iif($did(20).state == 1,unload -rs rsf.txt)
  $iif($did(19).state == 1,unload -rs onjoin.txt)
  $iif($did(18).state == 1,unload -rs commands.txt)
  $iif($did(17).state == 1,unload -rs popups.txt)
  $iif($did(14).state == 1,unload -rs 8ball.txt)
  $iif($did(15).state == 1,unload -rs whois.txt)
  $iif($did(12).state == 1,unload -rs price.txt)
  $iif($did(16).state == 1,unload -rs clansearch.txt)
  $iif($did(13).state == 1,unload -rs worldinfo.txt)
  $iif($did(111).state == 1,load -rs deathmatch.txt)
  $iif($did(211).state == 1,load -rs stats.txt)
  $iif($did(201).state == 1,load -rs rsf.txt)
  $iif($did(191).state == 1,load -rs onjoin.txt)
  $iif($did(181).state == 1,load -rs commands.txt)
  $iif($did(171).state == 1,load -rs popups.txt)
  $iif($did(141).state == 1,load -rs 8ball.txt)
  $iif($did(151).state == 1,load -rs whois.txt)
  $iif($did(121).state == 1,load -rs price.txt)
  $iif($did(161).state == 1,load -rs clansearch.txt)
  $iif($did(131).state == 1,load -rs worldinfo.txt)
}

alias cheese {
  dialog -m open open
  did -a open 7 zeus.au.oc.swiftirc.net
  did -a open 7 hub.uk.eu.SwiftIRC.net 
  did -a open 7 lunar.nl.eu.SwiftIRC.net  
  did -a open 7 magic.ny.us.swiftirc.net
  did -a open 7 griffin.mo.us.swiftirc.net   
  did -a open 7 merlin.de.eu.SwiftIRC.net
  did -a open 7 talon.nl.eu.SwiftIRC.net  
  did -a open 7 services.SwiftIRC.net 
  did -a open 7 cgi-irc.SwiftIRC.net    
  did -a open 7 manticore.uk.eu.SwiftIRC.net 
}