# Contesting for Idiot du Jour

Roger Guay irog at mac.com
Sat Sep 5 14:28:28 EDT 2020

```Aha, in prepping my code to send to you, I found an error! Now the Cartesian Coord code is consistent with the Polar Coord code producing a ratio of about ⅓. Here is the code:

on mouseDown

getStuff

end mouseDown

local tR, tX0, tY0, txl, tX1, tY1, tconstL, tTotCount, tL, tLongCount, tLocA, tLocB

on getStuff

put item 1 of the loc of grc OuterCircle into tX0

put item 2 of the loc of grc OuterCircle into tY0

put the width of grc OuterCircle/2 into tR

put the left of grc outerCircle into tXl

put 2*tR*cos(Pi/6) into tconstL

put "" into tTotCount

put "" into tLongCount

emptyFlds

end getStuff

on mouseUp

lock screen

repeat 10000

PickApointA

PickApointB

set the points of grc theChord to tLocA, tLocB

GetLength tLocA, tLocB

end repeat

put tTotCount into fld "totcountFld"

put tLongCount/tTotCount into fld "RatioFld"

unlock screen

end mouseUp

on PickApointA

set the numberFormat to "#."

put tXl + random(400) into X

put sqrt(tR^2 - (X-tX0)^2) - tY0 into y

get random(2)

if it is 1 then put x, + y+2*tY0 into tLocA

else put x, - y into tLocA

end PickApointA

on PickApointB

set the numberFormat to "#."

put tXl + random(400) into X

put sqrt(tR^2 - (X-tX0)^2) - tY0 into y

get random(2)

if it is 1 then put x, + y+2*tY0 into tLocB

else put x, - y into tLocB

end PickApointB

on GetLength pLocA, pLocB

put item 1 of pLocA into PX1

put item 2 of pLocA into Py1

put item 1 of pLocB into PX2

put item 2 of pLocB into Py2

set the numberFormat to "#.0"

put (pX2- pX1)^2 + (pY2- pY1)^2 into Lsquared

put Sqrt(Lsquared) into tL

if tL > tconstL then add 1 to tLongCount ---

put tLongCount into fld "LongCountFld"

end GetLength

Thanks,
Roger

> On Sep 5, 2020, at 11:07 AM, Thomas von Fintel via use-livecode <use-livecode at lists.runrev.com> wrote:
>
> „I am known for making many more mistakes than not!“
> Aren‘t we all?
> I guess using Cartesian coordinates for choosing points on a circle could produce some bias, though I have no clear idea how.
> So, what is your code?
>
> Thomas
>
>> Am 05.09.2020 um 19:15 schrieb Roger Guay via use-livecode <use-livecode at lists.runrev.com>:
>>
>> I am known for making many more mistakes than not!
>
>
> _______________________________________________
> use-livecode mailing list
> use-livecode at lists.runrev.com
> Please visit this url to subscribe, unsubscribe and manage your subscription preferences:
> http://lists.runrev.com/mailman/listinfo/use-livecode

```