フォーラム: Forum of Decimal BASIC (スレッド #39393)

Text Not Displayed in Acc2 (2018-04-05 03:30 by toml12953 #81030)

When running the following program in BASICAcc2 (Real-Time) ver. 2.0.2.0, no text is displayed. It works perfectly in Decimal BASIC and BASICAcc.

100 SET COLOR MIX (0) 0,0,0 ! SET BACKGROUND COLOR TO BLACK
110 SET POINT STYLE 1
120 LET RED=4
130 LET BLUE=2
140 LET GREEN=3
150 LET YELLOW=6
160 LET GRAY=8
170 SET TEXT JUSTIFY"CENTER","BOTTOM"
180 CLEAR
190 SET WINDOW -5,365,-1,1
200 FOR X=0 TO 360 STEP .1
210 LET R=RAD(X)
220 LET Y=TAN(R)
230 SET POINT COLOR RED
240 IF Y>1 THEN LET Y=-10
250 IF Y>-1 THEN PLOT POINTS: X,Y
260 LET Y=SIN(R)
270 SET POINT COLOR GREEN
280 PLOT POINTS: X,Y
290 LET Y=COS(R)
300 SET POINT COLOR BLUE
310 PLOT POINTS: X,Y
320 SET POINT COLOR GRAY
330 PLOT POINTS: X,0
340 NEXT X
350 SET TEXT COLOR GREEN
360 PLOT TEXT, AT 70,.85:"SIN"
370 SET TEXT COLOR BLUE
380 PLOT TEXT, AT 70,.50:"COS"
390 SET TEXT COLOR RED
400 PLOT TEXT, AT 195,.50:"TAN"
410 SET TEXT COLOR YELLOW
420 FOR X=0 TO 360 STEP 45
430 PLOT TEXT, AT X,-.05:STR$(X)&"°"
440 NEXT X
450 END

メッセージ #81030 への返信×

Wiki文法は使えません
ログインしていません。投稿を区別するために投稿者のニックネームをつけてください(ニックネームの一意性は保証されません。全く別の人も同じ名前を利用することが可能ですので本人であることの特定には利用できません。本人であることを保証したい場合にはログインして投稿を行なってください)。 ログインする

Re: Text Not Displayed in Acc2 (2018-04-05 07:22 by SHIRAISHI Kazuo #81031)

When I tried, texts were drawn.
BASICAcc has the Set Up menu, which has the Graphics Size option.
The Graphics Size dialog has the Graphics Option Pane, and it has the Font button.


#81030 への返信

メッセージ #81031 への返信×

Wiki文法は使えません
ログインしていません。投稿を区別するために投稿者のニックネームをつけてください(ニックネームの一意性は保証されません。全く別の人も同じ名前を利用することが可能ですので本人であることの特定には利用できません。本人であることを保証したい場合にはログインして投稿を行なってください)。 ログインする

Re: Text Not Displayed in Acc2 (2018-04-05 11:14 by toml12953 #81032)

[Reply To Message #81031]
> When I tried, texts were drawn.
> BASICAcc has the Set Up menu, which has the Graphics Size option.
> The Graphics Size dialog has the Graphics Option Pane, and it has the Font button.
>
>

It works fine in BASICAcc but the same settings in BASICAcc2 don't work on my system (Win 10 64-bit with 64-bit Lazarus 1.8.2).


#81031 への返信

メッセージ #81032 への返信×

Wiki文法は使えません
ログインしていません。投稿を区別するために投稿者のニックネームをつけてください(ニックネームの一意性は保証されません。全く別の人も同じ名前を利用することが可能ですので本人であることの特定には利用できません。本人であることを保証したい場合にはログインして投稿を行なってください)。 ログインする

Re: Text Not Displayed in Acc2 (2018-04-05 14:29 by SHIRAISHI Kazuo #81033)

Runnig Code submenu on the Run menu you shall see Pascal code.
The last several lines are as follows.

initialization
AppName:='';
SystemStackSize := 66846720;
signiwidth0:=14;
TextMode := false ;
GraphMode:= true ;
BMPSize:=BMP1001;
TextProblemCoordinate:= false ;
UseCharInput:= false ;
FontCharSet:=1;
FontSize:=0;
FontName:='default';
FontStyle:=[];
FirstThreadPriority:=tpNormal;

Finalization

end.


FontCharSet means
0: 'ANSI_CHARSET';
1: 'DEFAULT_CHARSET';

What happens when you rewite
FontSize:=12;
and then select Run(on the code view).


#81032 への返信

メッセージ #81033 への返信×

Wiki文法は使えません
ログインしていません。投稿を区別するために投稿者のニックネームをつけてください(ニックネームの一意性は保証されません。全く別の人も同じ名前を利用することが可能ですので本人であることの特定には利用できません。本人であることを保証したい場合にはログインして投稿を行なってください)。 ログインする

Re: Text Not Displayed in Acc2 (2018-04-05 18:12 by toml12953 #81034)

[Reply To Message #81033]
> Runnig Code submenu on the Run menu you shall see Pascal code.
> The last several lines are as follows.
>
> initialization
> AppName:='';
> SystemStackSize := 66846720;
> signiwidth0:=14;
> TextMode := false ;
> GraphMode:= true ;
> BMPSize:=BMP1001;
> TextProblemCoordinate:= false ;
> UseCharInput:= false ;
> FontCharSet:=1;
> FontSize:=0;
> FontName:='default';
> FontStyle:=[];
> FirstThreadPriority:=tpNormal;
>
> Finalization
>
> end.
>
>
> FontCharSet means
> 0: 'ANSI_CHARSET';
> 1: 'DEFAULT_CHARSET';
>
> What happens when you rewite
> FontSize:=12;
> and then select Run(on the code view).
>

I can see the characters when I change the Pascal code directly. When I compile and run from the Acc2 menu, the characters disappear.
#81033 への返信

メッセージ #81034 への返信×

Wiki文法は使えません
ログインしていません。投稿を区別するために投稿者のニックネームをつけてください(ニックネームの一意性は保証されません。全く別の人も同じ名前を利用することが可能ですので本人であることの特定には利用できません。本人であることを保証したい場合にはログインして投稿を行なってください)。 ログインする

Re: Text Not Displayed in Acc2 (2018-04-05 18:33 by toml12953 #81035)

[Reply To Message #81034]
> [Reply To Message #81033]
> > Runnig Code submenu on the Run menu you shall see Pascal code.

The problem is that when I run from BASIC,
the following line is put in the source code:

TextProblemCoordinate:= true ;

If I change true to false in Code view, the characters show up.

In the Compatibility menu, I have TEXT Plotting set to Problem Coordinate (ISO). If I change that to Physical Coordinate (obsolete) or Conditional, then the characters show up.

There's a problem with the Problem Coordinate option.
#81034 への返信

メッセージ #81035 への返信×

Wiki文法は使えません
ログインしていません。投稿を区別するために投稿者のニックネームをつけてください(ニックネームの一意性は保証されません。全く別の人も同じ名前を利用することが可能ですので本人であることの特定には利用できません。本人であることを保証したい場合にはログインして投稿を行なってください)。 ログインする

Re: Text Not Displayed in Acc2 (2018-04-06 08:01 by SHIRAISHI Kazuo #81036)

Problem Coordinate option compels to obey ANSI Full BASIC Standard.
When the scale of horizontal coordinates are set x times that of horizontal coordinates,
texts are compressed by 1/x horizontally.
Example.
10 SET WINDOW 0,10,0,1
20 SET TEXT HEIGHT 0.5
30 PLOT TEXT, AT 0,0:"BASIC"
40 END
#81035 への返信

メッセージ #81036 への返信×

Wiki文法は使えません
ログインしていません。投稿を区別するために投稿者のニックネームをつけてください(ニックネームの一意性は保証されません。全く別の人も同じ名前を利用することが可能ですので本人であることの特定には利用できません。本人であることを保証したい場合にはログインして投稿を行なってください)。 ログインする