找回密码
 注册
关于网站域名变更的通知
查看: 778|回复: 1
打印 上一主题 下一主题

如何利用MATLAB进行拼图游戏设计(图文详解,附完整代码)

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2021-1-20 10:49 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

您需要 登录 才可以下载或查看,没有帐号?注册

x
  k; I9 s( d0 i1 O1 d
内容摘要:MATLAB强大的运算和图形展示功能,使图像处理变得更加的简单和直观。本博文基于MATLAB编程语言,详细介绍了如何利用MATLAB及其图像处理函数进行经典拼图游戏设计,并通过具体方法步骤及相应代码逐步实现游戏的完美运行。(有详细步骤及代码解释,适合新手以及进阶的朋友参考)
2 W( C& Z* N) ^( m- A/ p" C1 j2 Z+ u8 d- H) ^+ N/ h4 l
关键词:拼图游戏;MATLAB;数字图像处理& g5 Z6 S" q3 y( O' Z5 r

+ M  X9 g% v$ L. r1 `8 h 1.前言
. {, o; ^, U9 G      Matlab是MathWork公司推出的一套高性能的数值计算和可视化软件。它是一个高度集成的系统,集科学计算、图像处理、声音处理于一体,具有极高的编程效率。数字图像处理是一种通过计算机采用一定的算法对图形图像进行处理的技术。数字图像处理技术已经在各个领域上都有了比较广泛的应用。MATLAB强大的运算和图形展示功能,使图像处理变得更加的简单和直观。本文介绍了如何利用MATLAB进行经典拼图游戏设计。拼图游戏是一款非常经典的小游戏,因为它比较简单有趣,可变性很高且耐玩,有利于开发智力,帮助提高动手解决问题的能力。
' C3 k0 ]$ ^0 ^" |5 e% \* T
. t7 X( k( y/ n# Y' E      拼图游戏的设计对一个MATLAB语言设计者进行语言提高和进阶都是一个很好的锻炼机会,说起来这个程序是笔者当年大学时完全自己构思摸索的第一个长的完整程序,作为一名刚接触编程语言的菜鸟,在痛苦与激动中整整花了一个星期才完成。如今我已是一名研究生,转眼再看过去写的那些程序,可能诸多不足但那些编程的锻炼确实让我感获良多,面对如今众多的研究课题时,入门编程让我可以从容地用编程语言去释放自己的思想,不必在有好想法时因为编程问题而浇灭灵感的火花。临近年关,辞旧迎新之际,外面的世界熙来攘往,早已沉浸着春节的热闹与喜悦中,我仍要挑个安静的时间总结反思过去一年各方面的得与失。一个想法划过脑海想把前面做过的程序做个整理和改进,分享出来希望能够给刚接触编程的朋友们一点帮助和启发,对于我也是一个总结与提高,期待我们今后一起能够继续学习和进步。
4 r1 }4 J3 p% z3 z1 U3 D6 C6 q# @- n
2.MATLAB的图像处理
; U7 n0 p+ u& Q% @' z3 R  Y      MATLAB的基本数据单位是矩阵,它的指令表达式与数学,工程中常用的形式十分相似,故用MATLAB来解算问题要比用C、FORTRAN等语言完相同的事情简捷得多。MATLAB支持五种图像类型,即索引图像、灰度图像、二值图像、RGB图像和多帧图像阵列。MATLAB中,一幅图像包含一个数据矩阵,RGB图像分别用红,绿,蓝三个亮度值为一组,代表每个像素的颜色。图像数组为M*N*3,M,N表示图像像素的行列数。MATLAB图像处理工具箱是由一系列支持图像处理操作的函数组成,可以进行诸如几何操作、线性滤波和滤波器设计、图像变换、图像分析与图像增强、二值图像操作以及形态学处理等图像处理操作。; A8 H, s- j1 D
' Z# {% j) k! ~8 N$ K
      这里拼图游戏中的图像处理主要是对图像数组的操作,涉及矩阵分割、重组等步骤。本文将在后面几节结合代码进行详细介绍。
8 {. n/ I. \- U
) B" e; W: s+ }# L3.设计步骤
9 S" J9 U* T( N' ^5 S3 m      到此为止,前面的内容稍作了解即可,接下来的主要设计思路无需细看但了解大概的流程却是有必要的,毕竟编写程序前还是得清楚到底要做什么的,简洁清晰的设计方案能起到提纲挈领的作用。% F. l8 g# f' Q: L, e7 C. i3 ?4 g9 ^

  |) Q0 y0 a: `2 Y' I) J7 ^- H      拼图游戏的主要思想是先读入准备好的图片,将存储图像的数据矩阵平均分为9个小的矩阵块,并用一个矩阵元素为1,2,3,4,5,6,7,8,0的3*3的数组矩阵标记每一个小矩阵块。仿照人工随机打乱拼图的方法,将标记矩阵打乱,根据标记矩阵拼接相应的拼图块并显示整个图像,通过设置图形窗口鼠标点击事件的回调函数的方式获得鼠标点击位置的坐标值,判断点击位置并移动相应的拼图块,当拼图顺序完全正确时提示游戏完成。图3.1和图3.2是拼图游戏的程序流程图。" H$ X( F; E7 o8 J- |; R; m

$ F# ^* \1 H  e4 F5 I                                                                          + M8 Y& c7 p5 |
' h9 u9 X# ?; J, i. X: N
                                         图3.1 总体程序流程图(左图)               图3.2 回调函数程序流程图(右图)
! s5 a4 r) B# M. N& a4 b
( K. Q" j5 o. D4 G7 E/ B+ L      上面流程图的方式可能有点学术,但确实不失为一种好的叙述整个程序设计思想的表示方法。解释一下吧,为了使整个程序整洁清晰,图1中“打乱拼图矩阵”以及”按照标记矩阵显示拼图“步骤都写成了自定义函数,分别为disrupt( )、dramap( ),其功能及具体细节会在后面章节展开。接着需要得到点击鼠标的位置坐标,这里利用figure的WindowButtonDowNFCn属性自行定义一个回调函数。此时每次当你在图上按下鼠标的时候,就会转而执行回调函数,整个程序处于监听鼠标事件与调用一次回调函数的循环之中,回调函数的流程如图2中所示。在回调函数中,计算鼠标点击坐标后,根据坐标移动拼图标记矩阵中的元素,这一步由自定义的函数movejig( )完成。然后根据标记矩阵刷新拼图图像,即调用dramap( )函数。最后判断拼图的标记矩阵中元素是否排列正确,如果顺序完全正确则提示游戏完成并结束程序,而不正确时则结束本次的回调函数继续等待鼠标点击。
& _$ x( n; L( a- p0 O" o7 C9 n; g8 `% T8 C4 _0 ~+ c
3.1 开始程序设计2 R, X7 }+ F+ d* u3 m
      首先需要准备一张彩色图片,图片的尺寸最好为正方形(否则不易于后面的处理,而且可能不好看),这里我选择的图片是一张经过裁剪的长宽为300*300的图片,如下文件'jigsawImage.jpeg'& v& [- P* x7 M! X7 M7 v1 C

- e2 D; Y$ ~9 m) H1 |8 z5 D ! ?% B# p' d( M9 \5 t0 m0 Z) _" x

  k8 \: ]* @7 A5 L                                                                                     jigsawImage.jpeg
( j; W0 h# ?6 f0 j5 ]3 k
& Q8 \& W, f* m1 d% q4 W* b" q        在matlab中新建一个m文件,这里我命名的文件名为'jigsaw.m',为了方便两个文件放在同一文件夹下,如下图所示。- F  N/ x& x/ S: X* @- P

, X5 W1 L/ U9 V " e- q. Y* {% W" }- o( z

5 a" e1 ~5 k- E6 s# J$ g                                                                                     图3.1.1 文件存放情况
, U/ P) u- C/ z, w3 j  ~3 z8 S# d- ?0 ^0 u/ K
        准备好这些我们就可以正式开始编写程序了,所有代码编写在jigsaw.m文件中,下面将逐个介绍其中的代码及设计细节。
9 r- d$ ]  E, j, q6 s) F2 `8 [/ @3 v; m1 Z
3.2 分割拼图
; s$ [6 H) P  d  i2 w! `# V      这里我们设计的是一个九宫格的拼图游戏,因此在打乱拼图前需要先将图片平均切割为相等的九份。首先我们来看看MATLAB中图片的储存与表示,执行命令”image=imread('jigsawImage.jpeg');“读入jigsawImage图片(若图片与m文件不在同一位置需输入绝对路径,如image=imread('C:\Users\Administrator\Desktop\jigsaw puzzle\jigsawImage.jpeg');)在MATLAB中的存储情况如图3.2.1所示。( C- A7 Z5 `  O
/ ^. I) Z) u' L1 n

