1CLS:PRINTSPC8"\O/":REPEATVDU32ORPOS<19AND(POSMOD9=0AND4EORVPOSMOD9=1AND39)DIV3:UNTILVPOS>19
