<!---  Produced by FS2LSL (Flash Scratch to LSL),  John K. Bennett,  ATLAS Institute, University of Colorado at Boulder,  http://redwood.colorado.edu/jkb/fs2lsl/  -->
<program>
  <globvars>
    <stack x="10" y="5">
      <block spec="Declare Global Variables"/>
      <block spec="global comment: %s">
        <blockarg val="Listing 1.4: llParseString2List() Example"/>
      </block>
      <block spec="create global var: %g type: %m value: %t">
        <blockarg val="parseString"/>
        <blockarg val="string"/>
        <blockarg val="&quot;The answer to Life, the Universe and Everything is 42&quot;"/>
      </block>
    </stack>
  </globvars>
  <functions/>
  <states>
    <state>
      <stacks>
        <stack x="20" y="90">
          <block spec="state %s">
            <blockarg val="default"/>
          </block>
          <block spec="when I enter this state"/>
        </stack>
        <stack x="27" y="186">
          <block spec="when I am touched"/>
          <block spec="create local var: %g type: %m value: %t">
            <blockarg val="l"/>
            <blockarg val="list"/>
            <block spec="string %s with separators %s and spacers %s to list">
              <block varName="parseString" varScope="global"/>
              <blockarg val="[&quot; &quot;]"/>
              <blockarg val="[]"/>
            </block>
          </block>
          <block spec="create local var: %g type: %m value: %t">
            <blockarg val="i"/>
            <blockarg val="integer"/>
            <blockarg val="none"/>
          </block>
          <block spec="create local var: %g type: %m value: %t">
            <blockarg val="len"/>
            <blockarg val="integer"/>
            <block spec="length of list: %s">
              <block varName="l" varScope="local"/>
            </block>
          </block>
          <block spec="for ( %s ; %s ; %n )">
            <blockarg val="i = 0"/>
            <block spec=" %n %Q %n ">
              <blockarg val="10"/>
              <blockarg val="&lt;"/>
              <block varName="len" varScope="local"/>
            </block>
            <blockarg val="i++"/>
            <stack>
              <block spec="say to owner %s">
                <block spec=" %n %P %n ">
                  <blockarg val="&quot;item==>&quot;"/>
                  <blockarg val="+"/>
                  <block spec="list %s element at %n to %w">
                    <block varName="l" varScope="local"/>
                    <block varName="i" varScope="local"/>
                    <blockarg val="String"/>
                  </block>
                </block>
              </block>
            </stack>
          </block>
        </stack>
      </stacks>
    </state>
  </states>
</program>