A family of Microsoft presentation graphics products that offer tools for creating presentations and adding graphic effects like multimedia objects and special effects with text.
You can change the default color with the following VBA code:
Sub BlackInkPreset()
ActivePresentation.SlideShowSettings.PointerColor.RGB = RGB(0, 0, 0)
End Sub
You can place this code into a .pptm file. Open it, then open your presentation and run the macro. Then save the presentation. The macro will set the default color to black and the presentation will remember that settings.
Sorry, I haven't found anything to activate the eraser. Microsoft has only made minimal additions to the VBA object model for the inking tools.