realintr

Simulate interrupt

Declaration

Source position: go32.pp line 94

function realintr(

intnr: Word;

var regs: trealregs

):Boolean;

Description

Simulates an interrupt in real mode.

Parameters:

intnr: interrupt number to issue in real mode.
regs: registers data structure.

Return values: The supplied registers data structure contains the values that were returned by the real mode interrupt. True if successful, False if not.

Remark:

The function transfers control to the address specified by the real mode interrupt vector of intnr. The real mode handler must return by executing an IRET.

Errors

Check the int31error variable.

Example

uses
        go32;

var
        r : trealregs;

begin
        r.ax := $5300;
        r.bx := 0;
        realintr($15, r);
        if ((r.flags and carryflag)=0) then begin
                Writeln('APM v', (r.ah and $f), '.',
                        (r.al shr 4), (r.al and $f), ' detected');
        end else
                Writeln('APM not present');
end.

lazarus-ccr.sourceforge.net