HSP - Hot Soup Processor [16]

HSP - Hot Soup Proce ..

764:名前は開発中のものです。
09/03/07 17:54:11 55GGct9p
ソースねぇ…、とりあえずこれぐらいなら理解できる？

randomize
max = 100
dim xx,max

repeat max
xx(cnt) = rnd(1000)
loop
gosub *mesAll

repeat max-1
cc = cnt
repeat max-cc-1
c2 = cnt
if xx(c2) > xx(c2+1){
keep = xx(c2+1)
xx(c2+1) = xx(c2)
xx(c2) = keep
}
loop
loop
gosub * mesAll
stop

次ページ

続きを表示

1を表示