Computer Science Canada Animation trouble |
Author: | moon15 [ Mon Mar 30, 2009 8:18 am ] |
Post subject: | Animation trouble |
hey guys aight so the problem is my picture icywitch is moving horizontally rather than vertically so any ideas why its not working procedure icywitch var icywitch :int:=Pic.FileNew("icywitch.bmp") for y: 40..600 Pic.Draw (icywitch,(maxy)-y,250,0) end for end icywitch procedure ghost var ghost :int:=Pic.FileNew("ghost.bmp") Pic.Draw (ghost, 150,250,0) end ghost procedure blue_monster var blue_monster :int:=Pic.FileNew("ghost.bmp") Pic.Draw (blue_monster, 150,250,0) end blue_monster loop put "Do you wish to play this spooky freaky intense game?(y/n)" var reply : string (1) get reply cls exit when reply not ="y" var count :int:=0 var tick:int put "Whats your difficulty?" get tick icywitch end loop |
Author: | Dusk Eagle [ Mon Mar 30, 2009 8:43 am ] | ||
Post subject: | Re: Animation trouble | ||
First, use: [syntax="turing"] %code goes here [/syntax] to make your code more readable. Your problem is in your Pic.Draw statement:
You are currently updating the x-value, you need to be updating the y-value for the picture to move vertically. |