How can we setup default dimension member in Calculation script?

We can use ALTER CUBE statement.

Syntax:
ALTER CUBE CurrentCube | YourCubeName UPDATE DIMENSION , DEFAULT_MEMBER='';