Mercurial > lasercutter

changeset 3:e6254010c95a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
added raster-comment
author Robert McIntyre <rlm@mit.edu>
date Fri, 20 Aug 2010 00:49:00 -0400
parents 5ed873917c34
children 6533b4ef83ad
files src/laser/rasterize.clj
diffstat 1 files changed, 8 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
     1.1 --- a/src/laser/rasterize.clj	Fri Aug 20 00:39:50 2010 -0400
     1.2 +++ b/src/laser/rasterize.clj	Fri Aug 20 00:49:00 2010 -0400
     1.3 @@ -64,13 +64,6 @@
     1.4      (display (frame-hash->bufferedImage frame-hash)))
     1.5  
     1.6  
     1.7 -(defn raster-preamble []
     1.8 -  (str-join \newline
     1.9 -	    ["M63 P0\nG61"
    1.10 -	    (str \F feed)
    1.11 -	    "M101"
    1.12 -	    "M3 S1"]))
    1.13 -
    1.14  (defn frame-hash
    1.15    "yields a convienent representation for the pixles in an image.
    1.16     Because of the size of the structvre generated, this must only be used
    1.17 @@ -116,6 +109,14 @@
    1.18  
    1.19  
    1.20  
    1.21 +(defn raster-preamble []
    1.22 +  (str-join \newline
    1.23 +	    ["M63 P0\nG61"
    1.24 +	    (str \F feed)
    1.25 +	    "M101"
    1.26 +	    "M3 S1"]))
    1.27 +
    1.28 +
    1.29  
    1.30  
    1.31