2045 GOSUB 650