SHOW:
|
|
- or go back to the newest paste.
1 | alias a { | |
2 | - | var %x = 1, %y = foo bar cat dog abc def |
2 | + | var %x = foo bar cat dog abc def, %n $numtok(%x, 32), %ZZZ |
3 | - | while (%x <= $numtok(%y,32)) { |
3 | + | while ($numtok(%ZZZ, 32) < %n) { |
4 | - | var %r = $rand(1,$numtok(%y,32)) |
4 | + | %ZZZ = $addtok(%ZZZ, $r(1, %n), 32) |
5 | - | var %ZZZ = %ZZZ %r |
5 | + | |
6 | - | ;var %ZZZ = the token number that was added, the order the numbers appear in %ZZZ are the order they were chosen by $rand |
6 | + | |
7 | - | inc %x |
7 | + |