Graphics3D 640,480 SetBuffer BackBuffer() PACK_CreatePackFile("res.pak","res\",1,False ) While Not KeyHit (1) Flip Wend End