开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

查看: 1145|回复: 31
打印 上一主题 下一主题
收起左侧

[易语言纯源码] 模仿一个软件卸载界面的表情

[复制链接]
结帖率:100% (1/1)
跳转到指定楼层
楼主
发表于 2025-2-27 20:53:44 | 只看该作者 |只看大图 回帖奖励 |正序浏览 |阅读模式   广东省东莞市
分享源码
界面截图:
是否带模块: 纯源码
备注说明: -
模仿一个软件卸载界面的表情.e (33.19 KB, 下载次数: 13)
  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
子程序名返回值类型公开备 注
__启动窗口_创建完毕  
_启动窗口.宽度 = 800
_启动窗口.高度 = 600
表情界面.左边 = 0
表情界面.顶边 = 0
表情界面.宽度 = _启动窗口.取用户区宽度 ()
表情界面.高度 = _启动窗口.取用户区高度 ()
' 调试输出 (表情界面.宽度)
' 调试输出 (表情界面.高度)
' 动画框宽度:800,宽度中点:400。
' 动画框高度:600,高度中点:300。
表情界面的宽度 = 表情界面.宽度
表情界面的高度 = 表情界面.高度
头心横坐标 = 表情界面的宽度 ÷ 2
头心纵坐标 = 表情界面的高度 ÷ 2
' 画头,中心位置在窗口屏幕中间,,横坐标400,纵坐标300,宽:400,高:400。
头宽 = 400
头高 = 400
' 设置头的左边,在头的宽度中心位置400,减掉头的一半宽度400/2。
头左边 = 头心横坐标 - 头宽 ÷ 2
' 设置头的顶边,在头的高度中心位置300,减掉头的一半高度400/2。
头顶边 = 头心纵坐标 - 头高 ÷ 2
表情界面.画出方式 = 12
表情界面.画笔颜色 = #橙黄
表情界面.刷子类型 = 1
表情界面.刷子颜色 = #橙黄
表情界面.画椭圆 (头左边, 头顶边, 头左边 + 头宽, 头顶边 + 头高)
' 画眼睛,两眼距离:50,两瞳距离:150,中心横坐标75,中心纵坐标50。
眼眶大小 = 100
眼瞳大小 = 50
左眼眶宽 = 眼眶大小
左眼眶高 = 眼眶大小
右眼眶宽 = 眼眶大小
右眼眶高 = 眼眶大小
左眼瞳宽 = 眼瞳大小
左眼瞳高 = 眼瞳大小
右眼瞳宽 = 眼瞳大小
右眼瞳高 = 眼瞳大小
左眼心与头心的横向距离 = 100
左眼心与头心的纵向距离 = 50
右眼心与头心的横向距离 = 100
右眼心与头心的纵向距离 = 50
左眼瞳心与头心的横向距离 = 100
左眼瞳心与头心的纵向距离 = 50
右眼瞳心与头心的横向距离 = 100
右眼瞳心与头心的纵向距离 = 50
两眼心距离 = 左眼心与头心的横向距离 + 右眼心与头心的横向距离
' 调试输出 (两眼心距离)
两眼框最近距离 = 左眼心与头心的横向距离 - 左眼眶宽 ÷ 2 + 右眼心与头心的横向距离 - 右眼眶宽 ÷ 2
' 调试输出 (两眼框最近距离)
左眼眶左边 = 头心横坐标 - 左眼心与头心的横向距离 - 左眼眶宽 ÷ 2
左眼眶顶边 = 头心纵坐标 - 左眼心与头心的纵向距离 - 右眼眶高 ÷ 2
右眼眶左边 = 头心横坐标 + 右眼心与头心的横向距离 - 右眼眶宽 ÷ 2
右眼眶顶边 = 头心纵坐标 - 左眼心与头心的纵向距离 - 右眼眶高 ÷ 2
' 调试输出 (左眼眶左边)
' 调试输出 (左眼眶顶边)
' 调试输出 (右眼眶左边)
' 调试输出 (右眼眶顶边)
左眼瞳左边 = 头心横坐标 - 左眼瞳心与头心的横向距离 - 左眼瞳宽 ÷ 2
左眼瞳顶边 = 头心纵坐标 - 左眼瞳心与头心的纵向距离 - 右眼瞳高 ÷ 2
右眼瞳左边 = 头心横坐标 + 右眼瞳心与头心的横向距离 - 右眼瞳宽 ÷ 2
右眼瞳顶边 = 头心纵坐标 - 左眼瞳心与头心的纵向距离 - 右眼瞳高 ÷ 2
' 调试输出 (左眼瞳左边)
' 调试输出 (左眼瞳顶边)
' 调试输出 (右眼瞳左边)
' 调试输出 (右眼瞳顶边)
' 眼眶颜色
表情界面.画出方式 = 12
表情界面.画笔颜色 = #白色
表情界面.刷子类型 = 1
表情界面.刷子颜色 = #白色
' 画左眼眶
表情界面.画椭圆 (左眼眶左边, 左眼眶顶边, 左眼眶左边 + 左眼眶宽, 左眼眶顶边 + 左眼眶高)
' 画右眼眶
表情界面.画椭圆 (右眼眶左边, 右眼眶顶边, 右眼眶左边 + 右眼眶宽, 右眼眶顶边 + 右眼眶高)
' 眼瞳颜色
表情界面.画出方式 = 12
表情界面.画笔颜色 = #黑色
表情界面.刷子类型 = 1
表情界面.刷子颜色 = #黑色
' 画左眼瞳孔
表情界面.画椭圆 (左眼瞳左边, 左眼瞳顶边, 左眼瞳左边 + 左眼瞳宽, 左眼瞳顶边 + 左眼瞳高)
' 画右眼瞳孔
表情界面.画椭圆 (右眼瞳左边, 右眼瞳顶边, 右眼瞳左边 + 右眼瞳宽, 右眼瞳顶边 + 右眼瞳高)
' 画嘴巴
嘴巴宽 = 200
嘴巴高 = 150
嘴巴左边 = 头心横坐标 - 嘴巴宽 ÷ 2
嘴巴顶边 = 头心纵坐标
表情界面.画出方式 = 12
表情界面.画笔颜色 = #黑色
表情界面.刷子类型 = 1
表情界面.刷子颜色 = #黑色
表情界面.画椭圆 (嘴巴左边, 嘴巴顶边, 嘴巴左边 + 嘴巴宽, 嘴巴顶边 + 嘴巴高)
' ' 头横向中线
' 表情界面.画出方式 = 5  ' 反转颜色。
' 表情界面.画笔颜色 = #黑色
' 表情界面.画直线 (表情界面.左边, 表情界面.高度 ÷ 2, 表情界面.宽度, 表情界面.高度 ÷ 2)
' ' 头纵向中线
' 表情界面.画出方式 = 5  ' 反转颜色。
' 表情界面.画笔颜色 = #黑色
' 表情界面.画直线 (表情界面.宽度 ÷ 2, 表情界面.顶边, 表情界面.宽度 ÷ 2, 表情界面.高度)
' ' 左右眼睛横向中线
' 表情界面.画出方式 = 5  ' 反转颜色。
' 表情界面.画笔颜色 = #黑色
' 表情界面.画直线 (表情界面.左边, 表情界面.高度 ÷ 2 - 50, 表情界面.宽度, 表情界面.高度 ÷ 2 - 50)
' ' 左眼睛纵向中线
' 表情界面.画出方式 = 5  ' 反转颜色。
' 表情界面.画笔颜色 = #黑色
' 表情界面.画直线 (表情界面.宽度 ÷ 2 - 100, 表情界面.顶边, 表情界面.宽度 ÷ 2 - 100, 表情界面.高度)
' ' 右眼睛纵向中线
' 表情界面.画出方式 = 5  ' 反转颜色。
' 表情界面.画笔颜色 = #黑色
' 表情界面.画直线 (表情界面.宽度 ÷ 2 + 100, 表情界面.顶边, 表情界面.宽度 ÷ 2 + 100, 表情界面.高度)
子程序名返回值类型公开备 注
_表情界面_鼠标位置被移动逻辑型 
参数名类 型参考可空数组备 注
横向位置整数型
纵向位置整数型
功能键状态整数型
表情界面.左边 = 0
表情界面.顶边 = 0
表情界面.宽度 = _启动窗口.取用户区宽度 ()
表情界面.高度 = _启动窗口.取用户区高度 ()
' 调试输出 (表情界面.宽度)
' 调试输出 (表情界面.高度)
' 动画框宽度:800,宽度中点:400。
' 动画框高度:600,高度中点:300。
表情界面的宽度 = 表情界面.宽度
表情界面的高度 = 表情界面.高度
头心横坐标 = 表情界面的宽度 ÷ 2
头心纵坐标 = 表情界面的高度 ÷ 2
' 画头,中心位置在窗口屏幕中间,,横坐标400,纵坐标300,宽:400,高:400。
头宽 = 400
头高 = 400
' 设置头的左边,在头的宽度中心位置400,减掉头的一半宽度400/2。
头左边 = 头心横坐标 - 头宽 ÷ 2
' 设置头的顶边,在头的高度中心位置300,减掉头的一半高度400/2。
头顶边 = 头心纵坐标 - 头高 ÷ 2
表情界面.画出方式 = 12
表情界面.画笔颜色 = #橙黄
表情界面.刷子类型 = 1
表情界面.刷子颜色 = #橙黄
表情界面.画椭圆 (头左边, 头顶边, 头左边 + 头宽, 头顶边 + 头高)
' 画眼睛,两眼距离:50,两瞳距离:150,中心横坐标75,中心纵坐标50。
眼眶大小 = 100
眼瞳大小 = 50
眼瞳移动最大距离 (眼眶大小 - 眼瞳大小) ÷ 2
左眼眶宽 = 眼眶大小
左眼眶高 = 眼眶大小
右眼眶宽 = 眼眶大小
右眼眶高 = 眼眶大小
左眼瞳宽 = 眼瞳大小
左眼瞳高 = 眼瞳大小
右眼瞳宽 = 眼瞳大小
右眼瞳高 = 眼瞳大小
左眼心与头心的横向距离 = 100
左眼心与头心的纵向距离 = 50
右眼心与头心的横向距离 = 100
右眼心与头心的纵向距离 = 50
左眼瞳心与头心的横向距离 = 100
左眼瞳心与头心的纵向距离 = 50
右眼瞳心与头心的横向距离 = 100
右眼瞳心与头心的纵向距离 = 50
左眼瞳心移动后与头心的横向距离 = 左眼瞳心与头心的横向距离 ��� (横向位置 ��� (头心横坐标 - 左眼瞳心与头心的横向距离)) ÷ 眼瞳移动最大距离
左眼瞳心移动后与头心的纵向距离 = 左眼瞳心与头心的纵向距离 ��� (纵向位置 ��� (头心纵坐标 - 左眼瞳心与头心的纵向距离)) ÷ 眼瞳移动最大距离
右眼瞳心移动后与头心的横向距离 = 右眼瞳心与头心的横向距离 ��� (横向位置 ��� (头心横坐标 - 右眼瞳心与头心的横向距离)) ÷ 眼瞳移动最大距离
右眼瞳心移动后与头心的纵向距离 = 右眼瞳心与头心的纵向距离 ��� (纵向位置 ��� (头心纵坐标 - 右眼瞳心与头心的纵向距离)) ÷ 眼瞳移动最大距离
两眼心距离 = 左眼心与头心的横向距离 + 右眼心与头心的横向距离
' 调试输出 (两眼心距离)
两眼框最近距离 = 左眼心与头心的横向距离 - 左眼眶宽 ÷ 2 + 右眼心与头心的横向距离 - 右眼眶宽 ÷ 2
' 调试输出 (两眼框最近距离)
左眼眶左边 = 头心横坐标 - 左眼心与头心的横向距离 - 左眼眶宽 ÷ 2
左眼眶顶边 = 头心纵坐标 - 左眼心与头心的纵向距离 - 右眼眶高 ÷ 2
右眼眶左边 = 头心横坐标 + 右眼心与头心的横向距离 - 右眼眶宽 ÷ 2
右眼眶顶边 = 头心纵坐标 - 左眼心与头心的纵向距离 - 右眼眶高 ÷ 2
' 调试输出 (左眼眶左边)
' 调试输出 (左眼眶顶边)
' 调试输出 (右眼眶左边)
' 调试输出 (右眼眶顶边)
左眼瞳左边 = 头心横坐标 - 左眼瞳心移动后与头心的横向距离 - 左眼瞳宽 ÷ 2
左眼瞳顶边 = 头心纵坐标 - 左眼瞳心移动后与头心的纵向距离 - 右眼瞳高 ÷ 2
右眼瞳左边 = 头心横坐标 + 右眼瞳心移动后与头心的横向距离 - 右眼瞳宽 ÷ 2
右眼瞳顶边 = 头心纵坐标 - 左眼瞳心移动后与头心的纵向距离 - 右眼瞳高 ÷ 2
' 调试输出 (左眼瞳左边)
' 调试输出 (左眼瞳顶边)
' 调试输出 (右眼瞳左边)
' 调试输出 (右眼瞳顶边)
' 眼眶颜色
表情界面.画出方式 = 12
表情界面.画笔颜色 = #白色
表情界面.刷子类型 = 1
表情界面.刷子颜色 = #白色
' 画左眼眶
表情界面.画椭圆 (左眼眶左边, 左眼眶顶边, 左眼眶左边 + 左眼眶宽, 左眼眶顶边 + 左眼眶高)
' 画右眼眶
表情界面.画椭圆 (右眼眶左边, 右眼眶顶边, 右眼眶左边 + 右眼眶宽, 右眼眶顶边 + 右眼眶高)
' 眼瞳颜色
表情界面.画出方式 = 12
表情界面.画笔颜色 = #黑色
表情界面.刷子类型 = 1
表情界面.刷子颜色 = #黑色
' 画左眼瞳孔
表情界面.画椭圆 (左眼瞳左边, 左眼瞳顶边, 左眼瞳左边 + 左眼瞳宽, 左眼瞳顶边 + 左眼瞳高)
' 画右眼瞳孔
表情界面.画椭圆 (右眼瞳左边, 右眼瞳顶边, 右眼瞳左边 + 右眼瞳宽, 右眼瞳顶边 + 右眼瞳高)
' 画嘴巴
嘴巴宽 = 200
嘴巴高 = 150
嘴巴左边 = 头心横坐标 - 嘴巴宽 ÷ 2
嘴巴顶边 = 头心纵坐标
表情界面.画出方式 = 12
表情界面.画笔颜色 = #黑色
表情界面.刷子类型 = 1
表情界面.刷子颜色 = #黑色
表情界面.画椭圆 (嘴巴左边, 嘴巴顶边, 嘴巴左边 + 嘴巴宽, 嘴巴顶边 + 嘴巴高)
如果真 (横向位置 < 头心横坐标)
' 画上巴
上巴宽 = 200
上巴高 = 纵向位置 ÷ 4
上巴左边 = 头心横坐标 - 上巴宽 ÷ 2
上巴顶边 = 头心纵坐标
表情界面.画出方式 = 12
表情界面.画笔颜色 = #橙黄  ' #黑色
表情界面.刷子类型 = 1
表情界面.刷子颜色 = #橙黄
表情界面.画椭圆 (上巴左边, 上巴顶边, 上巴左边 + 上巴宽, 上巴顶边 + 上巴高)
如果真 (横向位置 > 头心横坐标)
' 画下巴
下巴宽 = 200
下巴高 = 纵向位置 ÷ 4
下巴左边 = 头心横坐标 - 下巴宽 ÷ 2
下巴顶边 = 头心纵坐标 + 嘴巴高 - 下巴高
表情界面.画出方式 = 12
表情界面.画笔颜色 = #橙黄  ' #黑色
表情界面.刷子类型 = 1
表情界面.刷子颜色 = #橙黄
表情界面.画椭圆 (下巴左边, 下巴顶边, 下巴左边 + 下巴宽, 嘴巴顶边 + 嘴巴高)
' ' 头横向中线
' 表情界面.画出方式 = 5  ' 反转颜色。
' 表情界面.画笔颜色 = #黑色
' 表情界面.画直线 (表情界面.左边, 表情界面.高度 ÷ 2, 表情界面.宽度, 表情界面.高度 ÷ 2)
' ' 头纵向中线
' 表情界面.画出方式 = 5  ' 反转颜色。
' 表情界面.画笔颜色 = #黑色
' 表情界面.画直线 (表情界面.宽度 ÷ 2, 表情界面.顶边, 表情界面.宽度 ÷ 2, 表情界面.高度)
' ' 左右眼睛横向中线
' 表情界面.画出方式 = 5  ' 反转颜色。
' 表情界面.画笔颜色 = #黑色
' 表情界面.画直线 (表情界面.左边, 表情界面.高度 ÷ 2 - 50, 表情界面.宽度, 表情界面.高度 ÷ 2 - 50)
' ' 左眼睛纵向中线
' 表情界面.画出方式 = 5  ' 反转颜色。
' 表情界面.画笔颜色 = #黑色
' 表情界面.画直线 (表情界面.宽度 ÷ 2 - 100, 表情界面.顶边, 表情界面.宽度 ÷ 2 - 100, 表情界面.高度)
' ' 右眼睛纵向中线
' 表情界面.画出方式 = 5  ' 反转颜色。
' 表情界面.画笔颜色 = #黑色
' 表情界面.画直线 (表情界面.宽度 ÷ 2 + 100, 表情界面.顶边, 表情界面.宽度 ÷ 2 + 100, 表情界面.高度)
子程序名返回值类型公开备 注
_关闭按钮_被单击  
销毁 ()


