1 OPEN15,8,15:PRINT#15,"I0":N$=CHR$(0)+CHR$(0)+CHR$(0)
2 OPEN1,8,2,"#"
3 PRINT#15,"U1";2;0;18;0
4 PRINT#15,"B-P";2;165:PRINT#1,N$
5 PRINT#15,"B-P";2;0:PRINT#15,"U2";2;0;18;0:CLOSE2
6 PRINT#15,"I0":CLOSE15