Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

non retarded graphics library

Name: Anonymous 2011-02-05 23:22

So I am unwilling to deal with native things like X11 or GDI...

What's actually practical for displaying stuff? SDL seem well enough at the first glance but it suffers from version bloat and LGPL.

I'm thinking of trying General Graphics Interface which claims equal portability and has a MIT licence.

The other alternative seems Anti-Grain Geometry which is fully featured but suffers from GPL and sepples.

Name: Anonymous 2011-02-07 21:09

In my Lisp DSL I'm doing graphics like this:

(for {y:cy vy:0; y<ey !vy+32 !y+1}
     for {x:cx vx:0; x<ex vx+32 !x+1}
       c:cs,(y*ww+x)
       t:ts,(tileId c),0
       blit g vx-xi vy-yi gs,t)
  (world.units |> fe {u ->
    flip:no
    f:u.frame.{f:neg?->do flip=:ye ~f; f->f}
    ug:unitTypes.(type u).sprite,f
    [x y]:u.tile
    blit g 32x-sx-(ug.w-32)/2 32y-sy-(ug.h-32)/2 ug tint=(u.color tints)
         flipX=flip})
  cursor.{[@hs img] -> [x y]:cursorXY-hs blit g x y img

Name: Anonymous 2011-02-07 21:11

>>11
U MENA Perl 6

Name: Anonymous 2011-02-07 21:18

>>12
But this what Lisp looks, when you take out parens!!1

Name: Anonymous 2011-02-07 21:22

>>13
And add {[@$:-/.,=:=!<*+?->~;]}, yes.

Name: Anonymous 2011-02-07 21:28

>>14
Lisp already had "@,.`'#", I just used the rest of ASCII.

And I believe, that x:1 y:2 x+y is more readable than (let ((x 1) (y 2)) (+ x y))

Name: Anonymous 2011-02-07 21:30

Also, with `:` I can do stuff impossible with `let`, like

while line:(readLine)
  write line

Name: Anonymous 2011-02-07 21:33

>>16

(let loop ((line (read-line)))
  (write line)
  (loop (read-line)))


>>15
I have my

(letn (x 1 y 2) (+ x y))

Newer Posts
Don't change these.
Name: Email:
Entire Thread Thread List