Programming C, C++, Java, PHP, Ruby, Turing, VB
Computer Science Canada 
Programming C, C++, Java, PHP, Ruby, Turing, VB  

Username:   Password: 
 RegisterRegister   
 help on candaian flag
Index -> Programming, Turing -> Turing Help
View previous topic Printable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
Mr. T




PostPosted: 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
Sponsor
Sponsor
Sponsor
sponsor
ssr




PostPosted: Mon Feb 07, 2005 7:13 pm   Post subject: (No subject)

What do u want it to be?
the maple leaf growing bigger? 8)
Mr. T




PostPosted: Mon Feb 07, 2005 7:24 pm   Post subject: (No subject)

no, the borders
MihaiG




PostPosted: Mon Feb 07, 2005 7:29 pm   Post subject: (No 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

ssr




PostPosted: Mon Feb 07, 2005 7:32 pm   Post subject: (No 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)
ssr




PostPosted: Mon Feb 07, 2005 7:35 pm   Post subject: (No subject)

Oh ic what u mean
ok
View.Update and View.Set os always a good idea to make a smooth animation 8)
Display posts from previous:   
   Index -> Programming, Turing -> Turing Help
View previous topic Tell A FriendPrintable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic

Page 1 of 1  [ 6 Posts ]
Jump to:   


Style:  
Search: