2265 GOSUB 555