forum.boolean.name

forum.boolean.name (http://forum.boolean.name/index.php)
-   2D-программирование (http://forum.boolean.name/forumdisplay.php?f=13)
-   -   Залитый и незалитый эллипсы (http://forum.boolean.name/showthread.php?t=18416)

Кирпи4 31.07.2013 14:51

Залитый и незалитый эллипсы
 
Привет булка.
Очередной раз убеждаюсь, что в математике я тот ещё пенёк.

Короче, понадобился код рисования эллипса между двумя точками (то есть чтобы эллипс входил в прямоугольник из этих точек), залитого и незалитого. Если кто знает, подскажите...

Nex 14.09.2013 11:05

Ответ: Залитый и незалитый эллипсы
 
:-)
Код:

Graphics 800,600,32,2
SetBuffer (BackBuffer ())

Global x1%,y1%,x2%,y%,x3%,y3%,width%,height%


While Not KeyHit (1)
        Cls ()
                If MouseHit (1) Then x1 = MouseX()        :y1 = 300;MouseY ()
                If MouseHit (2) Then x2 = MouseX()        :y2 = 300;MouseY ()

                width = -(x1-x2)
                height = width
               
                x3 = x1
                y3 = y1-(height/2.0)

                Color 50,50,50
                        Oval x3,y3,width,height
                Color 255,0,0
                        Plot x1,y1
                Color 0,255,0
                        Plot x2,y2
        Flip
Wend
End



Часовой пояс GMT +4, время: 22:01.

vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot