Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Last modification | View Log | RSS feed

  1. GEOM
  2. PROPERTY GS_INPUT_PRIMITIVE TRIANGLES
  3. PROPERTY GS_OUTPUT_PRIMITIVE TRIANGLE_STRIP
  4. PROPERTY GS_MAX_OUTPUT_VERTICES 3
  5. DCL IN[][0], POSITION, CONSTANT
  6. DCL IN[][1], COLOR, CONSTANT
  7. DCL OUT[0], POSITION, CONSTANT
  8. DCL OUT[1], COLOR, CONSTANT
  9. DCL CONST[1][0..6]
  10.  
  11. MOV OUT[0], IN[0][0]
  12. MOV OUT[1], CONST[1][0]
  13. EMIT
  14.  
  15. MOV OUT[0], IN[1][0]
  16. MOV OUT[1], CONST[1][1]
  17. EMIT
  18.  
  19. MOV OUT[0], IN[2][0]
  20. MOV OUT[1], CONST[1][4]
  21. EMIT
  22.  
  23. ENDPRIM
  24.  
  25. END
  26.