欢迎来到淘文阁 - 分享文档赚钱的网站! | 帮助中心 好文档才是您的得力助手!
淘文阁 - 分享文档赚钱的网站
全部分类
  • 研究报告>
  • 管理文献>
  • 标准材料>
  • 技术资料>
  • 教育专区>
  • 应用文书>
  • 生活休闲>
  • 考试试题>
  • pptx模板>
  • 工商注册>
  • 期刊短文>
  • 图片设计>
  • ImageVerifierCode 换一换

    matlab编程(五子棋)共6页word资料.doc

    • 资源ID:33865149       资源大小:157KB        全文页数:6页
    • 资源格式: DOC        下载积分:15金币
    快捷下载 游客一键下载
    会员登录下载
    微信登录下载
    三方登录下载: 微信开放平台登录   QQ登录  
    二维码
    微信扫一扫登录
    下载资源需要15金币
    邮箱/手机:
    温馨提示:
    快捷下载时,用户名和密码都是您填写的邮箱或者手机号,方便查询和重复下载(系统自动生成)。
    如填写123,账号就是123,密码也是123。
    支付方式: 支付宝    微信支付   
    验证码:   换一换

     
    账号:
    密码:
    验证码:   换一换
      忘记密码?
        
    友情提示
    2、PDF文件下载后,可能会被浏览器默认打开,此种情况可以点击浏览器菜单,保存网页到桌面,就可以正常下载了。
    3、本站不支持迅雷下载,请使用电脑自带的IE浏览器,或者360浏览器、谷歌浏览器下载即可。
    4、本站资源下载后的文档和图纸-无水印,预览文档经过压缩,下载后原文更清晰。
    5、试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓。

    matlab编程(五子棋)共6页word资料.doc

    如有侵权,请联系网站删除,仅供学习与交流matlab编程(五子棋)【精品文档】第 6 页function five() M文件的一种类型,以function开启的函数文件,另一种是把一系列命令结合在一起的一般M文件 figure(1) 创建一个新的图形对象axis(0 12 0 12); 坐标轴范围控制命令,axis(xmin xmax ymin ymax)用于设置图表各坐标轴的刻度范围hold on 图形保持功能,当前坐标轴和图形都将保持,此后绘制的图形都将添加在这个图形之上,并且自动调整坐标轴的范围axis off 取消坐标轴背景,在运行的图中不显示坐标for i = 1:11 a:b:c第一个为起始值,第二个为增量(增量为1,冒号省略),第三个为结束值 line(1 11,i i); 画网格line(1,2,3,4)将画出(1,3)到(2,4)的一条直线 line(i i,1 11);endaxis equal 横纵坐标使用相同的刻度(使每一个格子成为正方形)qishou = 1; 判断棋手的颜色,开始的时候是红色,取0时是黑色boardstatus = zeros(10); 棋盘状态gt矩阵,取0为空,取1为黑,取2为红zeros(10)将画出10*10的零阵,代表棋盘上的100个位置while 1 hold on posflag = 1; 用于判断下的棋是否有效,取1说明下的棋无效,要重新下 while posflag xpos,ypos = ginput(1); 能从当前的坐标中读取n个点并返回这n个点的x,y坐标,均为n x1向量,程序运行时,在界面鼠标会以一个十字线移动,便是ginput(x)的功能 xpos = 0.5*(floor(xpos)+ceil(xpos); x,y为圆心,floor(x)地板函数,即舍去正小数至最近整数 ypos = 0.5*(floor(ypos)+ceil(ypos); ceil(x)天花板函数,即加入正小数至最近整数,例如x=9.5,floo(x)=9,ceil(x)=10 if xpos<=0.5|xpos>=11|ypos<=0.5|ypos>=11 点到棋盘外了,回到上面的循环 continue end for n=1:10 判断棋子是否下到边界,若在边线上,判断无效,继续 if xpos=n|ypos=n continue end rx = floor(xpos); boardstatus是10*10零阵从1*1开始,所以用floor函数 ry = floor(ypos); if boardstatus(rx,ry)=1|boardstatus(rx,ry)=2 该位置已经有棋子 continue; 回到上面的循环 end posflag = 0; 跳出循环 end if qishou=1 drawthego(xpos,ypos,qishou); boardstatus(rx,ry)=1; 此空为红棋 qishou = 0; 轮到黑棋下 else drawthego(xpos,ypos,qishou); boardstatus(rx,ry)=2; 此空位黑棋 qishou = 1; 轮到红棋下 end if iswin(boardstatus,rx,ry)=1 if qishou=1 winmsg = '黑棋连成了五颗,黑棋胜!' else winmsg = '红棋连成了五颗,红棋胜!' end if iswin(boardstatus,rx,ry)=2 winmsg = '和棋' msgbox(winmsg) msgbox(Message) 创建一个对话框,根据figure窗体大小自动将Message换行。Message可以是一个字符串向量、字符串矩阵或者元胞数组,弹出赢家是红方或黑方的或和棋的对话框 return endaxis(0 12 0 12); 坐标轴范围控制命令,axis(xmin xmax ymin ymax)用 于设置图表各坐标轴的刻度范围 axis equal 横纵坐标使用相同的刻度(使每个格子是正方形)endfigure(1) 创建一个新的图形对象axis(0 10 0 10); 坐标轴范围控制命令,axis(xmin xmax ymin ymax)用于设 置图表各坐标轴的刻度范围 axis equal 横纵坐标使用相同的刻度(使每个格子为正方形)【上三行为无效语句在程序中无作用】function drawthego(x,y,flag) 在(x,y)处画一个棋子 flag取1时画红棋 flag取0时画黑棋t = 0:pi/100:2*pi; 画最外面一层的圆周,x,y是圆心0.5为半径,其中增量只要足够小就行不必非取pi/100,若想要画到格子的点上,只需将圆心移到格点坐标rx = x+0.5*cos(t); ry = y+0.5*sin(t);if flag=1 fill(rx,ry,'r'); fill(x1,x2,x3,x4,y1,y2,y3,y4,'k') x1,x2,x3,x4,y1,y2,y3,y4区域内的颜色填充为黑色,'k'表示黑色r是红色,flag取1画红色,flag取0画黑色 else fill(rx,ry,'k');endfunction w = iswin(board,x,y) 判断是否赢棋w = 0; if isempty(find(board)=0) 棋盘上下满棋了,判为和棋,find(A)计算一个数组,它包含数组A中非零元素的索引【此if循环判断和棋有误,find(A)函数返回的是行列向量】,应该统计棋子个数,若为棋盘的最大容量就和棋 w=2; return;end修改如下:在刚下棋的后面判断flag = board(x,y); 刚下的棋sum=0;for i=1:10 for j=1:10 if boardstatus(i,j)=1|boardstatus(i,j)=2 该位置已经有棋子 sum=sum+1;if sum=100 w=2;return;k = 0; 统计连在一起的棋的个数for i = x:10 统计从此子开始,横向到右边界的同色个数 if board(i,y)=flag 判断在此过程中,棋子与刚下的棋的颜色是否一样,不一样就跳出循环 break end k = k+1;endif k>=5 w=1; returnendfor i = x-1:-1:1 统计从此子开始,横向到左边界的同色个数 if board(i,y)=flag 判断在此过程中,棋子与刚下的棋的颜色是否一样,不一样就跳出循环 break; end k = k+1;endif k>=5 w=1; returnendk = 0;for i = y:10 统计从此子开始,纵向到上边界的同色个数 if board(x,i)=flag 判断在此过程中,棋子与刚下的棋的颜色是否一样,不一样就跳出循环 break; end k = k+1;endif k>=5 w=1; returnendfor i = y-1:-1:1 统计从此子开始,纵向到下边界的同色个数 if board(x,i)=flag 判断在此过程中,棋子与刚下的棋的颜色是否一样,不一样就跳出循环 break; end k = k+1;endif k>=5 w=1; returnendk = 0; 统计主对角线,斜向上同色子的个数for i = 0:10 if x+i>10 break end if y+i>10 break; end if board(x+i,y+i)=flag 判断在此过程中,棋子与刚下的棋的颜色是否一样,不一样就跳出循环 break; end k = k+1;endif k>=5 w=1; returnendfor i = 1:10 统计主对角线,斜向下同色子的个数 if x-i<0 break; end if y-i<0 break; end if board(x-i,y-i)=flag 判断在此过程中,棋子与刚下的棋的颜色是否一样,不一样就跳出循环 break; end k = k+1;endif k>=5 w=1; returnendk = 0; 统计副对角线,斜向上同色子的个数for i = 0:10 if x-i<0 break; end if y+i>10 break; end if board(x-i,y+i)=flag 判断在此过程中,棋子与刚下的棋的颜色是否一样,不一样就跳出循环 break; end k = k+1;endif k>=5 w=1; returnendfor i = 1:10 统计副对角线,斜向下同色子的个数 if x+i>10 break; end if y-i<0 break; end if board(x+i,y-i)=flag 判断在此过程中,棋子与刚下的棋的颜色是否一样,不一样就跳出循环 break; end k = k+1;endif k>=5 w=1; returnend

    注意事项

    本文(matlab编程(五子棋)共6页word资料.doc)为本站会员(1595****071)主动上传,淘文阁 - 分享文档赚钱的网站仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知淘文阁 - 分享文档赚钱的网站(点击联系客服),我们立即给予删除!

    温馨提示:如果因为网速或其他原因下载失败请重新下载,重复下载不扣分。




    关于淘文阁 - 版权申诉 - 用户使用规则 - 积分规则 - 联系我们

    本站为文档C TO C交易模式,本站只提供存储空间、用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。本站仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知淘文阁网,我们立即给予删除!客服QQ:136780468 微信:18945177775 电话:18904686070

    工信部备案号:黑ICP备15003705号 © 2020-2023 www.taowenge.com 淘文阁 

    收起
    展开