just a thought you should change this line
alias MCD { dialog -m MCD MCD }
to this
alias -l MCD dialog $iif($dialog(MCD),-v,-md MCD) MCD