IF USB(0)!=1 THEN : GOTO *NOUSB : END_IFPR USB(1,0)-MBK(1000+3)
FILE$="TEST"*RETRY DO IF USB(0)!=1 THEN : GOTO *NO_USB : END_IF USB_WRITE "TEST_WRITING¥r¥n" TIME 100 DIR 1000 IF USB(1,0)<100 THEN : GOTO *NO_SPACE : END_IF TIME 1000 LOOP *NO_USB WAIT USB(0)==1 GOTO *RETRY*NO_SPACE PRINT "CHANGE_USB_MEMORY"