F.Eさんへのお返事です。
> 十進BASICで陰関数(例えば(x-2)^2+(y-2)^2=25という円)のグラフを描く
> ときはどんなプログラムを書けばよろしいでしょうか。
難しいです。うまく描くのに工夫が必要です。
!陰関数のグラフ
DEF f(x,y)=(x-2)^2+(y-2)^2-25 !(x-2)^2+(y-2)^2=25の場合
LET a=-5 !x=[-5,10]
LET b=10
LET c=-5 !y=[-5,10]
LET d=10
SET WINDOW a,b, c,d !表示領域を指定する
DRAW grid !座標を描く
SET POINT STYLE 1 !ドット形状
ASK PIXEL SIZE (a,c; b,d) sx,sy !走査するドット数を得る
PRINT sx; sy !debug
FOR i=0 TO sy
LET y=WORLDY(i) !xy座標に変換する
LET z0=f(WORLDY(0),y) !画面の左端での関数値
FOR j=0 TO sx
LET x=WORLDX(j)
LET z=f(x,y)
IF z*z0<0 THEN PLOT POINTS: x,y !符号が変わる
LET z0=z
NEXT j
NEXT i
END