You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

34 lines
877 B

  1. {$CLASS Color}
  2. {$PROPERTY UseColorMap 'false'}
  3. {$END}
  4. {$CLASS ColorFrag $EXTENDS Color}
  5. /* you can also define code here. It will be added when the code for the class is generated */
  6. {$FUNC 'vec4' GetColor $INLINE}
  7. {$IF UseColorMap}
  8. {$VAR 'vec2' '_texCoord' 'gl_TexCoord[0].st'}
  9. {$UNIFORM 'sampler2D' 'uColorMap'}
  10. return texture2D(uColorMap, _texCoord);
  11. {$ELSE}
  12. return gl_Color;
  13. {$END}
  14. {$END}
  15. {$MAIN}
  16. gl_FragColor = {$CALL GetColor};
  17. {$END}
  18. {$END}
  19. {$CLASS ColorVert $EXTENDS Color}
  20. {$MAIN}
  21. gl_Position = gl_ModelViewProjectionMatrix * gl_Vertex;
  22. {$IF UseColorMap}
  23. gl_TexCoord[0] = gl_MultiTexCoord0;
  24. {$ELSE}
  25. gl_FrontColor = gl_Color;
  26. gl_BackColor = gl_Color;
  27. {$END}
  28. {$END}
  29. {$END}