q2284555 发表于 2022-11-13 10:12:45

块属性导出excel后怎么修改导出的excel表头?

这是属性块导出属性值、块、XY坐标到exce打开(csv格式)的插件, 还差个块名称、坐标表头没补充。技术太水,研究了下不得要领,望高人指点。


data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAA1kAAAEgCAYAAABGs7kTAAAgAElEQVR4nO3dfZAd5X0v+O8ZjwOxCWgkGdUsMRLRRKNkhOPoYsuWvVu2hakgUKpcQYWdElFdvBHetbRmEjZOoHDuNYUd3SIZuMK1G93FXl1U9vWFW1QiEC6RialbE9kKLMYeDUagsSQIwSZIAvwGzuWc/eNMSz09z/tL99Pd30/V1Myc0y/P+T0v/Tz99Onu/PCHP+yBiIiIiIiIghi0XeHNN9/Eq6++GiMtjdDr9bBkyZKqk5GsbreLgYGBqpORLMZHjfFRY3zUGB81xkeN8VFjfNQYH7Umxsf603S73RjpaAzGR43xUWN81BgfNcZHjfFRY3zUGB81xkeN8VFrYnw4yAqs1+PVlypvvvlm1UlIGuOjxvioMT5qjI8a46PG+KgxPmqMj1oT48NBVmCMjxrjo8b4qDE+aoyPGuOjxvioMT5qjI8a46PWxPhwkBUYZ7LUmnimIiTGR43xUWN81BgfNcZHjfFRY3zUGB+1JsbH+sYXaQ2yvoc9T+7GY4u24e4V76o6MQDSiM/R/RPYd2T+a6ObxrFxpJr05CVViY7ux0QhUFXHqer4iMoOsBTrt16HdYurSNF8VccnI4zT0vXYet06VBmmpOMzugnjFTdCqcQHgLD9qboMVR2fo/snsA+icnIU+yf2AS1vn4vk8apGavHBqUO4d88zWMXj1xmiMnPq0L3YcxCVH+dTiA8Qtl4pB1lPPvkk3v3ud897LYVBxBmvfgePnXsRLnrlO/ge3oUUhlnJxCffoTm6HxP77sWSBBqaVOLT7wSOYtP4OM5Uo1OHsP/ZU8BIdUFKIj7FzvDR/ZjYM4GDCXSSk4hPJoF4FDE+aqnER9j+4BQO3fttnAIqG2SlEp9UMT5qjI9akvE5uj+JARaQaHw8SQdZTz75pPD1lILwvdOP4T3Dn8P/9OLn8Z1Xt+JdF1SdokQvFxxZhVHsw8kqj95zUjhTcerQvdh3cj22jhfOGC9eh43rqkpVXwrxWWBkI8a3LsG9e/Zh/yqeSU4Z46OWQnyk7Q8WY911GytKVV8K8UnNOf/9m7jg3/0JOj/9MZb1OgDSOcYvA/AB/DXw76pOSd+yqhMgcBMAfO32qpMBII34iMrMXwBJxEganw7Q++W34af/9lP46dZtZSbJm/A7WbIBFpDSIOt7+M4r78FvX3AhfmvoIjz24iN4qeokIaX4FC3FkgSmy6uPz1F8++DLGH1/tZd1yVQfH4nF6/D+UeDIM0crTUay8UkE46NWfXzY/tTJOf/9m1j0f/7v6Pzkx3Njq3QGWESt0QM6P/sZzvvSBH7lS39ZdWqsLBhkqQZYQDqN8Es/egiPLfptvAvAhYsuw0WvP47vvlF1qtKcyTq6fx+OjL6/8qlgIIEzpadO4iRGsSqtq5jOqDw+CouXLAVOnsSpCtOQcnxSwPioVR4ftj+1csGtfwQkeEwnaqce3vaf76k6EVbmXS6oG2AB/UHWW97ylmgJMvMSvnv6BbxneO5bWOf8Fi4792/w+Csv4aPLLqw0ZakMQnFkHybOfKd6KdZvTeOoXnl8Tp3Ey9WmQKny+CQuqfjMq2PA0vVbcV3FZzJSjk/VN5UBEoiPqP2ZdwOMam8yU3l8gAXlJm+03JSg8/Ofn/n7p1u34QcfugIXjq0pORVyqd344oUXXsBFF11UdTLOSuzGFynE5+xNiUaxaXwj0ig5fbL4/NIT/4ihT/1B/59eAm2UhTODLJMBFpBII/zGd/H46+/BVWe+g9W/ZPBvTn8XLy37KKocZiUzkzXvS+dHsX9iAvcm0AnkmVI1xkctqfgkeGMHxkctqfhkRjZifHwj+u30typNShLxEZabubsLli33Fayf/sH/itdPv1J+GmokifKTsGTiM7oJm7AP++5dUvkdcfNk8fnF2vfibGXslJkkbwOA+QALSGOQ9dIrj+MFPIbdT27H9rmfz7/4ApDAJYMpxGehEbxv/VK8/MyzlV7qBSQQn8VLsBRHUPFXi6Qqj4/UKTz7zMtYuurXK22Q041PGhgftcrjM7IKo2x/6iN3zrT3K+czPhqMj1pK8RnZuBXrcRB79qfTGKnj0yv8rocBmwEWkEIhmbtU8JK7cfe75/9sW/QC/ubF71WaumRmshJV+Zmc7AYO3zpU+YBTpPL4yBz9Ng6+PIr3cyY0aYyPWvXxGcEqtj+1xfioJRefUyfxMpYkcdMvILX4LMa66zZh9Mg+TCQy0EorPmEI7y6oUvkg69WH8Tevvwe/Lbhd+7uG3gO88h1UOcyqPD4ipw7hoYPVz0IAaVSikY2bMPryQey5t9DROXUI+w9V2/VJIT5Fpw7di4l9J7F+a/XXb6cYn5QwPmopxEfa/iQghfikLHp8nvsKlqzbjPOeky/y1r2bsUyzjIm37t2MZZ9/1H3ddbfg3MLrTvGZugXL3rta/LPuFpyL4zhvq+T9ws8FU/M3ffSZI8DoqsqPW5n06tcINm5dj6VH9uHeivs+QIrx8ad8GLFI1YOI751+DFi0Tfzg4Qt+G+/B7kqfmZXMTFaCXzoHqi8/fSPYOD6OVfsnsGfiYO71UWwar/ZBWUnEp/jF86WiZ/pUI4n4ZBZ8Qb/6LxInFZ8EpREfWfuD/veRKqxoacQnXeXEZxpvv/UreGPPv8W/RtvHcZzzyDTw/U9hya99Aye3rPDf5NQt+J//6L8ZLfo//o/CPjuX4qf33YefXDx/e8v+GABW4Cd7nsZPcmk/b+vv4O34LE4JY3QKh+7dg4Mvo3/sui6Bjs+cJOvX4nW4av0z2HNwD+5Ftd/bTyo+on6Qw/fXOt/4xjeUo4J3v/vd8/6fnZ3F0NCQ5W7a45//+Z+xZk06dx9KzczMDMbGxqpORrIYHzXGR43xUWN81Bif+Za9d/WZv3/0j0+XE5+pW7Dsj59ZOOiY89a9m7F4F6Tvm3sUF6z7FM5dLRusyPXTsAqvHrodr+ded4qP7PPODbKK+8jSPbgj0OCwRKxfaqr4FOtiXQwWB1E6SY00E5TMTFaiWH7UGB81xkeN8VFjfNQYH7VS4vPB2/GjQ57bmLoFywxnlfD9nVj83p3KRV7/q6fx6gf1m3KOT28ab79mNd5efL3zewuXfe4YBgH8jxX1GmABrF86TYxP7S4XJCIiImoE1YCo83uCmRwDH7wdP/rH29X7+w27GaxzP78aFzyYf2UaF7z3v+EC4My2nCkvF0T/u2qbd2Iwdw578I9Wz/tO2IJLEIkSwEEWERERURVEA6JsUHHVR+0HWCrPfQVL/lg8wHrr3s1Y/INP40ef+5Bw1dc/9zRe/1z/73M/vxoXPOQ4APQgnlGbu3ywxHQQmbIql7//97/f/+PFGElpkL8HvvqRr1adCiIiIqqV4zjv1p0YxO/hVcmABwDe8v9uxjLIB0XS7aq+g/Xgp7BsVjfD9SjOechwl6ZsLhfE3IDwkY3W3yUjKtvg888/j16vh263i16vd+Yn+z//Opmbnp6uOgnJYmzUGB81xkeN8VFjfNQYn7OW5f7O4hI7Pud940/xvqdX4tjtH8fs9DSA/w/v+vw/4wef24SfADjvxZ/hfb1ZvDm9EjjxKSw7/af4u+v/jXa7y768Gct+9gf49ucuw09En+G3PofzNv8p3nffTixe9xim/5//DT8Sbei7/xWX9wB0TuO56en+Mj/ah/ff8p/7rxv66eb/iG/9zjBw/DSWdVbi2O1/gdl8wL/7f+HyXXP7+NGLeD+Anx6fxvQFczH42Yt4ZnoaP8FxvAvA2198BtPTPzZPQEVYv9Rk8RHVxTroPPXUU8bVYvuT22OmpVEmPzFZdRKSxLvrqDE+aoyPGuOjxvioMT4Fy3N3Uj5xOn58JncA1+8Fbnkc2LYSwAFgxbUA1gLfnAQuAbB7A/AF9P//wdzym78O3HGFfLs3DQHQLJNf9j4AnS3A8V2K99cCa54AVp/d7oL43DQEPH0b8KBn3/HY3cCHbwXuOQ1sQD8Gf/uxue3OxejmLGbpYv1SU8anUBfrwvkyVg4iFtrwtQ1VJ4GIiIjq5tjdwCf35l6YBa6+FlijGKRs2AXc8hRw+7WQDqKyQRGunfttqLcXWIHCQOsAcP9aYDOA+wGM3wZ8UrFvnd0bgNufUC/T2QJ8c9R+20QJGIi14U6nY7Ws7qdpbOOjet10Wz5xLDsPfONjE5sQn62s+FRRF3TlL9a6tlJNp6p8ypa3/QmRJpf0x6w7VR4XyoqPb5ltY3xil/dKZDM112wBOgBuvwxYfhlweIt+FmjbJHDLWuC+a4Hds/Pfy2aSTpzu/zx6W3/7tzx+9rUTjwOXArg0t9yJ08CXtwBrngLy59N37wTWfAxYBQC/CWzYDtyzBbh/J3AMOOf+PwRW7BCnc3LHwve2Tc7fZ5aWfPpEs2nPPAGsXqWOC1ECog2yer2eVcOW/z5Y8afuYg+CTGNtmyeZTqdTm3wI1elLcZCf75jYpDFmZ12VTtPXq5JCOkX7UrWDVbeRIU6e2WynbseFUGXHpk1vY3wa5cwA6+vAHZv6r126tv97jeEMzrbJ/uzS7ZfNHxTdcVo8SFtpcFndhl3Ag5P9y/MAAAeALzwBjG9fuNzxSeCSA7jwK98H1gA4Jtjew3v7s2PFgSAOACuG5qdbaRZ4GsCqtC8NJAICDrJUB9MUO6x1kR/gqGJXPKjqOji6fDFdp+o8NRkA6j5j8W/XzkoZAxdV51vFpMMu+yyyzyZaLtuuKNYxOn4pp1NWvvJMO9NVnejwqV/FcpZ/rSl8259i225SbuskVHxM1zHdT1JxfeSB/veJ8pfb/e5u4MTXgcO3ymeGiu54vD84mz0gX+YHRwCsBX7NIZ27d/YvXZR9K2L3TpzfAzC+q//dMWH6AHzhzvmvH3vGLh3HHgYOC7ZDlKCgjxbwOYAm0djVULHTKPo7W842f0yX98072fqyTmn+/XwnRfaZZZ9dta6LWB1I1eeM1fk22Yfqddnv4nZF+0s9nbr/i3/r8kiVNt1rsvVN1otdv0Io47iQWnxMy4Pq9ZCqiI9sXVXd1El2gL9NNoVzBXD8dP+Sv6tHDW4esbI/86Ty8F4AW8SDIJH8DSeAhbNYZ8zNcv36dvkgDCuB8S39G3XsvrFwk4rCwO/2y4Ds0WGXzn0n7fjcvm+6FVizFji8F1jxVP8GIMfrcyMEapfgz2/TNXqqzi7NV+z8iWa0mhI7k0GhTcczv83YHcHYih331PNfV051na+yuKazWJ5E5Ut0Vr5INvMjSp8qXSbKrl/59WR/26Y5pqriU2zbfdIcUxXts2xmq4zBfVLuCDSAOHZ3/2YVN99ov+7DB4A7FAO4m64FesBrv/9xnK/azoYbgUv39mehts191+oHR4DeE8CXDgB3zA28bpHcKXD3hv6NN7I7Ld40BHxoCPjyacXgjqg6wb+TVbwEqcmXitgQXaKgu2xBdimX6LWYUr3MQlS2ZGVNdAAX5UXxPdXn1OVn6Bhl28yXC9P9uJS/jMvsk2gQEluZ6cwvK+rsFcum6u+y67Mpn/pl8vnrLkR8ZLNWqbW1LkKWn+JvkwFW2e1z2g70Z6TW3GZ3m/MfHAF6UH//KRu8bf46nl+n2+DcbFb+u1mzT/V/33et4ntZc9/bym5dn83E3XG6/12064cE3/Uiql7wmayMydlql0aujgdo2Wc3/Sy6ZW06lKbp0y2jyzvbM7S2Z0Hzy6hmEPKKM0KybRTfV3GJd/49k46Cal+62RjZa6ZnokXbMSmPonjmP7NpmXat72WlU6U4W1H8W5UO2bZclV2/dFzrjen2Um9/ZOvLlrNNl27fdYiPqt9gWje92+eLFym3Xw/Zs7ZkdypcCaxG/2YSRQ/P3VJedaOMRx4AsBb49BXAz2b0yclmszLPPNF/zteV+4DrL+u/9ru55bPbvMtmt+44DaziNBalKdogq9hZkS2T15rpfwu6zrBNzEINdGNwGQTIPnvKn9NWfhCl+wwx645LOSuuU0bdLjOdqo5ese2z6Wyq0uqybnF9UXpE2/WtX67teRXHhZTiozsZ1ob46AZY2XbYZ1CZBa6+DJiG/mHFn76tP9O1/NaF793yuPpSvG2TwLa5v+eNsQ70Z7jWFFdYCTx4ev4y91wBbLgCeHS0n4785YT57avSQJSgoIMs2cGh+LrvzE6d2H6u4gxg/jcw/zIKk9nCqpSVFtUMjs1Mhu6EQOj4+nY+bTvtrmeidenQpcV0llW3DxdlpFO17+LAWFTGUqu3Ra71SzVLKJp9Ve0/xEAtFp/4yNbPxyn/W7adJsZHtK7JzHMoZ7a1fCjYNkuVzf5s/jrwoMFDgi/J3VjCx6EvAhsfOvt/Zy2wS7Hd3TsBbDk7iDuTjrnLA22zVDbbRVSR6HcXNOkMig44JttuOptLOWwvi7IVeybIZRBQ9aAHqM8MWcgz0aJtF88wF9ePGaeq0mly2VKokyC+8Su7fpnmh0qZx4UU4mObx22Lj+yEmOlArVVMZn9ibH/dnwEn9grekPjoxwBcKXjjCt4xkBoh2uWCIjaXDxTXo4VEZ4ZjDEbLGOCGvgTGpAOsSotJmSt74C8aBKXKpAOWwixO7HTKZrJs667NrKVufZP96ZjUL9MrG0Tpk71msn0XKbQ/xdlP3SCqbfEppkU3g1V120IGLtkedzBIVLEggyybM8nkRnWpke1lO2WwuYTDJn2qGZis8+q7D5PlZR1k0cyt6qy16yV0ppcLxsx/0xmc/P8223ZZT7at0OkszojpTiDJykUZ9bOq+mVyZUMsdWp/RDMzppcLuqpLfIrpNNlWMR1e7XPpN74wmMGJPUtFRMGUOpPVdJOfEH/50uaMrux9UYe6eFAWrd/kga2so6A6cBYPtiE6L/nOULHjnMqMjS3bNOsGkrEGGVWkMz/DkC9Dqg5m8W9d3VWtK/o/Bp/61Qa+7U+mqTELEZ/ici4nRZrYPhNRPXgPsnRngny3DdTjILThawtvvzP5iUnnM/iA3WUQxc6a7sARIraqPPbNM5MBkElHT7cdUafHZNkQn8+WbUfbZAZHth1R58a0TovKlujsfPF11f5lqkinTVpNOpiyNJvEwLWdjV2/VNuWvWea5yZtV+rtjy59JoNwmTbFR3ZiI1j7XNcbXxBREpwHWdmg4iNf/YhwgPGRr35kwbK2sm24rl8W2QyWC5+DQ/Hg5bMf0zOEMblsXzYA1b3mOxuiin2IOIWKRZXL5TuOLts1lUo6Tcuiz75CtRc+69h8zhDKOukWMz6x1ndZ3lUV8XHdXuz2mYhIZPCll146c3Y2/0P+ZmYMHszXQoyLGuOjxvioMT5qjI8a43PWWO7vLC6Mjxrjo8b4qMniI6qLdTC4evVq86X/Pl5CmmhsbEy/UMvMzMwwLgqMjxrjo8b4qDE+aoyP3NjYGOOjwfioMT5qpvGpUwytLhf86ke+iunpaVx++eWx0kNERERERFRrvLtgINn3snimgoiIiIio3TjIosrZ3D2L3xckIioP22ciIjccZFHlYtyCV6dOjwcgIqoK22ciIjcDVSegjsp4EGid+cRH9DBY3/11Op0Fy+gO3tk6+QfNirZjsr5oXd37bWUbD1UcXfKQedBOujKhK182ddyljNmkz3Z923Q0oX3WpU+0LVVsXfZvWi5cy5/r+rJtlMHms+i2odu+bxpNlovBpT7lXzctr651yTTGbTnWcpBlgR1htRCNl83DZU0rcvZYApu0FZ+VJHt2ksn6+Z98GvKPS+CjE+bnlU2eyR4/YZuHrNvtY9LRMClfseq4S/pEA70QmtQ+69Jnup1i/G2Iyo9oYFfcvui3ahuqMqgrn2X2eUzKsu7YoCpPJuvbpDH0AMVk3771yfRRTb6x0cWoTcdaDrIssCOs5hMf1dm1/Ps2+yt2Clwb1hhYjsLQXcqUz3NRJ5HaLWabLtuuzf580xfq8zWxffaNTYz2RDRIj8WkfKbc55ENwvLv26yvk3p51aVPd6ykOPidLEqCrrLHbszKOrCRnO9BwOegka2byiCc0pVS+1BWWtg+m4mZtqZ3ikN9tqrLSh2OJaqy5Jp+0+N3HeITEgdZlCTbs1IhyC6Fyf+2Jbp0o41UDaqocRa97kqXf03vvJC7fGdAVX6K65iwqROmyirLTWmfY4qRvyb7SS0OrnR5qrpc0GQbsS7pC9FPyCszP0PUI1V7mWI9jY2DLGq9mBW/bQ2KjO0lUkA5DXIbG32yky+P+f+L77tuN5SmluW6fq7QA6kQl5/Whcn3/0SzIapYmKzvw6ecppCHoeqZ7Phd13rsi4MsqpzNlyNjdUza2gCkzCZfTC9/kJ1dE/3P8kB5ZQ7+bcVME9tnM1VfptYUMQeUZZy0E/2fUnmwmd3zSb+o3tYhPqFxkEWVq3JaucmVu26q6Ejxy8CkUofyEDuNbJ/NxBoM1qEMhlLnz1r3Y0ns70TXPT6ueHdBaqzi5QC6M2SyM7NtaQyaKJ93bfqyLbWDqG2qSxmve/scoz0x+Sx1yV9bJmVZdzdBXWxU63c66luk25TXKsROny4+JMaZLAvFAgzU60xbbGXHx2R/si+uZ68V73QTqmEy3V7o/daZ7TX2OjZ5nPLBk+IxaUNkZbKMOu6SPtv1Y0m5fdalz7QzKfqej+3+VeuLlhG9F7KdFL2X/7usY7qIrLyI3hcto1tfx2T9WMcSn/rksx/T7Zgev9t2rOUgy0LTC4Mvl/iYdhBE+7Gp/LrXbKa5XfcZattN5hqPKvKY6k+X7yHKjE/Z8kmf776B5rbPxttcPgR0APT6r83MzJSyf6s0Sph2YFNpF0PVJ9f3y9q/qzrEJ9QyUnN1sU44yKJKsXNLRJQmts8426n7p+cqTYYL3oyDGuGNN/q/a1iEO1NTU71ut4ter4dut4vsb1WFHB4eLjGJREREROUau/p/Abrduf9qeBqdqBHm172Z/VPVJcXS4MjIiNUK09PTGBsbi5Sc+puZmWF8FBgfNcZHjfFRY3zUGB81xqfg49cBX90z9w8HWETVyNW9936gVm0U7y5IREREVPTFO4HfvSb3Au+uRlSNDvBv1gH3PVh1QqzwO1lERERUuRB3ygtxs49529j1n/o/4EyfDuOjxvioNTE+HGRR5WyevcAv7xIRlSdm+6y7Pb7rdk32q3smF481ROSLgyyqnOjZHLEPcHzOGRGRXuz2WXfLaNkgz+Z12fOEVPvgnfmIyBcHWZZin2FrAp+DsOgp7L7PAxENqEQPzhOtI1rW5LPpniEje//w4cPabTed7QDY5Gy4aR7yDHb7yDrlITvZJm2UycNNdQ/3VC0Xgk37HDtdsljYPjy1eDdl2zbAtU9gGh+T8qnahu36sm2U0S7qYmlbF3zLiGrbqn347MckHbb9nfzrRSHTb5N/qn03CW98YSHfIGc/NpdSNF2n0/GKh6hSq2Jssr98nrlc9iL7bbO+rLzkD+66xya0hW1+qeqkbR6yLrdPsfwA7nVetn3dyRzd+6rjjSr9odm2z6btWxYDl/qXXzdbX/SajGow4dL+2BAdI2zy1+QYk3+/+LfuvWz/ZbWLuv6VbV0Qre/7WYrbL/NYEqK/Y5L2bDsu6bPJv7b0nzmTRcHYHJyK8gdI2fuiA7zNOlmlTmEwk0IaUhMjv/LbSCXvKR2xy4OujbJtM4vluKzy7NI+m1INdLL3VbPbtp1FWVpt258Y7UmZ+SvbdjEGQJonoGzb9JQ/iwnf/o6unlEcHGRZYIGMRxfb2A1jyEuDqDyh8io/EKN2qnunI2b6y2yfQwykdNsXXfYo25ZLRz6GupdPHd/PVsYgwuZyxJSPJSYnD1zqFS3EQZaHpjd6VRKdlYlNNFPmOwvSxmuQq6S6pKnMM9LUfKpOSKzylErHLWT7XDzBpZv1M329uG3ROvlLmGy3oVNW+WjqMUbXLqtmdIA4cdAN5EL1E1T7jCnksVA1I51/rek4yHLEjllzVHkGmMJxyUfWYwLcykFZJ35MBiF1LscmJ0VUndBQA8/iCTWTAZhK6IGUyyCzrlQny2T/51+XbcOHyWxuCmXFVcwBVl7dL9u0xUGWgzof0FKkOyOVF2P6n9/XqT/Tyx9kl3eI/md5oBRUXQ6rbJ9NuM5ChW7zecl5GKEGlFUc1+twLNEdK0X/26Q/1Hcem4KDLEttKBRlM6mQZe6b6iXml+6p+eqe57HTX0b7XByg2FyqncoZ8VidxrqXTxs+nzV2nHTbr/uxJET66/aZy8BbuFsQFaBUGnhaqHg5ge4MmezMLBuOctjkl2oZ2TZS/zIypUFXRsouQy51og7yN5vIBlYuZ7rz6xZ/VPv2bdNjtCdNyl9bJv0r27pgu/86x9bl+GlDFx/2j8U4k2WJhUauWMGB+Hdb0u0v3/CIrvHPny3N/x8qbaZnYTmQ65Pll4ruciaTPI55cKJ05cuEzXu228//LfuukW0bFiqNseg+m24QVeal3CbpEBF9T8hmn/nfovVNy6dPfGzaRVEaQ9KVY1VdEA16beua6b5F25ftJ+T3nIp/27QVrvtxKdMipvFrGg6yLLShQPhwiY/uzIhqP6b7Ey0napxs1nfZZ6htN53tgc/0vdB5TPUXu0yYzML4bKeMwYfte7bts2y7ohno7DVRh9N0e8W/ix1J25lv189psp5P+TTtIKfSLoY4Zvp8Ft9Y2SzjIlSfwvX9suLXNBxkUaXaWOmIiOogdvtscgJM9FrIdKUyyIjBdZaNiMLoTE1N9brdLnq9HrrdLrK/VRVyeHi4xCQSERERERHVx+DIyIjVCtPT0xgbG4uUnPqbmZlhfBQYHzXGR43xUWN81BgfNcZHjfFRY3zUGB+1JsaHdxckIiIiIiIKiIMsIiIiii7UnRrrtm8iaicOsqhy2fMXTH6IiKg8Idtnn2dLxXguVR32TUT1xbsLUuVEz+Yo69bEvOMSEZGcT/use4adbD8+t44PgRZpXUYAACAASURBVAMqIgqBM1mWOLOi53tZhunB1nQZUV6ZPGMkv55tnuvO9HKmTs4nFrIYi/4XLWe7X+ZjM+g69aL8da3jLuXDpt1Rpd+Xbfuc3ak4/6N6XbZe8TXZMqLPrMszXdqLf4ti4hJj07S4lj/X9WXbKIPNZ9Gtr9pHiLTF2o9JOnTvm5aD0Om3LYttwEGWhewAk/9pS0Ex4VtxigdwQH2Zhsn+8nlmk7biAzVdH4CsKi+mB/E2cc2vbN08kzwMUad1HUZKl0lHQ5a3ZdRxmzZV1qkJdbyybZ9DMGnfZUwGd7ptFwckomVc670oTcV9iLYv+q3ahqoM6spnmZ1hXVusK8sm7/t+FtO2PkbMQvR3TMu/6wDLJv/a0n/mIIuC8elgqs6u5d+32V+xU5BSpWZHfKEY+ZXfhqiTSO0Wc1As267N/kKnz7VOubTPZYjZppsMQEKXHdEgPRaT8pnySSNd3qtOeNSRb3+njPJLC3GQZYGFNB7RGSLXM4Qu2jaF3TSudTFE2WrjJRBtlmKbH/tYVEX7bPqZZJ1t2WDQpa6aLh8zD5re36jDZzMpP3XIJ1UaqzyWNhEHWQ6yCsZCFY/s0q+YRJdS+M6CFBtllpnwdHHN8tEk9i551MZLINoiy0/dJYUudVw0K+QyULfdZwg27bPLYEd0Vt50f/lligNBl8Gh62AyVP7a7qcpxxjdZzG5dC40XVsfqp9Q1Um7kOVHNrPWxLKqwrsLOsgKRlsKSdPFzEeWj7hiHhRMMH+bL9/e5/8vvu+6XR+mJxhk/5fB5QqQYsx1y8acTcs7fPiw8boh06SKWRPbINHn1ZXl2GVdF2efY1EKeVjWsdSmbjcBZ7I88Kx1GLKzN2Wc1ckaA+ZjfcnKTf59XR7zhAnppDpTqSv/vpf1Vdk+y2ag8q+bplv2ms3+VaqafWgaXQddlRdlfsVARFcXU6CKb4j0y7Yvm9lqOs5kWWBHLA6TClnmvqk+XM6SF/mUNbYJzZZ6/oYo/7b7iLUf1f6L+7OZDbNZx3T/PsvZSr0MhpTyZzWZNbZZPjVVH0ubijNZ1FjFMyW6M2SisyqxDpy0kE1+mcpvw/Qa+mIa2nC2jZordJ2qQvH7HLYDLBWTNkHUdsQ4E2/y2ZraHuna4uL/Jm23bTmoc2xjHD/zdPExyb824iDLQlu/uGeq7Glyk/3l86x4JlT1O0TaTLYXer91J8svnWJZMPldXNelzLJNqDeTNkSWv2XUcdM2VVT+M651KhX5tOcv2SyrzVTFznbwV9xufvuqTqqofQp17FBtp6pjuu3x3OR9389i2tar6qIPn/6Oz35c1hWlr63HSl4uaKkNhcKVS2x0Z0ZU+zHdn6wx1i1j8p7vOixPC4WKt0kehzgjzjysL5/8L6OOh9qHT4fL9r3iINR3XVW91S1XXMdkQFzcdqzY+rYtJjNesfcRUuyyXlZbHytmZbUFVcevaTjIokq1sdIREdVBGQNEn3Vt92HTUWzCsclmEEpE4XWmpqZ63W4XvV4P3W4X2d+qCjk8PFxiEomIiIiIiOpjcGRkxGqF6elpjI2NRUpO/c3MzDA+CoyPGuOjxvioMT5qjI8a46PG+KgxPmqMj1oT48MbXxAREREREQXEQRYREREREVFAvPEFVc7mNqH88i4RUXnYPhMRueEgiypXxZPSTW/PS0TUZmyfiYjc8HJBD3yArJhPXIoHcJNtmTz7RPRgPJN1VA+DNF1f9iBJ1fttZRsPVRxd8pB50E66MqErXzZ13KWM2aTPZ32TdDShfdalT7Z9XVps9m9aLlzLn+v6sm2UweazuKxfXNYnjSbLxeBSn/Kvm8bItS7ZlMU24CDLUVsKiA3filM8gAPqB0iaNqTZIwls0lZ84LHrA5CzfYvSkH9Ugu6xCW2QzyubPCuuk39d9Vu0f2oXk46GSfmKVcdd0ica6KmYpqtJ7bMufabbKcbfhqj89NMzC1w9BFx9Nz4g2H6v1wMmd6B38SLs/xV1+ctvv/i37r3s85U5wNKVZdXntDl++AywTMprjJiFqE+ytky0HZf02eSfbZ2vKw6yKBifgYLq7Fr+fZv9FTsFKVXqtg+oQtFdypTPc1Enkdot5skN2XZt9uebvlCfr4nts29sYrQn/RisPvP/P0Rsr0zKZ8on/8ouL6mXV136dMdKioPfyXKQFc5UOuxNoKvssWOtaoyoHL4HAZ+DBus0mUqpfSgrLWyfzcRMW9M7xWV9tthtfR2OJaqy5Jr+JpdNHxxkWWp6Q5cK0VmZ2GSXwuR/2xJdutFGqgZbNLgSve5Kl3+s0yST72yoyk9xHRM2dcJUWWW5Ke1zTDHy12Q/qcXBlS5PRZ9bF4vY5SRUPyGvzPwMGR+Tmb+mlFUVDrIspNiQk7+Y+cry0md7iRRQTn1jnSadfHnM/19833W7oTS1LFf5uYoDOdt1Q+l0zkFv+SJg+dC8168cWoTeUGHhSQAbgu26Eibf/1N97yjbhm6bIflsP4V6G3OAlSfLn6bid7Isia5Fb0thiUV1nb/o9dD7Tn1qv61s8sXn8gfWaTKR8pe1Y3Yg2T6b8Y7D7g3A8iH0Lj4PmAYwfWt/ULV8CM8OdYHjp4ETcz9f3gJ01uKuH75y9rVHbwPSD5OWroMu+26SycxJ7La+DscS3bHSN/2y7ZvkTxNxJssCvzgYh0mFLHPfVI0q6hPrNKnUoTzETiPbZzPely1umwS2AZ3OW9G76jwAtwEPbq9FGQylzKtKQu+r7seSEOmv22cuA2eyqLGKZ0p0Z8hklx6w4aivfN615cwZtYeobapLGa97+xyjPel/lqe1yzSRSVk2LS+u+9d9Nyrm/n3FTp8uPnVui2LiTJaDlCtalYpxAeLfbUm3P9kX1/PT4fllQuWn6fZC77fOQn8x1iaPWafbyaQNkZXJMuq4S/ps148l5fZZlz7TzqHoe0K2+1+4/uyZ/z8gWOasx868F7KdFL2X/7usY7qIrLwU38u/ptqHbexU+w+xfRWf+uSzH5cyLRL6+F4XnMlykL8uuA2FxFQxLiaxyV8DLLseWPSezf5E7xXXUW3DJY9NY8ByNJ9r3ZLlm00eMy/aR9eGqN4vo467pE+WxuJ7JgOJprbPuvQV963aj2v+msTnH2T5O/sUgK34zBvy/doMFE3bxZhto64sF5cz2YbNMqafT7dcrHj51Kfi+zb7sdmubXvVBpzJokq1paIREaWmOCiamZmZ9z7b5wQcuxv48K3Agqx4Ali+d+Hy1/dvN/js0KDzLBsRhdGZmprqdbtd9Ho9dLtdZH+rKuTw8HCJSSQiIiJqg+dx4Wc+gXdgO47e9XG8seD9g3jnVX+C83vA69d/DbPXvLOCNBKRicGRkRGrFaanpzE2NhYpOfU3MzPD+CgwPmqMjxrjo8b4qDE+aoyPWjnxORc4FwCWYUS0r8n/G8Ba4JbfxLlfeAhjf74rcnrMsfyoMT5qTYwPv5NFRERElJqb+s/Jwk0H5l44AHxyL3DNZ4FtNwJr9gK7Z5WbIKLq8DtZRERERJU7AKy4du77V7cC46eBO3Jv33QtgLXAp6/o/7/rNuDD24CPTgKXlJ9aIlLjTBZVTnaXKtWdq4iIKD62zyW5aQhYsRP45mngxNzPhtz7uzcA9wG4JzegumQ7cDOAD+8oP71EpMWZLKpc8SYrZTynqOxnxhAR1RHb55LcUZi1ytu9Abj9CeCWx+cPvABg2yTwzBCw4ingm5zRIkoJZ7Is8OydGZ+YFA/gps9y0b1v+xA81TNhTOjKCsuSmG88ZDEW/a9bn9pDVyZcnhMVcsbHJn2m67ukpyntsy59su3r0mIbS/26s7jrV4eA25/Aw6dfQeeGEXH5+8tX8IHXHgM+lP/+lno/NuWzrHbRJB0m75ks55u2qo4lLvUp/3rM9NvkX1uOtRxkWSrz4Xx141txigdwQPyUcJv9ZdtUbUdE9iBK0/wWPUSzmAbRwzbbLJ9XLnkm66iZ5mFbGn06y6SjoXo4Z/Y7Vh13SZ9ooCdi26Y1qX3Wpc82Ji55Kyo/89Mzi7t+9TJ8ZnALcOI0rnxN/pl7vR7+4dRrwKO34ej91wIrdszbj6wM6spnmZ1hk7KsOzbo+mau5U22/TKPJSHqk2nf1XWAZZN/rnlQN7xckILJKq3P2UTVAVt0gLdZJ6vUKQxmUkhDG+TzPJW8p3T4tFmm2zZ9XbWsa/pCfb4mts++sYmR1vkxWInP/NNpuw1csh2/fmIHej39bd1NymfM+uGrWF5EA8T8a6LyVie+9UkXH4qDgyxLsrPl5EcXx9iNfPHsM5XPJ+75gVQV61N7pNQ+lD0gkWH73BczbU3vFIf8bKpY+ZQlk/5fHY4luvi4pL/JZdMHLxe01MbpzipUMZgVXUqRP4PrkobiNchtbYhk14ObXAplsm3Vcroz5G3OF1LLyo6unLrUcZc6YbLNMspyU9rnmGLkr8l+UouDK91nCXFJm/VA4ge70Fu+CL2/E6+vTPPuDRi76ovSdJVRVnRClh/ZzFoTy6oKB1kW2lAg2ihmZTe9BrrpRNey665pDzHAir0+NV++Q+bzPQfder7tRFPLcpWfy+cSxpD5q0pDE48xsstPfTvoPvExmc213v7kDmD5EHoXL5L+YPncA6kjP3Q65gArr0nl1AQvF6TKqa4xLgpdOfl9nfTY5oXobCIw/xp2VR7r1icCFpanlMRME9tnM3W5pDF1ug66z/rmZoGrLwNwG/DgdoPlD2D/8kXAheeg8y+/mJcWQJHuDbuAE/rvz4Vkeill/n/b47HqMspMXeq1L85kWeClgXHIzvSFOsOr2zelw7bRVZWbMtanZqtDmx+7o8L22Uw+LiG1oSOaSeezzgKHAaxedeYVZVswuQ9X9gB87Y3aHktCHAvTyb90cCaLGqt4pkR3hkx1iQIbjvhEcQ55OSDzkpomRp0pS93b5xj7NtleXfLXlklZNi0vIrr8mjdrc+yZ/otXXmG28Yf3Ap0tCx8UfdMQcF/hteVD/d+Xms6SmbGpTy50s1p1boti4iDLQlaIi69RXz42ZVxyZbK/fJ4VG+vsd36ZUI2C6fZS/uJ2FVxnDoplQZSnqliL1qfmM2lDZG1+GXXcJX2m6+fTlTl8+LBV+lRSbp916TNth4p9Atuz/sV9yfJWlJ5QMbFpF0VpDEkXd1l5MWWcX488APQAzM4CG1aeXfect+PZ4V/Csx/rYOOPs/UPAPcDuPnGBZ+h85evnN3HTUPA/VcBx/dap3vBdi3rk89+XMq0SFv7z7xc0FLsyyPqzOXykU5Hfkcd1Xs2+xO9p7r0RbS+LdMYsCydJcpP07ioLnUwzWPmRfvoypvq/TLquEv6ZGm0eS/T1PZZl77ivlX7cc1fk/io8le3X5uBos3+YzFt/3XpcK2PZ1+bBf72if6LX9gGHMst8/ROjAC48oHc+rt39gdkc8uK0z83EPPgU5+K79vsx2a7tu1VG3CQRZWSVUzVDxERxcf2ORG7NwArdlivlh/8Mm8MTd4JHF4LPPo4sOYJ4MOquB8AvvAEsPm2/rIfGgImRdvc1x+I5R27G1gxdPbugSY/ke8wSOF1pqamet1uF71eD91uF9nfqgo5PDxcYhKJiIiIWujQFzH27x8CLr8Kz3/gz/DauqoT1GTP48LPfALvWP4fMPNH64EX/gtWbrsb526Y//8vPjeF59cB5//VB/HOyavw/EN/hteydZ8FXvvz/vuZ8//qg3jn3wHo/AZeH/k+zs22L3D+X30Q7zyxHUfv+jjeKOdDU0SdH/7wh1anN6anp3H55ZfHSk/tzczMYGxsrOpkJIvxUWN81BgfNcZHjfFRY3zUSo/PsbuBD9+6cBZE5ZbHgW0royVJpfblZ3IH8MmngG9OApfMvbZ7A3D7E/24fvThfn7ccxrADuD6vcCXT+dueDF36/dp5F4/AKzYCVwD4P6fA/f8PvDJW4Frvg7cIbixxk1DwNNhb4pRF7UvPwK8XJCIiIgoKQfOduhPaH4evQ3ooH+Hu4oGWPV3APjkXuDm3WcHWACwbTdwaTGus8DE3v7Aa94dBVcCD359/p0Gd+8E1nwMWAUAvwZs2A7cswW4f2f/+16qS0EndzhdJkrp4N0FiYiIKHk+3y1yvbtjNd9lOgCsuBa4udiJF8hmu7AFOF7ug20bZffO/uzSgkHqSuDBYlxXAg+elmzoCuB4NkM1952teyaB2QfOLrJhF3A89/6a3+wPuC4pbOrhvf1ZzN03cvBcUxxkUeVsbtvNL+8SEZUnpfa513N/NpXPulkMQt7iXiobNN08d9nfTUPAlafFg63JuUvWAj9zqZW2zd2xIoupyvVD8vfyl2vu3gmsua2fd6J7VmR3JhzftXCABQB3PA48fRnwhTuBbRxA1xEHWVS54kGvjLOHZTzzg4io7qpon/P7Mn09nybTZ4fJ1pe9PzMzo1zGW9bBzzrqx+7u3/r7vqGF37XKHnRb4XewGmnDLuCEZECTDYDvkQx6RcZlg9+5WaxLb1NsayUwvqVfJjibVUv8TpaD4vNAaD6f2Iie8O67P1F+6Q6oqmfCmNA9Q0b3flvZxsP0OT6i/133abp/qg9dp9zlOVGy913Kh036XLdjmg6f9lm0vO4BprpnRJk+j0e3Dd1nVX0+l7xdUC7OP+/sjRSyzvQl29E58Qpu+DmA2y8DLjynv9zyIeD+N3HXD19B54YR5f5ty69tHoVkkg5dnE3ed07b6s/iKICHP2aWDmyblA+gbrp2bhZLMwO54UbgUvRns6BPv005CB0nm/xry3GSgyxLWcObXXpAZ/lWHNFBTRVn006FS37lD8Si3zbr53/yaRAd8Nssn1c2eaZ6eKLqt88+Vftvez7WiUlHw6R8xarjLulTtZc+bNtnk+3FPoaGHHTKOo2u9X5B+XntJ+g898q8Tnm2/b9+6TSwGcAvvw29obf2Z6+Ov4Ybf6Euf/ntF//WvZftv8wBluqzFN/X5Ufx/RCfpfgwYlmea/eTzVBu/rrBjNjcbFZvL44ufqtySV1/x/Q45TrAssm/tvShOciyUDzIsDM1n08HU3V2Lf++zf5E+ZVKpWbZCUPUKZDluemZaWqPmINi2XZt9pfKoN2lfRbNmuSl8NlUnfXicrq2JkZ6er1e/+5zy+cuDfz5z/p3Ewxw2ZhJ+Uwhj2Rknfj8+8Xlk/ksjzwAYC3wacEt3EXmZrNG/uJp6SK6/k4Z5ZcW4neyHKgKLrnRxbHMM57M02r4xt3loBEir0UdMmqulPLXtOOUve7ajrq0z9n+snXL7tSZ7k+WTpdYhfl8g8DVQ/1nLRX98tv6A65sfxcvmvc/ADw7VM9uXaiy4Xwsz56HJdG7eBHwoVv7/6hufJEt+/OfyRfYNglsE71xoD/Dtab4eu5uhjcod21EVTdcy39K7WJK6lkbK1QsnDwbEEcVs4ayS2GKB2Eb7ID3qRpsXWPvyyb/QgzU2CY0R76zYXppkGneu9QJ3bZUA6yQymyfTWeaiu/rZjVkRNvK2Nxd0Dp/525k0Vv+y8Cu08AjG4Av/OaZ27KL8nH+Pn4J+5e/DVcqZjvqRFduVZcLmm5jHunAR74t1f46nY7ZM6SLdzPsvIm7HtmBGzv952OleGLCZVuigVsbjpO8XNBSGwpF28TsFJteA910xTjoYlLFQKWqmTBKW/77Az7fc9Ct59NO5NOY14QBvyg2unjlO7q6n/zyuv37pFu7nTv6DxbunPjxgtt5q/Lx7Hb34UqrFKZL9HnzdVAWj5hl3WQ2V7nMtknMPPRnC1/fsGv+g6WPv4bPvFF+nyHmACuvbX0hDrKocqrr/EWvh963z2U0FJ5LY+97+UMTOqMUl2wgkxLZQEv3/SgV1/ZZtL+yYycblOVfN6VLe8zjVJuYDSjTbKt961oZdMdK3/TrLlnOpN6WhsLLBalyZV3iYrpvqk5dZrBCrEvpSz1/dekLcSmra/ucdaLmXT5VQSyL6YiVFtF+Qrgh8TIYUsr1rYy6VqUQ6a/bZy4DZ7IstGXk3RTF/NKdIZNdCsSGoxz67xz4bdP0cqpimWGdJ6o3k0vNVFSXr4Vkkramtkcm7b/qeO6bH3Vv6236Oy508Ylx/G4CzmRZKhZkdr7PKlZwoLwvRMv2l8+v4pnM7Hd+mVANk+n2Qu+37kI2yqZ57LNP0YGd+VgfJm2ILH/LqOO69JmWv5idL1dlHS9U7b/J/mxOzrlcfqhe/ysLlhGt7xM31XaqPKaLyI7noveLy/h+lqrrmk9/x2c/oS6pbeuxkoMsB20oGC5c4qI7M6Laj+n+ZI2xbhmT93zXYVk6yycWrnlscsmTy76pHnzyv4w6Hqr8hehwmb5XHATK0uAzY6Pbt27gY7qcSTpdY2u0Xu+t+OuLF+Gvi68vH+rfJjz3f5FpBzn0sc9VqPoUMx+rPB7Ejo/ufR4r3XCQRZVqY6UjIqqDKtvn2INT3XJJHJs6W87cwl3vALDi2vmr86obokp1pqamet1uF71eD91uF9nfqgo5PDxcYhKJiIiIiIjqY3BkZMRqhenpaYyNjUVKTv3NzMwwPgqMjxrjo8b4qDE+aoyPGuOjxvioMT5qjI9aE+PDuwsSEREREREFxEEWERERJc/3Ft1l7o+IiIMsqlz++SW6HyIiKk9K7bPPs5B81uXxh4hccJBFlctutJK/4UrxNd3NWGzxoElEpFdF+5yRDeR0AzzVINB1gMi78xGRLd7C3YLJc0HI7wF8ogfFmjxPxeRhoLqHeIrWES1r+gBLEdHzWfIOHz6s3XaT2T6sUBVn0zz0eUAi24RmULUhojxWtR+6Op5fJkb6VA+Uddm3Kh227bPsgbc2z+Yx2aduHyGOK/nlVPs2XU+2rmv5c11fto0y2jSbsmzyOUXL5Zf3ebZnqPLjsn/b/k7+9aKQ8SmzLaoLzmRZin3mrs58Z4dElVp1MDDZX7ZN20tF8mdsRb9t1s//FA8SxeXaLJ9XNnkmq5Mmeei6T9X+256PdaJrQ0TlI1NGHXdJX375EOW7uK083+3FvprA5Pjgs61ifG2Iyo9oRq64fdFv1TZUZVBXPsu84sO2LMsGjyZtsW8d0JX7GDEL0d8xPU65pL/MtqhOOMiyIGqA2KE6y6eDqbsMRNVgqLZZPKCkUqlZbsLQ1cl8nrO+UlHMQbFsuzb7S2XQ7tI+F99Xdf6rIjsmmKQ1RnsiGqQvNAtcPQSs2IFtnvvSvZ5CHsmUfTyvuj/h299h/7UaHGQ5YgENS3QGqsyZgWKngcrnm88udTJE2RJ1Oqm5Umr3TU4yqN632Y9t+yyaISkzdqafVXbG3UXYz3cAWDEELJ/7ufCc/vaPPQwcBnDzjdgdcG9VK6stjt13q0PfUJVGnzaCFuIgi5JUxbW7okspfGdBio1+Wxsi0Rlw00uhfGX5aLIt14Fa2y6BaIssP3Xl1KWOu9QJ3bZUHaeQ7U+Z7bNs5kwVL91gU5Ve0cDUJV+s83dyB7B8CL2LF80NrK4F7jkNnOj/dP7lF/3lvnQrgC3AtpXC/TTlGKP7LCaXwxWXSXWAFbIt8BG6jRD1p5pYVlU4yKLWi1nZy56RS5XtWfAqGuCqZsIobfkOm0nHzna7IWbudQP8Op8AEMVGF6/sNVXnNZ+fukGXS75Y5++GXf3B1HOvAI/eBuSy6kzbdOxu4H4Avb1nBmTFnzMzX5NWyU2KqC0udtJtBs6ybYbkOwMaqi1wFXOAlde2vhAHWQ7aMgIvi+zAV8ZZnSwv69j5aCqX+mVy+UMZs2bUXHUYqOjS55J+1/a5uFz+tbLIBmX5103p0l7K7MOXbgXW3HZ2duu5V8783f95HLgUQGcLsCFeMmIy6aC7ttWyMhxK7O2HYDLj7ZN+2fZlM1tNx0EWVU51AIx9Vocd67TUZQYrvy41V+r5a9Lx9+XaPheXy79WJlFnLkY7E+szLpjFGt8+984s7rxoEXD13WcXzr6vdc2moGkoS8y2WFWGQ4i9/dhCpJ8nKxfiIIsaq3hw1Z0hk10KxIajHKI4+3YS89s07WwVy0zqHW0iUtNdaqajunwtmN0bzn4n60O3Aj0A1+e+o/Wh/izWBy5X7PORB/rrXXlFuHSVxKT9Nz2eu+7fZhY4tX5B7PTp4hPj+N0EfBgxBVOs4ED8L0Tr9pdvePLv5afD88uEaphMtxd6v3UX+tKN7Lcqj332KepoMR/rw6QNkeVvGXVclz5d+Uu5fJZ1vFC1/yb7szk553L5oXD9yR3A9Xvx8OlXsPHHc2/+0ttw5+kdOHhm/dW486LzgCc/C2A7gFngb58ALr3N6lJBVfms8pguIjueF9/Lv6bah22dVO0/xPZVfPo7PvsJdUltym1RTBxkOWhDwXDhEhfdmRHVfkz3J1pOdmmL6fou+wy17abyiYVrHuv2aZIm5mF9+eR/GXU8RPnz2b9P+6z62yRdPvvWDXxMlzNJp2t8les9vBcAcOUDPfQKA6bPnFn/aeDqywDsnHtlJfDg6TPLmXaQQx/7XIWoTz6fN1R9jhWzstIXsx608VjJywWpUsXrgE1+iIgovirbZ599m6ZHtVx1x5oD/e9eAcD1/YcOz3tvxRBw04HCOnMPKC687nOJJBH560xNTfW63S56vR663S6yv1UVcnh4uMQkEhERETXfOff/IUa+/H0AwGt//h+Az/8Jzsdv4F92/ye89E9fxNi/fwivX/81zF4DXPiZT+Ad2I6jd12MC6/KLXdRxR+CiAAAgyMjI1YrTE9PY2xsLFJy6m9mZobxUWB81BgfNcZHjfFRY3zUGB+1+PGZBT77fWDzFuD+vTh/+R8Cxz8CXH0Z3vGWMbzjqYeAzlqc+we/g7FLZoFzAWAZRsb+ELjne8D1e/GOAy/gHXdUc+MLlh81xketifHh5YJEREREVZu8Ezi8Bfj0aO7Fue9aBT4ULgAAEL9JREFUbZi7jHDNx4BLBOtuuLH/jKz7dwLHykkuEalxkEVERETBhbhbqGgbzbw19CwwsVf+jKvdO/u3Zz/znKyilcD4FqD3BPCl4ne2iKgKHGRR5fJfztX9EBFReXzbZ9EyNuua3IVQ9Dwln/RWIpvFEl7qN3d79s4W9e3Zz8xm7YuUSCKywUEWVU50h6jYd67ioI2ISM+1fc4GSMV1RNsV0T3PLn/XPNHt4V3vgtjrLXyoaynHi9mngJtvFL83eScwDfn7Z6wEfnct0NsL7J4NnUIissRBliXOrOj5xMXlQbG6ZUR5ZXp2VHTm1YTuzCln6sRs46GKo2ke+uQB87EZdM9kMp2NManjLuXDJn2279umw7R9DvF8LlHM89sXPe8qvw3XPCgOtHSDQZf4LkjTDX8PbFspXO6GT+wFOv+KG24YycViNe56EsCTn8UH8vvf9lmgsxZYKY+DLj6iNJTBpiybbEu1D9+06bYTK2a67Zq2AzHSX2ZbVBd8GLGF4gFG9lpbhT6AA2cPdqIYmza0+QOxzQP98sur0mGyvig9onTNzMwYbb+JXOuXaJ3sdV0ehqjTrP/1ZdJhMS1fonVEddy2I+6SPlWb53rM8m2fbT63akDjuw3TbZnEyGbQKdq+rj16+GPz/989r2w9jbt+9TLg3TvxD/+0XboNVVnQlc8yO8K2ZVlVjlUDLJf+QMZ0+RhxC9HfkbVlLvtS7ds0PW3oP3Mmi4LxuaRPdXYt/77N/kQHm1TOnjS9YSmLrtHO53kbGnSyE/oy5OK2bV6XLZtCmfVtn2WXDNoqnjARnRGXnbGXpdt1UBGjPSkeo658QLX9WawaBLB6lfO+dK+nUv5EbI/nssFnXfj2d9o4wEkBZ7IoCb5nHX2pGiMqh2/cY56Z1O039DYpXSnlr8lJhhj7KTKZOSjO3JjM0qnSYTuINZ0VV81eHj58WLt+LP10HQWuHup/PwvAlZ1/ldwoo35CxS7LP5NZGtt9mrT1uv2nQDcL6JL+lNrFlHCQZUFU8Fiw4qjirJPqUhifS2xU+2gLVYPt0ykyYZN/IQZqPEPYHPk23/TSpBCXFLl2/kwGQ6FOLOjaZ9XlSqZpkF2KZ3LpmO6zyt4XXd7k0un0yt9LtgPHRbdqn3tmVn4fDT3GmOSfyzqmlxyK6MpYqH6Cap8xhTx2mVxJ1JSyqsJBlgPTM3FUDzE7xW1oREy4dBrLjl1VM2GUtmJ7Lxs4uG43BNHAoKjsOmVznDQdwMqWkQ2WZJ3gMmIRcvuq9DaxDZIN0IuzUKqBt0iIS1VlfMpUCnkYc4CV17b+M7+TZSHl7/jUme56edm196H2zXxMi0tj73v5A2efSCf7TkTKbYUsfT7lO0T7nMVO9KP7PLLlsn2qtiHrmLt0mE3WiXWcahNdB11VbmRltCxV79+E7ljpm37Z9tvaf+ZMFlXO9FKTsvZN1anLDFaIdSl9qeev64DBRoj22bUz5XsZlWpGJHS+xtpu6mUwpJCzQaHjZjKgj7n/2EKkv26fuQycyaLGsrmcQHZWpaxLS0j+vYpQ2xTlsW6fKZ6JJDIVo065iDGTlWc7e6c6i55fz3UbrkwHzU1kUlZtLw/MM7maoc6xdbl80oYuPqm0NanhTJYFUSVl5/usYgUH4t9tSbe/fJ4Vr83PfueXCdUwmW4v9H7rLmSjbJrHPvtkm1BvJm2ILH/LqOO69JmUvxQ6OmVfsgXo66Hs2KDabvHugqLLEW3TqVpftIzoPZ82R7WdKo/pIiZ5phpo+OSXaVsfa6Dj09/x2U+oGeu2His5yLLUhkLhyiU2ujMjqv2Y7k+0nM319i6fyydtbRX6kiaTPDbpiLnsm+rBJ//LqOO+5c+3bPq0z6bpMBmAiTpnpvu3veSwOIuV77SKHhYf6vI222VMZryqLj82QtUn1/dDtfWxYpZ6fHisFOMgiyrVxkpHRFQHIdrnEJ06lxMktsvJ1qvzMcp11oaIwuhMTU31ut0uer0eut0usr9VFXJ4eLjEJBIREREREdXH4MjIiNUK09PTGBsbi5Sc+puZmWF8FBgfNcZHjfFRY3zUGB81xkeN8VFjfNQYH7Umxod3FyQiIiIiIgqIgywiIiKighTuzEhE9TU4MTEBLF2Prdetw+KqU0OtZHMg45d3iYjK04T22eTW4EREoQ2Mj49j05KD2LP/aNVpoZbKbrSSv+FK8TXdzVhs1f3Bg0REZWhK+yxLvyoNxWeiERHZGACAkfetx9Ij38KhU1UnJ31Z489GV84nNi4PitUtI8ovk2eM5Nezzff88qJ1de+3lW08VHE0zUOfPGA+NoPueVC68mVTx13Kh036bNe3TUfd22fVM7ZcuOatablwLX+u68u2UQabzxJjfZs0miwXg0t9yr9uWl5d2ymbstgG/e9kLf51rFr6Mk5ykKWUHWCyn7YUElMhGi/VE8xd9pfPM5u0FZ+R4voA5OKZ3nwaRGdW26xYv0zzTHY23SQPXfep2n/b87FOTDoaJuUrVh13SZ9ooBdCE9tnVbqy36LPnV/Otd6Lyk8xBqLti36rtqEqg7ryWWZn2KQs28TKdn3bNIYeoJjs27c+mR6nfGNjEv+29KHn3fjiJEdZVtpSSEz5dDBVZ9fy79vsr3hwTCm/2BEPQ9QpkOW5qrNE7RRzUCzbrs3+fNMX6vPVsX02nbnJv1dMu036QxAN0mMxKZ8pnzTyLS+261fdn/CtT7pjJcUxWHUCiADzM4uxlHVgIznfuLscNEJ2QENuk9KVUv6W1XGqY/ucLaeLiclMlamYZaPpnWLfz5bKICLbbyondEVMyrzLFR20EAdZHlKuRHUnOisTW3EfWUOT/22LHfA+VV0J1cFRbd90WyEGak3vDLVJvrOhKqfFdUy41Andtsoqd3Vtn23qpm89Dpm/NvtpSttjMjhWvV7FiYFQ/YS8MvMz5LHLZOavKWVVZd4ga8kS3sRdRTT9yoFW/cXsFLehETHh0mksO3ZVzYRR2vIzIvn/i++7bjcE01mbOgr5mUwHZKLLIKtsG1Rpblp+A2bf/5P1v2R1IXb/zaecppCHMQdYecX2tOn6g6xTz+KZl0fx/pGKU1MDKVSGptGdkcoLHX/fmSoKzyUvTC9/iD1rRs1Vh4FMjLasae2zyXZ8ZyNSLR91EGpAKSo3sfOlWCfKnmE2oTsOiv63Sb9s+7JBb0qxiWEQAI5++yBeHt0EjrGoCiYVssx9U3XqMoMVYl1KX+r5W0b6mtA+686ah+gMx+o0pl4GQ6pzW1z3y8ZDpL9un7kMgxMTE8DoJoxv5BDLRL4QsUClrXjQ050hU12iwHyOTxTnEN+LyNYX5aVunymeiSRqgrLaZ5NLA02++1PGscH0UsYmtkcm7b9v/0u1vq6ttymvVYidPpPvptZ9oBnD4Pj4eNVpqJX8dbxtLzxF+bOFZcTIZH+y/Mpfc59fJlSjYLq90Putu9DXyGe/VXnss0/Rdf3Mx/owaUNk+VtGHdelT1f+ym6T81Jun3VML/0rxt/2sirdvkTLiN7zPREl206Vx3QRVf/LpC327b+ZrF+MWYzZWNv65LMflzIt0tZjJe8u6KANBcOFS1xUlVL2Xn5mwjVdosbJZn2XfYbadlP5Xqqje81kGZc0MQ/ryyf/y6jjvuXPt2w2tX0G1IMGm2267j923pp2kGOWHxsh6pPP5w1Vn2PFrKz0ucaHx0oxDrKoUm2sdEREddDk9rnJny3jOstGRGF0pqamet1uF71eD91uF9nfqgo5PDxcYhKJiIiIiIjqY3BkxO6GF9PT0xgbG4uUnPqbmZlhfBQYHzXGR43xUWN81BgfNcZHjfFRY3zUGB+1JsZnoOoEEBERERERNQkHWURERERERAENHLp3AvuPVp0MIiIiIiKiZhg4+HLVSSAiIiIiImqOgfVLq04CERERERFRc/A7WURERERERAFxkEVERERERBQQB1lEREREREQBcZBFREREREQUEAdZREREREREAXGQRUREREREFBAHWURERERERAFxkEVERERERBTQ4LrrxqtOAxERERERUWNwJouIiIiIiCggDrKIiIiIiIgC6kxNTfW63S56vR663S6yv3u9nnSl4eHhEpNIRERERERUH4MjIyNWK0xPT2NsbCxScupvZmaG8VFgfNQYHzXGR43xUWN81BgfNcZHjfFRY3zUmhgfXi5IREREREQUEAdZREREREREAQ1MTExgYv/RqtNBRERERETUCAPj41ux/uQ+DrSIiIiIiIgCGAAWY937R4GTJ3Gq6tQQERERERHVHL+TRUREREREFNAAABx95giwZAkWV50aIiIiIiKimhs4dehe7Dsyik0b7Z6XRURERERERAsN7Dm4BJvGN4JDLCIiIiIiIn+D4+Mbq04DERERERFRY/DGF0RERERERAFxkEVERERERBTQ4MTExJl/RjeNg/e/ICIiIiIicjc4Pj5edRqIiIiIiIgag5cLEhERERERBcRBFhERERERUUCdqampXrfbRa/XQ7fbRfZ3r9eTrjQ8PFxiEomIiIiIiOpjcGTE7k4X09PTGBsbi5Sc+puZmWF8FBgfNcZHjfFRY3zUGB81xkeN8VFjfNQYH7UmxoeXCxIREREREQXEQRYREREREVFAAxMTE7j30Kmq00FERERERNQIA+Pjm7Dk4B4OtIiIiIiIiAIYAEawahR4+SQHWURERERERL74nSwiIiIiIqKABnDqEL51ZCnWv8/uVu5ERERERES00ODEQ8DW8euwuOqUEBERERERNcDA+FXAQxMTmNh/tOq0EBERERER1d4AFq/DdVvXY+mRZ8BhFhERERERkR/e+IKIiIiIiCigAeAUDj10EC+PrgJvfUFERERERORncGJiD5au34rxdbz1BRERERERka/B8fHxqtNARERERETUGPxOFhERERERUUAcZBEREREREQXUmZqa6nW7XfR6PXS7XWR/93o96UrDw8MlJpGIiIiIiKg+BkdG7O4pOD09jbGxsUjJqb+ZmRnGR4HxUWN81BgfNcZHjfFRY3zUGB81xkeN8VFrYnx4uSAREREREVFAHGQREREREREFNICj+zExMYH9R6tOChERERERUf0NHPrWkarTQERERERE1BgDB5eMYrTqVBARERERETXEwKaNq6pOAxERERERUWMM2N3AnYiIiIiIiFR4d0EiIiIiIqKAOMgiIiIiIiIKaGBiYh+OADiybwITvI87ERERERGRl4Hx8U0YBTC6aRzjG/kNLSIiIiIiIh+8XJCIiIiIiCggDrKIiIiIiIgCGgRGsHF8vOp0EBERERERNQJnsoiIiIiIiALiIIuIiIiIiCigztTUVK/b7aLX66Hb7SL7u9frSVcaHh4uMYlERERERET1MTgyYnfb9unpaYyNjUVKTv3NzMwwPgqMjxrjo8b4qDE+aoyPGuOjxvioMT5qjI9aE+PDywWJiIiIiIgC4iCLiIiIiIgooMGJiYn+X6ObML7R7tJBIiIiIiIimm9wnM/IIiIiIiIiCoaXCxIREREREQXEQRYREREREVFAAxMTE5jYf7TqdBARERERETXCwPj4Jowe2ceBFhERERERUQADwAg2bhoFjjwDDrOIiIiIiIj89L+TtXgJluIkTp6qODVEREREREQ11x9knTqJl7EESxZXnBoiIiIiIqKaGwCOYv++I1i6/n3go4iJiIiIiIj8/P+YhsCItsJSfwAAAABJRU5ErkJggg==





