How can I setup default dimension member in Calculation script?

You can use ALTER CUBE statement. Syntax:

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