Skip to content

Commit d09024b

Browse files
committed
release new version
1 parent f5f9fd2 commit d09024b

File tree

3 files changed

+32
-8
lines changed

3 files changed

+32
-8
lines changed

app/build.gradle

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -7,8 +7,8 @@ android {
77
applicationId "com.duy.pascal.compiler"
88
minSdkVersion rootProject.ext.minSdkVersion as Integer
99
targetSdkVersion rootProject.ext.targetSdkVersion as Integer
10-
versionCode 98
11-
versionName "3.9.7"
10+
versionCode 99
11+
versionName "3.9.9"
1212
vectorDrawables.useSupportLibrary = true
1313
multiDexEnabled true
1414
testInstrumentationRunner "android.support.test.runner.AndroidJUnitRunner"
Lines changed: 28 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,28 @@
1+
uses Graph;
2+
3+
var
4+
Gd, Gm : Integer;
5+
Row : Integer;
6+
Title : String;
7+
Size : Integer;
8+
9+
begin
10+
Gd := Detect;
11+
InitGraph(Gd, Gm, 'X:\BP');
12+
if GraphResult <> grOk then
13+
Halt(1);
14+
Row := 0;
15+
Title := 'Turbo Graphics';
16+
Size := 1;
17+
while TextWidth(Title) < GetMaxX do
18+
begin
19+
OutTextXY(0, Row, Title);
20+
Inc(Row, TextHeight('M'));
21+
Inc(Size);
22+
SetTextStyle(DefaultFont, HorizDir, Size);
23+
end;
24+
ReadLn;
25+
CloseGraph;
26+
end.
27+
28+
{http://pascal.net.ru/TextWidth}

libCompiler/src/main/java/com/duy/pascal/backend/builtin_libraries/graph/GraphLib.java

Lines changed: 2 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -608,11 +608,8 @@ public void setDirectVideo(boolean assess) {
608608
// TODO: 09-Apr-17
609609
}
610610

611-
/**
612-
* Procedure Sector(X, Y : Integer; StAngle, EndAngle, XRadius, YRadius : Word)
613-
*/
614611

615-
@PascalMethod(description = "graph library")
612+
@PascalMethod(description = "Draw and fill a sector of an ellipse")
616613
public void sector(int x, int y, int start, int end, int rx, int ry) {
617614
if (handler != null) {
618615
handler.getConsoleView().addGraphObject(new SectorObject(x, y, start, end, rx, ry));
@@ -623,8 +620,7 @@ public void sector(int x, int y, int start, int end, int rx, int ry) {
623620
* PieSlice draws and fills a sector of a circle with center (X,Y) and radius Radius,
624621
* starting at angle Start and ending at angle Stop.
625622
*/
626-
627-
@PascalMethod(description = "graph library")
623+
@PascalMethod(description = "Draw a pie-slice")
628624
public void pieSlice(int x, int y, int start, int end, int radius) {
629625
if (handler != null) {
630626
handler.getConsoleView().addGraphObject(new PieSliceObject(x, y, start, end, radius));

0 commit comments

Comments
 (0)