RosettaCodeData/Task/Detect-division-by-zero/Locomotive-Basic/detect-division-by-zero.basic

10 ON ERROR GOTO 60
20 PRINT 2/3
30 PRINT 3/5
40 PRINT 4/0
50 END
60 IF ERR=11 THEN PRINT "Division by zero in line"ERL:RESUME 50