| >RunTests
|
| ACORN TEST SOFTWARE (c) Acorn Computers Ltd.
|
| *********************** CHANGE LIST *************************************
|                                                                        
| Vers  Date            Name    Comment                                 
| ----- ----------      ---     -------------------------------------------
| 1.00  24-Sep-91       BAR     Taken from !Boot2 V1.01, change the name.
|                               Remove unnecessary *unsets.
| 1.01  26-Sep-91       BAR     Add code to load MemAlloc and set the RMA
|                               free space and the screen size.
| 1.02  02-Oct-91       BAR     Add line to set the systemsize to 100k,
|                               increase the size of the RMA Free size.
| 1.03  16-Oct-91       BAR     Remove lines to adjust memory sizes - now
|                               done by ConfMemeory obey file, called before
|                               this obey file by the !Boot File.
| 1.04  08-Nov-91       DB      Added only call titlecsrn when first run,
|                               NOT during return in keyboard test.
| 1.05  13-Nov-91       BAR     Add line to echo 'running tests now'.
|                               Add lines to call the setup & conf.. files.
| 
| This program will call the required test programes.
| Only call conf... files on first pass through the boot file. Done by if
| <var> not set then do. set var after. Call the config memory & drives with
| obey -c. The files should be called this way instead of the function key
| method, so if there is a problem in configuring the mch. the code will
| stop. NOTE 'obey -c' only works with RISC OS 3 (and > 2.11).
|
| Unset key$1 & flush keyboard buffer
*unset key$1
*FX 15,1
|
| Now set Test Disc specific options - Number of drives, Memory e.t.c.
*SetUpTest
|
| Now Configure the memory areas.
*IF "<doneconfigmemory>" = "" THEN obey -c <TEST$DIR>.ConfMemory
|
| Now configure the drives. (MUST BE -c)
|*IF "<doneconfigdiscs>"  = "" THEN obey -c <TEST$DIR>.ConfDiscs
|
ECHO OK ! Running the tests now.
|
*IF <TEST$Reset_key> = 1 THEN *TITLESCRN
*CONTROL 
