3d Text positioning

[air_force91]

i know how to make a 3d text effect...but how do i postion the text on the screen like this: Welcome
To
My Page!

[Thuged_Out_G]

you can use Font.Draw to position text...or an easier way

locate(x,y)

[shorthair]

i dont belive that will work for 3d font

[Homer_simpson]

air_force91 wrote:

i know how to make a 3d text effect...but how do i postion the text on the screen like this: Welcome
To
My Page!

how do u make 3d text effect?

[air_force91]

code:

var size : int var text : string put "enter text" get text:* put "enter size" get size var fontID : array..size of int for i:size div 2..size fontID(i) :=Font.New("Arial:"+intstr(i)) end for procedure Text3D(text:string) for t:i..length(text) for i:size div 2..size Font.Draw(text(t), t*size, 100, fontID(i), 20+floor (i/size*10)) end for end Text3D Text3D(text)

do any of u have a much smaller code for 3D text?

and im not sure if the locate command does work with 3D...ive tried it b4...

[air_force91]

yo...can u tell me how i can insert Font.Draw in my code to match the way i want the text to appear...i already have one Font.Draw in my code...

[Tony]

you should give credit when quoting code like that... I think I wrote that

anyways... in the line

code:

Font.Draw(text(t), t*size, 100, fontID(i), 20+floor (i/size*10))

t*size is the X positin
100 is the Y

to change the location of the string you just add a number to those values.

If you're trying to display the text on 3 lines, you'd have to run the code 3 times, once for each line

[air_force91]

sorry...i found the code long time ago...so didn't look up the source...but the code is really helpful...thanx...thanx a lot...teacher's giving only 5 days to complete programming an interfacing game ...but it really helps... 8)