" n8 G6 I2 c$ _- O# n6 w2 i3 l
  S/ J3 R& s0 P4 w                                                                                   图3.2.1 原图存放情况
2 B! y6 u; E6 N1 N( p
% |1 @  [/ `8 l. Q      可以看出MATLAB中图片的存储是以矩阵的形式进行,image是个300*300*3的矩阵,300、300分别是矩阵的横纵尺寸。平均分割image矩阵,则第一块小拼图的数据矩阵可以为x1=image(1:100,1:100,:);这行代码的意思是选取image矩阵中横坐标从1到100,纵坐标也从1到100的那部分矩阵数据。可通过下面的代码验证,帮助简单理解
" m  [! U5 {. K; @; p8 u$ N9 I
/ l/ h3 ]% {. O- k- I6 k. [0 oimage=imread('jigsawImage.jpeg'); %读入图片8 m: y) m  h9 s
figure %产生一个图形窗口
) v& _: Z& L" j% Y2 j( ximshow(image) %显示原图
0 v4 C/ a+ g: j! Q! W, uaxis on %显示坐标轴
: F! o& V0 R4 q; Zfigure1 F7 e' l" m1 y
x1=image(1:100,1:100,:);%分割一个拼图块
5 s2 h5 K0 ?/ W% h( y2 ^/ L  Yimshow(x1);
2 t6 V1 W. Z" j# C, N0 {+ |2 Raxis on5 |( F" j  o0 R) j7 i5 y1 V/ i
在命令窗口执行以上代码,可以看到如下运行结果
: y0 S# C8 w* e4 Q$ g( U; n                                      ' m% ^% M6 I4 H" C
           
* l- p7 l& Z4 ^                                                                         图3.2.2 分割演示结果图2 k2 v+ U# O. }, D
! E! Z( V5 p8 j5 ^2 c7 q
      将整幅图像平均分割成9块,为了方便每一块用一个数字表示,从左到右,从上到下开始将9个小拼图块分别标记为1,2,3,4,5,6,7,8,0;其位置及坐标系如图3.2.3所示
( [( O7 m$ e$ y6 y0 x, }7 u6 n+ a! t6 z; ^# M( }9 F

' J9 x' }7 l" Y9 R
- \* \$ M! m6 y% K* O6 D, D                                                                                          图3.2.3 拼图标记8 n* R  R8 f. l. K; I5 b9 z: F6 E
      6 k% X- s% L+ E8 y4 `
      从上图中可以看到每块拼图在原图中的坐标位置,其实也是矩阵的索引范围,因此同样可以通过上面的方式引用标号为2,3,4,5,6,7,8,0的拼图块,代码如下
3 q3 N1 @8 o1 T8 Wx2=image(1:100,101:200,:);%拼图块2矩阵数据5 w% ^4 m  f2 O
x3=image(1:100,201:300,:);%拼图块3矩阵数据+ ?8 O  H2 V" h' m
x4=image(101:200,1:100,:);%拼图块4矩阵数据
7 x/ B  ~& p; F) s+ J1 X6 Y! ?: Jx5=image(101:200,101:200,:);%拼图块5矩阵数据/ T% _3 G4 p, F, z* [+ `; _
x6=image(101:200,201:300,:);%拼图块6矩阵数据$ j) Y$ m( Z% t( X6 s
x7=image(201:300,1:100,:);%拼图块7矩阵数据) x9 ^8 |8 |6 t% T
x8=image(201:300,101:200,:);%拼图块8矩阵数据4 x/ p$ u* H! g* A, K9 U
x0=image(201:300,201:300,:);%拼图块0矩阵数据
/ X/ V7 _1 m$ f- I+ M; ]" r按照上面的思路,现在自定义一个从原图中分割拼图并按照相应拼图块的标记截取小拼图的函数choose( ),输入参数为image,index,其中image为原图的数据矩阵,index为要选择的拼图块的标记;输出为x,x是标记为index的小拼图块的数据矩阵。代码如下6 L3 T6 v% P5 p4 D5 w1 X
8 T; Z/ ?* R/ X8 E( p2 W1 Z
function x = choose(image,index)7 q5 m* G$ q6 ~/ G0 V0 N, O
%% 根据索引选择对应位置上的拼图块* o, i/ }  T: J9 p
if index > 0 %标记为1,2,3,4,5,6,7,8的拼图块2 ^$ K* e1 ?' t. `  T
    % 计算出行数row以及列数column6 D5 K  Z7 x. S7 n
    row=fix((index-1)/3);4 G( ^$ O/ `7 ]. _) W
    column=mod(index-1,3);, S  w; Z; Z' U9 h& V
    % 分割出对应拼图块数据
6 `' f' y2 R3 Y# l- x( }' h    x=image(1+row*100:100*(row+1),1+column*100:100*(column+1),:);
8 n0 J- J: S' q) B% S& S; Helse* z8 M9 x" j3 Q& B1 L* q* l
    x=uint8(255*ones(100,100,3));%拼图块0矩阵数据/ V6 u. @# S+ i! w$ \
end# v* Q* i; w+ Z; \9 Z
      首先第3到第6行中当index为1,2,3,...,8时先计算出行数row以及列数column,行数可通过求除以3后的商确定,fix( )是MATLAB中的取整函数,而列数可通过求余数确定,mod( )是求余函数,返回index-1除以3的余数。为了便于按照上面的方法分割矩阵,这里的row、column相当于一个倍数,如 x=image(1+row*100:100*(row+1),1+column*100:100*(column+1),:);则将行列数乘分割间隔100(因为选择的图片大小是300*300的,分成3*3的拼图块所以索引间隔为100,若为其他尺寸的图片应为长宽分别除以3后的结果)即可根据行列数row,column引用相应位置上的小拼图块的数据矩阵了。例如index=4时,经过第5,6行代码计算出的row=1,column=0,代入第8行代码中,则实际x=image(1+1*100:100*2,1+0*100:100*1,:);这与前面代码中写出的”x4=image(101:200,1:100,:);%拼图块4矩阵数据“作用一致。+ E+ Z- s7 v) g4 B& i. V
      当index=0时则执行第9行else下的代码部分,你可能会奇怪,为什么拼图块0不是从imge矩阵中分割而是放到else中了?这是因为0这个位置比较特殊,留作空白处,拼图游戏进行时当空白处附近某个拼图块被点击时,该拼图块就会移动到这个空白位置。这里ones( )函数产生一个100*100*3的全1矩阵,乘255则像素灰度值最亮,显示为全白,最后uint8( )统一数据类型。因此当index=0时,执行else中的代码,输出x为一块全白的拼图块。
5 v) {! {5 m4 o) Q* c
3 l/ _, q' ~" L' h6 b  r3.3 按标记序号矩阵显示拼图
1 l8 n% o+ x; |2 x- Q      前面一节介绍了可以通过标记序号分割原图获得小拼图块数据矩阵的方法,一幅拼图可由9块小拼图块拼接而成,因此用一个9个元素的标记矩阵,每个位置上的元素值作为一个标记序号表示相应位置的拼图块,就可以通过这个标记矩阵表示整个的拼图了。          , O/ O/ `8 W) ?

- b0 T) \; r6 {5 b2 X  K      这样原图就可以用矩阵 表示,而任意打乱的拼图也可以通过改变矩阵相应位置上的元素值表示了。现在我们编写一个根据标记矩阵显示对应拼图的函数drawmap( ),输入参数为A,A为一幅拼图的标记矩阵,A大小为3*3。代码如下
( U! W& N3 ~- U" Z- ~% |# O
4 A* j4 }9 d' t0 b. T! Lfunction drawmap(A)1 w# c# r. D8 c' P0 _
%% 将运算数字与对应拼图对应显示图片' P2 B$ @- I1 i+ Y1 H+ H
origin=imread('jigsawImage.jpeg');3 ?. q/ _% I4 {3 ~' h9 X* o2 }
image=origin;
/ s) b- W3 s$ M, ]. F1 T( _ ) u& ~* g& F( F$ `
% 对要显示的拼图进行赋值
! o! a9 b. f! @5 jfor row=1:3
4 G, _8 Y4 ^5 ~3 V% S4 w    for col=1:3
  }, S: v% C8 N7 x. p$ b9 v3 n1 V$ x    image(1+(row-1)*100:100*row,1+(col-1)*100:100*col,:)=choose(origin,A(row,col));
! m5 B* W: ~  N, P' D    end% m0 {, @# x, A* `! v3 D! W
end( g5 y2 J; j' Z" t5 \% E
imshow(image)%显示拼图# {' J" k9 k, T0 Y2 k- b
      第3行代码读入图片并将原图数据矩阵存储在origin中;第4行中image是要显示的拼图数据矩阵,先预定义与origin相同。接下来对image进行逐个赋值,image每一块数据的赋值通过调用前面编写的choose( )函数完成;第9行中”choose(image,A(row,col))“返回标记矩阵A中第row行第col列的元素表示的那一块拼图块的数据矩阵,而前面的一半image(1+(row-1)*100:100*row,1+(col-1)*100:100*col,:)与3.2节中选取每个拼图块的作用类似,这里用于对行数row从1到3,列数col从1到3的拼图块矩阵上的元素逐个赋值。经过9次循环9处拼图块的数据赋值完成,最终显示图像image。可以通过下面的代码简单测试一下drawmap( )函数,设置一个标记矩阵Tag_A=[8 4 5;6 0 3;1 7 2],即Tag_A= ,按照该矩阵显示这幅拼图。
' n. c5 i& d' @7 p4 a+ b) r! J
3 T: b: `" M' g4 ~" g( Dfunction jigsaw()
2 Q% O+ T, m8 H+ Q+ b+ Y, |3 {%% 主函数
+ j1 T# n0 U. p# ~7 N' TTag_A=[8 4 5; 6 0 3; 1 7 2];
! F0 M3 ^$ S& w4 H! C' p! b" Zdrawmap(Tag_A);%按照标记矩阵显示拼图
1 y* D& L* u8 \7 |
3 j1 ]" U. n) F- j& Y0 D ( Z$ L; C3 b  D6 {0 Z7 W2 D' ]
function x = choose(image,index)
% n- ?* Z! Q( n% P8 W& V. k5 |) G%% 根据索引选择对应位置上的拼图块
/ Y- _6 M' z4 v4 Mif index>0 %标记为1,2,3,4,5,6,7,8的拼图块
/ `7 F8 u1 e  W+ e2 x3 m) N/ l    % 计算出行数row以及列数column
# R& {$ a; Z/ x9 x$ l$ h: N+ b    row=fix((index-1)/3);- h' F9 X4 X! C/ P; R/ X/ g
    column=mod(index-1,3);
