You can use my code in this thread to show you how to work with dictionaries.
Typically you entget the dictionary entities, e.g:
Code:
(setq root (entget (namedobjdict)))
(setq ed (entget (cdr (cadr (member '(3 . "ACAD_PLOTSTYLENAME") root)))))
Then stepping through ed each code 3 contains the name of the style, then it's followed by code 350 which contains the ename of the actual style entity.
Or else you use dictnext. But then you first need to find the ACAD_PLOTSTYLENAME ename. (dictsearch (namedobjdict) "ACAD_PLOTSTYLENAME") gives you an entget-like list, of which the -1 code is the ename. Then you use that ename with dictnext (works similar to tblnext).
However, the problem with dictnext is you don't get the dictionary item's name returned ... only its data. E.g.
Code:
(setq dict (dictsearch (namedobjdict) "ACAD_PLOTSTYLENAME"))
(dictnext (cdr (assoc -1 dict)) t)
Returns he following
Code:
((-1 . <Entity name: 7efa9c50>) (0 . "ACDBPLACEHOLDER") (5 . "A") (102 .
"{ACAD_REACTORS") (330 . <Entity name: 7efa9c58>) (102 . "}") (330 . <Entity
name: 7efa9c58>))
Nowhere does it tell you that this is the "Normal" style. Only way of getting that is to look through the dict datalist in above code.