LISP - transferring objects between LocalGrid <-> NationalGrid

- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hi guys!
BACKROUND
I work with LocalGrid [LG] and NationalGrid [NG] and have often to transfer objects between them. The model in NationalGrid is the base one. In it I have a vertical border cutting the model NG into 2 zones - B20 and B21.
PROBLEM
To move objects NG -> LG i need to divide all the object using the border line and then use below commands:
NG - > B20
mocoro
0,0,0
m
505000,-211000
s
0.999775503
x
NG -> B21
mocoro
0,0,0
m
504998.5147,-211026.3148
s
0.999830502
x
Above is quite time consuming and not the most efficient way of doing it, I am afraid.
QUESTION
I would like to develop a LISP that transfers all the objects from the model space into the LG, regardless to in which zone it is. This would need to include dividing the objects [polylines, 3dpolylines, blocks].
As I have just started playing with LISPs will need some advise. Could you please help me here out/point me into right direction/give me some hints?
Many thanks in advance!