Определить ОБМЕН в QB64

Question

В настоящее время я использую следующий код для обнаружения доли в qb64:

Есть ли более простой способ определить долю?

REM detect share in qb64:
InregsX.AX = &H1000
CALL INTERRUPTX(&H2F, InregsX, OutregsX)
IF (OutregsX.AX AND &HFF) = &HFF THEN
    Share.Installed = True
ELSE
    Share.Installed = False
END IF