Short: Save articles from Newsagent batch files Author: marksor@netspace.net.au (Mark Sorensen) Uploader: marksor netspace net au (Mark Sorensen) Type: util/rexx Version: 1.0 Architecture: m68k-amigaos This is an ARexx script that I wrote to cut articles from my NewsAgent batch file and save each article individually with different names so I could read them later. Requirements: ~~~~~~~~~~~~ * Cygnus ED Pro 3.5 * ARexx * NewsAgent batch file * Directory Opus 4.12 (optional) Installation: ~~~~~~~~~~~~ 1. Simply copy the script to your REXX: path (or anywhere else!) 2. Load your favourite text editor (CED!) and make a couple of changes: batchfile = 'AmiTCP:marksor/Spool/NABATCH' - Change this line to point to where your NABatch file is. namesize = 18 - This sets the maximum length of the filename to be saved as BEFORE the extension (the article number) is added. savepath = 'Ram:T/' - Change this to point where you want the new articles saved. If you have heaps of ram, then save them here. If you change this to a directory on your hard drive, don't forget the : or / at the end. stripnews = 1 - This should be either 1 or 0. This option will, if equal to 1, will cut the number of newsgroups listed in the Newsgroups: field to the first newsgroup shown. If equal to 0, then it will show ALL of the newsgroups this article was posted to. These are the ONLY things you will need to change in the whole script. Usage: ~~~~~ Simply open a shell and type: RX REXX:NAbatch.ced You don't need to include any options or filenames because it you should have already configured the options (listed above) in the actual script. I have created a button in Directory Opus 4.12 which runs the script automatically once I've downloaded all my news articles. Here's my setup: Button: NABatch Type: ARexx Command: REXX:NABatch.ced Flags: Run Asynch. History: ~~~~~~~ V1.0 - My first attempt at Arexx writing. No known bugs. :) Credits: ~~~~~~~ Stefan Winterstein - author of the Arexx script "formatnewsheader" Author: ~~~~~~ This is my first attempt at writing any sort or "Real" ARexx script thats of any use. If you have any comments (constructive or otherwise) or bug reports or improvements, then you can contact me at: Email: marksor@netspace.net.au (Mark Sorensen) Snail Mail: Mark Sorensen 28 Juniper road Wantirna, Victoria Australia, 3152.