mob
    proc
        casa()
            if(src.level >= 15)
                if(src.learn_casa == 0)
                    src.learn_casa = 1
                    if(!src.casacolor)
                        var/object/color = input("Select Colour", "Top layer Color") as color
                        if(!color)
                            color = null
                        var/icon/I = 'CasA.dmi',
                        var/icon/I2 = icon('CasA.dmi',,"1")
                        I.Blend(color)
                        I2.Blend(color)
                        var/atom/a = I2
                        a.pixel_x = -32
                        src.underlays += I
                        src.underlays += I2
                        src.verbs += new /mob/casa/verb/Casa()
                        src.casacolor = 1
                    else
                        src.underlays += I
                        src.underlays += I2