(DEFUN c:haws-L0 ()(haws-core-init 73)(COMMAND "._LAYER" "T" "0" "S" "0" "")(PRINC))
;;(DEFUN c:haws-LK0 () (haws-core-init 74)(COMMAND "._LAYER" "LOCK" "0" "")(PRINC))
(DEFUN c:haws-LKA ()(haws-core-init 75)(COMMAND "._LAYER" "LO" "*" "")(PRINC))
(DEFUN c:haws-LKI ()(haws-core-init 76)(COMMAND "._LAYISO" "_Settings" "_Lock" "")(PRINC))
(DEFUN c:haws-OFI ()(haws-core-init 77)(COMMAND "._LAYISO" "_Settings" "_Off" "_Off")(PRINC))
(DEFUN c:haws-ULA ()(haws-core-init 78)(COMMAND "._LAYER" "U" "*" "")(PRINC))
;;--------------------------END ONE LINERS-------------------------
