' *** REV.LST *** 2nd GFA-Manual, page 9-12 ' *** Return reversed characters DEFFN rev$(text$)=CHR$(27)+"p"+text$+CHR$(27)+"q" ' *** '