SKV - не слушайте никого про case. Case, case и еще раз case - удобней и читаемей.
А для ликвидации пустых шагов - while true do с return/exit в шагах при необходимости