m3dsconstants.bas

3ds文件浏览程序

'Case &HC550: s = "C_MSHAX"
'Case &HC560: s = "C_MSHCP"
'Case &HC570: s = "C_USERAX"
'Case &HC580: s = "C_SHOOK"
'Case &HC590: s = "C_RAX"
'Case &HC5A0: s = "C_STAPE"
'Case &HC5B0: s = "C_LTAPE"
'Case &HC5C0: s = "C_ETAPE"
'Case &HC5C8: s = "C_KTAPE"
'Case &HC5D0: s = "C_SPHSEGS"
'Case &HC5E0: s = "C_GEOSMOOTH"
'Case &HC5F0: s = "C_HEMISEGS"
'Case &HC600: s = "C_PRISMSEGS"
'Case &HC610: s = "C_PRISMSIDES"
'Case &HC620: s = "C_TUBESEGS"
'Case &HC630: s = "C_TUBESIDES"
'Case &HC640: s = "C_TORSEGS"
'Case &HC650: s = "C_TORSIDES"
'Case &HC660: s = "C_CONESIDES"
'Case &HC661: s = "C_CONESEGS"
'Case &HC670: s = "C_NGPARMS"
'Case &HC680: s = "C_PTHLEVEL"
'Case &HC690: s = "C_MSCSYM"
'Case &HC6A0: s = "C_MFTSYM"
'Case &HC6B0: s = "C_MTTSYM"
'Case &HC6C0: s = "C_SMOOTHING"
'Case &HC6D0: s = "C_MODICOUNT"
'Case &HC6E0: s = "C_FONTSEL"
'Case &HC6F0: s = "C_TESS_TYPE"
'Case &HC6F1: s = "C_TESS_TENSION"
'Case &HC700: s = "C_SEG_START"
'Case &HC705: s = "C_SEG_END"
'Case &HC710: s = "C_CURTIME"
'Case &HC715: s = "C_ANIMLENGTH"
'Case &HC720: s = "C_PV_FROM"
'Case &HC725: s = "C_PV_TO"
'Case &HC730: s = "C_PV_DOFNUM"
'Case &HC735: s = "C_PV_RNG"
'Case &HC740: s = "C_PV_NTH"
'Case &HC745: s = "C_PV_TYPE"
'Case &HC750: s = "C_PV_METHOD"
'Case &HC755: s = "C_PV_FPS"
'Case &HC765: s = "C_VTR_FRAMES"
'Case &HC770: s = "C_VTR_HDTL"
'Case &HC771: s = "C_VTR_HD"
'Case &HC772: s = "C_VTR_TL"
'Case &HC775: s = "C_VTR_IN"
'Case &HC780: s = "C_VTR_PK"
'Case &HC785: s = "C_VTR_SH"
'
'' ' Material chunks
'Case &HC790: s = "C_WORK_MTLS"    ' Old-style -- now ignored
'Case &HC792: s = "C_WORK_MTLS_2"  ' Old-style -- now ignored
'Case &HC793: s = "C_WORK_MTLS_3"  ' Old-style -- now ignored
'Case &HC794: s = "C_WORK_MTLS_4"  ' Old-style -- now ignored
'Case &HCB00: s = "C_WORK_MTLS_5"  ' Old-style -- now ignored
'Case &HCB01: s = "C_WORK_MTLS_6"  ' Old-style -- now ignored
'Case &HCB02: s = "C_WORK_MTLS_7"  ' Old-style -- now ignored
'Case &HCB03: s = "C_WORK_MTLS_8"  ' Old-style -- now ignored
'Case &HCB04: s = "C_WORKMTL"
'Case &HCB10: s = "C_SXP_TEXT_DATA"
'Case &HCB20: s = "C_SXP_TEXT2_DATA"
'Case &HCB11: s = "C_SXP_OPAC_DATA"
'Case &HCB12: s = "C_SXP_BUMP_DATA"
'Case &HCB24: s = "C_SXP_SPEC_DATA"
'Case &HCB13: s = "C_SXP_SHIN_DATA"
'Case &HCB28: s = "C_SXP_SELFI_DATA"
'Case &HCB30: s = "C_SXP_TEXT_MASKDATA"
'Case &HCB32: s = "C_SXP_TEXT2_MASKDATA"
'Case &HCB34: s = "C_SXP_OPAC_MASKDATA"
'Case &HCB36: s = "C_SXP_BUMP_MASKDATA"
'Case &HCB38: s = "C_SXP_SPEC_MASKDATA"
'Case &HCB3A: s = "C_SXP_SHIN_MASKDATA"
'Case &HC3C: s = "C_SXP_SELFI_MASKDATA"
'Case &HCB3E: s = "C_SXP_REFL_MASKDATA"
'Case &HC7A1: s = "C_BGTYPE"
'Case &HC7B0: s = "C_MEDTILE"
'' ' Contrast
'Case C_LO_CONTRAST = &HC7D0: s = ""
'Case C_HI_CONTRAST = &HC7D1: s = ""
'' ' 3d frozen display
'Case &HC7E0: s = "C_FROZ_DISPLAY"
'' ' Booleans
'Case &HC7F0: s = "C_BOOLWELD"
'Case &HC7F1: s = "C_BOOLTYPE"
'Case &HC900: s = "C_ANG_THRESH"
'Case &HC901: s = "C_SS_THRESH"
'Case &HC903: s = "C_TEXTURE_BLUR_DEFAULT"
'Case &HCA00: s = "C_MAPDRAWER"
'Case &HCA01: s = "C_MAPDRAWER1"
'Case &HCA02: s = "C_MAPDRAWER2"
'Case &HCA03: s = "C_MAPDRAWER3"
'Case &HCA04: s = "C_MAPDRAWER4"
'Case &HCA05: s = "C_MAPDRAWER5"
'Case &HCA06: s = "C_MAPDRAWER6"
'Case &HCA07: s = "C_MAPDRAWER7"
'Case &HCA08: s = "C_MAPDRAWER8"
'Case &HCA09: s = "C_MAPDRAWER9"
'Case &HCA10: s = "C_MAPDRAWER_ENTRY"
'' ' system options
'Case &HCA20: s = "C_BACKUP_FILE"
'Case &HCA21: s = "C_DITHER_256"
'Case &HCA22: s = "C_SAVE_LAST"
'Case &HCA23: s = "C_USE_ALPHA"
'Case &HCA24: s = "C_TGA_DEPTH"
'Case &HCA25: s = "C_REND_FIELDS"
'Case &HCA26: s = "C_REFLIP"
'Case &HCA27: s = "C_SEL_ITEMTOG"
'Case &HCA28: s = "C_SEL_RESET"
'Case &HCA29: s = "C_STICKY_KEYINF"
'Case &HCA2A: s = "C_WELD_THRESHOLD"
'Case &HCA2B: s = "C_ZCLIP_POINT"
'Case &HCA2C: s = "C_ALPHA_SPLIT"
'Case &HCA30: s = "C_KF_SHOW_BACKFACE"
'Case &HCA40: s = "C_OPTIMIZE_LOFT"
'Case &HCA42: s = "C_TENS_DEFAULT"
'Case &HCA44: s = "C_CONT_DEFAULT"
'Case &HCA46: s = "C_BIAS_DEFAULT"
'Case &HCA50: s = "C_DXFNAME_SRC"
'Case &HCA60: s = "C_AUTO_WELD"
'Case &HCA70: s = "C_AUTO_UNIFY"
'Case &HCA80: s = "C_AUTO_SMOOTH"
'Case &HCA90: s = "C_DXF_SMOOTH_ANG"
'Case &HCAA0: s = "C_SMOOTH_ANG"
'' ' Special network-use chunks
'Case &HCC00: s = "C_NET_USE_VPOST"
'Case &HCC10: s = "C_NET_USE_GAMMA"
'Case &HCC20: s = "C_NET_FIELD_ORDER"
'Case &HCD00: s = "C_BLUR_FRAMES"
'Case &HCD10: s = "C_BLUR_SAMPLES"
'Case &HCD20: s = "C_BLUR_DUR"
'Case &HCD30: s = "C_HOT_METHOD"
'Case &HCD40: s = "C_HOT_CHECK"
'Case &HCD50: s = "C_PIXEL_SIZE"
'Case &HCD60: s = "C_DISP_GAMMA"
'Case &HCD70: s = "C_FBUF_GAMMA"
'Case &HCD80: s = "C_FILE_OUT_GAMMA"
'Case &HCD82: s = "C_FILE_IN_GAMMA"
'Case &HCD84: s = "C_GAMMA_CORRECT"
'Case &HCD90: s = "C_APPLY_DISP_GAMMA"   ' OBSOLETE
'Case &HCDA0: s = "C_APPLY_FBUF_GAMMA"   ' OBSOLETE
'Case &HCDB0: s = "C_APPLY_FILE_GAMMA"   ' OBSOLETE
'Case &HCDC0: s = "C_FORCE_WIRE"
'Case &HCDD0: s = "C_RAY_SHADOWS"
'Case &HCDE0: s = "C_MASTER_AMBIENT"
'Case &HCDF0: s = "C_SUPER_SAMPLE"
'Case &HCE00: s = "C_OBJECT_MBLUR"
'Case &HCE10: s = "C_MBLUR_DITHER"
'Case &HCE20: s = "C_DITHER_24"
'Case &HCE30: s = "C_SUPER_BLACK"
'Case &HCE40: s = "C_SAFE_FRAME"
'Case &HCE50: s = "C_VIEW_PRES_RATIO"
'Case &HCE60: s = "C_BGND_PRES_RATIO"
'Case &HCE70: s = "C_NTH_SERIAL_NUM"
'Video Post
Case &HD000: s = "VPDATA"
Case &HD100: s = "P_QUEUE_ENTRY"
Case &HD110: s = "P_QUEUE_IMAGE"
Case &HD114: s = "P_QUEUE_USEIGAMMA"
Case &HD120: s = "P_QUEUE_PROC"
Case &HD130: s = "P_QUEUE_SOLID"
Case &HD140: s = "P_QUEUE_GRADIENT"
Case &HD150: s = "P_QUEUE_KF"
Case &HD152: s = "P_QUEUE_MOTBLUR"
Case &HD153: s = "P_QUEUE_MB_REPEAT"
Case &HD160: s = "P_QUEUE_NONE"
Case &HD180: s = "P_QUEUE_RESIZE"
Case &HD185: s = "P_QUEUE_OFFSET"
Case &HD190: s = "P_QUEUE_ALIGN"
Case &HD1A0: s = "P_CUSTOM_SIZE"
Case &HD210: s = "P_ALPH_NONE"
Case &HD220: s = "P_ALPH_PSEUDO"     ' Old chunk
Case &HD221: s = "P_ALPH_OP_PSEUDO"  ' Old chunk
Case &HD222: s = "P_ALPH_BLUR"       ' Replaces pseudo
Case &HD225: s = "P_ALPH_PCOL"
Case &HD230: s = "P_ALPH_C0"
Case &HD231: s = "P_ALPH_OP_KEY"
Case &HD235: s = "P_ALPH_KCOL"
Case &HD238: s = "P_ALPH_OP_NOCONV"
Case &HD240: s = "P_ALPH_IMAGE"
Case &HD250: s = "P_ALPH_ALPHA"
Case &HD260: s = "P_ALPH_QUES"
Case &HD265: s = "P_ALPH_QUEIMG"
Case &HD270: s = "P_ALPH_CUTOFF"
Case &HD280: s = "P_ALPHANEG"

