6595 GOSUB 950