Yuck, get rid of the GOTOs in your code! Thery are unnecessary as they can be replaced by using DO-WHILE and LOOP-UNTIL constructs!
_________________________
There are two types of vessels, submarines and targets.