Case &HD300: s = "P_TRAN_NONE"
Case &HD310: s = "P_TRAN_IMAGE"
Case &HD312: s = "P_TRAN_FRAMES"
Case &HD320: s = "P_TRAN_FADEIN"
Case &HD330: s = "P_TRAN_FADEOUT"
Case &HD340: s = "P_TRANNEG"

Case &HD400: s = "P_RANGES"

Case &HD500: s = "P_PROC_DATA"
Case &H0:
    Debug.Assert 0
    s = "NULL_CHUNK "
Case Else:
    s = "Unknown chunk"
    Debug.Print "Unknown ID:" & ID
    Debug.Print "&H" & Hex(ID)
    If ID <> 1 Then
        Debug.Assert 0
    End If
End Select
ChunkName = s
End Function

'----------------------------------------------------
'assigns a tree image for a chunk
'----------------------------------------------------
Public Function ChunkImage(ID%)
Dim s&
Select Case ID
Case X3DS_MATERIALS, X3DS_HEADER: s = IMG_FOLDER
Case &H4D4D: s = IMG_TEXT '"M3DMAGIC"
Case &HC23D: s = IMG_TEXT '"CMAGIC"
Case &H0:
    Debug.Assert 0
    s = IMG_FOLDER '"NULL_CHUNK "
