Howard Bullock
KiX Supporter
   
Registered: 2000-09-15
Posts: 5809
Loc: Harrisburg, PA USA
|
code:
function CDSorter($s, $m) Dim $a, $b, $x, $z, $ do $b = split($s,",") $a = ubound($b) do $b[RND($a)]=0 $=0.0 for each $x in $b $ = $ + $x next until $ < $m until $ > $m-1 for $=0 to $a if $b[$] $z=$z+","+($+1) endif next $CDSorter=substr($z,2) endfunction
code:
CD #1 Title = 70's Super Funk Song #s = 1,7,8,9,10,14,16,19,20 CD Length = 44.6711 CD Gap = 0.3289 CD Gap [%] = 0.7309 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:43:48.734 Processing End = 2003/03/15 14:43:48.744 Duration = 0000/00/00 00:00:00.010
CD #2 Title = Partridge Family Unlimited Song #s = 1,2,9,12,18 CD Length = 44.9179 CD Gap = 0.0821 CD Gap [%] = 0.1824 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:43:48.754 Processing End = 2003/03/15 14:43:48.794 Duration = 0000/00/00 00:00:00.040
CD #3 Title = Three Tenors in Antarctica, Again! Song #s = 2,3,4,6,8,9,11,12,14,15 CD Length = 44.9741 CD Gap = 0.0259 CD Gap [%] = 0.0576 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:43:48.804 Processing End = 2003/03/15 14:43:48.834 Duration = 0000/00/00 00:00:00.030
CD #4 Title = Support Your Local KiXGolfer Song #s = 11,27 CD Length = 44.2000 CD Gap = 0.8000 CD Gap [%] = 1.7778 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:43:48.844 Processing End = 2003/03/15 14:43:49.375 Duration = 0000/00/00 00:00:00.531
CD #5 Title = ABBA Bubba! Song #s = 1,2,3,5,7,10,12,13,15,18,19,23,26,28,29,30 CD Length = 44.8102 CD Gap = 0.1898 CD Gap [%] = 0.4218 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:43:49.375 Processing End = 2003/03/15 14:43:49.405 Duration = 0000/00/00 00:00:00.029
CD #6 Title = Songs You Never Wanted Your Teenage Daughter To Know About Song #s = 1,2,6,7,8 CD Length = 44.5000 CD Gap = 0.5000 CD Gap [%] = 1.1111 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:43:49.415 Processing End = 2003/03/15 14:43:49.415 Duration = 0000/00/00 00:00:00.000
CD #7 Title = Moon Rocks! Song #s = 2,4,12,13,14,16,18,21,23,24,28,30,31,34,36 CD Length = 44.4539 CD Gap = 0.5461 CD Gap [%] = 1.2136 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:43:49.415 Processing End = 2003/03/15 14:43:49.455 Duration = 0000/00/00 00:00:00.040
CD #8 Title = Ruud's Favs Song #s = 1,3,5,6,7,8,9,10,12,13,14,16,17,19,20 CD Length = 44.1609 CD Gap = 0.8391 CD Gap [%] = 1.8647 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:43:49.465 Processing End = 2003/03/15 14:43:49.465 Duration = 0000/00/00 00:00:00.000
CD #9 Title = MTV Presents: KiXtart Rulez! Song #s = 1,3,8,10,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26, 27,28,29,30,31,32,33,34,35,36,38,39,40,41,43,45,46,47,50 CD Length = 44.2549 CD Gap = 0.7451 CD Gap [%] = 1.6558 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:43:49.475 Processing End = 2003/03/15 14:43:49.485 Duration = 0000/00/00 00:00:00.010
CD #10 Title = Songs From the Programmer's Abyss Song #s = 1,3,4,5,7,8,9,10,13,14,15,16,17,20,21,24,26,27,29,31, 32,33,34,35,36,37,38,40,42,43,44,46,47,48,50 CD Length = 44.4987 CD Gap = 0.5013 CD Gap [%] = 1.1140 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:43:49.485 Processing End = 2003/03/15 14:43:49.495 Duration = 0000/00/00 00:00:00.010
CD #11 Title = Just Noise (100% Pure White Noise) Song #s = 36,57,61,66,69 CD Length = 44.2500 CD Gap = 0.7500 CD Gap [%] = 1.6667 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:43:49.505 Processing End = 2003/03/15 14:44:00.482 Duration = 0000/00/00 00:00:10.977
CD #12 Title = Cazy Jens And the KIXGolfers Song #s = 3,14,18,41,42,43,51,54,56,92,100 CD Length = 44.0777 CD Gap = 0.9223 CD Gap [%] = 2.0496 Req. CD Length = 44.0000 Result = CD has been filled Processing Start = 2003/03/15 14:44:00.482 Processing End = 2003/03/15 14:44:00.682 Duration = 0000/00/00 00:00:00.199
Average CD Length = 44.48 Average Gap = 0.52 Average Gap [%] = 1.15
KiXtart KiXtart Version = 4.21 Release Candidate 1 KiXGolf Script = kixgolf_cd.kix
Computer OS = Windows 2000 Professional CPU = Intel Pentium III Speed = 848 MHz Memory = 511 MB
KiXGolf Scoring Engine Scoring Engine = 3.0.3
KiXtart Golf Score Tournament = KiXtart Golf: CD Sorter Processing Start = 2003/03/15 14:29:09.753 Processing End = 2003/03/15 14:44:00.682 Duration = 0000/00/00 00:14:50.929 # Loops = 100 # Processed CDs = 12 # Valid CDs = 12 # Full CDs = 0 KiXGolf Result = Valid CD Filling KiXGolf Score = 207 Thank you for participating in KiXtart Golf!
|