//    Instruction Example :     long mesh.triangle.texture.position.set (objectid,long,float,float,float,float,float,float)

    Screen.Resolution.Set(512, 384)

        Screen.Set(BACK)
          Pattern.Display("avo\bubble.gif")
    Screen.End()

        @pic      = Picture.Load("avo\cloack.jpg")

        @camera   = Camera.Create(0.0, 0.0, -100.0, 0.0, 0.0, 0.0)

        @viewport = Viewport.Create()
        Viewport.Camera.Set(@viewport, @camera)

    Mesh.Rotation.Stack(-30, 30, 0)
        @mesh = Mesh.Create(4, 3)

        Mesh.Vertex.Set(@mesh, 0, -20,  20, -20)
        Mesh.Vertex.Set(@mesh, 1,  20,  20, -20)
        Mesh.Vertex.Set(@mesh, 2,  20, -20, -20)
        Mesh.Vertex.Set(@mesh, 3,  20,  20,  20)

        Mesh.Triangle.Set(@mesh, 0, 0, 1, 2)
        Mesh.Triangle.Set(@mesh, 1, 0, 3, 1)
        Mesh.Triangle.Set(@mesh, 2, 1, 3, 2)

        Mesh.Generate(@mesh)
        Mesh.Texture.Set(@mesh, @pic)

        Mesh.Triangle.Texture.Position.Set(@mesh, 0, 0.0, 0.0, 1.0, 0.0, 1.0, 1.0)

        Mesh.Display(@mesh)
        Viewport.Display(@viewport)

        Screen.Set(FRONT)
          Text.Display("Press a key to exit.", CENTER, 350)
        Keyboard.Wait()
    Screen.End()

        Mesh.Kill(@mesh)
        Viewport.Kill(@viewport)
        Camera.Kill(@camera)
    Script.Stop()