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

skier

Wed Nov 03, 2004 5:04 pm


font help

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

alright im trying to make this work grow until it gets to size 50. heres what i have so far but i dont work, any help?




setscreen ("graphics: 600,450,offscreenonly")

var font1 : int
var big : int
big := 10

Draw.FillBox (0, 0, 600, 450, 7)
loop

    font1 := Font.New ("Snap ITC", : big)
    big := big + 1
    
    Draw.Text ("PACMAN", 200, 300, font1, 12)
    
    Time.Delay (10)
    View.Update
end loop



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

Mazer

Wed Nov 03, 2004 5:26 pm



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

Change the line to:
font1 := Font.New ("Snap ITC :" + intstr (big))
But remember that you haven't made any checks to make it stop after 50. Also, you should call Font.Free on your font somewhere at the end of the loop.


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

skier

Wed Nov 03, 2004 5:33 pm



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

but hten the work becomesun readable


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

Mazer

Wed Nov 03, 2004 5:39 pm



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

So clear the screen.

cls



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

skier

Wed Nov 03, 2004 5:44 pm



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

ill bet that i look really dumb, dont i


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

skier

Wed Nov 03, 2004 5:54 pm



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

quick question;
what does "intstr" actually do?


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

Mazer

Wed Nov 03, 2004 6:21 pm



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

Don't worry, I've seen dumber.  :wink: 

intstr is a function that takes an integer as an input and returns a string.
An example:
put intstr(8008135)
Takes the integer 8008135 and returns the string "8008135".

If you want to know what a function/procedure does, just type it into the turing editor and hit F8 to see what parameters it takes and what it's output type is (see status bar), or hit F9 to open the turing reference with more in depth information about it.


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

skier

Wed Nov 03, 2004 6:30 pm



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

thanks for the help