On 22 November 2012 14:27, Bert Freudenberg <bert at freudenbergs.de> wrote:
>
> On 2012-11-22, at 14:27, Frank Shearar <frank.shearar at gmail.com> wrote:
>
>> On 21 November 2012 18:22, Bob Arning <arning315 at comcast.net> wrote:
>>> It's always fun to try it with Squeak. convert the form to 32 bits and try
>>> this:
>>>
>>> 0 to: self height - 1 do: [ :y |
>>>    self colorAt: self width-1 at y put: ((self colorAt: 0 at y) mixed: 0.5 with:
>>> (self colorAt: self width-2 at y)).
>>>    self colorAt: 0 at y put: ((self colorAt: 2 at y) mixed: 0.5 with: (self
>>> colorAt: self width-1 at y))
>>> ].
>>>
>>> Seems to fuzz it up pretty well.
>>
>> That's exactly what I'd like to do. The form's an 8 bit ColorForm
>> though, and doesn't like depths > 8. So I thought I'd be extra clever
>> and make a 32 bit form and copy the bits:
>>
>> | form |
>> form := PNGReadWriter formFromFileNamed:
>> '/home/frank/Downloads/blur_ulam_1.png'.
>> form := (Form extent: form extent depth: 32) bits: form bits.
>
> You can't just use an 8 bit form's bits in a 32 bit form. Use asFormOfDepth:.

Ah! That works. OK, so I need just fix the horizontal glitch in a
similar manner and I'll be happy.

Thanks, Bert!

frank

> - Bert -
>
>> 0 to: form height - 1 do: [ :y |
>>       form
>>               colorAt: form width-1 at y
>>               put: ((form colorAt: 0 at y)
>>                       mixed: 0.5
>>                       with: (form colorAt: form width-2 at y)).
>>       form
>>               colorAt: 0 at y
>>               put: ((form colorAt: 2 at y)
>>                       mixed: 0.5
>>                       with: (form colorAt: form width-1 at y)) asFloat
>> ].
>>
>> ActiveWorld color: (InfiniteForm with: form)
>>
>> However, I still can't run the script, because I get an "Error: Bad
>> BitBlt arg (Fraction?). I can't even just wrap-and-resume the Error
>> because, of course, Error is not resumable.
>>
>> Ideas? What am I missing?
>>
>> frank
>>
>>> Cheers,
>>> Bob
>>>
>>> On 11/21/12 10:53 AM, Frank Shearar wrote:
>>>
>>> On 21 November 2012 14:39, Frank Shearar <frank.shearar at gmail.com> wrote:
>>>
>>> Hi folks,
>>>
>>> Apologies for the silence: things have been a bit busy.
>>>
>>> Test wise we're looking pretty good. We still have a few red lights but I
>>> don't see much point in delaying further: some of the test failures are
>>> because of VM sensitivities.
>>>
>>> Off the top of my head we/I still need to write a changelog, and otherwise a
>>> bunch of infrastructural stuff's all that's needed: a new update stream,
>>> switching it over, etc. I wrote a ReleaseBuilder script but of course should
>>> actually publish it.
>>>
>>> I've also nearly finished the new background, and just need to figure out
>>> how to clean the edges of the pic to make it tile properly. Given I'm
>>> writing this mail on my phone I will have to mail the proposed image
>>> separately, at a later stage.
>>>
>>> For better or worse, here it is. Test it with
>>>
>>>    ActiveWorld color: (InfiniteForm with: (PNGReadWriter
>>> readFromFileNamed: 'my/path/to/blur_ulam_1.png'))
>>>
>>> Note the strange vertical white-ish line between the tiles. The image
>>> is filled all the way to the edge, but the left and right edges differ
>>> sufficiently to create the artifact. I'm not sure how to get rid of
>>> it, never having attempted to make a tile-able image before.
>>>
>>> Anyone spot anything missing off the swiki release page?
>>>
>>> That would be http://wiki.squeak.org/squeak/6188.
>>>
>>> frank
>>>
>>>
>>>
>>>
>>>
>>>
>>>
>>
>
>
>
>