I think the tester script should be improved a little.
talked to mighty-one on msn and it seems that the tester code giving silly false positives is no good.

if someone wants to fill in the blanks, be my quest.
anyhow, this is the tester I use and even though it only has one block with cipher text included, it already does a good job beeping on errenous translations.

; KiXtart Golf
;
;
break on

; standard KiXgolf variables
dim $sGolfScoreUDF, $bGolfScore, $sKiXgolfUDF, $sKiXGolfUDF, $sOutputFile, $bKiXformsRequired
dim $sTitle, $iRC, $sKiXGolfScrEngVer, $sKiXformsVer, $objKiXforms
dim $sStartTimeDate, $sEndTimeDate, $sRunTime
dim $iKiXGolfScore[3], $sOutput, $sResult

; KiXgolf tournament-specific variables
; each Vigenere cipher set consists of the plaintext, the cipher text, and the cipherkey
dim $asVigenere[9], $sPlain, $sCipher, $sKey, $iLoop, $sEncrypted, $sDecrypted
dim $iValid, $iTotal, $sValidCipherOps, $iValidPercent
$asVigenere[0]='KIXGOLF','','KIXGOLF'
$asVigenere[1]='KIXGOLF TOURNAMENT','','KIXGOLF'
$asVigenere[2]='KIXGOLF TOURNAMENT','','KIXGOLF TOURNAMENT'
$asVigenere[3]='KiXgolf','','KiXgolf'
$asVigenere[4]='KiXgolf Tournament','','KiXgolf v4.22'
$asVigenere[5]='Blaise de Vigenere was born in 1523 and received the normal education of a noble of his period, even though he was not a noble.','','Vigenere Cipher'
$asVigenere[6]='The Vigenere cipher basic construction is a combination of a Caesar shift combined with a keyword','gZD QYyXP5ae WJhdVA F3dks FillEnZ6fl5j dr x KLbh2mGqjkB XD i EJewZI eIbpH NqscBrRF 88yT i Globl55','CrYptoGraPhy'
$asVigenere[7]='1234567890','','abcdefghijk'
$asVigenere[8]='abcdefghij','','1234567890'
$asVigenere[9]='Finished!','','Did you win'
$iTotal=ubound($asVigenere)
$iValid=0


; set required options
$sTitle='KiXtart Golf: Vigenere Cipher'
$iRC=SETTITLE($sTitle)
$iRC=SETOPTION('Explicit','on')
$iRC=SETOPTION('NoVarsInStrings','on')
$iRC=SETOPTION('WrapAtEOL','on')
$iRC=SETOPTION('CaseSensitivity','on')

cls

; define whether KiXforms is required
$bKiXformsRequired = 0

if $bKiXformsRequired
$objKiXforms=createobject('KiXtart.form')
if vartype($objKiXforms)=9
$sKiXformsVer=$objKiXforms.version
else
$sKiXformsVer='Cannot find KiXforms DLL. The kiXforms DLL is required to participate in KiXgolf.'
$sKiXformsVer=$sKiXformsVer+' Please download the KiXforms DLL at http://www.kixforms.org.'
$iRC=messagebox($sKiXformsVer,'Cannot find required DLL!',16)
endif
else
$sKiXformsVer=''
endif

$sGolfScoreUDF=@scriptdir+'\'+'kixgolf3.udf'
if exist($sGolfScoreUDF)
call $sGolfScoreUDF
$bGolfScore=1
else
$bGolfScore=0
endif
$sKiXGolfScrEngVer = '3.0.3'

; this is the actual KiXgolf UDF
$sKiXGolfUDF=@scriptdir+'\'+left(@scriptname,-3)+'udf'
if exist($sKiXGolfUDF)
call $sKiXGolfUDF
else
$iRC=messagebox('Cannot find KiXGolf UDF '+$sKiXGolfUDF,'Cannot find file!',16)
exit 2
endif

; initialize official KiXtart Golf Score results file
$sOutputFile=@scriptdir+'\'+left(@scriptname,instrrev(@scriptname,'.'))+'txt'
$iRC=redirectoutput($sOutputFile,1)
? '[code]'
$iRC=redirectoutput('')

