-----------------------------------

BigBear

Fri Feb 01, 2008 8:45 pm


Making Credits

-----------------------------------

I am wondering if someone can help me get started making credits. I was thinking makeing text move by changing the variable y then when y = maxy then y:=o and draw another group of words that move by the variable y. Any Ideas


-----------------------------------

HeavenAgain

Fri Feb 01, 2008 9:03 pm


RE:Making Credits

-----------------------------------

draw them all on the screen where you can see them first, then add like 1000 to y cord, and now do a for-loop minus the y cord, and voola :D simple and stupid


-----------------------------------

syntax_error

Fri Feb 01, 2008 9:19 pm


Re: Making Credits

-----------------------------------

even better a cheap trick write out your credits on paint or something make it fancy as you want save it as a jpeg
then jsut move the picture up nad down the screen soo much less coding
and i think would look better?


-----------------------------------

ericfourfour

Fri Feb 01, 2008 10:16 pm


Re: Making Credits

-----------------------------------

The best way would be to make a procedure that takes one line, as a string and scrolls it all the way down the screen. It will make programming your credits much easier.

The procedure would look sort-of like this:
proc scroll (line : string)
    % Scroll line string down the screen.
end scroll

Then all you would have to do is a series of calls for your credits:
scroll ("Programmer - BigBear")
scroll ("some other task - person's name")

You will also have to find where to place the text so it is centre. Just some basic math (mean/average).

If you make it that simple, you can easily implement loading the credits from a file as well.


-----------------------------------

BigBear

Sun Feb 10, 2008 12:49 pm


Re: Making Credits

-----------------------------------

They were all great suggestions almost as if you guys had done it before. :wink: 

I ended up just making it in paint but had to make multiple txt boxes then changed to to white writing and had to either change each pixel white. so I ended up doing some simple code in turing to Font.Draw my text then took a screen shot and pasted in into another paint cut the text out and pasted it into my credits bitmap.

setscreen ("graphics:max;max")
%var font : int := Font.New ("Arial:35:Bold") % Bold for Titles
var font : int := Font.New ("Arial:35:italic") %italic for Names lol
drawfillbox (0, 0, maxx, maxy, black)
Font.Draw ("Cody Scott", maxx div 2, maxy div 2, font, white)

I wondering why my teacher wanted credits. This is not my Ego. lol

Anyways here is my finished product thanks alot.


-----------------------------------

octopi

Sun Feb 10, 2008 9:49 pm


Re: Making Credits

-----------------------------------

I think you mean Mozilla, not Moxilla