明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 20018|回复: 33

[【不死猫】] [原创] Lisp读写二进制文件

  [复制链接]
发表于 2009-10-18 13:20:00 | 显示全部楼层 |阅读模式
本帖最后由 不死猫 于 2013-5-13 11:47 编辑

使用ADO对象实现对任意文件的二进制读写和文本格式的转换

能够让Lisp成为任意文件的"载体"

一个Lisp文件
包含所有你想打包的东西
做成Lisp安装工具

封装DLL ARX DWG JPG等任意格式的文件

Dwg不能带Lisp程序 但是Lisp程序可以带Dwg图纸 O(∩_∩)O哈哈~

下面的这个代码是转换的一种思路 还有其他的方法,大家可以自己尝试修改

 

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
"觉得好,就打赏"
还没有人打赏,支持一下

本帖被以下淘专辑推荐:

  • · excel|主题: 80, 订阅: 2
发表于 2009-10-20 12:42:00 | 显示全部楼层
期待楼主做一个将DWG文件转为二进制,之后能用LISP调用并画出图形的例子...
回复 支持 1 反对 0

使用道具 举报

发表于 2017-8-15 19:07:48 | 显示全部楼层
从接触lisp  就是看你的资料  3年了,话不多说
发表于 2018-5-8 10:17:45 | 显示全部楼层
感谢分享,研究了一天多,终于能正常用了
发表于 2009-10-18 14:13:00 | 显示全部楼层

先用其他程序读出二进制编码,然后用Vlisp把二进制编码写入文件,生成目标文件,这样会方便很多

 http://www.mjtd.com/BBS/dispbbs.asp?boardid=3&replyid=125386&id=72145&page=1&skin=0&landlord=0&Star=5

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x

点评

vlisp能写十六进制中的00H吗?  发表于 2011-9-22 00:33
 楼主| 发表于 2009-10-18 14:48:00 | 显示全部楼层

我的想法是:

Lisp先解压出来其他语言编写的转换器

然后把代码通过那个转换器再转换

效率就好多了

发表于 2009-10-18 21:12:00 | 显示全部楼层

我的做法:

1、用VB编译二进制读写程序,对写程序进行压缩,减小程序个头;

2、编写Vlisp二进制写入通用函数,并把VB二进制读写程序包含其中;

3、选择要进行二进制写入操作的文件,后通过写操作生成VB二进制读写程序并运行它,读出文件的二进制文本保存于文件后退出

4、Vlisp读取文件内容后删除VB二进制读写程序和二进制文本保存文件,清除手尾,自动生成有针对性的文件写入程序。

发表于 2009-10-19 18:21:00 | 显示全部楼层

喜欢搜集别人程序的话

可以把别人的VLX封装到自己的VLX里面

做个按钮调用就行了

发表于 2009-10-19 19:14:00 | 显示全部楼层
楼主你的程序怎么用阿?
发表于 2009-10-20 09:26:00 | 显示全部楼层

根据提供的代码,自己想办法整理成为文本格式存储在Lisp里面,

(当然也可以进行数据压缩处理)

然后自己再学习相关的资料编写程序进行文本-》二进制文件的还原。

可以编制带有音乐、图像的Lisp,带有Flash的Lisp(Flash的播放用其他语言做个窗体调用下即可)

一个lsp文件,里面放什么自己定,算是有趣的一种应用。

发表于 2009-10-20 10:31:00 | 显示全部楼层
能否具体做个例子,如何包装啊!非常期待!
 楼主| 发表于 2009-10-20 23:42:00 | 显示全部楼层

这个就是我用Lisp封装二进制数据后重新生产DWG的效果:

 

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-24 05:56 , Processed in 0.196476 second(s), 35 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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