export_fb3d_spl_v1.0.ms

来自「Torus 3D Engine is an open-source OpenGL」· MS 代码 · 共 36 行

-- =========================================================================================
-- FB3D Spline path (spl) BINARY File Export v1.0
-- Copyright (C)2004, FINALBOSS.COM
-- Written by Vander Nunes
-- =========================================================================================

(
	format "SPL export Copyright (C)2004, FINALBOSS.COM\nWritten by Vander Nunes\n"

	fname = getSaveFileName caption:"FB3D MOB Export" types:"FB3D SPLINE Model (*.spl)|*.spl|All Files (*.*)|*.*|"
	if (fname != undefined) then
	(

		output_file = fopen fname "wb"

		for o in selection do
		(
			format "Exporting: % ... " o.name

			knots = numKnots o
			WriteLong output_file knots
			for k = 1 to knots do
			(
				knot = pathInterp o 1 (k/knots as float)
				WriteLong output_file (knot.x * 65536)
				WriteLong output_file (knot.z * 65536)
				WriteLong output_file (knot.y * 65536)
			)

		)
		fclose output_file

		format "FINISHED.\n\n"
	)
)