Source position: tos.pas line 129
procedure setscreen(
laddr: pointer;
paddr: pointer;
rez: SmallInt
);