Draw a sphere: Difference between revisions
Add Factor
(Add Factor) |
|||
Line 1,992:
</pre>
=={{header|Factor}}==
{{works with|Factor|0.99 2020-03-02}}
<lang factor>USING: classes.struct kernel raylib.ffi ;
640 480 "sphere" init-window
S{ Camera3D
{ position S{ Vector3 f 4.5 4.5 4.5 } }
{ target S{ Vector3 f 0 0 0 } }
{ up S{ Vector3 f 0 1 0 } }
{ fovy 45.0 }
{ type 0 }
}
60 set-target-fps
[ window-should-close ] [
begin-drawing
BLACK clear-background dup
begin-mode-3d
S{ Vector3 f 0 0 0 } 2 20 20 LIME draw-sphere-wires
end-mode-3d
end-drawing
] until drop close-window</lang>
{{out}}
[https://i.imgur.com/FXHkZm6.png]
=={{header|FutureBasic}}==
| |||