💾 Archived View for mirrors.apple2.org.za › archive › ground.icaen.uiowa.edu › MiscInfo › Programmin… captured on 2024-07-09 at 03:51:14.
⬅️ Previous capture (2023-01-29)
-=-=-=-=-=-=-
--> This is from one of the articles in one of the user group newsletters I mentioned in another post. A gentleman down under used to create many pamphlets for his work and used `The Newsroom' to make them. He switched to using another tool, eventually; that could import the Newsroom graphics but he had no joy in being able to import/convert the TXT content in the Newsroom files. He figured-out a way to do it manually, then wrote a little AppleSoft BASIC program, to automate much of the chore. This may be old news - but just in case it's of any use/interest; here it is: 10 REM To Convert a BINary NEWSROOM File into a Standard ASCII File. 11 REM 1988-1991 Michael Hickey. 12 REM Canberra - ACT. 20 ONERR GOTO 70 :REM Unexpected Error - Shutdown. 25 D$ = CHR$(4) 30 PRINT D$;"PR#3" :REM Activate 80-Column Firmware. 35 PRINT D$;"CATALOG,TBIN" :REM Only Display BINary Files. 40 PRINT "Which NEWSROOM File to CONVERT?": INPUT FILE$ 45 IF LEN (FILE$) < 1 THEN PRINT "Filename ERROR, RUN Program Again.":END 50 HGR: TEXT :REM INITialize Page One of HI-RES Display. 55 PRINT D$;"BLOAD ";FILE$;",A$2000" 60 PRINT D$;"CREATE ";FILE$;"2,TTXT" 65 PRINT D$;"BSAVE ";FILE$;"2,A$2000,L1000" 70 PRINT D$;"CLOSE ";FILE$;"2" 75 END Not having any Newsroom files, this has not been tested; nor do I vouch for `no typos' - however, I typed it much as it was listed in the newsletter. Some nifty stuff, in these old newsletters! :-> -- E.A.G.L.E Librarian A3 BBS:403/481-3133 email:tturner@freenet.edmonton.ab.ca