2010/8/5 =DEemseddin Moldibi <[email protected]>:
>
> Thu, 05 Aug 2010 10:49:14 +0300 tarihinde Petri Keckman =A0=3D
>
> <[email protected]> =3DFE=3DF6yle yazm=3DFD=3DFE:
>
>>
>> Greg Schwarz <[email protected]> kirjoitti Thu, 05 Aug 2010 =A0=3D
>
>> 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...]

--=20
Regards,
Henrik Mikael Kristensen
-- 
To unsubscribe from the list, just send an email to 
lists at rebol.com with unsubscribe as the subject.

Reply via email to