欢乐斗地主 (转载)

复制链接 & 嵌入
链接
复制链接
嵌入网页
复制嵌入代码
还没有人打赏!
最后修改于2022年08月13日

操作说明

这家伙很懒,什么都没写下...

备注与谢志

这家伙很懒,什么都没写下...

开发日志

扩展

画笔

 

变量

发什么牌 [8bef9aeea4643b14b2eee9fca8df7770]

用于角色1自动排序的i [角色1形象]

j [角色1形象]

临时存放一个值 [角色1形象]

索引储存牌 [出牌亮]

谁出牌

地主抢不抢,1为抢,2不抢 [角色2形象]

一个变量,用于检索地主的牌 [角色1形象]

检索地主三张牌的编程,任何角色都可以用

用于角色2自动排序的i [角色2形象]

抢地主4个回合 [8bef9aeea4643b14b2eee9fca8df7770]

谁的牌最大,1角色1,,下回合就谁出牌,并且清空桌面

角色2检索自己的牌 [角色2形象]

随机一个数,看出的牌的张数 [角色2形象]

打出去的牌是否隐藏

每回合出的牌的最多张数

决定每回合大小的角色2临时变量 [角色2形象]

地主令,谁是地主,1角色1,等

底分

倍数

显示测试

判断第几环节,1为叫地主,2为出牌

当牌整理结束时,才可以点击弹出牌、

欢乐豆

角色2牌的张数

角色3牌的张数

牌的X位置

最大分数

当前为牌几 [牌]

isclone? [牌]

牌的X位置2

索引3

isclone? [Sprite1]

用出牌显示时候才能点击牌

click?

决定每回合出的牌大小的变量

索引4

牌令,0为角色1说话,1为角色2,2为角色3

three

two

one

bool

rand

新i

新j

索引5

返回值2

索引2

模式

返回

角色1牌剩余的张数

返回值

2数

2数2

索引储存牌 [角色2形象]

权值

索引储存牌2

最大权值

地主牌特殊

牌距

记牌器循环变量

 

列表

角色2牌的大小排布 [角色3形象]

角色2准备出的牌的次序 [角色3形象]

角色3牌的大小排序 [角色3形象]

角色3准备出的牌的次序 [角色3形象]

储存64张牌 [8bef9aeea4643b14b2eee9fca8df7770]

角色1牌

角色2牌

角色3牌

地主的3张牌

每回合最后出的牌

储存出的牌

存储牌的大小方式

每回合最后出的牌大小排序

查看是否可克隆

查看是否2

查看是否3

链表返回值

炸弹数

计算区间内的牌数

这个区间

角色2准备出的牌的次序 [角色2形象]

地主3张牌特殊

记牌器

 

角色

Stage

造型

背景1

 

声音

MusicEx_Normal

 

代码

当 绿旗 被点击

隐藏列表 {记牌器}

隐藏变量 {地主牌特殊}

广播 选择玩法

 

当接收到 判断刚出牌牌型

执行 判断刚出牌牌型

 

当接收到 将牌打出去

如果 ({牌令,0为角色1说话,1为角色2,2为角色3} = 0) 不成立 那么

将 {记牌器循环变量} 设为 0

重复执行 {每回合最后出的牌大小排序} 的项目数 次

将 {记牌器循环变量} 增加 1

将 {记牌器} 的第 {每回合最后出的牌大小排序} 的第 {记牌器循环变量} 项 项替换为 ({记牌器} 的第 {每回合最后出的牌大小排序} 的第 {记牌器循环变量} 项 项 - 1)

 

当接收到 地主准备出牌,返给主线程做通知

显示列表 {记牌器}

删除 {记牌器} 的全部项目

重复执行 13 次

将 4 加入 {记牌器}

重复执行 2 次

将 1 加入 {记牌器}

将 {记牌器循环变量} 设为 0

重复执行 {角色1牌} 的项目数 次

将 {记牌器循环变量} 增加 1

如果 ({角色1牌} 的第 {记牌器循环变量} 项 = 54) 那么

将 {记牌器} 的第 15 项替换为 ({记牌器} 的第 15 项 - 1)

否则

