Note coordinate Thru GRIP

[toniechang]

Hi all !
How can I get a Note coordinates with a GRIP program ?

 

[phillpd]

Never actually needed to do that, but "Obtain/" might be worth looking at,

Paul Phillips
Specialty Engineered Automation

http://www.sea4ug.com

 

[cowski]

Use the &ORIGIN EDA to access the coordinates. OBTAIN/ would be able to tell you if that is mid-center, top-left, etc. You will probably need some combination of both commands depending on exactly what you are trying to accomplish.

 

[HeinzT]

I had the same question in a german forum ...and I got this
It worked fine for me

GRIPSW/ DECLRV

ENTITY/ obj
NUMBER/ subtyp
NUMBER/ objori(3)
STRING/ ostr(255)


MASK/ 25
INEXTE/ ALL

loopob:
obj = NEXTE/ IFEND, allobj:
subtyp = &SUBTYP(obj)
IFTHEN/ subtyp == 1
ostr = &DMTEXT(obj)
objori = &ORIGIN(obj)
PRINT/ USING, '#@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ #@@@@.@@ #@@@@.@@', $
ostr, objori(1), objori(2)
ENDIF
JUMP/ loopob:
allobj:

HALT

greetings from Germany

 

[toniechang]

Thanks for the great help ;-)