how to change tape object aspect ?

plugin Helper TapeX
	name:"TapeX" category:"Standard"
	classID:#(0x1b2d8fc9, 0x12c01818)
	extends:Point replaceUI:false version:1
(
	local me, pt
	parameters pblock rollout:params
	(
		length type:#float ui:spnLength default:0
		on length get val do
		(
			if pt != undefined do
				val = distance me pt
		)
	)
	rollout params "Tape Parameters"
	(
		spinner spnLength "Length" range:[0,1e9,0]
	)
	on attachedToNode obj do
	(
		pt = Point name:(obj.name + ".Target")
		obj.target = pt
		me = obj
	)
)
 
-- NOTE: After moving the "header" point need to click once on it
-- in the view port or on the spinner arrows to update the spinner.