hello <div>I am stuck at operating text from file</div><div><br></div><div>I am trying to read words from file(map) and do something with the word</div><div><br></div><div>in the map file, there are words sort of </div><div>
a00 a01 a1f, etc</div><div>a word consist of 3 part </div><div>first &quot;a&quot; is filename of picture (a.png)</div><div>second hex number is x coordinate of picture (it will be used for crop)</div><div>third hex number is y coordinate of picture (will be used for crop too)</div>
<div><br></div><div>first thing I wonder is that </div><div>(crop 0 0 32 32 (bitmap &quot;a.png&quot;)) is works but<br></div><div>(bitmap (string-&gt;path (string-append (first word) &quot;.png&quot;)) doesn&#39;t work (word is sort of a00, a01, a1f, etc)</div>
<div><br></div><div>and the second difficult thing is </div><div><div>#xf or #x1 works but </div></div><div><div><div>(crop #x(second (string-&gt;list each))</div><div>          #x(third (string-&gt;list each)) </div><div>
          32 32 </div><div>          (bitmap &quot;a.png&quot;)))</div></div></div><div>it doesn&#39;t working at all</div><div><br></div><div>could somebody please help me?</div><div>thanks in advanced</div><div><br></div>
<div>here is my messy code</div><div><div>#lang scheme</div><div>(require 2htdp/image </div><div>         2htdp/universe</div><div>         2htdp/batch-io</div><div>         racket/gui)</div><div>(define sec 1)</div><div>
(define map-now empty)</div><div><br></div><div>(define (make-map [f &quot;map.txt&quot;])</div><div>  (define txt-map (read-words/line f))</div><div>  (define map-beside empty)</div><div>  (define map-whole empty)</div><div>
  (define (a-tile each)  </div><div>    (crop (second (string-&gt;list each))</div><div>          (third (string-&gt;list each)) </div><div>          32 32 </div><div>          ;(bitmap (string-&gt;path (string-append (first each) &quot;.png&quot;)) doesn&#39;t work</div>
<div>          (bitmap &quot;a.png&quot;)))</div><div>  (define (paste-map)</div><div>    (for ([line txt-map]) </div><div>      (if (equal? (first (string-&gt;list (first line))) #\;)</div><div>          void</div><div>          (set! map-whole (above map-whole (for ([each line])</div>
<div>                                             (set! map-beside (beside map-now (a-tile each)))))))))</div><div>  (paste-map))</div><div><br></div><div>(set! map-now (make-map))</div><div><br></div><div>(define (draw s)</div>
<div>  map-now)</div><div>(big-bang sec</div><div>          (on-tick add1)</div><div>          (on-draw draw))</div></div><div><br></div><div>and map file</div><div><br></div><div><div>;convention<span class="Apple-tab-span" style="white-space:pre">        </span>-&gt;<span class="Apple-tab-span" style="white-space:pre">        </span>tile name a~z</div>
<div>;convention<span class="Apple-tab-span" style="white-space:pre">        </span>-&gt;<span class="Apple-tab-span" style="white-space:pre">        </span>x coordinate of named tile 0~f</div><div>;convention<span class="Apple-tab-span" style="white-space:pre">        </span>-&gt;<span class="Apple-tab-span" style="white-space:pre">        </span>y coordinate of named tile 0~f</div>
<div>;grass<span class="Apple-tab-span" style="white-space:pre">                </span>=<span class="Apple-tab-span" style="white-space:pre">        </span>a09<span class="Apple-tab-span" style="white-space:pre">        </span></div><div>;obstacle<span class="Apple-tab-span" style="white-space:pre">        </span>=<span class="Apple-tab-span" style="white-space:pre">        </span>a05<span class="Apple-tab-span" style="white-space:pre">        </span></div>
<div>;chair<span class="Apple-tab-span" style="white-space:pre">                </span>=<span class="Apple-tab-span" style="white-space:pre">        </span>a06<span class="Apple-tab-span" style="white-space:pre">        </span></div><div>;hexagram<span class="Apple-tab-span" style="white-space:pre">        </span>=<span class="Apple-tab-span" style="white-space:pre">        </span>aa8 (width * height = 3*3)</div>
<div>;map size<span class="Apple-tab-span" style="white-space:pre">        </span>=<span class="Apple-tab-span" style="white-space:pre">        </span>width * height = 32 * 32</div><div>;tile size<span class="Apple-tab-span" style="white-space:pre">        </span>=<span class="Apple-tab-span" style="white-space:pre">        </span>32*32</div>
<div>;map name<span class="Apple-tab-span" style="white-space:pre">        </span>=<span class="Apple-tab-span" style="white-space:pre">        </span>town1</div><div>;==============================================================================================================================</div>
<div>a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05</div><div>a05 a09 a09 a09 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div>
<div>a05 a09 a09 a09 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div><div>a05 a09 a05 a09 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div>
<div>a05 a09 a05 a09 a05 a05 a05 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div><div>a05 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div>
<div>a05 a09 a05 a09 a09 a09 a05 a05 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div><div>a05 a09 a05 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div>
<div>a05 a09 a05 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div><div>a05 a09 a05 a09 a09 a09 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a09 a05 </div>
<div>a05 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div><div>a05 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div>
<div>a05 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div><div>a05 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div>
<div>a05 a09 a05 a09 a09 a09 a09 a09 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div><div>a05 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 </div>
<div>a05 a09 a05 a09 a09 a09 a09 a05 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 </div><div>a05 a09 a05 a09 a09 a09 a09 a05 a09 a09 a09 a05 a05 ac6 a05 a05 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div>
<div>a05 a09 a05 a09 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a05 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div><div>a05 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div>
<div>a05 a09 a05 a09 a09 a09 a09 a09 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div><div>a05 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div>
<div>a05 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div><div>a05 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div>
<div>a05 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 </div><div>a05 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05</div>
<div>a05 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05</div><div>a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05</div>
<div>a05 a09 a09 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a05 a05</div><div>a05 a09 a09 a09 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09</div>
<div>a05 a09 a09 a09 a09 a09 a09 a09 a05 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09 a09</div><div>a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05 a05</div>
<div>;==============================================================================================</div><div><br></div><div><br></div><div><br></div><div><br></div><div><br></div><div><br></div><div><br></div></div><div>
<br></div>