üQ&… ploô,scrnloaä,scrnsavå esãìÿ()beììÿ()!clóìesãñ"E"ñesãñ"H";ˆ Þaô(ø,ù)ìesãñ"Y"ñÿ(øñ )ñÿ(ùñ )b(ˆ Þ windo÷(ò,ì,è,÷)ìesãñ"X"ñÿ( ñò)ñÿ( ñÌ)ñÿ(ñè)ñÿ(ñ÷)2³ clóæì(<coîìesãñ"e"coæìesãñ"f"PFinoîìesãñ"p"inoæìesãñ"q"stoîìesãñ"1"stoæìesãñ"0"bG³cló;"This program shows the remarkable resistance to random results of random behaviour!"ZH³"Choose a polygon (no. points) and scale factor. The computer then chooses a random"[I³"point and plots it. It now chooses one of your chosen points randomly, measures the"YJ³"distance, divides it by the scale factor and moves the resulting distance towards"[K³"it, and plots a new point. Now the whole process is repeated. After a few thousand" 7L³"repetitions, is the result what you expected?"³TM³"For best results try scale factors between 1 and 2 first, then experiment!"³7N³"Press key to start ....."somåìÿv()³ clóP· ÿ(ø{)Z ø(),ù()=_ž "number of points (max 8) ";ðž "scale factor";ón³ ÿ()ñ"0"½ àx™ îì ã ð‚¸ ø(î),ù(î)*Œ ploô(ø(î),ù(î),æ)–«, áìdñÿ(ÿ}ód)ñâìdñÿ(ÿ}ód)ñ ¥Ë ÿuì""ª ploô(á,â,æ)´îìÿ(ÿ}óð)ñN¾áìáñÿ((ø(î)òá)ôó)âìâñÿ((ù(î)òâ)ôó)ÈÊ-Ò³ cló³"Another go? (y/n)"áìÿv())Ü ÿ%(á)ì"Y" â _ ’ ‚ "catalog."Bà‡ 100,50,100,200,400,200,400,50,250,225,250,25,50,125,450,125(y/n)"áìÿv())Ü ÿ%(á)ì"Y" â _