heh, I forgot this last cheat.
was playing with it at the time of the previous tournament but never found a place for it.
well, now I did.
behold, my new shortest code:
Code:
KiXtart Engine
KiXtart Version = 4.50 (WKIX32.EXE)
KiXGolf Script = kixgolf_fragmentation.kix
Computer
OS = Windows 2000 Professional
CPU = Intel Pentium III
Speed = 797 MHz
Memory = 376 MB
KiXGolf Scoring Engine
Scoring Engine = 3.0.3
KiXGolf Score
Tournament = Fragmentation
Processing Start = 2005/10/07 04:37:01.429
Processing End = 2005/10/07 04:39:05.817
Duration = 0000/00/00 00:02:04.387
Used Processor Time = 00:02:00.823
# Tests Run = 181
# Tests Passed = 181
# Tests Failed = 0
Result = passed
KiXGolf Score = 212
Thank you for participating in KiXtart Golf!
Press any key to continue...
Code:
Function f($)
dim $u,$i,$j
$u=ubound($)
while 1
dim $x[$u],$c
$f=''
for $j=1 to 2*(0^join($,''))/($u+1)
$f=$f+rnd(1)
next
for $j=0 to $u
for $i=0 to $u
if 1 ^ $x[$i] | $x[$j] | $i=$j | $f<>$[$j]+$[$i]
$c=$c+2
$x[$i]=1
$x[$j]=1
if $c>$u
exit
endfunction
