Dec 242017
Concats 2 files side by side, w/source. | |||
---|---|---|---|
File Name | File Size | Zip Size | Zip Type |
BESIDES.COM | 33766 | 18457 | deflated |
BESIDES.DOC | 3901 | 1512 | deflated |
BESIDES.HLP | 2702 | 856 | deflated |
BESIDES.SEQ | 7651 | 1745 | deflated |
CMDLNPRS.SEQ | 2376 | 607 | deflated |
SEQREAD1.SEQ | 4514 | 1419 | deflated |
SEQREAD2.SEQ | 4515 | 1422 | deflated |
Download File BESIDES.ZIP Here
Contents of the BESIDES.DOC file
BESIDES: FILES, SIDE BY SIDE
BY MIKE NEMETH
Crafted in F-PC FORTH ( of course)
Besides will concatinate two input files into one output
file. Unlike normal copy funtions which add the files end to
end, Besides "concatinates" one file besides the other. That
is, upto 80 charactors of a line from the first input file and
upto 80 charactors of a line from second input file are place
into a single line in the output file. The line from the second
file is always "aligned" to start in column 81 of the output
line. A line is define to be terminate by a CRLF pair and to
be less than 254 charactors in length.
To execute type on the Command line:
besides [infile1.ext [infile2.ext [outfile.ext]]]
Where the bracket enclosed filenames are optional and
may contain full drive/path names and .ext defaults to
.seq
If one or more filenames are omitted, Besides will prompt as
needed as follows:
Name of file to concatinate to?
Name of file to concatinate with?
Name of file outputfile?
Then besides will display:
Concatinating infile1
With infile2
into outfile1
and if there is an error with the filenames display one
of the following error messages:
open error on input file1
or
open error on input file2
or
Create ERROR! for output file
If the is no filename error Besides will now display:
Working /
where "/" is a spinning line if Besides is in fact doing
disk I/O.
When done Besides displays:
Finished
Besides has been tested on a monochrome Sperry HT (ibm xt type)
and a color IBM AT.
Besides has been tested with input files of 90k bytes(each)
with a execution time of about 2 and a half minutes (8 mz HT).
Output file size is about twice the inputfile1 size plus
the inputfile2 size. This is due to the "padding out" of
the inputfile1 lines to 80 charactors.
Besides output was designed to "fit" on a 80 column print
using elite compressed mode. However it has only been test on
a wide carrage printer.
Besides was crafted using Tom Zimmer's F-PC 2.25 Shareware
Forth. All source needed for besides is included here.
The files were loaded in the following order:
FLOAD SEQREAD1.SEQ \ READ LINES FROM HANDLE INFILE1
FLOAD SEQREAD1.SEQ \ READ LINES FROM HANDLE INFILE2
FLOAD CMDLNPRS.SEQ \ DOS COMMAND LINE PARSER
FLOAD BESIDES.SEQ \ BESIDES SOURCE
The file besides.hlp is not load nor needed for running
Besides.com. It is the help file for besides.seq!
This is program "freeware". But if you truely like and uses it.
I suggest a donation of $5.00 donation to:
Forth Interest Group (FIG)
P.O. Box 8231
San Jose, CA 95155
Or better yet join FIG for $30.00 a year and receive its bi-monthly
publication, Forth Dimensons!
I may be reached on GEnie (M.NEMETH1) or via you local
Forthnet node (the East Coast Forth Board 703-442-8695 is the
one where I may reached directly).
Note. Tom Zimmer's F-PC 2.25 shareware ($25) Forth is avaible
on GEnie or the Forthnet.
December 24, 2017
Add comments