: ^% B1 A! Z- B4 [! S4 P5 n% I    % 分割出对应拼图块数据
# d* |" N" ?2 y' B    x=image(1+row*100:100*(row+1),1+column*100:100*(column+1),:);
- w9 J- K+ d# |else
3 Y' {/ Y7 i3 d7 L7 q2 f9 w6 T, \    x=uint8(255*ones(100,100,3));%拼图块0矩阵数据
4 B$ g* e; m+ Kend
6 l$ A4 H; C  g, A+ Zfunction drawmap(A)
  y6 c  w8 Q# ?( H- T%% 将运算数字与对应拼图对应显示图片4 h# Q% K9 [2 H+ b9 _2 |
origin=imread('jigsawImage.jpeg');
& V9 o5 c5 W! Z) o7 p9 k+ {0 |, [image=origin;" S' S( h- D* m" G7 R% v& q+ v
% 对要显示的拼图进行赋值$ Q' \) P6 o( n' Z) D& \
for row=1:32 W* o  I1 M% R+ R/ E8 q( N! m6 \8 C
    for col=1:3
5 Z. A0 t' \' @' R% l6 W    image(1+(row-1)*100:100*row,1+(col-1)*100:100*col,:)=choose(origin,A(row,col));
* t8 V7 [+ P) z" t    end
+ E. ?# i( v# P/ e& xend
2 {8 {; o: F! m+ h) Pimshow(image)%显示拼图
( p3 o3 o4 L+ w' W7 ^/ |      运行结果如下图所示,对比每个拼图块的标记可以看出函数能实现根据矩阵的值显示拼图了,距离成功又近了一步。
, t1 g+ i, m/ Y: k1 h
; Y( |7 w6 L: P/ ?) ]! G! k $ B, H% {1 |! o. B. W+ U1 H" U" t4 V1 Z

" z5 I! H+ K( V7 a! m7 ^                                                                                     图3.3.1 测试结果
* ~7 ?+ O" N6 u2 m9 ^$ Y8 |- W* w* R6 J. G! o
3.4 移动拼图" o2 }  u$ O" t1 i
      这部分我们要解决一个逻辑问题,那就是怎么移动拼图。例如,在图3.4.1的拼图中,如果鼠标在空白块的左侧一个拼图块内点击一次,此时左侧的那个拼图块应该往空白处移动,但要怎样才能实现这一过程?
- i3 @4 X% @8 Y" j* Z# {- e+ t$ f+ {0 X" H" [. o5 a5 C
                                    
* D7 q+ _* |9 r+ {9 j- u+ M4 i8 S4 Z: |  I' [7 d$ k- A& V# D$ V, O: A
                                                   图3.4.1 移动拼图过程(左图)                 图3.4.2 拼图行列数(右图)' Z/ @( V8 S3 \( p. O* A
4 c! b$ h. B" m
      为了实现这一过程,这里同样定义一个函数,实现在当前的拼图中根据鼠标所在的行列数移动拼图块,命名为movejig( ) 。输入参数:tag(当前拼图的标记矩阵)、row(鼠标点击位置的行数)、column(鼠标点击位置的列数);输出参数:tag(移动后得到的标记矩阵)。行列数的规定按照图3.4.2的坐标系确定,图3.4.3简单示出了movejig( )函数的大致运行方式。
) S. I8 ]  _4 C5 G6 ~. l: P" r) F/ h0 @9 V: G4 ^# S

. q: J& s) J0 P4 w2 G6 R
; x) F+ a# h6 h7 {% C                                                                                    图3.4.3 函数功能示意图
+ n2 }& j5 r* F
8 u" ^9 N) O+ q3 U  a      这里默认已经知道了鼠标坐标并经过计算得出了鼠标点击处的行列数row,col,至于如何计算将在后面介绍。 movejig( )函数的具体代码如下
" P4 F' _, Z" f/ p4 V$ _+ g: g
5 \7 k& ~* O- }$ e: Pfunction tag=movejig(tag,row,col)1 l# |5 E3 Q1 o  @) N3 K
%% 4个if分4种情况对不同位置处的点坐标与矩阵行列式统一
) c/ L/ }8 b" H- f/ R& m    num = tag(row,col);%鼠标位置与号码牌一致
0 Z; A4 F3 q; g, F: R4 \0 n; C    if (row > 1)&&(tag(row-1,col)==0)%点击位置在第二或第三行,空白块在点击位置的上一行
" `$ n. X  C) u+ b# b) o. u        tag(row-1,col) = num;%交换两个位置上的值  {. Y$ ~: ]- v. ^
        tag(row,col) = 0;! T$ s2 d( ]8 ]" w6 c* r% h6 A+ M
    end+ E: t% n; f; t( G3 H& q1 y8 b
    if (row < 3)&&(tag(row+1,col)==0)%点击位置在第一或第二行,空白块在点击位置的下一行9 `3 i9 P" y6 x2 n
        tag(row+1,col) = num;
' ]8 E7 B- W6 s# B3 J; b        tag(row,col) = 0;  j, G7 j$ v) l  R( {
    end6 E9 t# Y' ^8 |' N
    if (col > 1)&&(tag(row,col-1)==0)%点击位置在第二或第三列,空白块在点击位置的左边一列) X/ W0 ~, e+ J8 p) M# J" b
        tag(row,col-1) = num;; |9 E3 V. D9 \
        tag(row,col) = 0;+ }2 {3 E# B* x9 w5 f3 Q
    end/ `7 f6 q8 E  g+ Q) y
    if (col < 3)&&(tag(row,col+1)==0)%点击位置在第二或第三列,空白块在点击位置的右边一列/ s8 r# B9 M3 N; P
        tag(row,col+1) = num;9 v# _' m6 s# S/ W
        tag(row,col) = 0;: Q' c' A4 t& R: X
    end& B5 H7 H2 e0 C4 a& @( z
      第3行根据点击处的行列号可取出点击位置处拼图块的标记,存为num。第4行至第19行分四种情况考虑可能出现的点击情况,第4行if中的条件row>1说明点击位置在第2行或第3行,并且要求tag(row-1,col)==0即点击处的上一行位置上的标记是0(也就是表示空白拼图块),这两个条件同时满足就是表示鼠标点击的拼图块上面一个拼图块是空白块。条件满足后第5,6行就是将点击处的拼图块和上面的空白块的标记值互换,表示点击拼图块上移。同理,后面三种情况空白处分别出现在点击下方、左边、右边同样交换两个拼图块实现移动。其他情况如点击了某个拼图块而这个拼图块相邻位置上没有空白则不满足条件是不会进行任何操作的。& N) }) ?! Z/ ~- t6 D1 L) F
      其实,上面的四个if条件在拼图时是不会有同时满足的情况的,上述代码中的形式需要判断四次条件虽然没错但显得有点多余,在编程时写成嵌套的if...elseif...end形式则更加合理,这里不这么写是为了防止可能有初学的朋友容易混淆而出错,熟悉的朋友可以自行改写。
