Untitled

func Add25(num* value)

        value += 25

endef

ogg mio_oggetto

        definition

                var num mio_numero = 16

                res spr mio_sprite
                var num istanza_sprite

                var str testo = "hello world"
                var num istanza_testo | 5 |

        endef

        creation

                Add25(mio_numero)

                mio_sprite = LoadSprite("C:\roof.png")

                istanza_sprite = CreateSpriteEntity(mio_sprite)
                SpriteEntitySetBlendMode(bm_add)
                SpriteEntitySetColour(c_red)

                for (i=0; i<5; i++)

                        istanza_testo | i | = CreateTextEntity(testo)
                        TextEntitySetPosision(istanza_testo | i | ,  50, 40 + (20 * i), 1)

                end

        endef

        step

                mio_numero += 1

                SpriteEntitySetPosition(istanza_sprite, mio_numero, 10, 0)
                SpriteEntitySetIndex(istanza_sprite, mio_numero / 5)

        endef

        destroy

                SpriteEntityDestroy(istanza_sprite)
                DestroyAllTextEntities()

                ShowMessage("gioco terminato")  //tramite l'overloading si possono aggiungere altri parametri

        endef


        func DestroyAllTextEntities

                for (i=0; i<5; i++)

                        TextEntityDestroy(istanza_testo | i |)

                end

        endef

endogg


//ovviamente l'oggetto va creato in qualche modo quindi tramite un'altro oggetto o nella lista degli oggetti presenti all'inizio del gioco