Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[REBOL] Re: point, plot, pixel ?

From: henrikmk:gmai:l at: 5-Aug-2010 10:14

2010/8/5 =DEemseddin Moldibi <semseddinm-bircom.com>:
> Thu, 05 Aug 2010 10:49:14 +0300 tarihinde Petri Keckman =A0 > > <keckman-welho.com> =FE=F6yle yazm=FD=FE: > >> >> Greg Schwarz <gschwarz-sctelco.net.au> kirjoitti Thu, 05 Aug 2010 =A0 > >> 09:07:33 >> +0300 >> >>> http://www.rebol.com/docs/image.html >>> >>> This link should help. >> >> No it doesn't, but i did it with line: >> >> >> =A0 =A0 =A0 xy: as-pair xs ys >> =A0 =A0 =A0 =A0 =A0 append plot reduce [ >> =A0 =A0 =A0 =A0 =A0 'pen (black) >> =A0 =A0 =A0 =A0 =A0 'line =A0xy (xy + 1x1) >> =A0 =A0 =A0 ] > > here is what you want: > > img: make image! 100x50 > lay: layout [image img] > putpixel: func [x y] [change skip img 100 * y + x white] > putpixel 40 20 > view lay
You can of course still draw on the image created above using DRAW: draw img [...something...] -- Regards, Henrik Mikael Kristensen