DROPPER SPRITE

[ramon]

He is here a helper to drop items from your inventory.

EVENT SPRITETYPE4

; DROPPER

    DETECTOBJ
    IF OBJ<>255
        GET OBJ
        PUT X Y OBJ
    ENDIF
    IF CANGODOWN
    ELSE
        REMOVE
    ENDIF
    FALL

; end of DROPPER


To call it from the player, image 3 ( this example ) must by an empty image.

EVENT PLAYER

    AT 5 6 PRINT "SELECT TO DROP"
    AT 7 9 INV "LLAVES,MAGNET,FLASK,CANDELABRO,LAMPARA,TELEFONO,VENTILADOR"
        SUBTRACT 8 TO Y          ; for example
        PUT X Y OPT
        SPAWN 4 3                    ; Instance of DROPPER SPRITE
        ADD 8 TO Y                   ; reset position