Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Posting-Version: Notesfiles $Revision: 1.7.0.10 $; site smu Path: utzoo!watmath!clyde!cbosgd!ihnp4!inuxc!pur-ee!uiucdcs!convex!smu!hu From: hu@smu Newsgroups: net.micro Subject: Re: WORDSTAR Qf/Qa of hard carriage ret Message-ID: <14300022@smu> Date: Tue, 12-Nov-85 02:51:00 EST Article-I.D.: smu.14300022 Posted: Tue Nov 12 02:51:00 1985 Date-Received: Thu, 14-Nov-85 00:45:50 EST References: <350@whuts.UUCP> Lines: 32 Nf-ID: #R:whuts.UUCP:350:smu:14300022:000:1139 Nf-From: smu!hu Nov 12 01:51:00 1985 Well, according to my humble knowledge about wordstar, you have no way to do this in wordstar. When I want to convert a printable file into wordstar type file (i.e. with hard RETURN only between paragraphs) ,I use a basic program to do so. Here is an example, hopefully it is useful. hu@smu 10 ' WSCONV 20 ' Converts downloaded file to WordStar files (slowly) 30 ' by Yu Hen Hu 40 ' Dallas, Texas 50 ' 2-14-85 60 ' 70 PRINT: INPUT " Name of standard text file to be converted: ";FILN$ 80 PRINT: INPUT " Name of wordstar file to write: ";FILO$ 90 OPEN FILN$ FOR INPUT AS #1 100 OPEN FILO$ FOR APPEND AS #2 110 FLAG%=0 120 IF EOF(1) THEN CLOSE: END 130 A$ = INPUT$(1, #1) 140 I = ASC(A$) 150 IF I=13 GOTO 190 160 IF FLAG%=0 GOTO 210 ' I<>13 & FLAG=0 DO NOTHING 170 IF(FLAG%=1 AND I<>10) THEN FLAG%=0 ' I<>13 & FLAG=1 REMOVE SINGLE180 GOTO 210 ' AND BACK TO ORIGINAL STATE 190 IF FLAG%=1 GOTO 210 ' IF I=13 AND FLAG=0, DELETE TEMPORARILY 200 I=141: FLAG%=1 ' AND SET FLAG 210 A$ = CHR$(I) 220 PRINT #2, A$; 230 GOTO 120