LOGO-L> conic shape in ucblogo & mswlogo 
Author Message
 LOGO-L> conic shape in ucblogo & mswlogo

;Hello every body
;Here is the code for a cone made of paper;(I can't figure its exact name).
;It will run as is on both UCBLogo and MSWLogo.
;Best Regards.
;Mhelhefney
;----------------

to go
cs ht
grid 18
end

to grid :step
pu gridx :step pu gridz :step
end

to gridx :step
for [x 0 2050 :step][for [z 0 250 :step][mysetxyz x y-70 z pd]pu]
end

to gridz :step
for [z 0 250 :step][for [x 0 2050 :step][mysetxyz x y-70 z pd]pu]
end

to mysetxyz :a :b :c
setxy (:a- :c)*cos 30 :b- (:a+ :c)*sin 30
end

to x
op :z/4 * sin :x/2
end

to y
op -100+ (:x/5 * sin :z/5)
end

to z
op :z/4 * cos :x/2
end
;------------------
---------------------------------------------------------------





Sat, 13 May 2000 03:00:00 GMT  
 
 [ 1 post ] 

 Relevant Pages 

1. LOGO-L> pure glass shapes in UCBLogo

2. LOGO-L> TYPE in MSWLogo vs UCBLogo

3. LOGO-L> Re: MSWLogo-UCBLogo

4. LOGO-L> Logo - drawing some selected shapes

5. LOGO-L> Logo: Drawing some selected shapes

6. LOGO-L> PC-LOGO syntax in MSWLogo

7. LOGO-L> GUI for UCBLogo

8. LOGO-L> spiral dome in UCBLogo &MSWLogo

9. LOGO-L> About UCBlogo

10. LOGO-L> Two eccentric spheres in UCBLogo & MSWLogo

11. LOGO-L> Hexagonal torous in both UCBLogo & MSWLogo

12. LOGO-L> About UCBlogo

 

 
Powered by phpBB® Forum Software