VERT

DCL IN[0]
DCL IN[1]
DCL OUT[0], POSITION
DCL OUT[1], COLOR

MOV OUT[0], IN[0]
DST OUT[1], IN[1], IN[0]

END