noob needs help

[War_Caymore]

this is such a simple program (for the "anything under 20 lines contest") but for some reason it's not working. i can't seem to find my problem. it's been 6 months sence i written any code so i'm a little rusty. i jusut my comp up and running.

code:

View.Set ("graphics") var font : int var x, y : int font := Font.New ("sans serif:18:bold") assert font > 0 Font.Draw ("Whats that?", 240, 200, font, black) delay (3000) cls Font.Draw ("omigod!", 260, 200, font, black) delay (3000) loop     Draw.FillOval (200, 300, x, y, red)     x := x + 1     y := y + 1     if x = 600, end end loop

[do_pete]

Please post more descriptive titles. Here is the fixed version of your code.

code:

View.Set ("graphics") var font : int var x, y : int := 0 font := Font.New ("sans serif:18:bold") assert font > 0 Font.Draw ("Whats that?", 240, 200, font, black) delay (3000) cls Font.Draw ("omigod!", 260, 200, font, black) delay (3000) loop     Draw.FillOval (200, 300, x, y, red)     x := x + 1     y := y + 1     exit when x = 600 end loop

Basically, all you need to do is assign x and y a value before going x := x + 1 and y := y + 1. You also need to change your second last line.

[War_Caymore]

do_pete wrote:

Please post more descriptive titles.

sorry about that.

thanx. actualy... right when you posted i kinda figured out my problem.

but thanx for the help. bits for you.

[ZeroPaladn]

Cute, brother. Anyways, yeah, your title should probably state what your problem is. PM me when you can bro, so i can find out what yoru classes are over @ MHS.