 ; Ral - rotate a drawing for ease of editing.
 ; Copyright 2006 by Rocket Software Ltd.
 ; 
 (DEFUN C:LAR ()
  (setvar "cmdecho" 0)
  (command "undo" "be")
  (command ".rotate" "all" "" "0,0" 90)
  (command ".zoom" "e")
  (command "undo" "end")
 (princ))

 (DEFUN C:RAL ()
  (setvar "cmdecho" 0)
  (command "undo" "be")
  (command ".rotate" "all" "" "0,0" -90)
  (command ".zoom" "e")
  (command "undo" "end")
 (princ))
