947 PRINT "Error";ERR;"en linea";ERL :STOP