And then, lets shorten little bit more.

 Quote:

Your solution passed all tests

KiXtart
KiXtart Version = 4.53
KiXGolf Script = kixgolf_wfp.kix

Computer
OS = Windows XP Professional
CPU = AMD Turion(tm) 64 X2 Mobile Technology TL-64
Speed = 2194 MHz
Memory = 1920 MB

KiXGolf Scoring Engine
Scoring Engine = 3.3

KiXtart Golf Score
Tournament = A Well-Formed Problem
Processing Start = 2008/12/22 01:17:52.593
Processing End = 2008/12/22 01:17:52.765
Duration = 0000/00/00 00:00:00.172
KiXGolf Score = 232

Thank you for participating in KiXtart Golf!


 Code:
Function WFP($c)
dim $

$ = CreateObject(Microsoft.XMLDOM)

$wfp = iif(6 = $.load($c) + val($.firstChild.nodetype),w,'non w')+'ell-formed'

For Each $ in $.getElementsByTagName('*')
	For Each $c in $.childnodes
		if $.tagname = $c.tagname
			$wfp='non '+$wfp
EndFunction
_________________________
!

download KiXnet