hello , i'm not found für turbopascal "screen.inc" for this programm:

Program Circle;

Var rad :Integer;

{$I screen.inc }
{$I vdpcmd.inc }
{$I pset.inc }
{$I circle.inc }

Begin
Screen(7);
Rad := 1;
While Rad < 100 Do
Begin
Circle(255,105,Rad,0,15,0);
Rad := Rad + 5;
End;
Repeat Until KeyPressed;
Screen(0);
END.

can you help me?
mfg

Quote:

hello , i'm not found für turbopascal "screen.inc" for this programm:

Have a look at my MSX Info Pages - Pascal and MSX page, screen.inc is in the Kari Lammassaari development library.