Case &H2: s = IMG_TEXT  ''M3D_VERSION
Case &H3D3D: s = IMG_FOLDER 'MDATA
Case &H3D3E: s = IMG_TEXT 'MESH_VERSION
Case &HAFFF: s = IMG_MATERIAL 'MAT_ENTRY
Case &H100: s = IMG_SCALE 'MASTER_SCALE
Case &H4000: s = IMG_OBJECT 'NAMED_OBJECT
Case &HA000: s = IMG_TEXT '"MAT_NAME"
'Material Chunk IDs
Case &HA010, &HA020, &HA030, &HA040, &HA041: s = IMG_MATERIAL
Case &HA042, &HA050, &HA100, &HA052, &HA053: s = IMG_MATERIAL
Case &HA080, &HA081, &HA082, &HA083, &HA084: s = IMG_MATERIAL
Case &HA085, &HA086, &HA087, &HA088, &HA08A: s = IMG_MATERIAL
Case &HA08C, &HA08E, &HA100: s = IMG_MATERIAL
Case &HA200, &HA210, &HA220, &HA230, &HA204: s = IMG_TEXTURE
Case &HA240, &HA250, &HA252, &HA300: s = IMG_TEXTURE
Case &HA310: s = "MAT_ACUBIC": s = IMG_MATERIAL
Case &HA320, &HA321, &HA322, &HA324: s = IMG_MATERIAL
Case &HA325, &HA326, &HA328, &HA32A, &HA32C: s = IMG_MATERIAL
Case &HA32E, &HA330, &HA332, &HA334, &HA336: s = IMG_MATERIAL
Case &HA338: s = IMG_MATERIAL
Case &HA33A: s = IMG_TEXTURE '"MAT_TEX2MAP"
Case &HA33C: s = IMG_TEXTURE ' s = "MAT_SHINMAP"
Case &HA33D:  s = IMG_TEXTURE 's = "MAT_SELFIMAP"
Case &HA33E:  s = IMG_TEXTURE 's = "MAT_TEXMASK"
Case &HA340:  s = IMG_TEXTURE 's = "MAT_TEX2MASK"
Case &HA342:  s = IMG_TEXTURE 's = "MAT_OPACMASK"
Case &HA344:  s = IMG_TEXTURE 's = "MAT_BUMPMASK"
Case &HA346:  s = IMG_TEXTURE 's = "MAT_SHINMASK"
Case &HA348:  s = IMG_TEXTURE 's = "MAT_SPECMASK"
Case &HA34A:  s = IMG_TEXTURE 's = "MAT_SELFIMASK"
Case &HA34C:  s = IMG_TEXTURE 's = "MAT_REFLMASK"
Case &HA350, &HA351, &HA352, &HA353: s = IMG_MATERIAL
Case &HA354, &HA356, &HA358, &HA35A, &HA35C, &HA360: s = IMG_MATERIAL
Case &HA362, &HA364, &HA366, &HA368: s = IMG_MATERIAL
Case &H4100: s = IMG_GEOM '"N_TRI_OBJECT"
Case &H4110: s = IMG_VERTEX '"POINT_ARRAY"
Case &H4120: s = IMG_FACE '"FACE_ARRAY"
Case &H4130: s = IMG_BOX '"MSH_MAT_GROUP"
'Case &H4150: s = "SMOOTH_GROUP"
'Case &H4160: s = "MESH_MATRIX"
Case &H11: s = IMG_COLOR '"COLOR_24"
Case &H12: s = IMG_COLOR '"LIN_COLOR_24"
Case &H10: s = IMG_COLOR '"COLOR_F"
Case &H13: s = IMG_COLOR '"LIN_COLOR_F"
'Case &H30: s = "INT_PERCENTAGE"
'Case &H31: s = "FLOAT_PERCENTAGE"
Case &H4600: s = IMG_LIGHT '"N_DIRECT_LIGHT"
Case &H4700: s = IMG_CAMERA '"N_CAMERA"
''
'Trick Chunk Types For Open*, Write*, Close* functions
Case &HF110: s = IMG_VERTEX '"POINT_ARRAY_ENTRY"
Case &HF111: s = IMG_VERTEX '"POINT_FLAG_ARRAY_ENTRY"
Case &HF120: s = IMG_FACE '"FACE_ARRAY_ENTRY"
Case &HF130: s = IMG_BOX '"MSH_MAT_GROUP_ENTRY"
Case &HF140: s = IMG_TEXTURE '"TEX_VERTS_ENTRY"
'Case &HF150: s = "SMOOTH_GROUP_ENTRY"
'Case &HF020: s = "POS_TRACK_TAG_KEY"
'Case &HF021: s = "ROT_TRACK_TAG_KEY"
'Case &HF022: s = "SCL_TRACK_TAG_KEY"
'Case &HF023: s = "FOV_TRACK_TAG_KEY"
'Case &HF024: s = "ROLL_TRACK_TAG_KEY"
'Case &HF025: s = "COL_TRACK_TAG_KEY"
'Case &HF026: s = "MORPH_TRACK_TAG_KEY"
'Case &HF027: s = "HOT_TRACK_TAG_KEY"
'Case &HF028: s = "FALL_TRACK_TAG_KEY"
'3DS File Chunk IDs
Case &H2D2D: s = IMG_TEXT '"SMAGIC"
Case &H2D3D: s = IMG_TEXT '"LMAGIC"
Case &H3DAA: s = IMG_TEXT '"MLIBMAGIC"
Case &H3DFF: s = IMG_TEXT '"MATMAGIC"
Case &H5: s = s = IMG_TEXT '"M3D_KFVERSION"
'Mesh Chunk Ids
Case &H1100: s = IMG_IMAGE '"BIT_MAP"
'Case &H1101: s = "USE_BIT_MAP"
'Case &H1200: s = "SOLID_BGND"
'Case &H1201: s = "USE_SOLID_BGND"
'Case &H1300: s = "V_GRADIENT"
'Case &H1301: s = "USE_V_GRADIENT"
'Case &H1400: s = "LO_SHADOW_BIAS"
'Case &H1410: s = "HI_SHADOW_BIAS"
'Case &H1420: s = "SHADOW_MAP_SIZE"
'Case &H1430: s = "SHADOW_SAMPLES"
'Case &H1440: s = "SHADOW_RANGE"
'Case &H1450: s = "SHADOW_FILTER"
'Case &H1460: s = "RAY_BIAS"
'Case &H1500: s = "O_CONSTS"
Case &H2100: s = IMG_LIGHT '"AMBIENT_LIGHT"
Case &H2200: s = IMG_FOG '"FOG"
Case &H2201: s = IMG_FOG '"USE_FOG"
Case &H2210: s = IMG_FOG '"FOG_BGND"
'Case &H2300: s = "DISTANCE_CUE"
'Case &H2301: s = "USE_DISTANCE_CUE"
'Case &H2302: s = "LAYER_FOG"
'Case &H2303: s = "USE_LAYER_FOG"
'Case &H2310: s = "DCUE_BGND"

