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 LINE_STRIP
  4. PROPERTY GS_MAX_OUTPUT_VERTICES 8
  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 TEMP[0]
  10.  
  11. MOV TEMP[0], IN[0][0]
  12. ADD TEMP[0].y, IN[0][0], IN[1][0]
  13.  
  14. MOV OUT[0], TEMP[0]
  15. MOV OUT[1], IN[0][1]
  16. EMIT
  17. MOV OUT[0], IN[2][0]
  18. MOV OUT[1], IN[0][1]
  19. EMIT
  20. MOV OUT[0], IN[0][0]
  21. MOV OUT[1], IN[2][1]
  22. EMIT
  23. MOV OUT[0], TEMP[0]
  24. MOV OUT[1], IN[0][1]
  25. EMIT
  26. ENDPRIM
  27.  
  28. MOV OUT[0], TEMP[0]
  29. MOV OUT[1], IN[0][1]
  30. EMIT
  31. MOV OUT[0], IN[2][0]
  32. MOV OUT[1], IN[0][1]
  33. EMIT
  34. MOV OUT[0], IN[1][0]
  35. MOV OUT[1], IN[2][1]
  36. EMIT
  37. MOV OUT[0], TEMP[0]
  38. MOV OUT[1], IN[0][1]
  39. EMIT
  40. ENDPRIM
  41.  
  42. END
  43.