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

Gadd

Fri Mar 30, 2012 6:40 pm


Find the Hurkle Help PLZ! :)

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

hey guys :3 Hoping you could help me with a problem I'm having here. Basically I have a game and you need to find guess the x and y values.. so far I am making a nice grid for the user and I have the x numbers being 1 to 10 and the y values being 1 to 10 just the y values aren't aligned the way I want them to be ( left to right ) heres my code and it's commented I was wondering if you could help 


setscreen ("screen:45;55")%Set screen on inches. 


procedure Left_to_Right
    %These are all the lines going left to the right
    Draw.Line (350, 700, 50, 700, black)%This is the line farthest to the left 
    Draw.Line (350, 670, 50, 670, black)
    Draw.Line (350, 640, 50, 640, black)
    Draw.Line (350, 610, 50, 610, black)
    Draw.Line (350, 580, 50, 580, black)
    Draw.Line (350, 550, 50, 550, black)
    Draw.Line (350, 520, 50, 520, black)
    Draw.Line (350, 490, 50, 490, black)
    Draw.Line (350, 460, 50, 460, black)
    Draw.Line (350, 430, 50, 430, black)
    Draw.Line (350, 400, 50, 400, black)%This is the line farthest to the right 
end Left_to_Right

procedure Up_to_Down
    %these are all the lines going from up to down 
    Draw.Line (50, 700, 50, 400, black)%This is the line farthest left 
    Draw.Line (80, 700, 80, 400, black)
    Draw.Line (110, 700, 110, 400, black)
    Draw.Line (140, 700, 140, 400, black)
    Draw.Line (170, 700, 170, 400, black)
    Draw.Line (200, 700, 200, 400, black)
    Draw.Line (230, 700, 230, 400, black)
    Draw.Line (260, 700, 260, 400, black)
    Draw.Line (290, 700, 290, 400, black)
    Draw.Line (320, 700, 320, 400, black)
    Draw.Line (350, 700, 350, 400, black)%This is the line farthest to the right 
end Up_to_Down

procedure MAIN
  %Here is the 1 .. 10 for the y coord of the grid 
  for decreasing y: 10 .. 1 
    put ""
    put "":3, y
  end for 
  %This is the for I'm hoping to make go left to right under the grid!! :3
  for x: 1 .. 10 
    put "" 
    put "":5, x %I wanna get this in a straight line some how. 
  end for 
end MAIN

MAIN%These are the procedures
Left_to_Right
Up_to_Down


I wanna make it look : 


10
9
8
7
6
5
4
3
2
1
  1 2 3 4 5 6 7 8 9 10