
Controls OpenTextBox
Gosub GetFirstPlantName
Stop

Variable String XML

Label GetFirstPlantName
	Load XML "PlantCatalog.xml"
	XML = DecodeXML(XML, "catalog")
	XML = DecodeXML(XML, "plant")
	XML = DecodeXML(XML, "common")
	Print XML
Return


'WATCH v1
'WATCH GetSeparatedString(SequenceCmd, 1)
'WATCH str1
