225 KX=0 : GOSUB 730