DrawLine(,,,);
- begin
- drawline(50,30,50,10);
- drawline(50,10,90,10);
- drawline(110,10,150,10);
- drawline(150,10,150,50);
- drawline(150,50,190,50);
- drawline(190,50,190,90);
- drawline(190,110,190,150);
- drawline(190,150,150,150);
- drawline(150,150,150,190);
- drawline(150,190,110,190);
- drawline(90,190,50,190);
- drawline(50,190,50,170);
- drawline(10,90,10,50);
- drawline(10,50,100,50);
- drawline(100,50,100,100);
- drawline(100,100,130,150);
- drawline(130,150,80,150);
- drawline(80,150,50,100);
- drawline(50,100,50,150);
- drawline(50,150,10,150);
- drawline(10,150,10,110);
- repaint;
- repeat
- until false
- end.
Попробуйте угадать, что же там нарисовано?