Function makeMsgBox(tit,mess,icons,buts,defs,mods)
    butVal = buts + (icons*16) + (defs*256) + (mods*4096)
    makeMsgBox = MsgBox(mess,butVal,tit)
  End Function
  
  Function makeInputBox(tit,pr,def)
    makeInputBox = InputBox(pr,tit,def)
  End Function