C3D.open

Fid = C3D.open( FileName  AS STRING,

               [nOptions  AS INTEGER=0] ) AS HANDLE

Opens a C3D file.  The function returns Fid = 0 if it fails to open the file.

Example:

$INCLUDE "MyBASIC2_C3D.bas"

$LIBRARY "MyBASIC2_C3DLib.dll"

DIM fid AS HANDLE

fid = C3D.OPEN( "e:\kalle.c3d" )

IF fid = NULL THEN

  PRINT "Error opening file",

  STOP

ENDIF

' Output file header info

PRINT "C3D_fh_no_of_points = ";C3D.GET_FH_ITEM( fid, C3D_fh_no_of_points ),

PRINT "C3D_fh_no_of_analog = ";C3D.GET_FH_ITEM( fid, C3D_fh_no_of_analog ),

PRINT "C3D_fh_first_frame = ";C3D.GET_FH_ITEM( fid, C3D_fh_first_frame ),

PRINT "C3D_fh_last_frame = ";C3D.GET_FH_ITEM( fid, C3D_fh_last_frame ),

PRINT "C3D_fh_max_int_gap = ";C3D.GET_FH_ITEM( fid, C3D_fh_max_int_gap ),

PRINT "C3D_fh_scale = ";C3D.GET_FH_ITEM( fid, C3D_fh_scale ),

PRINT "C3D_fh_data_start = ";C3D.GET_FH_ITEM( fid, C3D_fh_data_start ),

PRINT "C3D_fh_analog_multiplier = ";C3D.GET_FH_ITEM( fid, C3D_fh_analog_multiplier ),

PRINT "C3D_fh_sample_rate = ";C3D.GET_FH_ITEM( fid, C3D_fh_sample_rate ),

PRINT "C3D_fh_processor_type = ";C3D.GET_FH_ITEM( fid, C3D_fh_processor_type ),