; this is the start of the main loop
$sStartTimeDate=@DATE+' '+@TIME+'.'+right('000'+@MSECS,3)

for $iLoop=0 to $iTotal
$sPlain=$asVigenere[$iLoop]
$sCipher=$sPlain[1]
$sKey=$sPlain[2]
$sPlain=$sPlain[0]
if $sPlain
if $sCipher
$sEncrypted=Vigenere($sPlain,$sKey)
$sDecrypted=Vigenere($sCipher,$sKey,1)
if $sEncrypted==$sCipher and $sDecrypted==$sPlain
$iValid=$iValid+1
else
"NON VALID:" ?
"Encrypted: " $sEncrypted ?
"Decrypted: " $sDecrypted ?
"Cipher: " $sCipher ?
"Original: " $sPlain ??
sleep 1
endif
else
$sEncrypted=Vigenere($sPlain,$sKey)
$sDecrypted=Vigenere($sEncrypted, $sKey, not 0)
if $sDecrypted==$sPlain
$iValid=$iValid+1
endif
endif
endif
next

; this is the end of the main loop
$sEndTimeDate=@DATE+' '+@TIME+'.'+right('000'+@MSECS,3)
$sRunTime=datetimediff($sStartTimeDate, $sEndTimeDate)
$iValidPercent=formatnumber(cdbl($iValid)/(1+$iTotal)*100,0)

$sValidCipherOps=''+$iValid+' ('+$iValidPercent+'%)'
; this is the end of main loop


; generate KiXtart Golf Score
if $bGolfScore
$iKiXGolfScore=KiXGolf($sKiXGolfUDF)
else
$iKixGolfScore=''
endif

; generating official KiXGolf Score
$sOutput=$sOutput+@CRLF+'KiXtart'
$sOutput=$sOutput+@CRLF+'KiXtart Version = '+@KIX
$sOutput=$sOutput+@CRLF+'KiXforms Version = '+$sKiXformsVer
$sOutput=$sOutput+@CRLF+'KiXGolf Script = '+@SCRIPTNAME
$sOutput=$sOutput+@CRLF+''
$sOutput=$sOutput+@CRLF+'Computer'
$sOutput=$sOutput+@CRLF+'OS = '+@PRODUCTTYPE
$sOutput=$sOutput+@CRLF+'CPU = '+@CPU
$sOutput=$sOutput+@CRLF+'Speed = '+@MHZ+' MHz'
$sOutput=$sOutput+@CRLF+'Memory = '+(round(cdbl(MEMORYSIZE(0))/2)*2)+' MB'
$sOutput=$sOutput+@CRLF+''
$sOutput=$sOutput+@CRLF+'KiXGolf Scoring Engine'
$sOutput=$sOutput+@CRLF+'Scoring Engine = '+$sKiXGolfScrEngVer
$sOutput=$sOutput+@CRLF+''
$sOutput=$sOutput+@CRLF+'KiXtart Golf Score'
$sOutput=$sOutput+@CRLF+'Tournament = '+$sTitle
$sOutput=$sOutput+@CRLF+'Valid Cipher Ops = '+$sValidCipherOps
$sOutput=$sOutput+@CRLF+'Processing Start = '+$sStartTimeDate
$sOutput=$sOutput+@CRLF+'Processing End = '+$sEndTimeDate
$sOutput=$sOutput+@CRLF+'Duration = '+$sRunTime
$sOutput=$sOutput+@CRLF+'KiXGolf Score = '+$iKiXGolfScore
$sOutput=$sOutput+@CRLF+' '
$sOutput=$sOutput+@CRLF+'Thank you for participating in KiXtart Golf!'

; saving and displaying official KiXtart Golf Score
$iRC=redirectoutput($sOutputFile,0)
? $sOutput+@CRLF+'[/code]'
$iRC=redirectoutput('')
? $sOutput

if instr(@scriptexe,"WKIX")
?"press any key to close"
get $sOutput
endif
exit 0


_________________________
!

download KiXnet