程序里写的是自己用从小到大排序的。
如果要从大到小也很简单，自己改一下比较指令就行。
管理员看见了，记的加精，程序写有注释，大家都能看懂。

感谢分享

冒泡程序

精华精华

精华精华

感谢分享，虽然没看懂。

谢谢分享。。。。。。。。

程序思路就是相邻数依次比较，选出最大数。
一重循环从99次比较到1次比较，依次减少，因每一次比较，最大数排在后面越来越多，到最后一次只有2个数据比较，
二重循环执行一重循环99次。每一次选出比较剩下的最大数。
大概就是这样，看不明白的话，看看变址的应用，和FOR应用。

优秀的人到哪都优秀！

模拟了一下，有点牛逼。我再好好研究研究   

谢谢大佬

//冒泡排序算法
IF SM402 THEN
  wData[0]:=50;
  wData[1]:=41;
  wData[2]:=23;
  wData[3]:=1;
  wData[4]:=58;
  wData[5]:=77;
  wData[6]:=42;
  wData[7]:=3;
  wData[8]:=9;
  wData[9]:=99;
END_IF;

IF bLabel2 THEN
    FOR wi:=0 TO 9 BY 1 DO  
      // wj:=wi+1;
       FOR wj:=wi+1 TO 9 BY 1 DO
         IF wData[wi]>wData[wj] THEN
             wdata1:=wData[wi];
             wData[wi]:=wData[wj];
             wData[wj]:=wdata1;
         END_IF;
       END_FOR;
    END_FOR;
END_IF;