i支持库列表   支持库注释   
iext2扩展界面支持库二

评分

参与人数 2好评 +2 精币 +1 收起 理由
多多帅吧 + 1 感谢你的支持,精易有你更精彩
羞涩 + 1 + 1 此处应该有鼓励~

查看全部评分


结帖率:86% (6/7)

签到天数: 4 天

28
发表于 2025-3-4 08:00:38 | 只看该作者   江苏省连云港市
学习一下
回复 支持 反对

使用道具 举报

结帖率:100% (3/3)

签到天数: 1 天

27
发表于 2025-3-2 15:27:19 | 只看该作者   河南省南阳市
这么复杂 难道会动态变脸?

点评

差不多   广东省东莞市  发表于 2025-3-2 17:39
回复 支持 反对

使用道具 举报

结帖率:98% (111/113)

签到天数: 11 天

26
发表于 2025-3-2 07:18:02 | 只看该作者   山东省青岛市
全都是大佬~
回复 支持 反对

使用道具 举报

结帖率:96% (53/55)

签到天数: 11 天

25
发表于 2025-3-2 07:13:50 | 只看该作者   山东省青岛市
下个学习一下
回复 支持 反对

使用道具 举报

结帖率:33% (1/3)
24
发表于 2025-3-1 16:16:22 | 只看该作者   湖北省武汉市
支持开源~!感谢分享
回复 支持 反对

使用道具 举报

签到天数: 8 天

23
发表于 2025-3-1 09:37:26 | 只看该作者   浙江省宁波市
感谢分享,支持开源!!!
回复 支持 反对

使用道具 举报

结帖率:98% (111/113)

签到天数: 11 天

22
发表于 2025-3-1 07:23:13 | 只看该作者   山东省青岛市
全都是大佬~
回复 支持 反对

使用道具 举报

结帖率:96% (53/55)

签到天数: 11 天

21
发表于 2025-3-1 07:18:58 | 只看该作者   山东省青岛市
已经顶贴,感谢您对论坛的支持!
回复 支持 反对

使用道具 举报

签到天数: 9 天

20
发表于 2025-2-28 20:47:41 | 只看该作者   江苏省连云港市
感谢分享
回复 支持 反对

使用道具 举报

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

本版积分规则 致发广告者

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

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

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