130 IF S(I,2)=INT(S(I,2)) THEN GOTO 150›150 S(I,2)=INT((S(I,2)-2000)/5+2100):NEXT I›TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT