Powerpoint VisualBasic Script

Sub hasMaster()
    If Not ActivePresentation.HasTitleMaster Then ActivePresentation.AddTitleMaster
End Sub