Computer Science Canada Floating text |
Author: | CChanni [ Tue Jan 15, 2008 2:58 pm ] |
Post subject: | Floating text |
Is there some way to make text float around the screen? |
Author: | Sean [ Tue Jan 15, 2008 3:30 pm ] |
Post subject: | Re: Floating text |
Like in which way? |
Author: | StealthArcher [ Tue Jan 15, 2008 5:06 pm ] |
Post subject: | RE:Floating text |
Have you made a bouncing ball program before? If so just alter the variables the same way for a Font.Draw procedure, and clear and redaw for effect. |
Author: | CChanni [ Tue Jan 15, 2008 6:39 pm ] |
Post subject: | Re: Floating text |
Okay, I'll try that. Thanks for your help! |
Author: | CChanni [ Tue Jan 15, 2008 7:15 pm ] |
Post subject: | Re: Floating text |
How do you make the program so that you can add different text but allow them to move at different paces? |
Author: | TokenHerbz [ Tue Jan 15, 2008 7:25 pm ] |
Post subject: | RE:Floating text |
Try assigning the word to an array, meaning... Word is : Help! array1 = H array2 = e array3 = l array4 = p array5 = ! Now that you have the 5 single letters, your free to minipulate each one accordingly and seperatly from the rest. Or you can go with easier methods, but i dont know those.... Muhahaha math is fun! |
Author: | CChanni [ Tue Jan 15, 2008 8:16 pm ] |
Post subject: | Re: Floating text |
No! I'm only in Grade 10 Computer Science, I haven't learned arrays yet... |
Author: | syntax_error [ Tue Jan 15, 2008 8:28 pm ] |
Post subject: | Re: Floating text |
a) just because you haven't learned something does not mean you can NOT learn it everything is within ur reach here at compsci.ca here a thought try the turing tuts there they are soo detailed and full of example and then again after you give it a try at it we can help you at it see the glory in this?? b) since im soo nice i will give you the link to the array section here |
Author: | ericfourfour [ Tue Jan 15, 2008 9:09 pm ] |
Post subject: | RE:Floating text |
CChanni do you want to have each character move independently, or together? If they move together, all you need is basic a understanding of collision detection and the Font module. |
Author: | petree08 [ Wed Jan 16, 2008 11:11 am ] |
Post subject: | RE:Floating text |
You don't need to have an array to select individual characters in a string, because a string is just an array of chars example variable Name has the value "Peter" lets say we want to output the 2nd letter in the Name var var Name : string Name := "Peter" put Name (2) --------- the screen should output the letter "e" ----------- This manipulation of strings can also have more than one character selected put Name (1..5) ----- This will display the first to 5th characters in the var ----- Also put Name (1 ..*) % this outputs the first to last char in the string ----- hope that helps happy coding |
Author: | CChanni [ Wed Jan 16, 2008 12:43 pm ] |
Post subject: | Re: Floating text |
@ericfourfour: I want them to move independently. |
Author: | Zampano [ Wed Jan 16, 2008 1:57 pm ] |
Post subject: | Re: Floating text |
No one's actually explained what you are supposed to do assuming little previous knowledge so I will. Have variables holding the x and y coordinates of each letter. have a loop which changes both the x and y by a random amount each time through (look in to Rand.Int). Finally, factor the x and y of each letter into the Draw.Text function for each respective letter. Add in some View.Update and a delay and all have left is to make sure that the letter don't go offscreen. To do this compare the letters' x and ys with both maxx and maxy (of the screen) and 0. If they are below 0 or above the maxes of the screen, revert them to a position just on the edge of the screen (by adjusting x and y directly). This creates the illusion of a wall. Always remember to search for information on aspects of programming in Turing help (F10). |
Author: | CChanni [ Wed Jan 16, 2008 7:25 pm ] |
Post subject: | Re: Floating text |
Below is a post of my program. I think I did everything you said but I'm not sure, so can you check it for me? View.Set("graphics:max;max;noecho") var font:int font:=Font.New ("MS Reference Sans Serif:11") var x:= 7 var y:=7 var xChange, yChange : int := 4 var i: int loop x:=y put Rand.Int (x,y) cls Draw.Text ("1", x, y, font, red) delay (10) View.Update delay (10) x += xChange y += yChange if x < 8 or x > maxx - 9 then xChange := -xChange end if if y < 8 or y > maxy - 9 then yChange := -yChange cls end if end loop loop cls x:=y put Rand.Int (x,y) cls Draw.Text ("5", x, y, font, red) delay (10) View.Update delay (10) x += xChange y += yChange if x < 8 or x > maxx - 9 then xChange := -xChange end if if y < 8 or y > maxy - 9 then yChange := -yChange cls end if end loop |