「なでしこv1」開発掲示板

提示されたソースだと動きますね……
ではなでしこソースを一部分だけ提示してみます

{}の中身をq_sort.hとしてなでしこソースのカレントディレクトリに保存
{
function q_sort(left,right)
　　l_hold=left
　　r_hold=right
　　pivot=numbers[left]
　　while(left<right)do
　　　　while(numbers[right]>=pivot and left<right)do
　　　　　　right=right-1
　　　　　　if(left~=right)then
　　　　　　　　numbers[left]=numbers[right]
　　　　　　　　left=left+1
　　　　　　end
　　　　end
　　　　while(numbers[left]<=pivot and left<right)do
　　　　　　left=left+1
　　　　　　if(left~=right)then
　　　　　　　　numbers[right]=numbers[left]
　　　　　　　　right=right-1
　　　　　　end
　　　　end
　　end
　　numbers[left]=pivot
　　pivot=left
　　left=l_hold
　　right=r_hold
　　if(left<right)then
　　　　q_sort(left,pivot-1)
　　end
　　if(left>right)then
　　　　q_sort(pivot+1,right)
　　end
end
i=0
numbers={0,0,0,0,0}
while(1)do
　　if(き[i]==nil)then
　　　　break
　　else
　　　　numbers[i]=き[i]
　　　　i=i+1
　　end
end
nako_set("き",q_sort(0,4))
}

なでしこソース

おは「bin\q_sort.lua」を開く
き=「1
3
4
0
2」
おをLUAする
きを表示