PCTYPE()
 Returns the type of computer in use
------------------------------------------------------------------------------
 Syntax

     PCTYPE() --> nPCType

 Returns

     PCTYPE() returns a numeric code to identify the type of computer.

 Description

     This function differentiates between the different types of PC's.  The
     function determines the type of computer installed in the application
     The following codes apply:

     Table 12-5: Computer Type Coding
     ------------------------------------------------------------------------
     Value     Symb. constants   PC-Type
     ------------------------------------------------------------------------
     255       PC_NORMAL         Normal PC
     254       PC_XT             PC-XT (w/hard disk)
     253       PC_JUNIOR         PC jr
     240       PC_MODEL30        Model 30
     251       PC_XT_2           XT/2
     249       PC_LAPTOP         Laptop
     252       PC_AT             AT/XT-286/Model 50/Model  60
     248       PC_MODEL80        Model 80
     45        PC_COMPAQP        COMPAQ Portable
     154       PC_COMPAQ         COMPAQ Portable Plus
     ------------------------------------------------------------------------

 Notes

     .  386 and 486 computers are often coded as AT's.

     .  The values correspond to IBM BIOS codes.  An incompatible BIOS
        might return a different value.

 Example

     What type of computer is installed?

     ? PCTYPE()         // 252  an AT!