: G& O+ d. j* r5 W; W6 ?4 S! k( P      movejig( )函数实现的是标记矩阵中相应元素的移动,结合前面编写的显示函数drawmap( )将得到的移动后的标记作为输入就可以显示移动后的拼图了。* S" F5 D3 B: e. [( \- `
& J5 d; E. ^8 P6 y: r. D) J
3.5 打乱拼图
4 |; a' ^  ~) c' d# {/ a9 w( S( K      游戏开始时需要将一幅完整的图片打乱,那又要怎么实现呢?读到这里您可能就知道了,整个拼图游戏的实现主要是通过标记矩阵进行操作的,即改变标记矩阵,然后按标记矩阵将拼图显示出来。对此前面已多有铺垫,通过打乱标记矩阵的元素的方法打乱拼图自然也就水到渠成。" ]! q7 D1 i* K

& N- N% }, T2 O8 N6 c- t$ {' w8 i      一个简单的想法是,生成一个由0-8的数字随机排列构成的3*3的矩阵作为标记矩阵如下面的矩阵Tag1$ T" J) X  i7 a% M. F) s
4 e& N3 h- x  u' `% Y& I

1 r* D$ N0 O. l2 `& i/ N2 f$ {' U/ n5 ^+ p* U3 v
      然而这样存在的bug是随机产生的矩阵其实大多通过移动拼图是不能完成正确排序的,这在数学上有相关理论研究可得出结论,不研究数学的笔者就不多说了。这里我的想法是模仿人手动打乱拼图的方式,不断随机移动拼图直至拼图顺序完全打乱。前面介绍了移动拼图的函数,这里随机产生点击的行列数然后调用移动拼图函数movejig( ),重复一定次数则可完成拼图打乱。定义一个打乱拼图函数Disrupt( ),返回一个仿手动打乱之后得到的标记矩阵,MATLAB代码如下
) N- z' F8 _' T( \. C& L" P; Y" [function y = Disrupt()
. @" ^7 @1 o) J9 m6 `. }  V%% 随机打乱原拼图排列顺序8 Q2 d/ s! ]: C6 I; f' o. [
y =[1,2,3;4,5,6;7,8,0];
+ r0 L* `9 S1 l$ efor i = 1:360* P; L7 U$ E& O9 R& `7 v
    row=randi([1,3]);%产生一个范围在1到3的整数# P9 y( V1 d4 E& Z
    col=randi([1,3]);2 s; |2 v6 P6 {0 }# x
    y=movejig(y,row,col);%按随机产生的动作打乱拼图5 ]0 z* O, a8 Q8 a# F9 o) q! y. r, E
