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