Turning whatever's on the screen into an image

Why make it so complex?

if you don't cls and don't flip then the screen will stay the same anyway.

Select GameState
     CASE RUNNING
        Cls
        ' DO all my game Stuff
        Flip
        If KeyHit(KEY_P) Then 
             GameState = PAUSED
             DrawText("Oi Oi",300,300)
             FLIP
        EndIf

     CASE PAUSED
         If KeyHit(KEY_P) Then GameState = RUNNING

End Select