LOGO-L> orbitting 3-d sphere in space 
Author Message
 LOGO-L> orbitting 3-d sphere in space

;Hello Olga Tuzova
;Here is a very simple code based on the solar example of MSWLogo
;with some variation; this orbitting sphhere gives some nice 3-D
;feeling. I should like that you try it;I appreciate your comments.
;Best Regards
;Mhelhefni
;---------------------------------------------------------------
to go
perspective cs ht
setturtle -1 setxyz 120 110 90
setturtle 0  
repeat 120[clean pu fd 15 pd rt 25 sphere 8 20]
end

to sphere :rad :step
repeat 180/:step [circle :rad rr :step] rr 180
repeat 180/:step[make "q repcount*:step-90 fd :rad*sin :q
downpitch 90 circle :rad*cos :q uppitch 90 bk :rad*sin :q]
end
;--------------------------------------------------------------
---------------------------------------------------------------





Mon, 06 Mar 2000 03:00:00 GMT  
 
 [ 1 post ] 

 Relevant Pages 

1. LOGO-L> orbitting sphere in 3-d space

2. LOGO-L> orbitting sphere in 3-D space

3. LOGO-L> 4methods to draw a Sphere

4. LOGO-L> sphere or Christmas bulb

5. LOGO-L> Sphere or bulb

6. LOGO-L> orbitting sphhere in 3-D space

7. LOGO-L> space fractals

8. LOGO-L> out of list space error

9. LOGO-L> Re: Problems in 3D Space

10. LOGO-L> out of space continued

11. LOGO-L> re:out of space

12. LOGO-L> out of space

 

 
Powered by phpBB® Forum Software