10 OPEN1,8,15:OPEN2,8,2,N$+",P,R"
20 PRINT#1,"M-R"CHR$(24)CHR$(0)CHR$(2)
30 GET#1,TR$,SC$:CLOSE2:CLOSE1
40 TR=ASC(TR$+CHR$(0)):SC=ASC(SC$+CHR$(0))