; No vars declared, not a best practice for production scripting 
; Use of single character vars can be difficult to manage in large scripts 
; and scope issues could easily creep in. 
 
$ = ReadValue('HKCU\Software\Golfing', 'Round1')
 
; Nice use of InStr and SubStr for others to see examples of possible methods 
; of locating specific data 
Do
    $ = SubStr($, 1, InStr($, '|') - 1) + ' ' + SubStr($, InStr($, '|') + 1, Len($))
Until InStr($, '|') = 0
If Rtrim($) = 'Enterprise Terminal Server'
    ? 'Value Present'
EndIf