设为首页收藏本站转
发帖领奖家园QQ群申请版主版主评价切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

扫一扫，访问微社区

晓东CAD家园-论坛»论坛 › ╃CAD编程开发 › 每日插件 › 图像两点校正
返回列表 发新帖
查看: 2715|回复: 4

[图像] 图像两点校正

[复制链接]
Lispboy

已领礼包: 51个

财富等级: 招财进宝
发表于 2016-6-11 17:52:57 | 显示全部楼层 |阅读模式
  • 插件名称 ： 两点校正
  • 作　　者 ： Lispboy
  • 运行环境 ：XDRX API 晓东工具箱 
  • 发布时间 ：2016-06-11
  • 命令名称 ：XDTB_Image2PJZ
  • 插件介绍 ：图像两点校正
  • 备　　注 ： (点击图片可以放大)
(点击图片可以放大)

晓东温馨提示 1、运行环境为 晓东工具箱 和 XDRX API 的插件，请下载最新版本的 晓东工具箱 或 XDRX API开发环境 一键安装
2、在ACAD中如何加载插件，请看 论坛插件使用方法
3、如果您有要求需要定制插件，请到 编程申请 论坛发帖求助

插件详细内容

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要 登录 才可以下载或查看，没有账号？立即注册

×
图像2点校正-2.gif

[sell=5]
  1. (defun c:xdtb_image2pjz ( / e mat p1 p2 p3 p4)
  2.   (if (and
  3.         (setq e (car (xdrx_entsel "\n选取图像<退出>" '((0 . "image")))))
  4.         (setq p1 (getpoint "\n源第一点<退出>:"))
  5.         (setq p2 (getpoint p1 "\n源第二点<退出>:"))
  6.         (setq p3 (getpoint "\n目标第一点<退出>:"))
  7.         (setq p4 (getpoint p3 "\n目标第二点<退出>:"))
  8.       )
  9.     (progn
  10.       (xdrx_begin)
  11.       (xdrx_sysvar_push '(("osmode" 33)("orthomode" 0)))
  12.       (setq p1 (trans p1 1 0)
  13.             p2 (trans p2 1 0)
  14.             p3 (trans p3 1 0)
  15.             p4 (trans p4 1 0)
  16.       )
  17.       (setq mat (xdrx_matrix_align (list p1 p2) (list p3 p4) t))
  18.       (xdrx_entity_transform e mat)
  19.       (xdrx_draworder->back e)
  20.       (xd::doc:command (list ".regen"))
  21.       (xdrx_prompt "\n图像校正完毕.")
  22.       (xdrx_sysvar_pop)
  23.       (xdrx_end)
  24.     )
  25.   )
  26.   (princ)
  27. )


[/sell]
校正

相关帖子

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复

使用道具 举报

WhoCanSay
发表于 2016-6-17 12:10:40 | 显示全部楼层
楼主用的是哪个版本的google earth.我在win7 32下载了一个版本，怎么输入地址它不自动定位呢？

点评

Lispboy
我用的不是GOOLGE EARCH下的地图，是专门的地图下载器下的。 据我的经验，不自动定位是因为你没翻墙的原因，找个**下就能定位了。  详情 回复 发表于 2016-6-17 13:14
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复 支持 反对

使用道具 举报

Lispboy

已领礼包: 51个

财富等级: 招财进宝
 楼主| 发表于 2016-6-17 13:14:16 | 显示全部楼层
WhoCanSay 发表于 2016-6-17 12:10
楼主用的是哪个版本的google earth.我在win7 32下载了一个版本，怎么输入地址它不自动定位呢？

我用的不是GOOLGE EARCH下的地图，是专门的地图下载器下的。

据我的经验，不自动定位是因为你没翻墙的原因:lol，找个**下就能定位了。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复 支持 反对

使用道具 举报

xcxjxh@sohu.com
发表于 2016-8-20 22:34:35 | 显示全部楼层
楼主用的是哪个版本的google earth.我在win7 32下载了一个版本，怎么输入地址它不自动定位呢？
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复 支持 反对

使用道具 举报

land100

已领礼包: 63个

财富等级: 招财进宝
发表于 2017-11-3 11:20:23 | 显示全部楼层
楼主用的是哪个版本的google earth.我在win7 32下载了一个版本，怎么输入地址它不自动定位呢？
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能，那里可能会有你要找的答案；
如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；
如何回报帮助你解决问题的坛友，一个好办法就是给对方加【D豆】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
回复 支持 反对

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-4-30 20:31 , Processed in 0.417772 second(s), 45 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表