@196 ->Email p.j.howkins@lboro.ac.uk Password: jonathan OS_Byte 129 Question > I successfully wrote a quick program on an A3000 at work but I really > wanted to try it on the Doomsday machine we have here to see if it > returned anything different than the Master 128 one. However the prog I > wrote on the Arc used the SYS command and therefore won't work on the > earlier comps. Could you knock me up a quick program to do this on a > Beeb, if its not too much trouble. Just use INKEY-256 and it will be defined to work on all Acorn BBCBasics. PRINT "My host hardware varient is type: ";~INKEY-256 It's the bottom byte of INKEY-256 that you should look at. The BBC B returns &FFxx, whereas all the others return &00xx. Here's a thrown- together program that will run on most BBCBasics and tell you what you're running on. In it's current form it will not work on the Z88, NC100 or non-BBC CPM. os%=FNos PRINT "Host hardware: ";os%;" ";FNhost(os%) PRINT "Hardware type: "; IFos%=32:PRINT "****" ELSE PRINT INKEY-256;" ";FNtype(INKEY-256) END : DEFFNos:LOCALA%,X%:X%=1:=((USR&FFF4)AND&FF00)DIV256 DEFFNhost(A%):IF(A%>8ANDA%<30)ORA%>32:="Host "+STR$A% IFA%=0:="Electron" IFA%=1:="BBC B" IFA%=2:="BBC B+" IFA%=3:="Master" IFA%=4:="Master ET" IFA%=5:="Master Compact" IFA%=6:="Archimedes" IFA%=7:="Springboard" IFA%=8:="UNIX" IFA%=30:="Amstrad" IFA%=31:="Spectrum" IFA%=32:="PC" : DEFFNtype(A%):A%=A%AND255 IFA%=&01:="Electron" IFA%=&FF AND os%=2:"Reuters Terminal (UK)" IFA%=&FF:="BBC OS 1.00/1.20" IFA%=&FE: AND os%=2:"Reuters Terminal (US)" IFA%=&FE:="BBC OS 1.10 (US)" IFA%=&FD:="Master OS 3.20" IFA%=&FC:="BBC OS 1.20 (Germany)" IFA%=&FB:="BBC B+" IFA%=&FA:="Acorn Business Computer" IFA%=&F7:="Master ET" IFA%=&F5:="Master Compact" IFA%=&A0:="Archimedes Arthur 1.20" IFA%=&A1:="Archimedes RISC-OS 2.00" IFA%=&A2:="Archimedes RISC-OS 2.01" IFA%=&A3:="Archimedes RISC-OS 3.00" IFA%=&A4:="Archimedes RISC-OS 3.1x" IFA%=&A5:="Archimedes RISC-OS 3.50" IFA%=&A6:="Archimedes RISC-OS 3.60" IFA%=&A7:="Archimedes RISC-OS 3.7x" IFA%=&A8:="Archimedes RISC-OS 4.00" IFA%=&AF:="Springboard" IF(A%AND&F0)=&D0:="Amstrad CPC" IF(A%AND&F0)=&E0:="Spectrum" ="Unknown variant" As an aside, you might be interested in Econet client types: Top byte: &00xx: Acorn &01xx: Torch &02xx: Reuters &10xx: JGH Hardware &FFxx: SJ Research In full: &0000: Reserved &0001: Acorn BBC &0002: Acorn Atom &0003: Acorn System 3/4 &0004: Acorn System 5 &0005: Acorn Master 128 &0006: Acorn Electron &0007: Acorn Archimedes &0008: Acorn *Reserved* &0009: Acorn Communicator &000A: Acorn Master ET &000B: Acorn Filestore &000C: Acorn Master Compact &000D: Acorn PC Ecolink &000E: Acorn RISCiX &000F Acorn RiscPC &0010 CTL Iyonix &0011 A9 &1040: JGH Spectrum &1041: JGH Amstrad CPC &FFF8: SJ Research GP Server &FFF9: SJ Research 80386 UNIX &FFFA: SJ Research SCSI Card &FFFB: SJ Research IBM Interface &FFFC: SJ Research Nascom 2 &FFFD: SJ Research RM 480Z &FFFE: SJ Research File Server &FFFF: SJ Research Z80 CP/M -- J.G.Harston (JGH BBC PD Library) 70 Camm Street, Walkley, SHEFFIELD S6 3TR BBC+Master / Z80+6502 / CoPro+Tubes / Econet+SJ / Devolution / Transport / Planning / Highways http://homepages.nildram.co.uk/~amilton/walkley.htm jgh@arcade.demon.co.uk (( Anti-UCE address added by Arcade, not by me ))