3280 GOSUB 555