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

lsys.ui: Use color objects

db4
Eduardo Cavazos 2008-08-06 14:24:29 -05:00
parent 833c608bec
commit ce81ab466a
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
extra/lsys/ui/ui.factor
View File

@ -41,7 +41,7 @@ VAR: model
: display ( -- )
black gl-clear
black set-clear-color GL_COLOR_BUFFER_BIT glClear
GL_FLAT glShadeModel
@ -57,7 +57,9 @@ camera> do-look-at
GL_FRONT_AND_BACK GL_LINE glPolygonMode
white gl-color
! white gl-color
white set-color
GL_LINES glBegin { 0 0 0 } gl-vertex { 0 0 1 } gl-vertex glEnd