3D魔方游戏制作lua迷你世界

--3D魔方

--星空露珠工作室

--核心脚本来自负负

--1:xy 2:yx 3:xz 4:zx 5:yz 6:zy

--4000,0-3 3995-0,3

local trn={

{{5,2},{3,1},{1,2},{1,3},{4,0},{2,2}},

{{3,0},{5,3},{1,3},{1,2},{2,3},{4,1}},

{{4,2},{2,1},{1,1},{1,0},{3,3},{5,1}},

{{2,0},{4,3},{1,0},{1,1},{5,0},{3,2}},

{{6,0},{1,3},{2,2},{2,3},{5,2},{3,0}},

{{1,2},{6,1},{2,3},{2,2},{3,1},{5,3}},

{{5,1},{3,2},{2,1},{2,0},{1,0},{6,2}},

{{3,3},{5,0},{2,0},{2,1},{6,3},{1,1}},

{{6,2},{1,1},{3,2},{3,3},{2,0},{4,2}},

{{1,0},{6,3},{3,3},{3,2},{4,3},{2,1}},

{{2,2},{4,1},{3,1},{3,0},{1,3},{6,1}},

{{4,0},{2,3},{3,0},{3,1},{6,0},{1,2}},

{{5,0},{3,3},{4,2},{4,3},{6,2},{1,0}},

{{3,2},{5,1},{4,3},{4,2},{1,1},{6,3}},

{{6,1},{1,2},{4,1},{4,0},{3,0},{5,2}},

{{1,3},{6,0},{4,0},{4,1},{5,3},{3,1}},

{{2,3},{4,0},{5,2},{5,3},{6,1},{1,3}},

{{4,1},{2,2},{5,3},{5,2},{1,2},{6,0}},

{{6,3},{1,0},{5,1},{5,0},{4,2},{2,0}},

{{1,1},{6,2},{5,0},{5,1},{2,1},{4,3}},

{{4,3},{2,0},{6,2},{6,3},{5,1},{3,3}},

{{2,1},{4,2},{6,3},{6,2},{3,2},{5,0}},

{{5,3},{3,0},{6,1},{6,0},{2,2},{4,0}},

{{3,1},{5,2},{6,0},{6,1},{4,1},{2,3}}}

1.上面-黄

2.左面-绿

3.后面-红

4.右面-蓝

5.前面-橙

6.下面-白

模型快速制作,请阅读下一篇
local ids={4000,3999,3998,3997,3996,3995}

local x0,y0,z0=0,9,0--起点坐标

--黄,绿,红,蓝,橙,白

--魔方数据

local cft={{

{{1,0},{1,0},{1,0}},

{{1,0},{1,0},{1,0}},

{{1,0},{1,0},{1,0}}}

,{

{{1,0},{1,0},{1,0}},

{{1,0},{1,0},{1,0}},

{{1,0},{1,0},{1,0}}}

,{

{{1,0},{1,0},{1,0}},

{{1,0},{1,0},{1,0}},

{{1,0},{1,0},{1,0}}}}

local x,y,z=0,0,0

--游戏开始,生成魔方

local function Go(e)

for x=0,2 do

for y=0,2 do

for z=0,2 do

Block:destroyBlock(Px0+x,y0+y,z0+z,false)

Block:setBlockAll(x0+x,y0+y,z0+z,ids[1],0)

end

end

end

end

ScriptSupportEvent:registerEvent([=[Game.Start]=],Go)

--刷新魔方

local function Re()

local str=''

for x=1,3 do

str=str..'\n'

for y=1,3 do

str=str..'\n'

for z=1,3 do

str=str..'('..cft[x][4-y][z][1]..','.. cft[x][4-y][z][2]..'),'

Block:setBlockAll(x0+z-1,y0+x-1,z0+y-1,ids[cft[x][4-y][z][1]],cft[x][4-y][z][2])

end

end

end

print("打印\n"..str)

end

--旋转

local rc={1,0}

local function Ton(a,e,b)

rc[1]=cft[a[1]][a[2]][a[3]][1]

rc[2]=cft[a[1]][a[2]][a[3]][2]

cft[a[1]][a[2]][a[3]][1]=trn[cft[a[4]][a[5]][a[6]][1]*4+cft[a[4]][a[5]][a[6]][2]-3][b][1]

cft[a[1]][a[2]][a[3]][2]=trn[cft[a[4]][a[5]][a[6]][1]*4+cft[a[4]][a[5]][a[6]][2]-3][b][2]

cft[a[4]][a[5]][a[6]][1]=trn[cft[a[7]][a[8]][a[9]][1]*4+cft[a[7]][a[8]][a[9]][2]-3][b][1]

cft[a[4]][a[5]][a[6]][2]=trn[cft[a[7]][a[8]][a[9]][1]*4+cft[a[7]][a[8]][a[9]][2]-3][b][2]

cft[a[7]][a[8]][a[9]][1]=trn[cft[a[10]][a[11]][a[12]][1]*4+cft[a[10]][a[11]][a[12]][2]-3][b][1]

cft[a[7]][a[8]][a[9]][2]=trn[cft[a[10]][a[11]][a[12]][1]*4+cft[a[10]][a[11]][a[12]][2]-3][b][2]

cft[a[10]][a[11]][a[12]][1]=trn[rc[1]*4+rc[2]-3][b][1]

cft[a[10]][a[11]][a[12]][2]=trn[rc[1]*4+rc[2]-3][b][2]


rc[1]=cft[e[1]][e[2]][e[3]][1]

