CP/M/CPM_CDROM.iso/enterprs/cpm/utils/f/pascal.arc/TURBO.COM

Turbo Pascal Compiled 8bit CP/M-80 COM | 1992-08-14 | 30.0 KB | 497 lines

Copyright (C) 1985 BORLAND Inc
Lear-Siegler ADM-31dP
 .,;:=?*[]<>{}
^#V#N#F
s#r#q#p
    #^#V
9^#Vh&
|/g}/o#
T]=o`9y
T9^K#
8/<oz
T9^K#
oGOW_g
`1pF,
LSTCAUX
>~O6~*
 .##~
TRUEFALSE
##N#F*
##~++
    N#F#s#r
N#F#^#V
Nw#Fw
q#p#6
#w#w#w
>!DM!
<(    !\
Ns#Fr
User break
Run-time
 error
, PC=
Not enough memory
Program aborted
TURBO Pascal system
Version 3.01A
CP/M-80, Z80
Copyright (C) 1983,84,85
BORLAND Inc.
Terminal:
Include error messages
ogged drive:
ork file:
ain file:
dit
ompile
un
ecute
ir
uit  compiler
ptions
Text:
[&E*(E+
[(E**E
Free:
 bytes (
compile ->
5!!X#
emory
om-file
n-file
tart address:
 (min
nd   address:
 (max
ind run-time error
LWMECRSXDQOMCHSEFQ
'#'''/'M'z'u$
Main file name
Work file name
%"}%!
D*&E"BD"DD"2D"6D":D"LD
Loading
File not found
New File
File too big
6B#6A#6K
Workfile
 not saved. Save
Saving
-*(E+6
  Directory
  Disk
 full
2aD!]
Start address
End address
Enter PC
Searching
%"\%!
y*(E6
>C!OM
>C!HN2<y"=y>
Compiling
 -->
Compilation aborted
 lines
not found
Code:
Data:
Error
found
Error found in above include file
Disk or directory full
Run-time error position
D=(;=
>C!OM2<y"=y
Running
\!>O!VR
Program
!>C!OM
Dir mask
O<(Ry
No file
Bytes Remaining On X:
New drive
 (Y/N)?
>P!AS2e
Gr<2\
*&E6 #"(E
\!>M!SG
%"}%!
$*(E6
 not found
. Press <ESC>
*(Er+s
2VD<2WD!
3:dD=(
2aD!$E6
C        ^#V7
ALine
ACol
AInsert
AOverwrite
AIndent
[XD*2D
[&E*2D
0*2D"XD
=Find
=Replace with
=Options
SlD*&E:_D
*jD"jD
tD:sDG
=Search string not found
sA*(E+
=Replace (
=Write block to file
=Overwrite old
&*DD~
=Read block from file
DM*nD7
?%"DD
*nD"BD*m{
i6*nD
[BD"BD    "DD
i6*nD"BD    "DD
R"pDMD
KpDy/Ox/G
[nD*BD
">*BD
;"2D*6D
*2D"6D*DD
>*2D"BD"DD
D7!bD
D7*4D"HD*2D"DD
(*4D"FD*2D"BD
">*BD
">*DD
">*(E
3!t{"4D
">*2D
[2D"2D
">*2D
*LD:i
">*LD:i
OG*LD
"LDA*2D
GO*LD
"LDA*2D
">*&E"2D"LD
=!t{"4D
29*2D
A"2D!t{"4D
">*:D
;"2D*<D
#"4D*4D
;8+*2D
">*2D
=!t{"4D
*4D"JD
">*2D
2SD"2D
07*4D
07*4D
yA!t{"4D
">*2D
&>*2D
$;*4D
7:WD!i
<:NDG
2VD:i
07:WD=
=Line too long - CR inserted
>#MD*FD
>"FD*HD
>"HDi`#
*2D!t{A
A byte(s) left
=ERROR: Out of space
=*** INTERRUPTED
p?"BD*DD
p?"DD*LD
p?"LD*2D
p?"2D*6D
p?"6D*:D
p?":D
sA"HD
2ND:h
==2RD
D72RD
0':WD
2WD*LDB
@:WDo:i
2WD*LD
MDkb#
{kb+y
*>D"@D
[>D*@D
EB~">D
[>D*@D
<>,[].*+-/$:=(){}^#'
8f9f9s9
8~8T8S7\7/8A8
7'7|9q7
t{Y{Y{
sq{*(E#"
{$$$$"
qq+"Ty>
{*&E"
l**E+"w{T]
B"s{"u{"{{
*o>1!
$l*s{
rM!4y
y= '!
*o*s{
Tm*s{
[Z{r+s
SR*m{
Ho:]{O*b{
m*b{"o{*^{
Xnbu
{!Wz:^{
:o{G~
i:b{=
J:b{=}
r-*s{
im*s{
[Z{r+s
im*{{
*u{"{{*s{
n     y2
[Z{+r+s
[Z{r+s
w+p+r+s
*s{"{{
+F+V+^+
(%V+^+
iR:\{2
{*b{}2
{+V+^+
iR*s{
XR:W{
 7:\{
Uk*X{
pk*b{
"s{"u{
XnDu>
{+V+^
{w+r+s+
[Z{r+s+++
*Z{"^{*b{
o"b{*Z{"^{>
Wm*s{
XnBu
}O:\{
rD*Z{"^{>
2\{"b{
S^{"`{z
Wm*s{"Z{!\{
~+2W{V+^+
SX{V+^
"y{*s{
#N#F    ~
^+V*s{
r*#N#F    ~
dk*s{
0I#N#F#~#^#V
r(+V+^
rH+~<
XnPu
XnVu(
XR:W{
*X{>*
vk:b{=
yk###
ag:\{
:]{w*
XR*X{
rJ++V+^
Po+F+V+^+
++V+^+
F+~+2W{V+^+H
 *:\{
FX:\{
    8) $
?m:i{
vk:\{
`o:\{
X:d{=(
hk:\{
r,:\{
SR*o{
ag:\{
:b{=g.
:b{=
>j !x
hk*^{
ag:\{
:b{=
Qk:b{=g.
yk!!
ag:\{
\:b{=g.
ag:\{
:b{=>
ag:\{
:b{=
SR*o{
SR*o{
ag:\{
~<(<=
##^#Vz
Xn[u "
}/o|/g
}/o|/g#
>j 5:
iR*^{"
{:\{G
g \:\{
f*^{"
{:\{G
iR:\{O
mg*^{~
r>*`{~
r>*b{|
Xnbu!
Xn^u     !
r)V+^
++V+^
6n     V+^
:W{O*X{:\{
 &:b{=g.
O( *^{
s:b{=
:b{=>"
vk:b{=
mg:b{=
SR*b{:k{
t"^{!
"`{i"b{
Dk>!*X{
XR:W{
{p*X{"
"b{-"^{-"`{
*i:\{
f^*`{
SR:i{
r,*k{|
hk*^{
iR*b{|
}=(.=
XR*X{|
Qk*b{
"b{+"^{-"`{>
|/g}/o#
F+N+V+^+~+ng
# f!Wz
g:Wzo
~k!Wz
{*s{7
l*Ty#"Ty
(#^#V
*s{w+"s{
Wm*s{"u{
*w{"}{:
N#^#V#
#^#V#
   *** Abort compilation
EGETNI
AELOOB
NIXAM
UPTUO
ELFUB
TPPAEH
TPRUCER
TPTSNOC
TPNINOC
TPTUONOC
TPTUOTSL
TPNIXUA
TPTUOXUA
TPNIRSU
TPTUORSU
TPRORRE
AERBC
PROGRA
FORWAR
EXTERNA
PACKE
RECOR
STRIN
ABSOLUT
OVERLA
PROCEDUR
FUNCTIO
SWHIL
TREPEA
MTCAS
0VINLIN
#DOWNT
WRITEL
ZWRIT
ZREADL
ZDELET
H\INSER
i\ASSIG
%YRESE
YREWRIT
YCLOS
YERAS
SYRENAM
HYSEE
nYGETME
]FREEME
]DISPOS
]RELEAS
]OVRDRIV
]CRTINI
^CRTEXI
^GOTOX
O]CLRSC
$^CLREO
*^NORMVIDE
/^HIGHVIDE
/^LOWVIDE
4^INSLIN
9^DELLIN
>^DELA
k]BLOCKREA
[BLOCKWRIT
\RANDOMIZ
e]MOV
]FILLCHA
C^HAL
I^POR
O^STACKPT
Z^FLUS
YEXECUT
`YCHAI
5eBIO
BdLENGT
4dCONCA
cdSUC
cUPCAS
dTRUN
cROUN
BcSQR
qcARCTA
cRANDO
dPARAMCOUN
~dPARAMST
dIORESUL
dSEEKEO
dSEEKEOL
dFILESIZ
dFILEPO
dKEYPRESSE
cMEMAVAI
dMAXAVAI
eSTACKPT
XeSIZEO
eBDOSH
5eBDO
6eBIOSH