Your problem is as Thomas describes. You are setting your pen and drawing your pixel after your main event loop has finished. Assuming your window closes after the main loop function returns, you probably don't even get a chance to see it rendered.
Move this:
/* set the pen color to blue */
SetAPen(GameWindow->RPort, blue);
/* Draw the ball */
WritePixel(GameWindow->RPort, 100, 100);
before the IDCMP event handling loop (more specifically, before the Wait() call on the IDCMO port).