//    Instruction Example :     objectid pack.file.open (string)


        screen.resolution.set (512,384)

        @ObjectID=pack.file.open("avo\pack.tvd")

        text.display ("Press a key to open the packed Alambik file (.tvd).",CENTER,10)

        keyboard.wait ()

        picture.display ("dinosaur.png",CENTER,CENTER)
        picture.display ("cloud.png",CENTER,CENTER)

        text.display ("Press a key to close the packed Alambik file (.tvd) and exit.",CENTER,10)

        pack.file.close(@ObjectID)

        keyboard.wait ()

        script.stop ()