ray

Help Contents geomland Object ray ray
Object ray rayP

geomland.ray :initial :y


constructs a ray object.

Definition:

to geomland.ray :initial :y

	make local "type "ray 
	make local "color :def_ray_color

	if number? :y 
	[ make local "final :initial + (point cos :y sin :y) ]
	[ make local "final :y ] 

	to ondrawimage 
		output dll.graphix.drawray 
	end

	delete "y
end

Examples:

References:

Object ray rayP