将 {记牌器} 的第 (向下取整((({角色1牌} 的第 {记牌器循环变量} 项 - 1) / 4)) + 1) 项替换为 ({记牌器} 的第 (向下取整((({角色1牌} 的第 {记牌器循环变量} 项 - 1) / 4)) + 1) 项 - 1)

 

当接收到 游戏开始

显示变量 {底分}

显示变量 {倍数}

显示变量 {角色2牌的张数}

显示变量 {角色3牌的张数}

重复执行

播放声音 MusicEx_Normal 等待播完

 

当接收到 选择玩法

隐藏列表 {记牌器}

隐藏变量 {底分}

隐藏变量 {倍数}

隐藏变量 {角色2牌的张数}

隐藏变量 {角色3牌的张数}

隐藏变量 {地主牌特殊}

 

当接收到 游戏开始

隐藏列表 {记牌器}

 

当接收到 游戏结束

停止 该角色的其他脚本

停止 该角色的其他脚本

 

定义 3

将 {索引5} 设为 向下取整(({返回值} / 10))

将 {three} 设为 0

重复执行直到 ({链表返回值} 的第 {索引5} 项 = 3) 不成立

将 {three} 增加 1

将 {链表返回值} 的第 {索引5} 项替换为 0

将 {索引5} 增加 1

将 {one} 设为 0

将 {two} 设为 0

将 {索引5} 设为 0

重复执行 15 次

将 {索引5} 增加 1

如果 ({链表返回值} 的第 {索引5} 项 = 1) 那么

将 {one} 增加 1

否则

如果 ({链表返回值} 的第 {索引5} 项 = 2) 那么

将 {two} 增加 1

否则

如果 ({链表返回值} 的第 {索引5} 项 = 3) 那么

将 {返回值} 设为 0

停止 这个脚本

如果 (({two} = 0) 与 ({one} = 0)) 那么

将 {返回值} 设为 连接 30 和 {three}

否则

如果 (({two} = {three}) 与 ({one} = 0)) 那么

将 {返回值} 设为 连接 32 和 {three}

否则

如果 (({one} = {three}) 与 ({two} = 0)) 那么

将 {返回值} 设为 连接 31 和 {three}

否则

将 {返回值} 设为 0

 

定义 4

如果 ({每回合最后出的牌大小排序} 的项目数 = 4) 那么

将 {返回值} 设为 4

否则

如果 ({每回合最后出的牌大小排序} 的项目数 = 6) 那么

如果 ({每回合最后出的牌大小排序} 的第 2 项 = {每回合最后出的牌大小排序} 的第 5 项) 那么

将 {返回值} 设为 421

停止 这个脚本

如果 (({每回合最后出的牌大小排序} 的第 1 项 = {每回合最后出的牌大小排序} 的第 4 项) 与 ({每回合最后出的牌大小排序} 的第 5 项 = {每回合最后出的牌大小排序} 的第 6 项) 不成立) 那么

将 {返回值} 设为 421

停止 这个脚本

如果 (({每回合最后出的牌大小排序} 的第 3 项 = {每回合最后出的牌大小排序} 的第 6 项) 与 ({每回合最后出的牌大小排序} 的第 1 项 = {每回合最后出的牌大小排序} 的第 2 项) 不成立) 那么

将 {返回值} 设为 421

停止 这个脚本

将 {返回值} 设为 0

否则

如果 ({每回合最后出的牌大小排序} 的项目数 = 8) 那么

将 {链表返回值} 的第 向下取整(({返回值} / 10)) 项替换为 0

如果 ({链表返回值} 包含 4 ? 不成立 与 ({链表返回值} 包含 1 ? 不成立 与 {链表返回值} 包含 3 ? 不成立)) 那么

将 {返回值} 设为 422

停止 这个脚本

否则

将 {返回值} 设为 0

停止 这个脚本

否则

将 {返回值} 设为 0

停止 这个脚本

 

定义 1

如果 ({每回合最后出的牌大小排序} 的项目数 = 1) 那么

将 {返回值} 设为 1

否则

如果 (({每回合最后出的牌大小排序} 的第 1 项 = 14) 与 (({每回合最后出的牌大小排序} 的第 2 项 = 15) 与 ({每回合最后出的牌大小排序} 的项目数 = 2))) 那么

