あと、輪郭線の描画はこんな方法も。ライトとアンビエント工夫するとこちらの方がキレイなセル表現も可能かも。 lightr as float sync on:sync rate 60 set point light 0,0,0,0 set light range 0,10000 make camera 1 set current camera 1 color backdrop 1,rgb(255,255,255) make object box 1,100,100,100 make object box 2,101,101,101 set object light 1,1 set object light 2,1 color object 1,rgb(255,0,0) set object emissive 1,rgb(0,0,255) set object specular 1,rgb(0,255,0) set object specular power 1,10 color object 2,rgb(0,0,0) position object 1,0,0,0 position object 2,0,0,0 scale object 2,-100,100,100 do fps$="Shadow Example Fps: "+str$(screen fps()) text screen width()-20-text width(fps$),screen height()-40,fps$ lightr=lightr+0.5 zrotate object 1,lightr:zrotate object 2,lightr xrotate object 1,lightr:xrotate object 2,lightr position light 0,sin(lightr)*120,120,cos(lightr)*120 if lightr=360 then lightr=0 position camera -150,150,150 point camera 0,0,0 sync loop
