Can someone tell me how you fill in a circle and when using the sleep command to stop a moving circle how do you get it to stay lit up? ex instead of ()()()()()()()()()() it goes ()-()-()-() where - equals 1 second
What a hell are you talking about?
Please be more specific.
[syntax="qbasic"]DEFINT A-Z
SCREEN 12
x = 10
y = 10
radius = 10
ax = 1
ay = 1
delay = 1
do
CIRCLE (x, y), radius, 15
PAINT (x, y), 1
SLEEP delay
Circle (x, y), radius, 0
Paint (x, y), 0
x = x + ax
y = y + ay
if x > 630 or x < 10 then ax = -ax
if y > 470 or y < 10 then ay = -ay
loop until len(inkey$)[/syntax]
I think that's waht u want....
Oz~
Quote:What a hell are you talking about?
Please be more specific.
Hey! You've got no right to harass anyone in a QBN help forum...
sorry i was typing a few things at once and didnt review it. what i wanted was
1. How do you fill in a circle?
forget everything else
Oh filled circle:
Code:
screen 12
circle (100,100), 100, 4
paint (100,100), 1, 4
sleep
screen 0
end
it should work.
paint (x and y posit), fillcolor, "border" color.