>Robert Covington wrote:
>>
>> Greetings EarthlingsS As part of our continued seeding of the human fe, we
>> mean species, we have selected you, you have been selected, to receive this
>> demo of an unnatural selection.
><snip>
>
>Yo Robert,
>Very cool demo, but for some reason it didn't always work correctly
>on my machine (sometimes it worked and sometimes not). In case
>someone is having the same trouble, I managed to get a better
>reaction with the following changes in the main program:

I used RP's original Mouse/Do until FN Button loops, maybe with an extra
one. If it wasn't working at each click, chances are it was in a
While/Wend/Do Until loop for the multiple FN Button checks...One good long
click usually reset all just fine.

One would use something more elegant in real program life of course.

What do you expect from aliens anyway, having to translate all this from
Black Hole Binary back into Earth bits? Then you have quantum phase
shifting, gravimetric shears of all variety, most of such a type that a
local barber couldn't make a cut with them without seriously distorting
your head. It is a big bag of hullaballoo. Then throw in Zero-G... these
are all weighty matters one can see.

:)

Robert


>on dialog fn doDialog
>on mouse  fn doMouse
>
>cls
>FN FillWindow
>
>do
>  handleevents
>until gFBQuit
>
>and adding the mouse handler:
>
>local fn doMouse
>  long if window(_outputWnd) = 1
>    cls : fn FillWindow
>    fn SeedFillToAnts( mouse(_horz), mouse (_vert) )
>  end if
>end fn
>
>--
>
>Cheers
>
>Alain