Will this change be added to lispbuilder-sdl-image as well? Would it be possible to also add straight color key support into sdl:load-image and sdl-image:load-image? For example: (sdl:load-image "lisp.bmp" :key-color (sdl:color :r 72 :g 152 :r 72))
And as far as keyword goes, perhaps it should be :color-key not :key-color? Thanks for the fix. On 10/11/07, Luke Crook <[EMAIL PROTECTED]> wrote: > > Elliott Slaughter <[EMAIL PROTECTED]> writes: > > > I tried implementing the using read-point to set the color-key of an > image, > > and it didn't work for some reason. Here is the code I used: > > (print (sdl:set-color-key > > (print (sdl:read-point (print (sdl:point :x (car color-key) > > :y (cadr > color-key))) > > :surface display)) > > :surface display :rle-accel t)) > > That is a bug in lispbuilder which I have now fixed in SVN. > > I have also added a new :KEY-COLOR-FROM keyword to LOAD-IMAGE that will > set the > key color to the color of the pixel at the x/y coords. > > (sdl:load-image "lisp.bmp" :key-color-at (sdl:point :x 0 :y 0)) > > You can take a look at an example of this in "examples/bmp-sample.lisp" > > - Luke > > _______________________________________________ > application-builder mailing list > application-builder@lispniks.com > http://www.lispniks.com/mailman/listinfo/application-builder > -- Elliott Slaughter "Any road followed precisely to its end leads precisely nowhere." - Frank Herbert
_______________________________________________ application-builder mailing list application-builder@lispniks.com http://www.lispniks.com/mailman/listinfo/application-builder
