home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Vectronix 2
/
VECTRONIX2.iso
/
FILES_01
/
MIDICOM.LZH
/
MCTALK_3.9
/
SOURCEN
/
LIBRARY
/
RING_SUB.I
< prev
next >
Wrap
Text File
|
1993-08-28
|
898b
|
19 lines
{ring_sub.i}
{============}
procedure wait(timer:integer);EXTERNAL;
function anmeld_ring(var name:string;b_size:integer;var r_buf:pointer):boolean;EXTERNAL;
function abmeld_ring(read_buf:pointer):pointer;EXTERNAL;
function transmit(read_buf:pointer;size,an:integer;var name:string;var info:anytyp):boolean;EXTERNAL;
function lese(read_buf:pointer;var msg:anytyp;var esc,len:integer):boolean;EXTERNAL;
procedure brems_token(read_buf:pointer);EXTERNAL;
function token_waits(read_buf:pointer):boolean;EXTERNAL;
procedure frei_token(read_buf:pointer);EXTERNAL;
procedure get_Karte(read_buf:pointer);EXTERNAL;
procedure systemzeit(read_buf:pointer);EXTERNAL;
procedure set_prconf(i:integer;read_buf:pointer);EXTERNAL;
function mc_busy(read_buf:pointer):boolean;EXTERNAL;
function mc_closed(read_buf:pointer):boolean;EXTERNAL;
function mc_neustat(read_buf:pointer):boolean;EXTERNAL;