IBM ThinkPad 770, Reference Manual

Page: 140 / 148

C Language
WORD GetSystemID()
{
SMB SmapiEntry ;
INPARM MyInput ;
OUTPARM MyOutput ;
WORD Rc = -1 ;
if (GetSmapiEntry(&SmapiEntry)) {
MyInput.SMBIN_FUNC = ð ;
MyInput.SMBIN_SUB_FUNC = ð ;
if (SmapiEntry(&MyInput, &MyOutput)) {
// No System ID is available
} else {
Rc = MyOutput.SMBOUT_PARM_1 ;
}
} else {
// No Smapi BIOS interface.
// Try to use CBIOS INT 15.
}
return Rc ;
}
B-64 SMAPI BIOS