function myFunction p1, p2, p3
	put "myFunction called" && p1 && p2 && p3
	myHandler 1,2,3
	put the result &cr
	put "back in myFunction" &cr
	return "myFunction's value"
end myFunction

on myHandler p1, p2, p3
	put "myHandler called" && p1 && p2 && p3 &cr
	return "myHandler's value"
end myHandler

on startUp
	put "startup called." &cr
	put myFunction(5,6,7) into var
	put "back in startUp" &cr
	put var &cr
end startUp