Topspeed_JPI/JPI-1/dbd/IO.DBD

<IO
{IO$KeyPressed
R -16 #CF9
[CF9 14
AL 0  C1
AH 1  C1
BL 2  C1
BH 3  C1
CL 4  C1
CH 5  C1
DL 6  C1
DH 7  C1
AX 0  C2
BX 2  C2
CX 4  C2
DX 6  C2
BP 8  C2
SI A  C2
DI C  C2
DS E  C2
ES 10  C2
Flags 12  S2  C2[0..F]
]
}
{IO$TerminalRdStr
string 6 V O L1
InputBuffer -6E #20D9
[20D9 54
LenBuf 0  L1
Len 1  L1
Buf 2  A52  C2[0..51] L1
]
I -1A C2
H -18 C2
R -16 #CF9
}
{IO$WrStr
s 6 O L1
}
{IO$RdStr
s 6 V O L1
}
{IO$RdBuff
h -6 C2
p -4 C2
}
{IO$TerminalWrStr
string 6 O L1
R -16 #CF9
}
{IO$RdKey
R -16 #CF9
}
{IO$WrStrAdj
S 8 O L1
Length 6 I2
a -6 I2
L -4 C2
}
{IO$WrChar
V 6 L1
}
{IO$WrCharRep
V 8 L1
count 6 C2
j -57 C2
i -55 C2
s -53 A51  C2[0..50] L1
}
{IO$WrBool
V 8 B1
Length 6 I2
}
{IO$WrShtInt
V 8 I1
Length 6 I2
s -53 A51  C2[0..50] L1
}
{IO$WrInt
V 8 I2
Length 6 I2
s -53 A51  C2[0..50] L1
}
{IO$WrLngInt
V 8 I4
Length 6 I2
s -53 A51  C2[0..50] L1
}
{IO$WrShtCard
V 8 C1
Length 6 I2
s -53 A51  C2[0..50] L1
}
{IO$WrCard
V 8 C2
Length 6 I2
s -53 A51  C2[0..50] L1
}
{IO$WrLngCard
V 8 C4
Length 6 I2
s -53 A51  C2[0..50] L1
}
{IO$WrShtHex
V 8 C1
Length 6 I2
s -53 A51  C2[0..50] L1
}
{IO$WrHex
V 8 C2
Length 6 I2
s -53 A51  C2[0..50] L1
}
{IO$WrLngHex
V 8 C4
Length 6 I2
s -53 A51  C2[0..50] L1
}
{IO$WrReal
V A F4
Precision 8 C2
Length 6 I2
s -53 A51  C2[0..50] L1
}
{IO$WrLngReal
V A F8
Precision 8 C2
Length 6 I2
s -53 A51  C2[0..50] L1
}
{IO$WrLn
}
{IO$RdBool
s -53 A51  C2[0..50] L1
}
{IO$RdShtInt
i -57 I4
s -53 A51  C2[0..50] L1
}
{IO$RdInt
i -57 I4
s -53 A51  C2[0..50] L1
}
{IO$RdLngInt
s -53 A51  C2[0..50] L1
}
{IO$RdShtCard
i -57 C4
s -53 A51  C2[0..50] L1
}
{IO$RdShtHex
i -57 C4
s -53 A51  C2[0..50] L1
}
{IO$RdCard
i -57 C4
s -53 A51  C2[0..50] L1
}
{IO$RdHex
i -57 C4
s -53 A51  C2[0..50] L1
}
{IO$RdLngCard
s -53 A51  C2[0..50] L1
}
{IO$RdLngHex
s -53 A51  C2[0..50] L1
}
{IO$RdReal
a -63 F8
r -5B F8
s -53 A51  C2[0..50] L1
}
{IO$RdLngReal
s -53 A51  C2[0..50] L1
}
{IO$RdLn
}
{IO$EndOfRd
Skip 6 B1
}
{IO$RdItem
V 6 V O L1
i -6 C2
L -4 C2
}
{IO$RdChar
t -4 B1
c -3 L1
}
{IO$RedirectInput
FileName 6 O L1
r -18 #CF9
c -4 C2
}
{IO$RedirectOutput
FileName 6 O L1
r -18 #CF9
c -4 C2
}
IO@e  C2
IO@s  C2
IO@Buffer  A100  C2[0..FF] L1
IO@LWW  B1
IO@Eng  B1
IO@ChopOff  B1
IO@OK  B1
IO@Separators  S20 L1
IO@RdStrRedirect  Q4
IO@WrStrRedirect  Q4
IO@Prompt  B1
IO@RdLnOnWr  B1
>