{$CLASS Color}
    {$PROPERTY UseColorMap 'false'}
{$END}

{$CLASS ColorFrag $EXTENDS Color}
    {$FUNC 'vec4' GetColor $INLINE}
        {$IF UseColorMap}
            {$VAR 'vec2' '_texCoord' 'gl_TexCoord[0].st'}
            {$UNIFORM 'sampler2D' 'uColorMap'}
            return texture2D(uColorMap, _texCoord);
        {$ELSE}
            return gl_Color;
        {$END}
    {$END}
    
    {$MAIN}
        gl_FragColor = {$CALL GetColor};
    {$END}
{$END}

{$CLASS ColorVert $EXTENDS Color}
    {$MAIN}
        gl_Position = gl_ModelViewProjectionMatrix * gl_Vertex;
        {$IF UseColorMap}
            gl_TexCoord[0] = gl_MultiTexCoord0;
        {$ELSE}
            gl_FrontColor = gl_Color;
            gl_BackColor  = gl_Color;
        {$END}
    {$END}
{$END}