🚀 go-pugleaf

I recently obtained a old (early 1980s) Pascal program which was
originally written to work on a PC (most likely DOS). I am having
difficulty compiling the two functions listed below.
Specifically, the compiler does not understand the INTR and
GOTOXY keywords. Any idea what these do? If so, how can I
duplicate their function using CodeWarrior Pro 2 for Windows?

Thanks,

John Chauvin 


-------------------------------------------------------------
FUNCTION GETCHAR : CHAR;

TYPE    REGPACK = RECORD
                  AX,BX,CX,DX,BP,SI,DI,DS,ES,FLAGS : INTEGER;
                  END;

VAR     REGISTERS : REGPACK;
        C : CHAR;

BEGIN
C := CHR(0);
WHILE C = CHR(0) DO
      BEGIN
      REGISTERS.AX := 8*256;
      INTR(33,REGISTERS);              <=== What is INTR?
      C := CHR(REGISTERS.AX AND 255);
      END;
GETCHAR := C;
END; 
-------------------------------------------------------------

-------------------------------------------------------------
PROCEDURE CLEAR; 
VAR I : INTEGER;

BEGIN
FOR I := 1 TO 25 DO WRITELN;
GOTOXY(0,0);                         <==== What is GOTOXY?
END;      
-------------------------------------------------------------



-- 
John H. Chauvin jchauvin@netcom.COM
Netcom - Online Communication Services San Jose, CA