//    Instruction Example :      window.contextmenu.item.add (label,string,long,long)


        screen.resolution.set (512,384)

        text.display ("Press the right button of the mouse to see the context menu.",CENTER,10)

        window.contextmenu.item.add (play_sound,"Display my sprite",CONTEXTMENU_NORMAL,0)

        text.display ("Press a key to exit.",CENTER,350)

        keyboard.wait ()

        script.stop ( )

        procedure play_sound (%custom)
          sprite.display ("avo\dinosaur.spr",CENTER,CENTER)
        end procedure