Dec 242017
 
Concats 2 files side by side, w/source.
File BESIDES.ZIP from The Programmer’s Corner in
Category Word Processors
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

Leave a Reply