home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.barnyard.co.uk
/
2015.02.ftp.barnyard.co.uk.tar
/
ftp.barnyard.co.uk
/
cpm
/
walnut-creek-CDROM
/
MBUG
/
MBUG013.ARC
/
POINT.PRO
< prev
next >
Wrap
Text File
|
1979-12-31
|
384b
|
14 lines
procedure POINT(x,y : byte);
{ Procedure developed in Turbo Pascal for
the MicroBee by Bob Burt }
{ To be used in conjunction with procedures
NORMAL.PRO, LORES80.PRO, DRAW2.PRO and
SETS.PRO }
begin
mem[addr(draw2)+98] := x;
mem[addr(draw2)+99] := y;
draw2
end; {procedure point}