LOGO-L> Olga's hyperboloid in UCBLogo 
Author Message
 LOGO-L> Olga's hyperboloid in UCBLogo

;Hello Olga Tuzova !
;Here is your code for drawing the single sheet hyperboloid,I have
;reworked it to run on both MSWLogo and also on UCBLogo. The procedure
;setxyzz now is alibrary procedure to show isometric views,and could
;be used with any 2-d logo. In UCBLogo the procedure may be named
;setxyz since it will not conflict with it.
;Best Regards
to coor1
op :a*cos :alfa

to coor2
op :a*sin :alfa

to draw.hyp :a :c :h
for [alfa 0 360 9][pu point1 setxyzz :x :y :z
                   pd point2 setxyzz :x :y :z
                   pu point3 setxyzz :x :y :z
                   pd point4 setxyzz :x :y :z ]

to go
cs ht
;Olga's procedure
draw.hyp 30 90 100

to point1
make "x :h/:c*coor2+coor1 make "y -:h make "z -:h/:c*coor1+coor2

to point2
make "x -:h/:c*coor2+coor1 make "y :h make "z :h/:c*coor1+coor2

to point3
make "x -:h/:c*coor2+coor1 make "y -:h make "z :h/:c*coor1+coor2

to point4
make "x :h/:c*coor2+coor1 make "y :h make "z -:h/:c*coor1+coor2

to setxyzz :a :b :c
;library procedure
setxy (:a- :c)*cos 30 :b- (:a+ :c)*sin 30

Tue, 25 Apr 2000 03:00:00 GMT  
 LOGO-L> Olga's hyperboloid in UCBLogo


I tried your 3-D programs for UCBLogo. They work perfectly. Great job!




Wed, 26 Apr 2000 03:00:00 GMT  
 [ 3 post ] 

 Relevant Pages 

1. LOGO-L> Re: Olga's game

2. LOGO-L> Re:Olga

3. LOGO-L> revised hyperboloid code for students

4. LOGO-L> Re: 3-D hyperboloid

5. WTD: 'ls -lR '->HTML code

6. LOGO-L> GUI for UCBLogo

7. LOGO-L> About UCBlogo

8. LOGO-L> pure glass shapes in UCBLogo

9. LOGO-L> About UCBlogo

10. LOGO-L> 3d extensions to UCBLogo

11. LOGO-L> setxyz and screw in UCBLogo

12. LOGO-L> ellipsoid and paraboloid in UCBLogo


Powered by phpBB® Forum Software