MACROSScrap4unit ; interface uses ; implementation {begin} end. Indent one line two spacesG PGUnindent one line two spacesGSSPProcedure shell0procedure ; {-} KKbegin {} end; {}HHHOKFunction shell2function :; {-} KKbegin {} end; {}HHHOKK Program shell5program ; {-} KKtype var begin end.HHHHHOK Unit shellJunit ; interface uses ; implementation {begin} end. HHHHHHMMMMM Print block PRN Indent marked block two spaces    1ln Unindent marked block two spaces    2ln