end' ~* @6 l# M* y! w* y, r
      代码第3行,默认y是一个顺序正确的3*3的矩阵,在第5行for循环中设置移动的次数为360次,每次都产生一个行数row和列数col,其值为1,2,3中随机的一个数,然后第8行调用movejig( )移动拼图。这就仿佛一个人不断在拼图上随机地点击很多次,由于点击拼图块,相应位置上的拼图块就会不断移动。这样做虽然每次盲目产生的row和col不一定都有效,但次数多了无疑会起到打乱拼图的作用。8 ]# H6 o+ p/ }( i
      接下来就可以测试一下了,新建一个m文件,命名为jigsaw.m,在文件中输入如下代码! ?* I8 E( S& H
function jigsaw()( l9 Z% o9 N1 n2 w0 [. \) z& G
%% 主函数
) w) p  \6 n" d) l. O4 aTag_A= Disrupt()%将图像的排列顺序打乱4 F" y& h- v3 n1 x$ X
drawmap(Tag_A);%按照标记矩阵显示拼图& U! s; E+ E" ~+ s4 k1 P
7 \  L2 y* x; Z) P

) ^# a7 k9 e3 m; Q1 e  p' T8 c4 Lfunction tag=movejig(tag,row,col)
: N- \+ e1 j) H %% 4个if分4种情况对不同位置处的点坐标与矩阵行列式统一3 Z4 @! `3 p0 y8 Z; k8 S2 z
    num = tag(row,col);%鼠标位置与号码牌一致
) ^8 R+ l% r3 L% E    if (row > 1)&&(tag(row-1,col)==0)%点击位置在第二或第三行,空白块在点击位置的上一行
3 b8 I7 Z# P. `( N        tag(row-1,col) = num;%交换两个位置上的值: @1 T) L0 v# \" d4 }4 A) h
        tag(row,col) = 0;" D2 D% N& @9 Z! N
    end
3 l( y* z8 Y; L# f    if (row < 3)&&(tag(row+1,col)==0)%点击位置在第一或第二行,空白块在点击位置的下一行
- z) ]/ \8 l" t$ M3 O) ]        tag(row+1,col) = num;7 i! V1 F1 c/ n6 [9 j
        tag(row,col) = 0;
5 c  Q2 D6 T2 u& _    end
  O+ l) i5 }6 l' T$ s! V; O. J    if (col > 1)&&(tag(row,col-1)==0)%点击位置在第二或第三列,空白块在点击位置的左边一列
. T8 ^2 q: U/ g9 m        tag(row,col-1) = num;2 ^* ]7 J1 E! a- e7 N* n
        tag(row,col) = 0;
6 K; Q  d0 y$ n0 W! I    end
* a! M% q7 H! c0 s  }- O/ D+ H* v    if (col < 3)&&(tag(row,col+1)==0)%点击位置在第二或第三列,空白块在点击位置的右边一列, i* p- j4 Z0 r4 x" ^$ b' {
        tag(row,col+1) = num;# [6 a6 s) v( D# T8 U$ y
        tag(row,col) = 0;
4 _+ X: C1 a# w, E/ r    end- i; v8 y- D* O4 W- _
   
! }8 v  [5 v& O, K
! O  d, {0 ~8 q8 ~8 N4 Ofunction y = Disrupt()
) s1 E) M7 w* u, ?( r%% 随机打乱原拼图排列顺序3 F/ a( @5 d2 N* C% q
y =[1,2,3;4,5,6;7,8,0];. ?( T% w" U' [* p1 n  b0 `

) l/ s% s' ]3 xfor i = 1:360
7 x' ?3 U* s$ Q' Z3 O    row=randi([1,3]);%产生一个范围在1到3的整数" h' W  a* X1 L0 p  |: l
    col=randi([1,3]);0 Y$ `4 Q, ?4 c
    y=movejig(y,row,col);%按随机产生的动作打乱拼图2 Z: F( D- p% @6 u( Y* @
end) Z( `/ U2 h; G6 Z( V) B* t( w0 R# D

3 \6 Q7 D/ `7 {6 E, _1 C 5 q+ \% B2 r$ N- C3 x  z& r" d) c
+ [* T3 z% ]/ ^" {/ G- c
function x = choose(image,index)
! v* t, f4 m% [%% 根据索引选择对应位置上的拼图块
8 `! {/ T  @+ O* V! e# Vif index>0 %标记为1,2,3,4,5,6,7,8的拼图块, h% c) N' U( F0 f; I
    % 计算出行数row以及列数column) V+ d/ l5 k3 _1 g( I$ z3 N7 S& f: {
    row=fix((index-1)/3);) A3 f0 P' C- q; s+ l7 u1 i$ y5 Y- Y
    column=mod(index-1,3);/ c1 i6 ~  H7 b9 ]' [3 r9 o) ]
    % 分割出对应拼图块数据
5 u, e9 v  }6 J* _5 \. S* O8 ?    x=image(1+row*100:100*(row+1),1+column*100:100*(column+1),:);
- ^. N% p; i8 E5 u7 z3 `else4 N& M2 G7 H: t
    x=uint8(255*ones(100,100,3));%拼图块0矩阵数据
  W% I7 B. x  J. uend
( P" a9 [, Y+ @+ u# J0 Wfunction drawmap(A)+ L$ }2 Y6 q# v7 D2 W, B) M
%% 将运算数字与对应拼图对应显示图片
2 |( L) t0 t6 K, @origin=imread('jigsawImage.jpeg');- V& g) k0 ?- I% a7 n0 ^/ V1 D8 c
image=origin;
% |7 V7 D0 `- F4 t% 对要显示的拼图进行赋值
! u! l5 D! N* `. [9 T& F; [for row=1:39 B4 }% K$ P7 b- D$ Q- L. q4 r
    for col=1:3* M5 V' o) b/ J$ \7 U
    image(1+(row-1)*100:100*row,1+(col-1)*100:100*col,:)=choose(origin,A(row,col));& H8 i7 N  D8 N, l5 n6 E7 g, A
    end& U- @) ^9 C2 `0 c# m% y5 Y! _/ P$ U
end6 N6 A" q, W6 g) J& q4 Z6 c9 f
imshow(image)%显示拼图/ G2 b. {2 a4 P) B' T
    运行结果如图3.5.1所示
9 L) D8 c' b9 b5 S& O" P                                                
6 w! ]. ^* w# X3 o7 p) V  G 3 J% l9 l. o, @

