<xpp>

       <class name="XObj" inherit="">

              <construct/>

              <scope type="public">

                     <arr type="int" name="Arr[3]">{5,6,7}</arr>

                     <func type="void" name="constructor">

                           <body>

                                  <arr type="string" name="Names[3]">Jack,Jimmie,John</arr>

                                  <var type="int" name="x"/>

                                  <for>

                                         <init>

                                                <eval object="x">

                                                       <eval>

                                                              <expr>0</expr>

                                                       </eval>

                                                </eval>

                                         </init>

                                         <cond>

                                                <eval>

                                                       <parm type="int" name="Parm0">

                                                              <eval object="x"/>

                                                       </parm>

                                                       <expr>Parm0 &lt;= 2</expr>

                                                </eval>

                                         </cond>

                                         <step>

                                                <eval object="x">

                                                       <eval>

                                                              <parm type="int" name="Parm0">

                                                                     <eval object="x"/>

                                                              </parm>

                                                              <expr>Parm0 + 1</expr>

                                                       </eval>

                                                </eval>

                                         </step>

                                         <xout processcode="true">

                                                <eval>

                                                       <parm type="int" name="Parm0">

                                                              <eval object="x"/>

                                                       </parm>

                                                       <parm type="int" name="Parm1">

                                                              <eval object="this" member="Arr">

                                                                     <index>

                                                                           <eval object="x"/>

                                                                     </index>

                                                              </eval>

                                                       </parm>

                                                       <expr>"\r\nIn constructor this.Arr[" + Parm0 + "] = " + Parm1</expr>

                                                </eval>

                                         </xout>

                                         <xout processcode="true">

                                                <eval>

                                                       <parm type="int" name="Parm0">

                                                              <eval object="x"/>

                                                       </parm>

                                                       <parm type="string" name="Parm1">

                                                              <eval object="Names">

                                                                     <index>

                                                                           <eval object="x"/>

                                                                     </index>

                                                              </eval>

                                                       </parm>

                                                       <expr>"\r\nIn constructor Names[" + Parm0 + "] = " + Parm1</expr>

                                                </eval>

                                         </xout>

                                  </for>

                           </body>

                     </func>

              </scope>

       </class>

       <arr type="int" name="a[3]">10,20,30</arr>

       <var type="int" name="x"/>

       <for>

              <init>

                     <eval object="x">

                           <eval>

                                  <expr>0</expr>

                           </eval>

                     </eval>

              </init>

              <cond>

                     <eval>

                           <parm type="int" name="Parm0">

                                  <eval object="x"/>

                           </parm>

                           <expr>Parm0 &lt;= 2</expr>

                     </eval>

              </cond>

              <step>

                     <eval object="x">

                           <eval>

                                  <parm type="int" name="Parm0">

                                         <eval object="x"/>

                                  </parm>

                                  <expr>Parm0 + 1</expr>

                           </eval>

                     </eval>

              </step>

              <xout processcode="true">

                     <eval>

                           <parm type="int" name="Parm0">

                                  <eval object="x"/>

                           </parm>

                           <parm type="int" name="Parm1">

                                  <eval object="a">

                                         <index>

                                                <eval object="x"/>

                                         </index>

                                  </eval>

                           </parm>

                           <expr>"\r\na[" + Parm0 + "] = " + Parm1</expr>

                     </eval>

              </xout>

       </for>

       <node name="MyObj" class="XObj" processcode="true" construct="true"/>

       <for>

              <init>

                     <eval object="x">

                           <eval>

                                  <expr>0</expr>

                           </eval>

                     </eval>

              </init>

              <cond>

                     <eval>

                           <parm type="int" name="Parm0">

                                  <eval object="x"/>

                           </parm>

                           <expr>Parm0 &lt;= 2</expr>

                     </eval>

              </cond>

              <step>

                     <eval object="x">

                           <eval>

                                  <parm type="int" name="Parm0">

                                         <eval object="x"/>

                                  </parm>

                                  <expr>Parm0 + 1</expr>

                           </eval>

                     </eval>

              </step>

              <xout processcode="true">

                     <eval>

                           <parm type="int" name="Parm0">

                                  <eval object="x"/>

                           </parm>

                           <parm type="int" name="Parm1">

                                  <eval object="MyObj" member="Arr">

                                         <index>

                                                <eval object="x"/>

                                         </index>

                                  </eval>

                           </parm>

                           <expr>"\r\nMyObj.Arr[" + Parm0 + "] = " + Parm1</expr>

                     </eval>

              </xout>

       </for>

</xpp>