(Subscript[W, addr])[(Subscript[BK, index])]+=(mtile/16);