[Ortho]
[Chg-O]^C^C(setvar "ORTHOMODE" 1);.change+
;p;;@ (setvar "ORTHOMODE" 0)