开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 2569|回复: 4
收起左侧

[完成] 求一个把易语言代码转换html的源码

 关闭 [复制链接]
结帖率:97% (29/30)
发表于 2013-4-11 19:39:47 | 显示全部楼层 |阅读模式   海南省海口市
100精币
像ET那样可以查看代码格式的,能支持子程序、DLL、常量、全局变量、自定义数据类型的。

.版本 2

.子程序 子程序6, 文本型, 公开, 我是备注
.参数 参数1, 整数型, 参考 可空 数组
.参数 参数2, 字节集, 可空
.参数 参数3, 逻辑型, 数组


hao.jpg




最佳答案

查看完整内容

[e=1].版本 2 .支持库 console .支持库 JYEPython .程序集 程序集1 .程序集变量 控制台, 控制台对象 .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行 .局部变量 bRet, 逻辑型 .局部变量 模块目录, 文本型 bRet = 设置解释器Py (取运行目录 () + “\python38.dll”) 控制台.输出 (, , 假, 8, 1, “设置解释器Py= ”) 控制台.输出 (, , 假, 选择 (bRet, #控制台颜色.绿色, #控制台颜色.红色), 1, 到文本 (bRet) ...
结帖率:0% (0/1)

签到天数: 16 天

发表于 2013-4-11 19:39:48 | 显示全部楼层   河南省洛阳市
  
窗口程序集名保 留  保 留备 注
程序集1   
变量名类 型数组备 注
控制台控制台对象  

子程序名返回值类型公开备 注
_启动子程序整数型 本子程序在程序启动后最先执行
变量名类 型静态数组备 注
bRet逻辑型 
模块目录文本型 
bRet = 设置解释器Py (取运行目录 ()“\python38.dll”)
控制台.输出 (, , 假, 8, 1, “设置解释器Py= ”)
控制台.输出 (, , 假, 选择 (bRet, #控制台颜色 .绿色, #控制台颜色 .红色), 1, 到文本 (bRet)#换行符 )
如果真 (bRet = )
标准输出 (, “无法使用”#换行符 )
标准输入 ()
返回 (-1)

模块目录 = 取模块目录Py ()
' 上面这里得到了原来的模块目录
' 输出调试文本 (模块目录)
模块目录 = 取运行目录 ()“\python38.zip”“;”取运行目录 ()“\py”“;”取运行目录 ()“\DLLs”“;”
置模块目录Py (模块目录)
' 这里程序演示使用当前目录的Python库。
模块目录 = 取模块目录Py ()
' 上面这里得到了原来的模块目录
输出调试文本 (模块目录)
控制台.输出 (, , 假, 8, 1, “模块目录:”#换行符 )
控制台.输出 (, , 假, #控制台颜色 .白色, 1, 模块目录 + #换行符 )
标准输出 (, #换行符 )
初始化Py ()
如果真 (取是否已经初始化Py ())
标准输出 (, “当前Py环境没有初始化,请检查:”, 取错误Py (), 取错误明细Py (), #换行符 )
标准输入 ()
返回 (-1)

演示_调用Python自带函数 ()
演示_Python与易语言互相调用 ()
演示_调用列表和字典方法 ()
演示_迭代器使用 ()
演示_调用带有其他库的Python函数 ()
标准输入 ()
返回 (0)  ' 可以根据您的需要返回任意数值
子程序名返回值类型公开备 注
演示_调用Python自带函数  
变量名类 型静态数组备 注
py字典Py字典类 
print函数Py类 
py字典 = 取当前执行帧Py ()
print函数 = py字典.取字典数据 (“print”)
标准输出 (, print函数.取描述信息 (), #换行符 )
print函数.调用 (“输出这一段话的方法是直接调用的”)
标准输出 (, #换行符 )
子程序名返回值类型公开备 注
演示_取当前执行帧中变量  
变量名类 型静态数组备 注
局部变量字典Py字典类 
全局变量字典Py字典类 
iRet整数型 
局部变量字典 = 取当前执行帧中局部变量Py ()
全局变量字典 = 取当前执行帧中全局变量Py ()
标准输出 (, #换行符 )
标准输出 (, “局部变量个数: ”, 局部变量字典.取长度 (), #换行符 )
标准输出 (, “全局变量个数: ”, 全局变量字典.取长度 (), #换行符 )
标准输出 (, #换行符 )
子程序名返回值类型公开备 注
演示_Python与易语言互相调用  
变量名类 型静态数组备 注
iRet整数型 
dom模块Py模块类 
MyCall方法Py类 
方法返回值Py类 
iRet = 运行代码Py (“# -*- coding:utf-8 -*-”)
' iRet = 运行代码Py (“import os”)
iRet = 运行代码Py (“import requests”)
标准输出 (, #换行符 )
标准输出 (, “= = =演示调用= = =”)
标准输出 (, #换行符 )
标准输出 (, “导入模块Py 将导入目录下的dom模块(存在于dom.py中)”, #换行符 )
dom模块 = 导入模块Py (“dom”)
控制台.输出 (, , 假, 8, 1, “导入完毕,dom模块信息: ”)
控制台.输出 (, , 假, #控制台颜色 .白色, 1, dom模块.取描述信息 ()#换行符 )
标准输出 (, #换行符 )
dom模块.增加方法 (“efun”, &efun)
MyCall方法 = dom模块.取模块Dict ().取字典数据 (“MyCall”)
控制台.输出 (, , 假, 8, 1, “dom模块中的MyCall方法信息:”)
控制台.输出 (, , 假, #控制台颜色 .白色, 1, MyCall方法.取描述信息 ()#换行符 )
方法返回值 = MyCall方法.调用 (999, 888)
控制台.输出 (, , 假, #控制台颜色 .白色, 1, “MyCall方法执行返回值: ”)
控制台.输出 (, , 假, #控制台颜色 .艳青, 1, 到文本 (方法返回值.到易数值 ()))
方法返回值.减少引用计数 ()
标准输出 (, #换行符 )
子程序名返回值类型公开备 注
efun整数型 这个方法是给python调用的 易语言 方法,于py\dom.py中第15行。
参数名类 型参考可空数组备 注
this整数型不变
args整数型不变
kwargs整数型不变
变量名类 型静态数组备 注
arg1Py类 
arg2Py类 
arg3Py类 
arg4Py类 
arg5Py类 
arg6Py类 
Py返回值Py类 
dom模块Py模块类 
Add方法Py类 
Add方法返回值Py类 
参数元祖Py元组类 
参数字典Py字典类 
' 该方法可以取得当前执行帧中的变量信息。例如这里可以取得参数(参数可以算是局部变量)
演示_取当前执行帧中变量 ()
' 获取从Python中传递过来的所有参数。
取参数数据Py (args, arg1, arg2, arg3, arg4, arg5, arg6)
控制台.输出 (, , 假, 8, 1, “arg1.到易数值 () = ”)
控制台.输出 (, , 假, #控制台颜色 .黄色, 1, 到文本 (arg1.到易数值 ()))
标准输出 (, #换行符 )
控制台.输出 (, , 假, 8, 1, “arg2.到易数值 () = ”)
控制台.输出 (, , 假, #控制台颜色 .黄色, 1, 到文本 (arg2.到易数值 ()))
标准输出 (, #换行符 )
控制台.输出 (, , 假, 8, 1, “arg3.到易文本 () = ”)
控制台.输出 (, , 假, #控制台颜色 .黄色, 1, 到文本 (arg3.到易文本 ()))
标准输出 (, #换行符 )
控制台.输出 (, , 假, 8, 1, “arg4.到列表 ().取长度 () = ”)
控制台.输出 (, , 假, #控制台颜色 .黄色, 1, 到文本 (arg4.到列表 ().取长度 ()))
标准输出 (, #换行符 )
控制台.输出 (, , 假, 8, 1, “arg5.到元组 ().取长度 () = ”)
控制台.输出 (, , 假, #控制台颜色 .黄色, 1, 到文本 (arg5.到元组 ().取长度 ()))
标准输出 (, #换行符 )
控制台.输出 (, , 假, 8, 1, “arg6.到字典 ().取字典数据 (ag1).到易数值 () = ”)
控制台.输出 (, , 假, #控制台颜色 .黄色, 1, 到文本 (arg6.到字典 ().取字典数据 (“ag1”).到易数值 ()))
标准输出 (, #换行符 )
dom模块 = 取已载入模块Py (“dom”)
Add方法 = dom模块.取模块Dict ().取字典数据 (“add”)
参数元祖 = 创建元组Py (arg1.到易数值 (), arg2.到易数值 ())
' 使用第二种方法调用Python函数,这个命令需要我们提供一个元祖和字典。
Add方法返回值 = Add方法.调用2 (参数元祖, )
Add方法返回值.增加引用计数 ()
返回 (Add方法返回值.取对象指针 ())
子程序名返回值类型公开备 注
演示_调用列表和字典方法 演示使用调用python
变量名类 型静态数组备 注
dom模块Py模块类 
MutilArgs方法Py类 
参数列表Py列表类 
参数字典Py字典类 
参数元组Py元组类 
方法返回值Py类 
标准输出 (, #换行符, #换行符 )
dom模块 = 取已载入模块Py (“dom”)
MutilArgs方法 = dom模块.取模块Dict ().取字典数据 (“MutilArgs”)
控制台.输出 (, , 假, 8, 1, “dom模块中的MutilArgs方法信息:”)
控制台.输出 (, , 假, #控制台颜色 .白色, 1, MutilArgs方法.取描述信息 ()#换行符 )
参数列表 = 创建列表Py (100, 200, 300, 400, 500, “asdfoi”)
参数字典 = 创建字典Py ()
参数字典.置字典数据 (“num”, 999)
参数字典.置字典数据 (“str”, “AZaz09中文”)
参数元组 = 创建元组Py (参数列表, 参数字典, 600, 700)
方法返回值 = MutilArgs方法.调用 (参数列表, 参数字典, 参数元组)
标准输出 (, “MutilArgs方法.返回值 = ” + 方法返回值.到易文本 (), #换行符 )
输出调试文本 (取错误明细Py ())
子程序名返回值类型公开备 注
演示_迭代器使用  
变量名类 型静态数组备 注
列表Py列表类 
迭代Py迭代类 
数据Py类 
标准输出 (, #换行符, “======================================================”, “开始演示Python迭代”, #换行符, #换行符 )
列表 = 创建列表Py (“a”, “b”, “c”, 1, 2, 3)
迭代 = 列表.取迭代器 ()
如果真 (迭代.是否可用 ())
判断循环首 (迭代.下一步 ())
数据 = 迭代.取数据 ()
标准输出 (, 数据.取描述信息 (), #换行符 )
判断循环尾 ()

子程序名返回值类型公开备 注
演示_调用带有其他库的Python函数  
变量名类 型静态数组备 注
dom模块Py模块类 
urlreq方法Py类 
方法返回值Py类 
迭代器Py迭代类 
返回结果字典Py字典类 
帖子标题文本型 
' 如果需要使用Python自带的一些库,那么就需要将库完整安装,然后提取出库需要的文件。
标准输出 (, #换行符 )
dom模块 = 取已载入模块Py (“dom”)
' 输出调试文本 (dom模块.取模块Dict ().取描述信息 ())
urlreq方法 = dom模块.取模块Dict ().取字典数据 (“urlreq”)
控制台.输出 (, , 假, 8, 1, “dom模块中的urlreq方法信息:”)
控制台.输出 (, , 假, #控制台颜色 .白色, 1, urlreq方法.取描述信息 ()#换行符 )
方法返回值 = urlreq方法.调用 (https://bbs.125.la/forum.php?mod ... peid&typeid=614)
' 方法返回值.取描述信息 ()
返回结果字典 = 方法返回值.到字典 ()
迭代器 = 返回结果字典.取迭代器 ()
如果真 (迭代器.是否可用 ())
判断循环首 (迭代器.下一步 ())
帖子标题 = 迭代器.取数据 ().到易文本 ()
控制台.输出 (, , 假, 8, 1, “帖子地址: ”)
控制台.输出 (, , 假, #控制台颜色 .艳青, 1, 返回结果字典.取字典数据 (帖子标题).到易文本 ())
控制台.输出 (, , 假, 8, 1, “    帖子标题: ”)
控制台.输出 (, , 假, #控制台颜色 .品红, 1, 帖子标题)
控制台.输出 (, , 假, 8, 1, #换行符 )
判断循环尾 ()
标准输出 (, #换行符 )


i支持库列表   支持库注释   
console控制台操作支持库
JYEPython(未知支持库)
回复

使用道具 举报

结帖率:100% (5/5)
发表于 2013-4-11 20:13:09 | 显示全部楼层   江苏省泰州市
这个沙发蘑菇没抢着
回复

使用道具 举报

结帖率:87% (13/15)
发表于 2013-4-11 20:13:50 | 显示全部楼层   福建省三明市
http://www.5a5x.com/06/201301/01048017.html
回复

使用道具 举报

结帖率:97% (29/30)

签到天数: 14 天

 楼主| 发表于 2013-4-11 21:15:31 | 显示全部楼层   海南省海口市
http://www.5a5x.com/06/201301/01048017.html
这个的话就不用了。
回复

使用道具 举报

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

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:wp@125.la
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

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