最新公告
  • 欢迎您光临,本站秉承服务宗旨 履行“站长”责任,销售只是起点 服务永无止境!立即加入我们
  • IAPP-斗地主之生成一副扑克牌

    t()
    {
      //初始化扑克集合
      s sum=""
      s puk=""
      s i=10
      w(i<=53)
      {
        ss(puk+i+";",puk)
        s(i+1,i)
        }
      for(1;1000)
      {
        sran(10,53,ran)
        ss(ran+";",ran)
        sr(puk,ran,"",puk)
        ss(ran+puk,puk)
      }
    s a="0;1;2;3;4;5;6;7;8;9"
    sl(a,";",az)
    for(b;az)
    {
      sran(10,53,ran)
      ss(ran+";",th)
      ss(ran+";"+b+";",thc)
      sr(puk,th,thc,puk)
    }
    //去掉最后面一个分号
    slg(puk,cd)
    s(cd-1,cd)
    ssg(puk,0,cd,puk)
    sl(puk,";",fen)
    
    for(m;fen)
    {
      f(m!=52&&m!=53)
      {
        s(m/13,x)
      f(x==0)
      {
        s hua="♥"
      }
    else f(x==1)
    {
      s hua="◆"
    }
    else f(x==2)
    {
      s hua="♣"
    }
    else f(x==3)
    {
      s hua="♠"
    }
      s(m%13,y)
      f(y==0)
      {
        ss(hua+"2",d)
      }
    else f(y==1)
    {
      ss(hua+"3",d)
    }
    else f(y==2)
    {
      ss(hua+"4",d)
    }
    else f(y==3)
    {
      ss(hua+"5",d)
    }
    else f(y==4)
    {
      ss(hua+"6",d)
    }
    else f(y==5)
    {
      ss(hua+"7",d)
    }
    else f(y==6)
    {
      ss(hua+"8",d)
    }
    else f(y==7)
    {
      ss(hua+"9",d)
    }
    else f(y==8)
    {
      ss(hua+"10",d)
    }
    else f(y==9)
    {
      ss(hua+"J",d)
    }
    else f(y==10)
    {
      ss(hua+"Q",d)
    }
    else f(y==11)
    {
      ss(hua+"K",d)
    }
    else f(y==12)
    {
      ss(hua+"A",d)
    }
    ss(sum+d+";",sum)
      
    }
    else f(m==52)
    {
      ss(sum+"◎小;",sum)
    }
    else f(m==53)
    {
       ss(sum+"◎大;",sum)
    }
      
      
      
      
    }
    //打印出这首扑克牌
    syso(sum)
      }
    
    
    
    请在后台主题设置-主题授权-激活RiPro主题的正版授权,授权购买:RiTheme官网
    1. 本站所有资源来源于用户上传和网络,因此不包含技术服务请大家谅解!
    2.如有侵权请邮件联系客服!l联系邮箱:***@qq.com
    3. 本站不保证所提供下载的资源的准确性、安全性和完整性
    4.资源仅供下载学习之用!如有链接无法下载、失效或广告,请联系客服处理!
    5. 如用于商业或者非法用途,与本站无关,一切后果请用户自负!
    6. 本站提供的源码、模板、插件等等其他资源,都不包含技术服务请大家谅解!
    7. 本站资源售价只是赞助,收取费用仅维持本站的日常运营所需!
    8. 如遇到加密压缩包,默认解压密码为"www。loveu8.cn",如遇到无法解压的请联系客服!
    9. 如果您也有好的资源或教程,您可以投稿发布,成功分享后有站币奖励和额外收入!
    幻梦资源网 » IAPP-斗地主之生成一副扑克牌

    常见问题FAQ

    免费下载或者VIP会员专享资源能否直接商用?
    本站所有资源版权均属于原作者所有,这里所提供资源均只能用于参考学习用,请勿直接商用。若由于商用引起版权纠纷,一切责任均由使用者承担。更多说明请参考 VIP介绍。
    提示下载完但解压或打开不了?
    最常见的情况是下载不完整: 可对比下载完压缩包的与网盘上的容量,若小于网盘提示的容量则是这个原因。这是浏览器下载的bug,建议用百度网盘软件或迅雷下载。若排除这种情况,可在对应资源底部留言,或 联络我们.。
    找不到素材资源介绍文章里的示例图片?
    对于PPT,KEY,Mockups,APP,网页模版等类型的素材,文章内用于介绍的图片通常并不包含在对应可供下载素材包内。这些相关商业图片需另外购买,且本站不负责(也没有办法)找到出处。 同样地一些字体文件也是这种情况,但部分素材会在素材包内有一份字体下载链接清单。
    幻梦资源网
    一个高级程序员模板开发平台