need help urgent
Posted: Thu Feb 10, 2005 8:26 pm
ar x1, x2, y1, y2 : int
var c : string
put "Enter width of the box for :"
get x1
put "Enter height of the box in pixels:"
get x2
put "Enter x-coordinate of the lower-left corner of the box in pixels:"
get y1
put "Enter y-coordinate of the lower-left corner of the box in pixels:"
get y2
put "enter the character "
get c
cls
for horiz : 1 .. 80
locate (horiz,x2)
put c ..
locate (horiz,x1)
put c..
end for
for width : 1 .. 25
locate (y1, width)
put c ..
locate (y2, width)
put c..
end for
we have make a square from output the user give you , but mines doesn't work help me please!!!!!!!!!!!!!!!!!!!!!!!!1
Archived topic from Iceteks, old topic ID:3106, old post ID:25395
var c : string
put "Enter width of the box for :"
get x1
put "Enter height of the box in pixels:"
get x2
put "Enter x-coordinate of the lower-left corner of the box in pixels:"
get y1
put "Enter y-coordinate of the lower-left corner of the box in pixels:"
get y2
put "enter the character "
get c
cls
for horiz : 1 .. 80
locate (horiz,x2)
put c ..
locate (horiz,x1)
put c..
end for
for width : 1 .. 25
locate (y1, width)
put c ..
locate (y2, width)
put c..
end for
we have make a square from output the user give you , but mines doesn't work help me please!!!!!!!!!!!!!!!!!!!!!!!!1
Archived topic from Iceteks, old topic ID:3106, old post ID:25395