210 KX=0 : GOSUB 500