Examples of how to convert HTML to text in 4D
$HTML:=OBJECT Get pointer(Object named;"HTML")
$Text:=OBJECT Get pointer(Object named;"Text")
WA SET PAGE CONTENT(*;"WebKit";$HTML->;"")
$Text->:=WA Evaluate JavaScript(*;"WebKit";"document.body.innerText";Is text)