Case &H3000: s = IMG_VIEW
Case &H3010: s = IMG_VIEW
Case &H3020: s = IMG_VIEW '"VIEW_BOTTOM"
Case &H3030: s = IMG_VIEW '"VIEW_LEFT"
Case &H3040: s = IMG_VIEW '"VIEW_RIGHT"
Case &H3050: s = IMG_VIEW '"VIEW_FRONT"
Case &H3060: s = IMG_VIEW '"VIEW_BACK"
Case &H3070: s = IMG_VIEW '"VIEW_USER"
Case &H3080: s = IMG_VIEW '"VIEW_CAMERA"
Case &H3090: s = IMG_VIEW '"VIEW_WINDOW"
'Case &H4010: s = "OBJ_HIDDEN"
'Case &H4011: s = "OBJ_VIS_LOFTER"
'Case &H4012: s = "OBJ_DOESNT_CAST"
'Case &H4013: s = "OBJ_MATTE"
'Case &H4014: s = "OBJ_FAST"
'Case &H4015: s = "OBJ_PROCEDURAL"
'Case &H4016: s = "OBJ_FROZEN"
'Case &H4017: s = "OBJ_DONT_RCVSHADOW"
'Case &H4111: s = "POINT_FLAG_ARRAY"
'Case &H4131: s = "OLD_MAT_GROUP"
Case &H4140: s = IMG_TEXTURE '"TEX_VERTS"
Case &H4165: s = IMG_COLOR '"MESH_COLOR"
Case &H4170: s = IMG_TEXTURE '"MESH_TEXTURE_INFO"
'Case &H4181: s = "PROC_NAME"
'Case &H4182: s = "PROC_DATA"
'Case &H4190: s = "MSH_BOXMAP"
'Case &H4400: s = "N_D_L_OLD"
'Case &H4500: s = "N_CAM_OLD"
Case &H4600: s = IMG_LIGHT '"N_DIRECT_LIGHT"
Case &H4610: s = IMG_LIGHT '"DL_SPOTLIGHT"
Case &H4620: s = IMG_LIGHT '"DL_OFF"
Case &H4625: s = IMG_LIGHT '"DL_ATTENUATE"
Case &H4627: s = IMG_LIGHT '"DL_RAYSHAD"
Case &H4630: s = IMG_LIGHT '"DL_SHADOWED"
Case &H4640: s = IMG_LIGHT '"DL_LOCAL_SHADOW"
Case &H4641: s = IMG_LIGHT '"DL_LOCAL_SHADOW2"
Case &H4650: s = IMG_LIGHT '"DL_SEE_CONE"
Case &H4651: s = IMG_LIGHT '"DL_SPOT_RECTANGULAR"
Case &H4652: s = IMG_LIGHT '"DL_SPOT_OVERSHOOT"
Case &H4653: s = IMG_LIGHT '"DL_SPOT_PROJECTOR"
Case &H4654: s = IMG_LIGHT '"DL_EXCLUDE"
Case &H4655: s = IMG_LIGHT '"DL_RANGE"        Not used in R3 "
Case &H4656: s = IMG_LIGHT '"DL_SPOT_ROLL"
Case &H4657: s = IMG_LIGHT '"DL_SPOT_ASPECT"
Case &H4658: s = IMG_LIGHT '"DL_RAY_BIAS"
Case &H4659: s = IMG_LIGHT '"DL_INNER_RANGE"
Case &H465A: s = IMG_LIGHT '"DL_OUTER_RANGE"
Case &H465B: s = IMG_LIGHT '"DL_MULTIPLIER"
Case &H4680: s = IMG_LIGHT '"N_AMBIENT_LIGHT"
Case &H4700: s = IMG_CAMERA '"N_CAMERA"
Case &H4710: s = IMG_CAMERA '"CAM_SEE_CONE"
Case &H4720: s = IMG_CAMERA '"CAM_RANGES"
'Case &H4F00: s = "HIERARCHY"
'Case &H4F10: s = "PARENT_OBJECT"
'Case &H4F20: s = "PIVOT_OBJECT"
'Case &H4F30: s = "PIVOT_LIMITS"