透過該模型,用戶可以構建互動式幾何圖形。得到的圖形隨後可以用滑鼠進行變 形。透過使用腳本,我們創建了種類繁多的圖形,當應用迴圈或遞迴時,其中一 些圖形會變得非常複雜。

該 DKM 將由 Dr. Geo 改編而來,可作為 DKM 模組和獨立應用程式共同使用。

互動式幾何

| canvas r f u |

canvas := DrGeoSketch new axesOn scale: 500.
r := canvas float: 2 at: 0 @ -0.1 from: 0 to: 4 name: 'r' showValue: true.
f := [ :x | r value * x * (1 - x) ].
canvas ray: 0@0 to: 1@1.
canvas plot: f from: 0 to: 1.
u := canvas pointOnLine: (canvas segment: 0@0 to: 1@0) hide at: 0.2.

100 timesRepeat: [ | v |
	v := canvas	" v sequence term "
		point: [ :previous | previous point x @ (f value: previous point x) ] 
		parent: u.
	canvas segment: u to: v.
	u := canvas	" u is a point on the Ray (0,0) (1,1) " 
		point: [:previous | previous point y @ previous point y ]
		parent: v.
	v hide. u hide.
	canvas segment: u to: v.
	v := u]