1390 GOSUB 1785