After reviewing the object model in MSDN I figured out something that works. Each time I start a new slide I use the following to make the new slide Active:

$ActiveWindow = $PptApp->ActiveWindow;
$ActiveWindow->Activate();
$ActiveWindow->View->GotoSlide({Index=>$slideNumber});
[download]