3733 FOR K=1 TO NCT(1) : INPUT#1,TCX$(K) : NEXT K