开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

查看: 573|回复: 20
收起左侧

[易语言纯源码] 【蠢新学汇编】二星 / 三星 / 四星 / 五星 (复式)

[复制链接]
结帖率:100% (3/3)
发表于 昨天 04:08 | 显示全部楼层 |阅读模式   贵州省毕节市
分享源码
界面截图: -
是否带模块: 纯源码
备注说明: -
本帖最后由 笨来无一悟 于 2025-7-20 14:49 编辑

何以解忧唯有暴富

  
子程序名返回值类型公开备 注
五星复式文本型 最多10字符
参数名类 型参考可空数组备 注
万位数字文本型0 - 9
千位数字文本型0 - 9
百位数字文本型0 - 9
十位数字文本型0 - 9
个位数字文本型0 - 9
申请内存 (600001, )  ' 100000 × 6 + 1
置入代码 ({ 137, 198, 137, 194, 139, 125, 8, 139, 63, 87, 138, 7, 139, 125, 12, 139, 63, 87, 138, 31, 139, 125, 16, 139, 63, 87, 138, 15, 139, 125, 20, 139, 63, 87, 138, 39, 139, 125, 24, 139, 63, 138, 63, 136, 6, 136, 94, 1, 136, 78, 2, 136, 102, 3, 136, 126, 4, 198, 70, 5, 32, 131, 198, 6, 71, 128, 63, 0, 117, 227, 95, 71, 128, 63, 0, 117, 212, 95, 71, 128, 63, 0, 117, 197, 95, 71, 128, 63, 0, 117, 182, 95, 71, 128, 63, 0, 117, 167, 137, 208, 201, 194, 20, 0 })
' MOV ESI,EAX
' MOV EDX,EAX
' MOV EDI,[EBP+8]
' MOV EDI,[EDI]
' 万:
' PUSH EDI
' MOV AL,BYTE [EDI]
' MOV EDI,[EBP+12]
' MOV EDI,[EDI]
' 千:
' PUSH EDI
' MOV BL,BYTE [EDI]
' MOV EDI,[EBP+16]
' MOV EDI,[EDI]
' 百:
' PUSH EDI
' MOV CL,BYTE [EDI]
' MOV EDI,[EBP+20]
' MOV EDI,[EDI]
' 十:
' PUSH EDI
' MOV AH,BYTE [EDI]
' MOV EDI,[EBP+24]
' MOV EDI,[EDI]
' 个:
' MOV BH,BYTE [EDI]
' MOV BYTE[ESI],AL
' MOV BYTE[ESI+1],BL
' MOV BYTE[ESI+2],CL
' MOV BYTE[ESI+3],AH
' MOV BYTE[ESI+4],BH
' MOV BYTE[ESI+5],32
' ADD ESI,6
' INC EDI
' CMP BYTE[EDI],0
' JNE 个
' POP EDI
' INC EDI
' CMP BYTE[EDI],0
' JNE 十
' POP EDI
' INC EDI
' CMP BYTE[EDI],0
' JNE 百
' POP EDI
' INC EDI
' CMP BYTE[EDI],0
' JNE 千
' POP EDI
' INC EDI
' CMP BYTE[EDI],0
' JNE 万
' MOV EAX,EDX
' LEAVE
' RET 20
返回 (“”)
子程序名返回值类型公开备 注
四星复式文本型 最多10字符
参数名类 型参考可空数组备 注
千位数字文本型0 - 9
百位数字文本型0 - 9
十位数字文本型0 - 9
个位数字文本型0 - 9
申请内存 (50001, )  ' 10000 × 5 + 1
置入代码 ({ 137, 198, 137, 194, 139, 125, 8, 139, 63, 87, 138, 7, 139, 125, 12, 139, 63, 87, 138, 31, 139, 125, 16, 139, 63, 87, 138, 15, 139, 125, 20, 139, 63, 138, 39, 136, 6, 136, 94, 1, 136, 78, 2, 136, 102, 3, 198, 70, 4, 32, 131, 198, 5, 71, 128, 63, 0, 117, 230, 95, 71, 128, 63, 0, 117, 215, 95, 71, 128, 63, 0, 117, 200, 95, 71, 128, 63, 0, 117, 185, 137, 208, 201, 194, 16, 0 })
' MOV ESI,EAX
' MOV EDX,EAX
' MOV EDI,[EBP+8]
' MOV EDI,[EDI]
' 千:
' PUSH EDI
' MOV AL,BYTE [EDI]
' MOV EDI,[EBP+12]
' MOV EDI,[EDI]
' 百:
' PUSH EDI
' MOV BL,BYTE [EDI]
' MOV EDI,[EBP+16]
' MOV EDI,[EDI]
' 十:
' PUSH EDI
' MOV CL,BYTE [EDI]
' MOV EDI,[EBP+20]
' MOV EDI,[EDI]
' 个:
' MOV AH,BYTE [EDI]
' MOV BYTE[ESI],AL
' MOV BYTE[ESI+1],BL
' MOV BYTE[ESI+2],CL
' MOV BYTE[ESI+3],AH
' MOV BYTE[ESI+4],32
' ADD ESI,5
' INC EDI
' CMP BYTE[EDI],0
' JNE 个
' POP EDI
' INC EDI
' CMP BYTE[EDI],0
' JNE 十
' POP EDI
' INC EDI
' CMP BYTE[EDI],0
' JNE 百
' POP EDI
' INC EDI
' CMP BYTE[EDI],0
' JNE 千
' MOV EAX,EDX
' LEAVE
' RET 16
返回 (“”)
子程序名返回值类型公开备 注
三星复式文本型 最多10字符
参数名类 型参考可空数组备 注
百位数字文本型0 - 9
十位数字文本型0 - 9
个位数字文本型0 - 9
申请内存 (4001, )  ' 1000 × 4 + 1
置入代码 ({ 137, 198, 137, 194 })
' MOV ESI,EAX
' MOV EDX,EAX
置入代码 ({ 139, 125, 8, 139, 63, 87, 138, 7, 139, 125, 12, 139, 63, 87, 138, 31, 139, 125, 16, 139, 63, 138, 15 })
' MOV EDI,[EBP+8]
' MOV EDI,[EDI]
' 百:
' PUSH EDI
' MOV AL,BYTE [EDI]
' MOV EDI,[EBP+12]
' MOV EDI,[EDI]
' 十:
' PUSH EDI
' MOV BL,BYTE [EDI]
' MOV EDI,[EBP+16]
' MOV EDI,[EDI]
' 个:
' MOV CL,BYTE [EDI]
置入代码 ({ 136, 6, 136, 94, 1, 136, 78, 2, 198, 70, 3, 32, 131, 198, 4 })
' MOV BYTE[ESI],AL
' MOV BYTE[ESI+1],BL
' MOV BYTE[ESI+2],CL
' MOV BYTE[ESI+3],32
' ADD ESI,4
置入代码 ({ 71, 128, 63, 0, 117, 233, 95, 71, 128, 63, 0, 117, 218, 95, 71, 128, 63, 0, 117, 203 })
' INC EDI
' CMP BYTE[EDI],0
' JNE 个
' POP EDI
' INC EDI
' CMP BYTE[EDI],0
' JNE 十
' POP EDI
' INC EDI
' CMP BYTE[EDI],0
' JNE 百
置入代码 ({ 137, 208, 201, 194, 12, 0 })
' MOV EAX,EDX
' LEAVE
' RET 12
返回 (“”)
子程序名返回值类型公开备 注
二星复式文本型 最多10字符
参数名类 型参考可空数组备 注
十位数字文本型0 - 9
个位数字文本型0 - 9
申请内存 (301, )  ' 100 × 3 + 1
置入代码 ({ 131, 236, 4, 137, 194, 80, 139, 117, 8, 139, 54, 139, 125, 12, 139, 63, 137, 125 })
' SUB ESP,4
' MOV EDX,EAX
' PUSH EAX
' MOV ESI,[EBP+8]
' MOV ESI,[ESI]
' MOV EDI,[EBP+12]
' MOV EDI,[EDI]
' MOV DWORD [EBP-4],EDI
置入代码 ({ 252, 138, 6, 132, 192, 116, 25, 70, 139, 125, 252, 138, 31, 132, 219, 116, 240, 136, 2, 136, 90, 1, 198, 66, 2, 32, 131, 194, 3, 71, 235, 235 })
' 十:
' MOV AL,BYTE [ESI]
' TEST AL,AL
' JZ 完
' INC ESI
' MOV EDI,[EBP-4]
' 个:
' MOV BL,BYTE [EDI]
' TEST BL,BL
' JZ 十
' MOV BYTE[EDX],AL
' MOV BYTE[EDX+1],BL
' MOV BYTE[EDX+2],32
' ADD EDX,3
' INC EDI
' JMP 个
置入代码 ({ 198, 2, 0, 88, 201, 194, 8, 0 })
' 完:
' MOV BYTE[EDX],0
' POP EAX
' LEAVE
' RET 8
返回 (“”)