' S9 K1 `+ ?/ W# ?  e& \$ A
* t+ F* t, T- |                                           % ^% v8 P( Q* s: X# D8 p
                                 图3.5.1 打乱拼图测试1 D/ B3 L. _. D. q; l: p7 u' w

2 c# R8 N3 |0 e3.6 拼图主函数4 A! v% D( t3 A# e# m
      主函数是完成拼图任务的核心,主函数的设计思路是首先将标记矩阵打乱,并按照标记矩阵中的排列显示拼图块,然后需要获得鼠标点击处的位置坐标以移动拼图,每次移动后判断拼图顺序是否已经正确,顺序正确后结束游戏。前面已经完成了标记矩阵的打乱和显示以及根据鼠标位置移动拼图的函数,那么现在的问题就剩下鼠标位置的获取了。& H# }: @$ Q) `2 j* k8 }- C3 L$ K

! G0 k2 ]( [" @5 F8 D9 P      MATLAB中获取鼠标坐标值有两种途径。第一种是利用ginput( )函数,该函数提供一个十字光标帮助更精确选择所需要的位置并返回坐标值,函数调用形式如[x y]=ginput(1),x,y分别为横纵坐标。这确实为一个简单实用的方法,开始时我就是采用的这种方式,在主函数中利用while循环重复调用ginput( )函数获取每次点击处的坐标值,结果证明是可行的,效果如下图3.6.1所示。9 X7 c9 p7 ]! L, U/ ^

5 q7 b  G: X- g% S , i* c# t7 G4 ?* B' p3 u  d
9 K: u$ H+ S7 {8 S4 ~, g0 K
图3.6.1 利用ginput( )的方式实现效果) ~5 E/ c7 {# f& E  H

3 ?% A# ^( w: m8 N      这样的类似方法网上提到很多,让我感觉不太好的一点是这个十字光标精确是精确,但是在这个拼图中显得有些多余,怎么删去这个光标寻找半天,未果。还有就是用while循环编写的代码每次关掉这个图形窗口都会甩出一个大大的类似下图那样的错误,这就让有点小小处女座的我不能忍了,转而编写了另外一个版本。
, n- F& X- L+ ]: G( G/ q/ ]
, V1 }8 l# V; `4 p& ]1 C2 } ' L& H" O$ }( ?! j% e, x  q

2 e: Q$ L: U+ M- m      第二种方法是利用figure的WindowButtonDownFcn属性定义一个坐标获取的回调函数。当在图上按下鼠标的时候,就会自动执行回调函数来获取坐标值。主函数命名为jigsaw( ),与文件名一致,其代码如下
: }  o+ s) k* q2 Q
+ g0 l/ Z; \  D/ I" m# S$ {8 E( Nfunction jigsaw()
" O" T% t" l& q: _3 C. ~  w5 t%% 主函数; w" ^* R$ T1 S% b: Z" R6 P. N0 r% \
Tag_A= Disrupt();%将标记矩阵的排列顺序打乱& V' J* C& {/ u' }
drawmap(Tag_A);%按照标记矩阵显示拼图" ?. c# k1 r7 r' J- G5 M  @

, E" F' l6 r1 B/ F4 j) `  c& wglobal Tag;%Tag是标记矩阵,定义成全局变量,方便传递参数
0 O/ Q7 b) j+ i+ c2 ^+ wTag=Tag_A;9 V  n1 x. u/ d
set(gcf,'windowButtonDownFcn',@ButtonDownFcn);%点击鼠标时调用ButtonDownFcn函数8 |3 X, I2 w$ {- V1 y. h0 y0 q
      代码第3,4行调用前面的函数打乱和显示,不必多说;第6,7行意在将标记矩阵定义成全局变量并赋值为Tag_A,其目的在于在后面的回调函数中需要用到标记矩阵,这样方便传递参数,这里可以不必深究;第8行就是设置windowButtonDownFcn属性的回调函数,gcf表示当前图形窗口句柄,ButtonDownFcn是回调函数名,@ButtonDownFcn表示其函数句柄,整条代码就是设置当在当前图形窗口中点击鼠标时就会转而执行ButtonDownFcn函数。
  t9 @5 q1 _) c, [& [/ d$ A" `0 T  U. K
3.7 回调函数& h: V$ p) X0 C9 f" R" A
      根据上一节的设置每次点击鼠标时就会执行一次回调函数,因此可以在回调函数中编写程序获取当前鼠标位置并据此移动一次拼图,然后判断拼图是否完成。定义回调函数ButtonDownFcn( ),输入参数src、event为系统约定变量,函数代码如下
# F- k* F% C7 q2 |3 T& W  Z
9 w. }4 C4 ?' V1 T" Kfunction ButtonDownFcn(src,event)2 C/ X5 l4 i. W$ R7 _! s+ h9 P+ ^
%% 回调函数,鼠标点击事件发生时调用
1 T0 O8 g" B, a" Vpt=get(gca,'CurrentPoint');%获取当前鼠标点击位置坐标. l5 [0 P3 Q! W4 i8 B0 f  k
xpos=pt(1,1);%鼠标点击处的横坐标实际值1 g- F2 ?7 X7 T
ypos=pt(1,2);%鼠标点击处的纵坐标实际值# v! s1 D8 D) N
   
5 G" E# a  }$ c3 a1 ]. Ecol = ceil(xpos/100);%将横坐标值转换为列数% H2 w, i1 n; X$ U2 ^" n) w" o
row = ceil(ypos/100);%将纵坐标值转换为行数* q4 g- y- C! Z4 _

