3140 PRINT#3,TAB(13*(K-KM)+10);S;"-";A$;