1665 IP=1 : GOSUB 9125