Revision as of 07:28, 3 November 2013 (view source) rosettacode>RobinVowels (Initial PL/I example) ← Older edit		Revision as of 18:06, 10 June 2014 (view source) rosettacode>Jldm No edit summary Newer edit →
Line 738: (dotimes (h height) (dotimes (w width) ~~;;(sdl:draw-pixel-* w h :surface s :color (if (zerop (random 2)) sdl:white sdl:black)))))~~ (sdl-base::write-pixel s w h (if (zerop (random 2)) i-white i-black )))))) Line 750 ⟶ 749: (defun main () "main function, ~~creates~~ initializes the library and creates de display window" (setf random-state (make-random-state)) (sdl:with-init (SDL:SDL-INIT-VIDEO SDL:SDL-INIT-TIMER)

Image noise: Difference between revisions

Image noise (view source)