【剑仙教程】数组类：冒泡排序

剑仙十号

【剑仙教程】数组类：冒泡排序
使用冒泡排序。选择距离最近的怪物。
代码环境：tc7.0

var hThread
功能 执行()
  var arr = 数组(12, 8, 19, 1, 6, 15, 3, 2)
  冒泡排序(arr, 1)
  冒泡排序(arr, 0)
结束

功能 冒泡排序(arr0, 升序 = 1)
  var len = 数组大小(arr0)
  for(var i = 0; i < len; i++)
    //
    for(var j = 0; j < len - 1 - i; j++)
      var 周转值 //用来周转的变量.
      if(升序 == 1)
        if(arr0[j] > arr0[j + 1])
          周转值 = arr0[j + 1]
          arr0[j + 1] = arr0[j]
          arr0[j] = 周转值
        end

      elseif(升序 == 0)
        if(arr0[j] < arr0[j + 1])
          周转值 = arr0[j + 1]
          arr0[j + 1] = arr0[j]
          arr0[j] = 周转值
        end

      end
    end //for_end2.
    //
  end //for_end1.
  traceprint(数组转字符串(arr0))
  返回 arr0
结束

功能 启动_热键()
  var bool = 线程获取状态(hThread)
  if(bool == 0)
    hThread = 线程开启("执行", "")
  end
结束
功能 终止_热键()
  线程关闭(hThread)
结束

下一篇：【变量和数组】快速排序。

游客，如果您要查看本帖隐藏内容请回复

剑仙十号

traceprint(arr方括号i)  traceprint(arr[ai])  traceprint(arr)
TC的论坛有病。1楼for循环中，论坛会吞掉 方括号i，把后面的字体 变成斜体。
二楼，更新信息专用。

tc简单开发_爱好群：
433286131 (491/500)

tc简单开发_兴趣群：
143358382 (380/500)

tc简单开发_脚本作者群：
891069033 (61/500)

编程四大F：流程控制，变量和数组，函数多线程，系统api。
本群大神众多，新手众多，群文件内_资源海量。希望新手分享更多学习笔记，减少重复造轮子的时间。

fang198118

514712225

666666

silverlight

参考一下

高宇丶

绝世好文，不得不顶

qq147735456

哦呵,又是要回才能看

yjbdmc

kkkkkkkkkkkkkkkkkkkkkkkkkk

504229732

学习

魅舒2006

学习学习