DETECTION OF FOSSIL:

Fossil specs require v5 report &H1954 in Regs.AX for function 04h
activate port.

Additional specs for X00 superset functions between 1CH and 21H report
&H1954 in Regs.AX for function 1CH activate port.

To avoid confusion, detect X00 first, then fossil. For example:

Sub DetectFossil(Var) ' Var returns 1=X00, 2=fossil
 Var=0
 Inregs.AX=&H1C00
 Inregs.DX=Port ' port is 0-7
 Call Interrupt(&H14,Inregs,Outregs)
 If Outregs.AX=&H1954 Then
    Var=1
 Else
    Inregs.AX=&H0400
    Inregs.DX=Port
    Call Interrupt(&H14,Inregs,Outregs)
    If OutregsX.AX=&H1954 Then
       Var=2
    Endif
 Endif
End Sub

For drivers which emulate 1Ch and return values indicating fossil without
actually supporting superset functions should disable this feature.

-end-
