lindquist@85: module qd1;
lindquist@85: import qd;
lindquist@85: void main() {
lindquist@85:   screen(640, 480);
tomas@450:   sleep(1);
tomas@450: 
tomas@450:   cls(Red);
tomas@450:   sleep(1);
tomas@450: 
tomas@450:   cls(Green);
tomas@450:   sleep(1);
tomas@450: 
tomas@450:   cls(Blue);
tomas@450:   sleep(1);
tomas@450: 
tomas@450: //   pset(10, 10);
tomas@450: //   line(0, 0, 100, 100, Box, Back(Red~Black));
tomas@450: //   for (int i=0; i<=100; i+=10) {
tomas@450: //     line(i, 0, 100-i, 100);
tomas@450: //     line(0, i, 100, 100-i);
tomas@450: //   }
tomas@450: //   circle(100, 100, 50, 15, White~Black, Fill=White~Black);
tomas@450: //   paint(200, 200, Red, Back=White);
tomas@450: //   circle(100, 100, 50, 15, White);
tomas@450: //   paint(200, 200, Black);
tomas@450: //   pset(10, 11); pset(10, 11, Black);
tomas@450: //   pset(10, 10);
tomas@450: //   sleep(1);
lindquist@85: }