create MLeader style with block

[renanemeyer]

hello everyone 
I have a lisp that creates the mleader style, and I wanted to modify it so that instead of mtext it used a specific block

Please, can anyone tell me how to do this? I've tried several properties but it didn't work

(defun c:test ()
   (CreateMLeaderStyle "test"
      (list 
         '("ArrowSize"               . 0.0)
         '("Annotative"               . 0)
         '("Block"               . "Block1") 
         '("BlockColor"              . 256) 
         '("BlockScale"              . 1)   

[hak_vz]

Check this post for creation of mleader style. You can easily change code to include block in your mleades style.