🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.modula2
Article #1502

Re: executing from within a modula-program

#1502
From: Mark A. Morrell
Date: Wed, 11 Nov 1992 01:28
23 lines
1257 bytes
 > I use Topspeed modula 3.1 and had a problem in my last program. Does
 > anyone know how Ii can execute another program from a modula program so

This is a procedure which stuffs a character into the keyboard buffer,
and may be of use to you.  Stuff the buffer, then exit your program.

PROCEDURE Stuff( c : CHAR );
VAR
   R : SYSTEM.Registers;
BEGIN
    R.AH := 05H;
    R.CL := c;
    R.CH := 0;
    Lib.Intr( R, 16H );
END Stuff;

The keyboard buffer will only hold around 16 characters, so you can't
overdo it...
-- 
--------------------------------------------------------------------
Mark A. Morrell     Disclaimer:  _I_ probably don't even believe it.
Literary Reference:  The introduction to Cervantes' Don Quixote.
Technical Details
Message-ID: <BxJ2rn.Du4@uxa.ecn.bgu.edu>
Path: arc1-ca.pugleaf.net!sparky!uunet!know!cass.ma02.bull.com!think.com!spool.mu.edu!sol.ctr.columbia.edu!zaphod.mps.ohio-state.edu!uwm.edu!linac!mp.cs.niu.edu!uxa.ecn.bgu.edu!mgmam
References: <16490.2AFB1912@puddle.fidonet.org> <721218424snx@black.demon.co.uk>

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!know!cass.ma02.bull.com!think.com!spool.mu.edu!sol.ctr.columbia.edu!zaphod.mps.ohio-state.edu!uwm.edu!linac!mp.cs.niu.edu!uxa.ecn.bgu.edu!mgmam
From: mgmam@uxa.ecn.bgu.edu (Mark A. Morrell)
Newsgroups: comp.lang.modula2
Subject: Re: executing from within a modula-program
Message-ID: <BxJ2rn.Du4@uxa.ecn.bgu.edu>
Date: 11 Nov 92 01:28:34 GMT
References: <16490.2AFB1912@puddle.fidonet.org> <721218424snx@black.demon.co.uk>
Organization: Educational Computing Network
Lines: 23