(defun c:N88 (/ atts d f filename n obj r ss) ;(/ d r ss n obj atts)
(setq atts nil)
(while (setq d (tblnext "block" (null d)))
    (setq r (cons (cdr (assoc 2 d)) r))
)
(setq dizhi "C:/Users/Administrator/Desktop/校验888.csv")
(and r
                (setq filename (getfiled "属性输出文件名" dizhi "csv" 32))
)
(if filename
    (progn
      (setq f (open filename "w"))
      (setq ss (ssget "X" '((0 . "INSERT")(2 . "电缆统计1,G-DZPJT1,本册新电缆,本册新电缆1,他册新电缆,保存时间")))) ;选择对像,修改这里
                        ;(foreach name r
                        ;(foreach (sslength ss) r
                        ;(setq ss (ssget '((0 . "INSERT"))));选择对像,修改这里.
      (if ss
      (progn
          (setq
            atts (append
                   (vlax-invoke
                     (setq obj (vlax-ename->vla-object (ssname ss 0)))
                     'GetConstantAttributes
                   )
                   (vlax-invoke obj 'GetAttributes)
               )
          )
          (princ "序号," f)
          (foreach att atts
            (princ (vla-get-TagString att) f)
            (princ "," f)
          )                           ;求出属性列表,写表头
          (princ "\n" f)
          (setq n -1)
          (repeat (sslength ss)
            (setq
            obj (vlax-ename->vla-object (ssname ss (setq n (1+ n))))
            )
            (setq atts (append
                         (vlax-invoke obj 'GetConstantAttributes)
                         (vlax-invoke obj 'GetAttributes)
                                                                                               (LIST(LIST
                                                                                                                                (Vlax-Get obj 'InsertionPoint )
                                                                                                                                (Vlax-Get obj 'Name )
                                                                                                                        ))
                     )
            )
            (princ (1+ n) f)
            (princ "," f)
            ;(foreach att (reverse atts);;;同一列前后颠倒
            (foreach att atts
                                                        (IF(listp ATT)
                                                                (progn
                                                                        (princ (CADR ATT) f)
                                                                        (princ "," f)
                                                                        (princ (car(CAR ATT)) f)
                                                                        (princ "," f)
                                                                        (princ (cadr(CAR ATT)) f)
                                                                )
                                                                (princ (vla-get-TextString att) f)
                                                        )
            (princ "," f)
            )
            (princ "\n" f)            ;写出属性值
          )
                                        (close f)

      )
      )
    )
    ;(close f)
)


(vlax-invoke
(vlax-get-or-create-object "Wscript.Shell")
'RUN
dizhi );打开文件代码


)


xj6019 发表于 2022-11-13 10:12:46

这么执着干嘛呀,凑合能用就行了呗!!!








(defun c:NM (/ atts d dizhi f filename n obj r ss) ;(/ d r ss n obj atts)
        (setq atts nil)
(while (setq d (tblnext "block" (null d)))
    (setq r (cons (cdr (assoc 2 d)) r))
)
        (setq dizhi "C:/Users/Administrator/Desktop/校验888.csv")
(and r
                (setq filename (getfiled "属性输出文件名" dizhi "csv" 32))
)
(if filename
    (progn
      (setq f (open filename "w"))
                        (foreach name (list "电缆统计1" "G-DZPJT1" "本册新电缆" "本册新电缆1" "他册新电缆" "保存时间");选择对像,修改这里
                                (setq ss (ssget "X" (list '(0 . "INSERT")(cons 2 name))))
                                ;(foreach name r
                                ;(foreach (sslength ss) r
                                ;(setq ss (ssget '((0 . "INSERT"))));选择对像,修改这里.
                                (if ss
                                        (progn
                                                (setq
                                                        atts (append
                                                                               (vlax-invoke
                                                                                       (setq obj (vlax-ename->vla-object (ssname ss 0)))
                                                                                       'GetConstantAttributes
                                                                               )
                                                                               (vlax-invoke obj 'GetAttributes)
                                                                       )
                                                )
                                                (princ "序号," f)
                                                (foreach att (append (mapcar 'vla-get-TagString atts)(list "块名" "x坐标" "y坐标"))
                                                        (princ att f)
                                                        (princ "," f)
                                                )                           ;求出属性列表,写表头
                                                (princ "\n" f)
                                                (setq n -1)
                                                (repeat (sslength ss)
                                                        (setq
                                                                obj (vlax-ename->vla-object (ssname ss (setq n (1+ n))))
                                                        )
                                                        (setq atts (append
                                                                                                       (vlax-invoke obj 'GetConstantAttributes)
                                                                                                       (vlax-invoke obj 'GetAttributes)
                                                                                                       (LIST(LIST
                                                                                                                                        (Vlax-Get obj 'InsertionPoint )
                                                                                                                                        (Vlax-Get obj 'Name )
                                                                                                                                ))
                                                                                               )
                                                        )
                                                        (princ (1+ n) f)
                                                        (princ "," f)
                                                        ;(foreach att (reverse atts);;;同一列前后颠倒
                                                        (foreach att atts
                                                                (IF(listp ATT)
                                                                        (progn
                                                                                (princ (CADR ATT) f)
                                                                                (princ "," f)
                                                                                (princ (car(CAR ATT)) f)
                                                                                (princ "," f)
                                                                                (princ (cadr(CAR ATT)) f)
                                                                        )
                                                                        (princ (vla-get-TextString att) f)
                                                                )
                                                                (princ "," f)
                                                        )
                                                        (princ "\n" f)            ;写出属性值
                                                )
                                        )
      )
      )
                        (close f)
    )
    ;(close f)
)
        (vlax-invoke
                (vlax-get-or-create-object "Wscript.Shell")
                'RUN
                dizhi );打开文件代码
        (princ)
)

q2284555 发表于 2022-11-13 10:18:24

本帖最后由 q2284555 于 2022-11-13 10:20 编辑

效果如图所示

xyp1964 发表于 2022-11-13 14:01:43

;图块名称及坐标没啥意义


q2284555 发表于 2022-11-13 17:37:11

xyp1964 发表于 2022-11-13 14:01
;图块名称及坐标没啥意义

我是导出到excel里作为数据源,在excel里查找分析数据使用的。

q2284555 发表于 2022-11-13 20:26:37

xj6019 发表于 2022-11-13 10:12
这么执着干嘛呀,凑合能用就行了呗!!!




能用了,感谢!!·~

有一个梦想 发表于 2022-11-14 20:36:39

xyp1964 发表于 2022-11-13 14:01
;图块名称及坐标没啥意义

牛人。楼主和我是同道中人啊,做电气二次设计。

有一个梦想 发表于 2022-11-14 20:51:29

xyp1964 发表于 2022-11-13 14:01
;图块名称及坐标没啥意义

院长,请问您展示的这个有源码吗?我觉得您这个很实用。

q2284555 发表于 2022-11-15 06:46:04

有一个梦想 发表于 2022-11-14 20:51
院长,请问您展示的这个有源码吗?我觉得您这个很实用。

其实以上CAD自带的数据提取功能都能实现。但需要经常提取的话,有插件还是能省点设置的功夫的。
页: [1]
查看完整版本: 块属性导出excel后怎么修改导出的excel表头?