球を一つ置いておきまする。
----------------------------------------
"ball"
ball _ TSphere new.
ball radius: 2.
space addChild: ball.
ball translationX: 0 y: 4 z: 0.
---------------------------------------- Alt + d ( Cmd + d )
空の色を暗めに設定。
----------------------------------------
"space Color"
space color:(Color r: 0.3 g: 0.3 b: 0.5).
---------------------------------------- Alt + d ( Cmd + d )
デフォルトのライトとスピナーを変数に捕まえておきます。
----------------------------------------
"default light & spinner"
defSpinner _ (space frameChildren at: 1).
defLight _ defSpinner contents.
---------------------------------------- Alt + d ( Cmd + d )
ライトが何処にあるのか分かるようにビジブルにしとくっす。
----------------------------------------
defLight visible: true.
---------------------------------------- Alt + d ( Cmd + d )