READaRAW PUT ""INb WHILE "K"#b=0: READbRAW WRITEa/ WHILEa|1=" ": WRITEb|1 PUTa@2INa IFb|1=" ": PUTb@2INb WRITEb