rc[2]=cft[e[1]][e[2]][e[3]][2]

cft[e[1]][e[2]][e[3]][1]=trn[cft[e[4]][e[5]][e[6]][1]*4+cft[e[4]][e[5]][e[6]][2]-3][b][1]

cft[e[1]][e[2]][e[3]][2]=trn[cft[e[4]][e[5]][e[6]][1]*4+cft[e[4]][e[5]][e[6]][2]-3][b][2]

cft[e[4]][e[5]][e[6]][1]=trn[cft[e[7]][e[8]][e[9]][1]*4+cft[e[7]][e[8]][e[9]][2]-3][b][1]

cft[e[4]][e[5]][e[6]][2]=trn[cft[e[7]][e[8]][e[9]][1]*4+cft[e[7]][e[8]][e[9]][2]-3][b][2]

cft[e[7]][e[8]][e[9]][1]=trn[cft[e[10]][e[11]][e[12]][1]*4+cft[e[10]][e[11]][e[12]][2]-3][b][1]

cft[e[7]][e[8]][e[9]][2]=trn[cft[e[10]][e[11]][e[12]][1]*4+cft[e[10]][e[11]][e[12]][2]-3][b][2]

cft[e[10]][e[11]][e[12]][1]=trn[rc[1]*4+rc[2]-3][b][1]

cft[e[10]][e[11]][e[12]][2]=trn[rc[1]*4+rc[2]-3][b][2]

end

--d m: 0左中右 1上中下 2前中后

--m: 0顺时针 1逆时针 从左后下方

local function Re0(d,i,m)

if (d==0)and(m==0) then

Ton({1,3,1+i,3,3,1+i,3,1,1+i,1,1,1+i},{1,2,1+i,2,3,1+i,3,2,1+i,2,1,1+i},6)

elseif (d==0)and(m==1) then

Ton({1,1,1+i,3,1,1+i,3,3,1+i,1,3,1+i},{2,1,1+i,3,2,1+i,2,3,1+i,1,2,1+i},5)

elseif (d==1)and(m==0) then

Ton({3-i,3,1,3-i,3,3,3-i,1,3,3-i,1,1},{3-i,2,1,3-i,3,2,3-i,2,3,3-i,1,2},4)

elseif (d==1)and(m==1) then

Ton({3-i,1,1,3-i,1,3,3-i,3,3,3-i,3,1},{3-i,1,2,3-i,2,3,3-i,3,2,3-i,2,1},3)

elseif (d==2)and(m==0) then

Ton({1,3-i,1,1,3-i,3,3,3-i,3,3,3-i,1},{1,3-i,2,2,3-i,3,3,3-i,2,2,3-i,1},2)

else

Ton({3,3-i,1,3,3-i,3,1,3-i,3,1,3-i,1},{2,3-i,1,3,3-i,2,2,3-i,3,1,3-i,2},1)

end

Re()

end

--d m: 0左中右 1上中下 2前中后

--m: 0顺时针 1逆时针 从左后下方

local function input(e)

if e.content=="0" then Go(e) --复原

elseif e.content=="1" then Re0(1,0,0) --上

elseif e.content=="2" then Re0(1,2,0) --下

elseif e.content=="3" then Re0(0,0,0) --前

elseif e.content=="4" then Re0(0,2,0) --后

elseif e.content=="5" then Re0(2,2,0) --左

elseif e.content=="6" then Re0(2,0,0) --右

elseif e.content=="7" then Re0(1,0,1) --上

elseif e.content=="8" then Re0(1,2,1) --下

elseif e.content=="9" then Re0(0,0,1) --前

elseif e.content=="10" then Re0(0,2,1) --后

elseif e.content=="11" then Re0(2,2,1)--左

elseif e.content=="12" then Re0(2,0,1) --右

elseif e.content=="13" then Re0(0,1,0) --中_前后

elseif e.content=="14" then Re0(1,1,0) --中_上下

elseif e.content=="15" then Re0(2,1,0) --中_左右

elseif e.content=="16" then Re0(0,1,1) --中_前后

elseif e.content=="17" then Re0(1,1,1) --中_上下

elseif e.content=="18" then Re0(2,1,1) --中_左右

end

end

ScriptSupportEvent:registerEvent([=[Player.InputContent]=], input)

相关推荐
半盏茶香1 小时前
【C语言】分支和循环详解(下)猜数字游戏
c语言·开发语言·c++·算法·游戏
wheeldown7 小时前
【数据结构】选择排序
数据结构·算法·排序算法
PandaQue9 小时前
《怪物猎人:荒野》游戏可以键鼠直连吗
游戏
红黑色的圣西罗11 小时前
Lua 怎么解决闭包内存泄漏问题
开发语言·lua
躺不平的理查德11 小时前
数据结构-链表【chapter1】【c语言版】
c语言·开发语言·数据结构·链表·visual studio
阿洵Rain12 小时前
【C++】哈希
数据结构·c++·算法·list·哈希算法
Leo.yuan12 小时前
39页PDF | 华为数据架构建设交流材料(限免下载)
数据结构·华为
半夜不咋不困12 小时前
单链表OJ题(3):合并两个有序链表、链表分割、链表的回文结构
数据结构·链表
白狐欧莱雅13 小时前
使用python中的pygame简单实现飞机大战游戏
经验分享·python·游戏·pygame
忘梓.13 小时前
排序的秘密(1)——排序简介以及插入排序
数据结构·c++·算法·排序算法