[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

LOGO-L> Re: FILL



Sorry but the ONLINE help on FILL did not give you all the
facts.

FILL fills until it encounters your current PENCOLOR.
Typically this works fine because usually you bound an area
with the PEN and then fill it.

So I set the PEN to the color of the boundary you want to
fill to.

to draw :col
pd
setpc(se :col :col 0) setx xcor+20
setpc[0 0 255] setx xcor+2 setx xcor-2
setpc(se :col :col 0) setx xcor-40
setpc[0 0 255] setx xcor-2 setx xcor+2
setpc(se :col :col 0) setx xcor+20
end

to main ; Moebius Ring
setsc[192 192 192]cs ht pu
setpensize[2 2]
for[ang   0 179][setxy 40*cos :ang 80*sin :ang draw  76+:ang]
for[ang 180 359][setxy 40*cos :ang 80*sin :ang draw 435-:ang]
setpc[0 0 255]
pu
lt 90
fd 50
fill
end

Yehuda Katz wrote:
> 
> George
> 
> I tried to FILL the center of the ring (the gray area) but the color
> spills all over the screen. What did I do wrong? I checked the image
> with the magnifying glass of PaintShop, but that blue "ellipse" is
> apparently leakproof.
> 
> =============================================================
> to main ; Moebius Ring
> setsc[192 192 192]cs ht pu
> setpensize[2 2]
> for[ang   0 179][setxy 40*cos :ang 80*sin :ang draw  76+:ang]
> for[ang 180 359][setxy 40*cos :ang 80*sin :ang draw 435-:ang]
> frame_it ; code not shown
> name_it  ; code not shown
> end
> 
> to draw :col
> pd
> setpc(se :col :col 0) setx xcor+20
> setpc[0 0 255] setx xcor+2 setx xcor-2
> setpc(se :col :col 0) setx xcor-40
> setpc[0 0 255] setx xcor-2 setx xcor+2
> setpc(se :col :col 0) setx xcor+20
> end
> =============================================================
> 
> [[Yehuda]]
> 
>     ---------------------------------------------------------------
>  [Image]

-- 
===============================================================
George Mills
email: mills@softronix.com
http://www.softronix.com
The www page contains some very powerful educational software.
Our single most important investment is our kids.

---------------------------------------------------------------
Please post messages to the Logo forum to logo-l@gsn.org.  Mail
questions about the list administration to logofdn@gsn.org.  To
unsubscribe send    unsubscribe logo-l    to majordomo@gsn.org.



Global SchoolNet Foundation - Linking Kids Around the World!
Copyright GSN - All Rights Reserved - Comments & Questions
Visit GSN's Global Schoolhouse for more exciting learning resources!
Search our Site - Home