dim $sp[3]

$sp[0]='W B'
$sp[1]='WB '
$sp[2]=' BW'
$sp[3]='B W'

• The UDF must be written as one or more lines.
  
• The UDF is expected to finish in a reasonable time, e.g. if it gets started when the challenge opens, it's expected to be finished by the time the challenge closes even on a somewhat slow computer. The UDF has to be valid during the period that the challenge runs.
  
• You can submit scores as often as you want until the deadline, there's no reason to wait until the last minute for a score submission. In fact, other people want to see the score to beat. So don't be a spoilsport by hoarding your score. Submit early and often.
  
• The UDF may only use the KiXtart/KiXforms commands/functions/macros, no other code fragments are allowed. Calls to COM components that are part of a standard default Windows installation are allowed.
  
• Calls to other executables, as long as they are part of a standard default Windows installation are allowed.
  
• The use of the KiXforms DLL is also permitted as the KiXforms DLL can now be considered an integral part of KiXtart scripting.
  
• The UDF should be self-contained (except for any I/O mentioned in the challenge). In particular, you may not do things like fetching extra data from a remote site or file.
  
• You may assume ASCII as character set.
  
• You may not use block comments as the KiXgolf Scoring Engine does not support block comments
  
• You are not allowed to use additional code that is external to the KiXgolf UDF Collection. All code must be contained within the KiXgolf UDF Collection.
  
• You are allowed to only use publicly available versions of KiXtart and KiXforms, private builds or alpha builds are NOT allowed
  
• Your submitted score must include the KiXart/KiXforms version used.
  
• All variables must be properly declared as SETOPTION('Explicit','ON') has been coded into the main script
  
• Other script-wide restrictions, e.g. NoVarsInStrings=ON, are not in effect
  
• The KiXgolf UDF Collection as enclosed by the ';!' and ';!;!' tags can be modified to e.g. rename the parameter variables, add additional optional parameters or add additional sub-UDFs.
  
• Maximum runtime for the code solution is one hour
  
• Tokenizing the UDF, script, or portions thereof is not allowed
  

for $b=0 to ubound($a)
  if $a[$b]>0
    $c=$c+1
  endif
next

DO
  $b=$b+1
  if $a[$b]>0
    $c=$c+1
  endif
UNTIL $b>(UBOUND($a)+1)

Shuttle Puzzle failed all 4 tests (0% correct)

KiXtart
KiXtart Version  = 4.53 Release Candidate 1
KiXforms Version =
KiXGolf Script   = kixgolf_shuttle.kix

Computer
OS               = Windows XP Professional
CPU              = Intel Pentium Model 13
Speed            = 1866 MHz
Memory           = 760 MB

KiXGolf Scoring Engine
Scoring Engine   = 3.0.3

KiXtart Golf Score
Tournament       = KiXtart Golf: Shuttle Puzzle
Processing Start = 2006/09/09 21:48:24.890
Processing End   = 2006/09/09 21:48:28.421
Duration         = 0000/00/00 00:00:03.531
KiXGolf Score    = 1257

Thank you for participating in KiXtart Golf!