Computer Science Canada

2 questions

Author:  Bskll [ Thu Oct 14, 2004 6:34 pm ]
Post subject:  2 questions

how do you color in the whole background of a window?

and how do you set with window size to 800 x 600?

Author:  Tony [ Thu Oct 14, 2004 6:37 pm ]
Post subject: 

code:

View.Set ("graphics:800;600")
colourback (black)
cls

Author:  Bskll [ Thu Oct 14, 2004 6:41 pm ]
Post subject: 

thanks and i have another question.

when i do this code:

code:
var xlines : int
var cirlines : int
var background : int
var divline : int

randint(xlines, 0, maxcolor)
randint(cirlines, 0, maxcolor)
randint(background, 0, maxcolor)
randint(divline, 0, maxcolor)


drawline(maxx div 3, maxy div 3, maxx div 3, maxy, divline)
drawline(maxx div 3+1, maxy div 3+1, maxx div 3+1, maxy, divline)
drawline(maxx div 3+2, maxy div 3+2, maxx div 3+2, maxy, divline)
drawline(maxx div 3+3, maxy div 3+3, maxx div 3+3, maxy, divline)
drawline(maxx div 3+4, maxy div 3+4, maxx div 3+4, maxy, divline)


how do i do a loop that draws say five line and stops?

Author:  Tony [ Thu Oct 14, 2004 7:00 pm ]
Post subject: 

code:

for i:0..4
drawline(maxx div 3+i, maxy div 3+i, maxx div 3+i, maxy, divline)
end for

Author:  Bskll [ Thu Oct 14, 2004 7:04 pm ]
Post subject: 

thanks a lot!!!!


: