1645 X=0 : IP=1 : GOSUB 8060