PROCEDURE justDoIt;
VAR
x,y,px1,py1 : INTEGER;
r,g,b:LONGINT;
BEGIN;
x:=0;
y:=-5;
px1:=10;
py1:=5;
 Line(x,y);
 LineTo(px1,py1);
 ColorIndexToRGB(15,r,g,b);
 PenFore(r,g,b);
 PenSize(50);
 END;
RUN(justDoIt);

-- Main.NDSSladjanaMarkovic - 17 Nov 2005