Donate to us via Paypal!
Capitalism is an Island of wealth in a sea of poverty
Wednesday, March 03, 2021
Navigation
Home
 Find:
 Information:
Learn
Communicate
Submit
Shop
Challenges
 Exploit:
 Programming:
 Think:
 Track:
 Patch:
 Other:
 Need Help?
Other
Members Online
Total Online: 123
Guests Online: 121
Members Online: 2

Registered Members: 133807
Newest Member: dacomir635
Latest Articles

View Thread

HellBound Hackers | Computer General | Programming

Author

unit Graph in free pascal missing ( pascal in debian )

overburn
Member



Posts: 11
Location: Poland
Joined: 30.06.11
Rank:
HBH Guru
Posted on 24-01-17 08:59
i want to program in Pascal on debian based distro bunsen labs linux
i ve installed free pascal ( code : sudo apt-get install fp-ide fp-compiler fp-units-* fp-utils )
this is sample program code i was trying to compile:



Program Graf;

Uses Crt,Graph;

Var sterownik,tryb,i:Integer;

Begin

Sterownik:=detect;

InitGraph(sterownik,tryb,'');

For i:=1 to 100 do

Begin

SetColor(12);

Circle(i,100,i);

Setcolor(4);

Begin

SetColor(13);

Bar(500,120,100,200);

End;

Setcolor(9);

Ellipse(500,100,0,360,50,i);

SetColor(11);

Circle(i,200,i);

Setcolor(5);

Ellipse(500,200,0,360,50,i);

Begin

Bar3D(400,200,200,400,50,TopOn);

End;

End;

Delay(1000);

CloseGraph;

End.

i got the compiling error message : can't find unit Graph

what am I doing wrong ? or Is it possible to use unit graph in free pascal ?
any help will be appreciated.