CMNT Draws the specified string CMNT Input: É ¥ str#/inst/É CMNT Output: É ¥ rslt/inst/É PRIM Stack/Dup down É ¥ str#/inst/str#/É BRFL branch if string=0 PRIM Stack/Swap É ¥ 0/inst/É BRTR CALL 354093 É ¥ ref/inst/str#/É PRIM Stack/Pop to aux É/ref ¥ inst/str#/É PRIM Stack/Swap É/ref ¥ str#/inst/É LITO 3 É/ref ¥ 3/str#/inst/É PRIM S_tree/Test and read É/ref ¥ rslt/(string)/inst/É BRFL branch if no such entry PRIM Stack/Drop from aux É ¥ inst/É LITO 0 É ¥ 0/inst/É BRTR PRIM List/List to stack É/ref ¥ stringÉ/inst/É PRIM Stack/Push from aux É ¥ ref/stringÉ/inst/É ASIO OpStn/DRAW_TEXT É ¥ inst/É LITO 1 É ¥ 1/inst/É