<xpp>
<class name="XOxygen" inherit="">
<construct/>
<scope type="public">
<func type="void" name="RecurPrint">
<parm type="string" name="s" pass="val"/>
<body>
<if>
<cond>
<eval>
<parm type="string" name="Parm0">
<eval object="s"/>
</parm>
<expr>Len(Parm0) > 1</expr>
</eval>
</cond>
<true>
<xout processcode="true">
<eval>
<parm type="string" name="Parm0">
<eval object="s"/>
</parm>
<expr>"\r\n" + Parm0</expr>
</eval>
</xout>
<eval>
<parm type="void" name="Parm0">
<eval object="this" method="RecurPrint">
<parm name="s">
<eval>
<parm type="string" name="Parm0">
<eval object="s"/>
</parm>
<expr>Right(Parm0,
Len(Parm0) - 1)</expr>
</eval>
</parm>
</eval>
</parm>
<expr>Parm0</expr>
</eval>
</true>
<false>
<xout processcode="true">
<eval>
<parm type="string" name="Parm0">
<eval object="s"/>
</parm>
<expr>"\r\n" + Parm0</expr>
</eval>
</xout>
</false>
</if>
</body>
</func>
</scope>
</class>
<node name="MyWater" class="XOxygen" processcode="true" construct="true"/>
<eval>
<parm
type="void" name="Parm0">
<eval object="MyWater" method="RecurPrint">
<parm name="s">Kimmie</parm>
</eval>
</parm>
<expr>Parm0</expr>
</eval>
</xpp>