LOGO-L> a problem with MSWLogo ver 6.2

[MHELHEFNY@FRCU.EUN.EG]

;Hello George Mills !
;First, let me express my congratulation for launching MSWLogo ver 6.2
;I had run some of the demos which was written and run under ver 6.1
;I have noticed that they run considerably slower under ver 6.2.
;I am not sure of the reason. Either the code is the responsible for 
;that delay or what ??. or may be windows functions must be changed !?. 
;Consider the following program and try it under both versions.You
;will see that when you click its scrollbars there is a noticed
;delay in redrawing the shape. 
;Best Regards
;Mhelhefny
;-------------------------------------

to draw
cs pd
ellipsoid scrollbarget "hight scrollbarget "length scrollbarget "width
end

to ellipsoid :a :b :c 
pu grid1 :a* 60 :b* 60 :c* 60 pu grid2 :a* 60 :b* 60 :c* 60
pu setxyz 0 400 100 pd rt 90 label "ELLIPSOID
end

to go ;this is my main procedure
turnon3d ht windowcreate "main "panel [ellipsoid] 0 0 90 130 [setup]
end

to grid1 :a :b :c
for [u 0 360 10][for [v 0 180 10][setxyz x y z pd]pu]
end

to grid2 :a :b :c
for [v 0 180 10][for [u 0 360 10][setxyz x y z pd]pu]
end

to scale1
staticupdate "text1 se "length scrollbarget "length draw
end

to scale2
staticupdate "text2 se "hight scrollbarget "hight draw
end

to scale3
staticupdate "text3 se "width scrollbarget "width draw
end

to setup
staticcreate "panel "text1 [length] 15 10 70 10
staticcreate "panel "text2 [hight]  20 40 60 10
staticcreate "panel "text3 [width]  20 70 60 10
scrollbarcreate "panel "length 10 20 60 10 [scale1]
scrollbarcreate "panel "hight  10 50 60 10 [scale2]
scrollbarcreate "panel "width  10 80 60 10 [scale3]
scrollbarset "length 1 4 4
scrollbarset "hight  1 4 3
scrollbarset "width  1 4 3
buttoncreate "panel "stop [Exit] 20 100 40 15 [windowdelete "panel]
end

to turnon3d
perspective setturtle -1 setxyz 1000 1000 1000 setturtle 0 
end

to x
op (:a*cos :u)*(sin :v)
end

to y
op (:b*sin :u)*(sin :v)
end

to z
op  :c* cos :v
end
;------------------------------
---------------------------------------------------------------
Please post messages to the Logo forum to logo-l@gsn.org.  Mail
questions about the list administration to logofdn@gsn.org.  To
unsubscribe send    unsubscribe logo-l    to majordomo@gsn.org.