steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

boids.ui: Add workaround for display glitch

db4
Eduardo Cavazos 2008-07-28 01:41:49 -05:00
parent d2352a15e6
commit 4f10ed4aaf
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
extra/boids/ui/ui.factor
View File

@ -36,6 +36,7 @@ IN: boids.ui
dup pos>> gl-translate-2d dup pos>> gl-translate-2d
vel>> first2 rect> arg rad>deg 0 0 1 glRotated vel>> first2 rect> arg rad>deg 0 0 1 glRotated
{ { 0 5 } { 0 -5 } { 20 0 } } triangle { { 0 5 } { 0 -5 } { 20 0 } } triangle
fill-mode
glPopMatrix ; glPopMatrix ;
: draw-boids ( -- ) boids> [ draw-boid ] each ; : draw-boids ( -- ) boids> [ draw-boid ] each ;
@ -43,9 +44,7 @@ IN: boids.ui
: boid-color ( -- color ) { 1.0 0 0 0.3 } ; : boid-color ( -- color ) { 1.0 0 0 0.3 } ;
: display ( -- ) : display ( -- )
white gl-clear
boid-color >fill-color boid-color >fill-color
2 glLineWidth
draw-boids ; draw-boids ;
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!