Computer Science Canada

help on candaian flag
Author:  Mr. T [ Mon Feb 07, 2005 7:02 pm ]
Post subject:  help on candaian flag
why this no work?


var grow :int :=5
loop
grow:=grow+10
drawfillbox (80, 0+grow, 0, maxy, 7)
drawfillbox (maxx - 80, 0+grow, maxx, maxy, 7)
drawfillbox (80, 0, maxx - 80, maxy, 5)
drawfillmapleleaf (125, 30, maxx - 125, maxy - 30, 4)
delay (200)
end loop
Author:  ssr [ Mon Feb 07, 2005 7:13 pm ]
Post subject: 
What do u want it to be?
the maple leaf growing bigger? 8)
Author:  Mr. T [ Mon Feb 07, 2005 7:24 pm ]
Post subject: 
no, the borders
Author:  MihaiG [ Mon Feb 07, 2005 7:29 pm ]
Post subject: 
i assume you re trying to amke the flag grow so heres a good smooth animation working model try using a for loop this one will work to fit you ur screen good luck hope this helps you


code:

setscreen ("graphics:max;max")
View.Set ("offscreenonly")
for i : 1 .. 1000
    cls
    drawfillbox (0, 0, i * 2, i * 4, 4)
    drawfillmapleleaf (i * 3, 0, i * 7, i * 4, 4)
    drawfillbox (i * 8, 0, i * 10, i * 4, 4)
    exit when (i) * 10 > maxx
    delay (12)
    View.Update
end for

Author:  ssr [ Mon Feb 07, 2005 7:32 pm ]
Post subject: 
do u mean like this
code:

View.Set("offscreenonly")
var grow :int :=5
loop
grow:=grow+1
drawfillbox (80, maxy div 2-grow, 0, maxy div 2+grow, 7)
drawfillbox (maxx - 80, maxy div 2-grow, maxx, maxy div 2+grow, 7)
drawfillbox (80, 0, maxx - 80, maxy, 5)
drawfillmapleleaf (125, 30, maxx - 125, maxy - 30, 4)
delay (20)
View.Update
end loop

or this
code:

View.Set("offscreenonly")
var grow :int :=5
loop
grow:=grow+1
drawfillbox (80, 0, 0, 0+grow, 7)
drawfillbox (maxx - 80, 0, maxx, 0+grow, 7)
drawfillbox (80, 0, maxx - 80, maxy, 5)
drawfillmapleleaf (125, 30, maxx - 125, maxy - 30, 4)
delay (20)
View.Update
end loop

8)
Author:  ssr [ Mon Feb 07, 2005 7:35 pm ]
Post subject: 
Oh ic what u mean
ok
View.Update and View.Set os always a good idea to make a smooth animation 8)

:


You can syndicate this boards posts using the file backend.php or view the topic map using sitemap.php.

Terms of Use | Privacy Policy