lisp は 2 つのファイルを比較します。

[camilla72]

おはようございます!
i autocad 2016 コマンドが比較されていない。
2つのファイルを比較する lisp があれば知っていますか?
または、最終ファイルが2つのファイルの違いだけであるため、重複した行を削除するか? お問い合わせ

 

[frasco]

お問い合わせ
dos fc コマンドは 2 つのファイルを比較し、違いを強調します。ネットワーク上の複数のミニチュートリアルや説明があります。
信じられない

 

[camilla72]

お問い合わせ

 

[Tristan]

誰が2016でコマンドが比較されていないと言いますか?

https://app.autodesk.com/acd/en/detail/index?id=1050435430275763742&applang=en&os=win32_64

 

[Gio_S]

単純な行では、オートカドではなく、問題ではなく、私はもう一つですが、ネイティブオートカドが解決しているかどうかを理解したいと思います。
設計を掃除することで、反対のキャリアであっても、実際に同じラインを削除できるだけでなく、他の長いセグメントに組み込まれてオーバーラップしてもラインが壊れている。
マッチ面と同じで、頂点の順にさらに比較が必要なため、比較がさらに遅くなっているので、私は投稿していません。 私は設計全体の小さな部分にのみ使用し、表面が別のものに含まれている場合は、同じ欠陥の価値があります。 .

(defun 削除linecopy)
(prompt "\ndelete 行コピー new: ") (setq selez(ssget))))))) (setq デッド 0 スパイ 0)
(/= nil selez の場合)
(プログ)
(setq max (sslength の selez)) 容器 0)
(間) (> 最高の円錐形)
(setq en (ssname selez contasel) alist (entget en) (ssname selez contasel) alist (entget en))
(例えば(= "3dline" (cdr(assoc 0 alist))))))) (= "line" (cdr(assoc 0 alist)))))))))))
(プログ)
(setq デッド 0)
(setq pnta (cdr(assoc 10 alist))) pntb (cdr(assoc 11 alist))))
(Sectqスパイ1)
(と (- max contasel ) スパイ) ( /= デッド) 1) )
(setq en2 (ssname selez (+ カウンターワイヤー スパイ)) alist2 (entget en2)
(setq pnta2 (cdr(assoc 10 alist2))) pntb2 (cdr(assoc 11 alist2))))))))
(例: pnta2(例 pntb pntb2)))
(setq の死んだ 1)
)
(例:pntb2)
(setq の死んだ 1)
)
(setq の平坦(+ の平坦) 1) )
) ; 終わりのprogn
) ; なら終わる
;ネストされた

(=デッド1)(エンデルエン)
(setq デッド 0 スパイ 0)

;(princ(rtos contasel)))
(プライアンス)
(setqのcontasel (+ 1会計士)))
) ; 終わりのprogn
) ; なら終わる
)
)

 

[x11start]

...。多分私は答えるために少し時間外です...しかしwinmergeテスト:

WinMerge - You will see the difference…

WinMerge is an Open Source differencing and merging tool for Windows. WinMerge can compare both folders and files, presenting differences in a visual text format that is easy to understand and handle.

winmerge.org