寻找最短路径-dijkstra算法之lsp版

liuhe

如题，最短路径算法，需要改造成适合的点版本。
本人直接复制的别人的代码。不是我写的。

lsp原版地址    Help Finding Block Route (theswamp.org)


arx版本   寻找最短路径-dijkstra算法之CAD版（含程序） - ObjectARX/VC++ 编程技术 - AutoCAD论坛 - 明经CAD社区 - Powered by Discuz! (mjtd.com)

寒潮大冬瓜

很好→很棒！很好~很棒！！很好……很棒！！！

panliang9

谢谢楼主分享！

tigcat

上次看到高飞大神的arx版本，就一直想有没有lisp版本的，没想楼主真的找到了。感谢分享。

dcl1214

500个节点，环形负数，试试
迪杰斯特拉  弗洛伊德  DFS等
如果不存在环形负数，sqtlie数据库自带了一种算法（类似基因追踪），你只需要一条sql语句即可

LISP有向路径计算演示-教育-高清完整正版视频在线观看-优酷 (youku.com)

flowerson

dcl1214 发表于 2024-11-12 22:12
500个节点，环形负数，试试
迪杰斯特拉  弗洛伊德  DFS等
如果不存在环形负数，sqtlie数据库自带了一种算 ...

不知道“dcl1214”大师可以提供源码学习不？

dcl1214

flowerson 发表于 2024-11-13 22:50
不知道“dcl1214”大师可以提供源码学习不？

lisp的点表，本来就是链路方式的

(
("C1" . "C2")("C2" . "C1")
("C2" . "C3")("C3" . "C2")
("C3" . "C4")("C4" . "C3")
.........................
)
每一根直线的两端可以这样描述，查找路径的时候，直接assoc，一路往下找
无向路径计算会比较麻烦一点，要避开死循环