Sub SetMaterialFog( material_id, flag)

Enables or disables fog