lisp2arx
Visual Programming for AutoLisp
Mathématiques en programmation Lisp..
doc2cpp,doc2lsp, sld2lsp, bmp2dcl,
free__GifCcapture for all-CAD'platforms..
|
Nou pe simpatie:
Laura_libero pe Simpatie
 | Femeie
24 ani
Timis
cauta Barbat
32 - 50 ani |
|
|
lisp2arxReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
|
|
Code:
uses Graph3D;
begin
View3D.ShowViewCube := False;
var s := Box(0,0,0,3,1,2,Colors.Blue);
OnKeyDown := k ->
case k of
Key.Left: s.MoveBy(1,0,0);
Key.Right: s.MoveBy(-1,0,0);
Key.Up: s.MoveBy(0,-1,0);
Key.Down: s.MoveBy(0,1,0);
Key.X: s.Rotate(OrtX,10);
Key.Y: s.Rotate(OrtY,10);
Key.Z: s.Rotate(OrtZ,10);
end;
end. |
_______________________________________
psw: cea de la wjndowsXP gigabyte..
|
|
| |
|
