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