Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!snorkelwacker!bloom-beacon!athena.mit.edu!randy From: randy@athena.mit.edu (Randall W Winchester) Newsgroups: comp.sys.cbm Subject: Re: Scan cbm programs from the magazine listings? Keywords: tokenizing Message-ID: <1990Feb11.213622.24096@athena.mit.edu> Date: 11 Feb 90 21:36:22 GMT References: <13835@cbnews.ATT.COM> Sender: news@athena.mit.edu (News system) Reply-To: randy@athena.mit.edu (Randall W Winchester) Distribution: na Organization: Massachusetts Institute of Technology Lines: 37 In article <13835@cbnews.ATT.COM> ewm@cbnews.ATT.COM (edward.w.mcfarland,54264,mv,30002w3,508 960 6202) writes: > > > Having access as I do to an Apple Mac IIcx with scanner and OCR >software, I was wondering what might be entailed in scanning in the >program listings that appear in the C= magazines for conversion to >run on my C64. > Not being up on CBM file systems, would I convert the scanned program >to C= ASCII? Would it then run in that state? (I can down load the ASCII >file to my C64 and convert it to C= ASCII) > I assume that the C= specific Basic things like the cursor control >instructions that Run magazine uses in their listings would have to be >keyed in after you get the prog. into C= ASCII. > >Thanks for sharing your knowlege, > > Ed McFarland ewm@mvusa.ATT.COM Once the BASIC text has been converted to CBM ASCII, it has to be tokenized, or converted to PRG format. There are several public domain utilities to tokenize SEQ listings of BASIC programs, but the simplest way to do it is to enter the following commands in direct mode: OPEN 1,8,8, "filename" POKE 781,1 SYS 65478 On the C128, simply enter OPEN 1,8,8, "filename" : SYS 65478,0,1. When the disk drive stops running, a / will return control to the keyboard. If you do a LIST, you'll see the program in memory. It can then be saved to disk. ******************************************************************************* * Randy Winchester * randy@athena.mit.edu * PO Box 1074, Cambridge, MA 02142 * *******************************************************************************