Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!watmath!grwalter
From: grwalter@watmath.UUCP
Newsgroups: comp.sys.cbm
Subject: Re: Changing sequential files to program files
Message-ID: <4645@watmath.UUCP>
Date: Tue, 27-Jan-87 10:41:35 EST
Article-I.D.: watmath.4645
Posted: Tue Jan 27 10:41:35 1987
Date-Received: Wed, 28-Jan-87 06:27:23 EST
References: <592@rayssd.RAY.COM>
Reply-To: grwalter@watmath.UUCP (Fred Walter)
Distribution: na
Organization: U. of Waterloo, Ontario
Lines: 31
Keywords: SEQ -> PRG

In article <592@rayssd.RAY.COM> msf@rayssd.RAY.COM (Michael S. Frank) writes:
>Does anyone out there know how I can convert a sequential file (which is how
>my terminal program downloads) into a program file (so I can load and run it)
>I've tried to look at Track 18/Block 1 etc, but can't seem to get the hang
>of it.  Thanks in advance!

Rather than re-invent the wheel, i will re-post something that came over
the net last summer, because other people might find it of interest.

>From: fred@cbmvax.cbm.UUCP (Fred Bowen)
Newsgroups: net.micro.cbm
Subject: Re: Tokenize text files.
Date: 20 Aug 86 19:38:39 GMT

The lastest issue of Transactor (Nov 86) contains a letter describing how
to do this (as well as execute command files!) via a one liner.  This little
ditty thanks to Frank DiGioia, Stone Mountain, GA:

	OPEN 2,8,2,"file,S,R": POKE 812,73: POKE 781,2: SYS 65478

Just hit RESTORE when it finishes, or end file data with the following (note
NO line number):

	CLOSE 2: POKE 812,47: SYS 65484

This will also work on a 128, if you do the following:

	OPEN 2,8,2,"file,S,R": POKE DEC("32C"),DEC("3C"): SYS DEC("FFC6"),,2
	...
	CLOSE 2: POKE DEC("32C"),DEC("22")