Amstrad Action January 1988 Type-Ins
The following listings were published in the Christmas 1987/January 1988 issue of Amstrad Action:
Contents
Type-Ins
- Loan Amortization Table (R Woodfield)
- Streamer (Jan-Mirko Maczewski and Martin Schroeder) NB two versions for 464 and 664/6128
- 1988 (TH Spence)
- RSXSort (Lawrence Pozzani)
- Discutil (Tristan McDonald)
Notes
* Streamer: The main menu offers four options - Catalogue, Disk onto Tape, Tape onto Disk, and Speed (choose tape save speed of 1000, 2000 or 3500 baud)
* 1988: prints any calendar between the years 1000 and 9999 AD
* RSXSort: supplies a new command |SORT: usage |SORT, first array element, last array element, direction
e.g. 464 |SORT,@a$(0),@a$(100),0 or |SORT,@b$(0,0),@b$(9,9),-1
664/6128 |SORT,a$(0),a$(100),0 or |SORT,b$(0,0),b$(9,9),-1
The first and last elements may be reversed, it does not matter to the program
The last parameter specifies direction of the sort. A zero results in the largest element sorted first, non-zero gives smallest first.
* Discutil: it adds five RSXs to Basic:
|CHECK,@a$,@e% - checks that a file (contained within a$) is on the disk. If the file is present e% will equal zero, otherwise 255 is returned. For example:
a$="program.bas":e%-0:|CHECK,@a$,@e%
|TYPE,@a$ - emulates the CPM TYPE command; it allows you to view the Ascii contents of a file. The string variable holds the name of the file to view. For example:
a$="program.bas":|TYPE,@a$
|PRINTER.ON - echos text written on the screen to the printer. |PRINTER.OFF - switches off the above function.
|LOAD,@f$,a,@e% - this loads any file (held in f$) into any memory address (a). The variable e% will contain the status byte - 0 if all went according to plan; 255 if there was an error. For example:
f$="program.bin":e%=0:|LOAD,@f$,16384,@e%