As far I know there is no DXF Group code from which you can get the scale value of the IMAGE object directly .......
Check >>THIS<<
You have to do this to get the scale value of the IMAGE object.......
(defun C:RAS_SCALE( / Ent U_Vec Pix_Size)
(setq Ent (entget (car (entsel "\nSelect Raster Object: "))))
(if Ent
(if (= (cdr (assoc '0 Ent)) "IMAGE")
(progn
(setq U_Vec (distance '(0.0 0.0 0.0) (cdr (assoc 11 Ent))))
(setq Pix_Size (car (cdr (assoc 13 Ent))))
(princ (strcat "\nImage Scale: " (rtos (* U_Vec Pix_Size) 2 4)))
)
)
)
(princ)
)
or using vla.........try like this (if an object has Scalefactor property).......
(vla-get-Scalefactor (vlax-ename->vla-object (car(entsel))))
Debashis Bhunia
Co-Founder of Geometrifying Trigonometry(C)
________________________________________________
Walking is the First step of Running, Technique comes Next....