Haskell的图像绘图库?

图表看起来很酷,但是如果您想避免提交并保持超轻量,可以直接生成svg。从康拉德·巴斯基那里偷东西 http://www.lisperati.com/haskell/

type Point     = (Float,Float)
type Color     = (Int,Int,Int)
type Polygon   = [Point]

writePoint :: Point -> String 
writePoint (x,y) = (show x)++","++(show y)++" "

writePolygon :: (Color,Polygon) -> String 
writePolygon ((r,g,b),p) = "<polygon points=\""++(concatMap writePoint p)++"\" style=\"fill:#cccccc;stroke:rgb("++(show r)++","++(show g)++","++(show b)++");stroke-width:2\"/>"

writePolygons :: [(Color,Polygon)] -> String 
writePolygons p = "<svg xmlns=\"http://www.w3.org/2000/svg\">"++(concatMap writePolygon p)++"</svg>"

colorize :: Color -> [Polygon] -> [(Color,Polygon)] 
colorize = zip.repeat

rainbow@[red,green,blue,yellow,purple,teal] = map colorize [(255,0,0),(0,255,0),(0,0,255),(255,255,0),(255,0,255),(0,255,255)]

t0 = writeFile "tut0.svg" $ writePolygons (blue [[(100,100),(200,100),(200,200),(100,200)],[(200,200),(300,200),(300,300),(200,300)]])

hexagon c r = translateTo c basicHexagon where
  basicHexagon =  top ++ (negate r, 0):bottom 
  top          =  [(r,0),(r * cos 1,(r * sin 1)),(negate (r * cos 1), r * (sin 1))]
  bottom       =  map (\(x,y)->(x,negate y)) (reverse top)

translateTo (x,y) poly = map f poly where f (a,b)= ((a+x),(b+y))

t1 = writeFile "t1.svg" $ writePolygons (blue [hexagon (100,100) 50] )

hexField r n m = let 
     mkHex n = hexagon (1.5*n*(r*2),(r*2)) r
     row n = map mkHex [1..n]
     aRow = row n
  in concat [map (offset (r*x)) aRow |x<-[1..m]]

offset r polys = map (oh r) polys where
  oh r pt@(x,y) = (x+(1.5*r),y+(r*sin 1))

t2 = writeFile "t2.svg" $ writePolygons (blue $ hexField 50 4 5 )

运行t2并将文件加载到firefox或其他支持svg的程序中。

t2.svg ,exported png http://img30.imageshack.us/img30/2245/93715707.png

我以前用过hopengl,但是 问题是(据我所知) 它不能呈现给文件,而只能 屏幕;同样的 我可以说,SDL似乎是正确的。 和WX。我会去看看开罗, 不过。

由于某种原因,我不能回复这个帖子,所以我不得不引用它。你对GL和SDL不正确,你可以做一个屏幕外的表面/缓冲区或渲染到纹理。这些库不需要这样的功能(也不太有意义),因为您可以通过访问缓冲区中的像素并自己编写出来,甚至可以使用可以访问像素数据的屏幕缓冲区来轻松地完成这项功能。

就在前几天,我给别人演示了如何使用haskell sdl绑定:

http://hpaste.org/fastcgi/hpaste.fcgi/view?id=25047

使用一个可以对PNG文件进行写入的库,它们很可能会将原始指针指向可以从SDL获得的像素缓冲区,或者将其复制到库需要的格式。

我刚发现 Haskell binding for the library DevIL 可以输出.pNG文件。检查调用的函数 writeImageFromPtr

Cairo 如果你想生成PNG,这是个不错的选择。 Wumpus 看起来也很有前途,虽然我从来没有用过。如果你只是想在屏幕上看到它, graphics-drawingcombinators 是一个简单的opengl接口,可以在几行中完成您需要的工作(请参见 example.hs 在发行版中)。

查看图表:

http://hackage.haskell.org/cgi-bin/hackage-scripts/package/diagrams

这些例子很好。

有什么好的haskell库可以在上面创建图像和绘制形状?

你有很多选择,在我看来 used for games :

• haskell-opengl
• haskell-sdl
• haskell-wx
• haskell-gtk-cairo

这些是最常见的,您可以根据功能/熟悉程度进行选择。