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

Username:   Password: 
 RegisterRegister   
 Need Help With An Animation
Index -> Programming, Turing -> Turing Help
View previous topic Printable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
miked




PostPosted: Sun Mar 14, 2004 2:02 pm   Post subject: Need Help With An Animation

Alright I'm learning Turing on my own with help from a friend and so i decided to make a crappy little animation to get a hang of Turing {or atleast some of it}. So I drew a guy and put a bowling ball high over his head and then I have it fall on him. Then the ball hits his head and blood appears and the ball bounces offscreen. My problem is that I want the guy to fall over but I don't know if it possible to rotate the pic to be on an angle in Turing or if I have to draw a guy in paint on an angle to make it look like hes falling down. I tried just putting a new picture in of him lying on the ground but it didn't look right at all. He didn't look like he was falling he just went from standing to being on the ground. So if someone could give me a tip on what to do it would be really helpful. This is the code I've got so far
code:
View.Set ("graphics:300;400,position:center;center,nobuttonbar")
View.Set ("offscreenonly")

var Bowling_Ball : int := Pic.FileNew ("C:\\Program Files\\Mikes\\bowling_ball.bmp")
Pic.SetTransparentColor (Bowling_Ball, white)
Pic.Draw (Bowling_Ball, 27, 370, picMerge)

var Man : int
Man := Pic.FileNew ("C:\\Program Files\\Mikes\\man_in_blue.bmp")

var Man_With_Blood:int
Man_With_Blood := Pic.FileNew ("C:\\Program Files\\Mikes\\man_in_blue_with_blood.bmp")

var Man_Dead:int
Man_Dead := Pic.FileNew ("C:\\Program Files\\Mikes\\man_dead.bmp")



for decreasing y : 400 .. 83 by 5
    cls
    Pic.Draw (Bowling_Ball, 27, y, picMerge)
    Pic.Draw (Man, 0, 0, picMerge)
    View.Update
    Time.Delay (15)
end for



var x : int := 27
var y : int := 80

for : 1..13
cls
Pic.Draw (Man_With_Blood, 0, 0, picMerge)
Pic.Draw (Bowling_Ball, x, y, picMerge)
    View.Update
    Time.Delay (15)
x := x - 5
y := y + 2
end for
Sponsor
Sponsor
Sponsor
sponsor
Cervantes




PostPosted: Sun Mar 14, 2004 2:06 pm   Post subject: (No subject)

to rotate pictures, use Pic.Rotate. Type it into Turing and press F9.
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  [ 2 Posts ]
Jump to:   


Style:  
Search: