menu  { 
  Alias creatordialog -m ali ali 
} 
ALIAS aliascreator { 
  dialog -m ali ali 
} 
dialog Ali { 
  title Aliasmaker Made by kerst 
  size -1 -1 206 194 
  option dbu 
  edit Alias NAME (Trigger)(auto  added), 1, 106 5 94 11 
  edit What must the script do use the charater  instead of enter, 2, 106 21 93 37, multi vsbar center 
  button Finished, 3, 10 3 90 14, cancel 
  button Help me with this!, 4, 10 19 90 14 
  list 6, 8 108 188 78, size vsbar 
  button Create alias!, 5, 10 37 90 14 
  text Check one of these tags for fast making alias (only have to fill in name), 7, 13 63 174 8 
  check Memo, 8, 15 75 50 10, group 
  check Access, 9, 68 90 50 10, group 
  check Read memo, 10, 68 75 50 10, group 
  check Global, 11, 15 90 50 10, group 
  check Notice, 12, 133 76 50 10, group 
  check Remote, 13, 133 90 50 10, group 
  check Check this for using Alias maker, 15, 11 52 88 10 
} 
on dialogalisclick4 { 
  help aliases 
} 
on dialogalisclick14 { 
  dialog -x ali ali 
  dialog -m kerst kerst 
} 
on dialogalisclick5 { 
  set %aliasname $did(1) 
  set %aliasvar Alias %aliasname $+($chr(123)) 
  set %brackets $count($did(ali,2),$chr(123)) 
  if ( iswm $did(ali,2)) {
    did -a ali 6 %aliasvar 
    did -a ali 6 $remove($did(ali,2),) 
    did -a ali 6 $chr(125) $str($chr(125) $chr(32),%brackets) 
    halt 
  } 
  if ($did(ali,8).state) { 
    did -a ali 6 %aliasvar 
    did -a ali 6 ms send $!1- 
    did -a ali 6 $+($chr(125)) 
    halt 
  } 
  if ($did(ali,9).state) { 
    did -a ali 6 %aliasvar 
    did -a ali 6 cs access $+($chr(36)) $+ Chan add $!1- 
    did -a ali 6 $+($chr(125)) 
    halt 
  } 
  if ($did(ali,10).state) { 
    did -a ali 6 %aliasvar 
    did -a ali 6 msg memoserv read last 
    did -a ali 6 $+($chr(125)) 
    halt 
  } 
  if ($did(ali,11).state) { 
    did -a ali 6 %aliasvar 
    did -a ali 6 amsg $!1- 
    did -a ali 6 $+($chr(125)) 
    halt 
  } 
  if ($did(ali,12).state) { 
    did -a ali 6 %aliasvar 
    did -a ali 6 notice $!1- 
    did -a ali 6 $+($chr(125)) 
    halt 
  } 
  if ($did(ali,13).state) { 
    did -a ali 6 %aliasvar 
    did -a ali 6 remote $!1 
    did -a ali 6 $+($chr(125)) 
    loadbuf -o ali 6 space.txt 
    did -a ali 6 Usage = Aliasname onoff 
    halt 
  } 
  if ($did(ali,15).state) { 
    did -a ali 6 %aliasvar 
    $replace($did(ali,2),%,%!!) 
    $replace($did(ali,2),},$+($chr(125))) 
    $replace($did(ali,2),$,$!!) 
    $replace($did(ali,2),{,$+($chr(123))) 
    did -a ali 6 $did(2) 
    did -a ali 6 $chr(125) $str($chr(125) $chr(32),%brackets) 
    halt 
  } 
}