i支持库列表   支持库注释   
spec特殊功能支持库
来自群组: 热心网友

点评

调用方式 二星复式("123","4567") 三星复式("136789","2456","1468")   贵州省毕节市  发表于 昨天 04:10

评分

参与人数 3好评 +2 精币 +6 收起 理由
malin158 + 2 支持开源~!感谢分享
kedoubobo + 1 + 1 支持开源~!感谢分享
yuan71058 + 1 + 3 支持开源~!感谢分享

查看全部评分


结帖率:95% (42/44)

签到天数: 11 天

发表于 3 小时前 | 显示全部楼层   湖北省荆门市
这是什么应用?

点评

打倒狗庄 还我钱财   贵州省毕节市  发表于 3 小时前
回复 支持 反对

使用道具 举报

结帖率:50% (1/2)

签到天数: 18 天

发表于 3 小时前 | 显示全部楼层   广东省汕头市
感谢大神分享~!
回复 支持 反对

使用道具 举报

结帖率:96% (415/434)

签到天数: 17 天

发表于 3 小时前 | 显示全部楼层   内蒙古自治区乌海市
感谢分享!
回复 支持 反对

使用道具 举报

结帖率:100% (8/8)

签到天数: 15 天

发表于 4 小时前 | 显示全部楼层   广东省佛山市
        感谢分享,很给力!~
回复 支持 反对

使用道具 举报

结帖率:100% (4/4)

签到天数: 20 天

发表于 5 小时前 | 显示全部楼层   山东省淄博市
感谢分享
回复 支持 反对

使用道具 举报

结帖率:97% (120/124)

签到天数: 21 天

发表于 6 小时前 | 显示全部楼层   山东省青岛市
全都是大佬~
回复 支持 反对

使用道具 举报

结帖率:92% (67/73)

签到天数: 21 天

发表于 6 小时前 | 显示全部楼层   山东省青岛市
感谢您对论坛的支持!
回复 支持 反对

使用道具 举报

签到天数: 16 天

发表于 8 小时前 | 显示全部楼层   广西壮族自治区南宁市

谢谢分享
回复 支持 反对

使用道具 举报

签到天数: 13 天

发表于 昨天 22:03 | 显示全部楼层   安徽省合肥市

感谢分享,很给力!~
回复 支持 反对

使用道具 举报

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

本版积分规则 致发广告者

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

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

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