[ql-users] MACHINE types

[RWAPSoftware]

OK,

we know that under SMSQ/e the function MACHINE returns a value to signify the hardware it is running on.

However, the new SMSQ/e for Aurora still returns 10 or 12 to signify Gold Card or Super Gold Card fitted.

Plus, I understand that the Q40/Q60 return 17.

I am looking at writing a small machine code function to return a machine identifier on nearly any QL.

The following points arise:
1) May I suggest Aurora + Gold Card return 22 and Aurora + Super Gold Card return 23.  This is because, even without SMSQ/e, using:
PEEK (SYS_BASE+HEX('A7'))&&31
returns 10 and 12 for Gold Card/Super Gold Card respectively, even when plugged into a standard QL. 

Again, the article in QL Today suggests that a return of 11 and 13 signify Hermes is present... I am not convinced.... Tony??

2) According to QL Today Vol 7 Iss 2, this command on QLAY should return 31 - that is fine, but does not work on QLAYW that I have here....  Is JD Mitchell on this list as he wrote the original listing for QL Today??

3) I thought that 16+1 signified a Falcon with a blitter fitted - maybe there was never one built..  However, I now see that 17 is supposed to show a Q40/Q60 (you need PROCESSOR to differentiate the two).

4) It is easy to identify the THOR computer - may I suggest values of:
    18 = THOR 1
    19 = THOR 20
    20 = THOR XV

5) At present the standard QL, Atari ST, STM, STF and STFM all return 0.  Can I presume that if ver$<>'HBA' it is a standard QL and therefore I can set a value of 22 to signify a standard QL (or other unidentified machine)

6) Can I suggest a value of 14 for Q-Emulator??

6) Is there any way of identifying when QDOS is running on QDOS Emulator for Amiga, QLAY, uQLx (any others....).?? If there is, what values should I use to signify these machines...  15,21 and 31 appear to be free (taking into account the above suggestions).  Is this correct??

--
Rich Mellor
RWAP Software
35 Chantry Croft, Kinsley, Pontefract, West Yorkshire, WF9 5JH
TEL: 01977 610509
http://hometown.aol.co.uk/rwapsoftware