将 {返回值} 设为 21

否则

如果 (({每回合最后出的牌大小排序} 的第 {每回合最后出的牌大小排序} 的项目数 项 < 12.5) 与 (({每回合最后出的牌大小排序} 的项目数 > 4.5) 与 ({每回合最后出的牌大小排序} 的项目数 < 12.5))) 那么

将 {索引2} 设为 0

重复执行 ({每回合最后出的牌大小排序} 的项目数 - 1) 次

将 {索引2} 增加 1

如果 (({每回合最后出的牌大小排序} 的第 ({索引2} + 1) 项 - {每回合最后出的牌大小排序} 的第 {索引2} 项) = 1) 不成立 那么

将 {返回值} 设为 0

停止 这个脚本

将 {返回值} 设为 ({每回合最后出的牌大小排序} 的项目数 + 6)

否则

将 {返回值} 设为 0

 

定义 判断刚出牌牌型

删除 {链表返回值} 的第 all 项

重复执行 15 次

将 0 加入 {链表返回值}

将 {索引2} 设为 0

重复执行 {每回合最后出的牌大小排序} 的项目数 次

将 {索引2} 增加 1

将 {链表返回值} 的第 {每回合最后出的牌大小排序} 的第 {索引2} 项 项替换为 ({链表返回值} 的第 {每回合最后出的牌大小排序} 的第 {索引2} 项 项 + 1)

将 {返回值} 设为 0

将 {索引2} 设为 0

重复执行 15 次

将 {索引2} 增加 1

如果 ({链表返回值} 的第 {索引2} 项 > {返回值} 除以 10 的余数) 那么

将 {返回值} 设为 ({链表返回值} 的第 {索引2} 项 + ({索引2} * 10))

如果 ({返回值} 除以 10 的余数 = 1) 那么

执行 1

否则

如果 ({返回值} 除以 10 的余数 = 2) 那么

执行 2

否则

如果 ({返回值} 除以 10 的余数 = 3) 那么

执行 3

否则

如果 ({返回值} 除以 10 的余数 = 4) 那么

执行 4

否则

如果 ({返回值} 除以 10 的余数 > 4.5) 那么

将 {返回值} 设为 5

否则

将 {返回值} 设为 0

 

定义 2

如果 ({每回合最后出的牌大小排序} 的项目数 = 2) 那么

将 {返回值} 设为 2

否则

如果 (({每回合最后出的牌大小排序} 的项目数 > 5.5) 与 ({每回合最后出的牌大小排序} 的第 {每回合最后出的牌大小排序} 的项目数 项 < 12.5)) 那么

将 {索引2} 设为 (向下取整(({返回值} / 10)) - 1)

将 {索引5} 设为 0

重复执行 ({每回合最后出的牌大小排序} 的项目数 / 2) 次

将 {索引2} 增加 1

将 {索引5} 增加 2

如果 ({每回合最后出的牌大小排序} 的第 ({索引5} - 1) 项 = {索引2}) 不成立 那么

将 {返回值} 设为 0

停止 这个脚本

如果 ({每回合最后出的牌大小排序} 的第 {索引5} 项 = {索引2}) 不成立 那么

将 {返回值} 设为 0

停止 这个脚本

将 {返回值} 设为 (({每回合最后出的牌大小排序} 的项目数 / 2) + 19)

否则

将 {返回值} 设为 0

 

角色1

 

8bef9aeea4643b14b2eee9fca8df7770

 

封面

 

封面2

 

角色1形象

 

角色2形象

 

角色3形象

 

出牌亮

 

不出

 

地主三张牌

 

胜利

 

再来一局

 

 

40000001_1

 

牌2

 

Sprite1

 

捕获

 

捕获2

 

(0) 评论 (3)

山西省
3个月 前
申请改编 填写恰当的申请理由,将有助于作者了解你的改编想法!
云南省
2年 前
申请改编 申请改编,我会声明的。(不会原封不动的转载哦)
申请改编,我会声明的。(不会原封不动的转载哦)
这个样子可以吧
回复:卍玄鸟乃神明卐 好的,谢谢!可以把权限关掉了