1 P. j4 P4 M  m/ n8 Tglobal Tag; %全局变量声明
' \' P% u5 M. D) [+ z" T
8 r3 I! e1 ?. [" q, F- S  b0 Y6 {if(col<=3&&col>0)&&(row<=3&&row>0)%鼠标点击位置在有效范围内   
: b, M, L7 x2 Z9 e. B5 b: ~    Tag=movejig(Tag,row,col);%按点击位置移动拼图$ G: k/ Z/ f( e* v' `8 K" g
    2 G( X: {& Y/ q% f
    drawmap(Tag)%显示拼图
+ H! A! \# N; x    % r8 F' G# T& n6 G' \% c9 |
    order = [1 2 3;4 5 6;7 8 0];%顺序矩阵" |, S- \- t/ |. [
    zt = abs(Tag-order);%比较两个矩阵3 F( q; j7 c4 h. d+ D4 ~  O
    if sum(zt(:))==0 %顺序已经完全吻合
2 ~1 T* n/ c3 I9 [' W        image=imread('jigsawImage.jpeg');8 Y7 [" H& c! t0 V4 t( x  ^
        imshow(image) %游戏完成,补全拼图
3 I* D4 ?$ D/ I0 j8 K, D        msgbox('You did a good job ,恭喜完成!!!') %提示完成信息# M+ M5 B  B3 F+ [
        pause(0.5);%延迟半秒
% W6 ?3 i: M6 G* o* {        close all %游戏结束,关闭所有图像窗口
4 v) C6 A* a% f    end
( m$ b9 P9 N  Z8 E   
: h7 Y. e+ v) ^4 relse
4 n8 b  @7 ?+ D! H    return0 G+ t6 T1 u6 W8 g) j: z4 m
    , k* R/ s& l) N1 j
end
% t1 S% X; ~" m) m6 X      代码第3行利用get( )获取鼠标位置坐标,gca表示获取当前坐标系句柄即在当前坐标系中获取坐标值,CurrentPoint是当前点属性值,返回的pt为一行两列的数组,其元素分别为横纵坐标值。第4,5行是分别取出横纵坐标值,第7,8行代码求出行列数,因为图片的尺寸为300*300,分成3行3列,所以将鼠标坐标值除以100即可得出所在的行列数,如果选取的图片为其他尺寸应除以其他相应的数字。9 e  x5 M9 C" L# B' W3 n* H

; z. S$ J2 Z2 I1 n      第10行声明全局变量Tag,在3.6节中定义过了,这里再度声明表示与前面定义的一致,Tag共享其数值,前面的标记矩阵这里就能使用了。- `4 b; Y' I( T3 N5 h% E
8 r( R- _, ]1 f6 Y
      第12行中,判断点击鼠标的位置是不是在拼图中,因为在图形窗口中点击时若点击位置不在图片上时,返回的坐标值会出现异常值,避免的方法是只有行列数在1到3内的点击才进行处理,不满足条件时跳至第27行返回,结束本次回调函数的运行。
3 s( {' l% X# u2 t7 X. l- c" w) I, r
      第13,15行按照点击的行列数移动拼图的标记矩阵,然后按照标记矩阵显示拼图。第17行定义一个顺序矩阵用于标记矩阵的比较,第18行将移动后的标记矩阵与顺序矩阵相减取绝对值,abs( )为取绝对值函数,可以知道如果两个矩阵完全一致则相减之后的结果每个位置上的元素都为0,反之不然。, |) g: J8 P, e6 B5 l
2 X; A7 k" B* P9 d. F
      第19行中,if sum(zt(:))==0即如果zt中所有元素的和等于0,满足这个条件时表示游戏完成了,此时将拼图空白的那块补全,第20,21行读取原图然后显示,这一过程连续起来的瞬间就表现为拼图空白处被补全了。' B, k# R/ y, O# P

: {: i) d( i7 D- y, d      第22行弹出一个提示窗口,展示的信息为“You did a good job ,恭喜完成!!!”。第23行暂停0.5秒,第24行在暂停半秒之后关闭所有图形窗口,游戏结束。* M, a1 c) x4 e- l! \" f
; ~/ U- @* Z# {1 _
4.完整代码  a, s0 L% S  Y& @6 j
      所有工作完成,完整的程序m文件以及图片文件已经上传大家可以点击链接下载基于MATLAB的拼图游戏,直接打开jigsaw.m文件即可运行程序。下面是完整的MATLAB代码,大家可以自行新建jigsaw.m文件,复制以下代码至文件中同样可以运行拼图程序。注意下载jigsawImage.jpeg图片文件,与jigsaw.m文件放在同一文件夹下。注意,如更换图片需要适当修改程序。
& W9 o# _9 v3 P( c& |/ V
8 ]! }* K7 t4 m%% 制作人:吴限
7 v9 N" P* ?" L: {+ A! c2 O% 2018年2月14日
( H) P0 M4 j% g) S9 Ifunction jigsaw()# |: a  C6 L. d3 e6 U/ V' y
%% 主函数
9 p' T9 C' `5 u0 a5 q( nTag_A= Disrupt();%将标记矩阵的排列顺序打乱
8 ?' \9 g! l" K  E! @6 Q4 L; hdrawmap(Tag_A);%按照标记矩阵显示拼图0 ^% b7 h/ S- r( Q  _: @: r' I

9 x, {3 W) S9 E  R6 W! k, Rglobal Tag;%Tag是标记矩阵,定义成全局变量,方便传递参数, W) O1 n/ _6 O- P6 z
Tag=Tag_A;5 A7 D3 V  c- k3 X3 Q
set(gcf,'windowButtonDownFcn',@ButtonDownFcn);%点击鼠标时调用ButtonDownFcn函数/ H* a( L# ]) w5 }$ l& ], L, r0 @/ ]
! z' u. c9 g9 D  ]/ a1 a
, g0 U' g2 o0 H% Q
, B1 U0 s* {* W* u( J' O
function ButtonDownFcn(src,event)
4 M9 X2 W( o  L%% 回调函数,鼠标点击事件发生时调用7 U+ ]3 X: S/ h9 [$ k3 B5 L9 ~: R
pt=get(gca,'CurrentPoint');%获取当前鼠标点击位置坐标
1 {  S3 v9 @/ W+ g7 B. rxpos=pt(1,1);%鼠标点击处的横坐标实际值
+ E; e6 w' @; nypos=pt(1,2);%鼠标点击处的纵坐标实际值
% O" J% W5 N" H. f) `   + m0 h4 `2 M$ X! D3 q# b+ V
col = ceil(xpos/100);%将横坐标值转换为列数
# D2 s5 ^& H1 \row = ceil(ypos/100);%将纵坐标值转换为行数0 w# @3 Y! s& H4 b: `
, [% A" c5 Z% P/ U  T# p
global Tag; %全局变量声明# t7 `# Q) B) W: Z6 w+ N
$ e7 X( z, v( Z& U8 A; F0 Y
if(col <= 3 && col >0)&&(row <= 3&&row > 0)%鼠标点击位置在有效范围内    5 ~2 {2 B# e( j) B9 n
    Tag=movejig(Tag,row,col);%按点击位置移动拼图
! a' i+ [. D5 p    - r, Z% u) v, v( I! `  ^
    drawmap(Tag)%显示拼图* G- w" R$ F- M& z
   
% H0 ]5 R' A! A) `3 r7 T    order = [1 2 3;4 5 6;7 8 0];%顺序矩阵
# n0 M! n% Y1 ?3 H$ ?5 l/ V    zt = abs(Tag-order);%比较两个矩阵0 h5 R6 W9 A: z# C
    if sum(zt(:))==0 %顺序已经完全吻合
8 i7 s6 p% X. i        image=imread('jigsawImage.jpeg');
( |! Y: c: L# C$ o% A        imshow(image) %游戏完成,补全拼图
. d1 S) `( w# r+ f2 L  i; s        msgbox('You did a good job ,恭喜完成!!!') %提示完成信息; l! u5 I/ U# c0 ^7 ~' Y
        pause(0.5);%延迟半秒" e: ?3 \9 G4 l! Z( j
        close all %游戏结束,关闭所有图像窗口
8 m$ p7 f% j7 K) w! ]$ A8 ^" Y    end
! N" w' X6 @. h, ?2 B( f9 z$ K  Y      R* p# s9 C9 B
else
5 w2 d  S/ e5 f1 U; P5 i, v# D    return
" W, ^( F. O, K! U$ \, Y, Q# n" a2 |    9 D4 O6 T* i) a& {4 l# S4 w- Z* A
end" U5 S3 D/ s% c: K
+ l4 w9 v, u) V, I3 |! G0 [

- o- v3 G0 s, J6 `. a * F+ u1 Z4 V4 d1 g$ e
$ ?7 N7 H: Q* H( J
function tag=movejig(tag,row,col)% H. W6 F8 v' q, c) N0 X
%% 4个if分4种情况对不同位置处的点坐标与矩阵行列式统一
& T3 o8 V' A4 W( j. G    num = tag(row,col);%鼠标位置与号码牌一致
& E3 ]1 {% B9 y& c3 G2 p    if (row > 1)&&(tag(row-1,col)==0)%点击位置在第二或第三行,空白块在点击位置的上一行
- y9 w* k0 Q6 A+ q, ?- Y9 h% Y        tag(row-1,col) = num;%交换两个位置上的值  Q, o, {' Z" F% b, |: K9 j
        tag(row,col) = 0;
. W" x7 h% @! @- i9 C    end1 A+ p2 v0 b  ]& `, \
    if (row < 3)&&(tag(row+1,col)==0)%点击位置在第一或第二行,空白块在点击位置的下一行
* s& y  F' n: ^5 A; U5 ?! P        tag(row+1,col) = num;
0 J5 [! ~% v4 d1 y) T5 q        tag(row,col) = 0;
3 _; i7 {) e5 F* o& g# M% W    end
7 `. l, d4 x# ~: U4 t& g    if (col > 1)&&(tag(row,col-1)==0)%点击位置在第二或第三列,空白块在点击位置的左边一列
. ^8 k7 M( r4 J        tag(row,col-1) = num;
8 G) e2 ]- s- z) E0 Y* q9 z1 ~        tag(row,col) = 0;1 _2 c" ]" l4 V9 o# F- d4 e, u
    end
9 q8 o4 O2 T! |. R+ O" C, ~    if (col < 3)&&(tag(row,col+1)==0)%点击位置在第二或第三列,空白块在点击位置的右边一列, C$ d( `$ b# I5 ]& K
        tag(row,col+1) = num;6 F5 y0 X. L/ ?. r1 x
        tag(row,col) = 0;7 ^7 r0 z# P* s* {6 I" y: j
    end
$ b4 x0 L9 U/ s; @5 J; m   - n7 d9 o* l5 s' x
# C; n) l& \2 X3 e& g

1 M6 j, @& I: v2 ]- g$ u3 zfunction y = Disrupt()2 u) D/ ?9 o( ~+ ?4 t" D' {
%% 随机打乱原拼图排列顺序' U6 P2 u2 P- i
y =[1,2,3;4,5,6;7,8,0];) m" z, ^5 \4 n# `- M- m) X0 g% A; t) i

3 B4 i2 ]7 c) }) z" w. E$ `! C( _- rfor i = 1:360
  @1 u; [: Z$ i. G3 l$ q    row=randi([1,3]);%产生一个范围在1到3的整数1 \8 r8 O. s( J% h) ^( [4 W
    col=randi([1,3]);0 d7 R; W3 z' l0 ~, F3 D% {
    y=movejig(y,row,col);%按随机产生的动作打乱拼图& r. K# @1 `0 Y# h
end4 B3 w) k+ N: C; p( ~
0 l" p8 b5 Y# r
! _2 l5 R' D: ^& T5 l: A: g0 R
& _6 U$ A4 u! M% `4 M8 M) e2 R+ O
function x = choose(image,index)
9 ^- F" m/ j. R& O7 N%% 根据索引选择对应位置上的拼图块
/ f( E9 }+ {% C5 b" xif index > 0 %标记为1,2,3,4,5,6,7,8的拼图块
0 [2 h/ I; v' @# ?6 t* w! `. M/ @& e    % 计算出行数row以及列数column) p' k8 a6 |5 _9 x0 x. {0 {3 k! K9 o
    row=fix((index-1)/3);  E1 ?1 U4 ?" ?! _) P4 j
    column=mod(index-1,3);3 J# V! l) ]7 y! h4 M
    % 分割出对应拼图块数据0 Y1 x! B. [5 f
    x=image(1+row*100:100*(row+1),1+column*100:100*(column+1),:);
; `$ a' D2 q2 u+ u: Felse4 ~, e, s. s3 W& t$ f
    x=uint8(255*ones(100,100,3));%拼图块0矩阵数据
! h- e1 a, \, O$ i! Tend: u+ B  k, d3 y6 _; M0 h3 Z
function drawmap(A)
: y! ?- i( G+ O/ B# l- x" g%% 将运算数字与对应拼图对应显示图片
( Y0 k/ P  x  _; {origin=imread('jigsawImage.jpeg');1 p: x3 ?0 F$ k1 G' z5 ?
image=origin;
7 I7 S. E! u& H/ W) s9 ~' N % y" S6 G5 o2 y
% 对要显示的拼图进行赋值  e4 N% _8 z2 g, j& \7 Y
for row=1:3# g8 \% y* L$ H, X9 c6 [
    for col=1:3+ n7 o! C  C: A
    image(1+(row-1)*100:100*row,1+(col-1)*100:100*col,:)=choose(origin,A(row,col));
! r) N8 @2 X/ e, D/ v3 L* \    end+ v# ^7 Q6 i6 W+ e) @
end0 x4 A( O8 I8 [5 L+ X8 a
imshow(image)%显示拼图( ?! V" ?2 e# b8 C

& B, b, C& ~% ^8 o9 N# O
2 Y  S# ?! ?6 Y6 X$ N5 B/ E5.反思与总结
7 L6 {" o, G0 ~: s6 [
" f7 {: a2 {3 P+ e/ `1 O6 C$ m1 W' Q8 }/ w  d
      MATLAB大多用于数据处理以及工程计算,几乎很少有用MATLAB编写游戏的,这也符合实际情况因为编写游戏毕竟不是MATLAB的专长,其实MATLAB发展至今已经成为一个足够完善的编程语言许多java,c中的功能在MATLAB中同样也能实现。例如MATLAB具有高级图形处理功能,可以通过图形对象的属性完成许多复杂工作,前面鼠标位置的获取用的就是这一功能。
) D1 p, g6 N* R7 Q- Y. d
! o  Y+ X6 G0 O! |+ |( q' k      整个拼图游戏的设计其实可以看成一个数学建模过程,代表拼图块的标记矩阵就是我们建立的模型,通过对这个模型矩阵元素排序问题的求解、分析最终完成这个拼图任务。更多数学建模的知识大家可以自行上网搜索。
+ p, L* N' r- i8 i" @
1 n- K, d7 S( h, Q4 g      纵观整个拼图游戏的编写,在基本功能上可以改进与提高的地方如下+ G, \& E7 f, a4 t+ \; x& v: r$ e
& }& ^3 B  r3 |: n0 b
一、增加自行挑选设置拼图所用图片的功能。0 W- E3 ^* V6 a8 X4 x: O
, _; y/ T* H9 b( I
二、增加拼图的难度,设计4*4或5*5甚至更复杂的拼图。
5 V9 _% `2 \* X& j! f* W
& w: ]+ E$ U- q6 [6 I0 ]* B三、利用MATLAB的GUI功能,为游戏设计一个好看的用户图形界面。+ h* j1 v5 L0 w2 W
* R" o& t$ G5 c1 i
四、设计一个一键完成拼图的算法,让程序以最优步数自行移动拼图完成拼图。实现上可采用原始的方法或者机器学习的算法。
3 P* J! e6 W7 M, ?5 I
5 X- S1 j, S0 _1 v. z- Y( \五、拼图块的形状与移动方式上也可不必局限这一种,稍作创新兴许一个新型的游戏就会被创造出来。7 ~9 ~6 g, ^: ]

6 ^8 [+ {; v. d* C4 U      关于上述的改进之处,有机会将在后面介绍。7 S( l1 m% x  J, S
: _: y* y6 A& E$ w. A

4 @  R0 ?5 V5 ?1 ]& u5 a$ j, A& o$ X0 G2 X$ @. D* b2 u2 @( C
6. 结束语
( B1 e4 E% F9 V! i      这就是利用MATLAB进行拼图游戏编写的全部内容了,虽然拼图游戏本身不足为奇,但利用MATLAB编写的完整程序不多,而且或多或少会有一点小bug,本博文介绍的方法在多次修改之下,其程序严谨没有错误。由于编者能力有限,代码即使经过了多次校对,也难免会有疏漏之处。希望您能热心指出其中的错误,以便下次修改时能以一个更完美更严谨的样子,呈现在大家面前。同时如果有更好的实现方法也请您不吝赐教。3 e; q- h3 P1 B( c# a

该用户从未签到

2#
发表于 2021-1-20 13:33 | 只看该作者
利用MATLAB进行拼图游戏设计
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

推荐内容上一条 /1 下一条

EDA365公众号

关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

GMT+8, 2025-11-24 04:29 , Processed in 0.187500 second(s), 26 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

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