[Back to INTERRUP SWAG index]  [Back to Main SWAG index]  [Original]

Okay, well, For the most part, calling an interrupt from TP is fairly
simple.  I'll use Interrupt 10h (service 0) as an example:

Procedure CallInt;
Var
  Regs : Registers;
begin
  Regs.AH := 0;       { Specify service 0 }
  Regs.AL := $13;     { Mode number = 13 hex, MCGA 320x200x256 }
  Intr($10,Regs);     { Call the interrupt }
end;

This would shift the screen to the MCGA Graphics mode specified.  Now,
it's easier to call this in BAsm (built-in Assembler):

Procedure CallInt; Assembler;
Asm
  MOV AH,0            { Specify service 0 }
  MOV AL,13h          { Mode number = 13 hex, MCGA 320x200x256 }
  inT 10h             { Call the interrupt }
end;

[Back to INTERRUP SWAG index]  [Back to Main SWAG index]  [Original]