Sorry, I just noticed in the examples that load-image already has a :key-color keyword.
On 10/11/07, Elliott Slaughter <[EMAIL PROTECTED]> wrote: > > 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 > -- 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
