//두번째 삼각형
            *pIndices++ = (WORD)( (y-1)*VERTS_PER_EDGE + (x-0) );
            *pIndices++ = (WORD)( (y-0)*VERTS_PER_EDGE + (x-1) );
            *pIndices++ = (WORD)( (y-0)*VERTS_PER_EDGE + (x-0) );
        }
    }
    ... 생략
    for( y = 0; y < VERTS_PER_EDGE; y++ )    {
        for( x = 0; x < VERTS_PER_EDGE; x++ )        {
            *pVertices++ = D3DXVECTOR2( ((float)x / (float)(VERTS_PER_EDGE-1) - 0.5f) * D3DX_PI,
                                        ((float)y / (float)(VERTS_PER_EDGE-1) - 0.5f) * D3DX_PI );
        }
    }
    ... 생략
}

    //함수가 실행된 시간에 기초해서 y의 위치를 변경한다.
    //그리고 정점을 변경해서 projectrion space에 넣는다.
    Output.Position = mul( float4( vPosition.x, fSin * 0.1f, vPosition.y, 1.0f ), mWorldViewProj );
   
    // Output the diffuse color as function of time and
    // the vertex's object space position
    //diffuse color를 출력한다. (함수의 시간과, 정점의 공간 위치에 의한)
    Output.Diffuse = 0.5f - 0.5f * fCos;
    return Output;
}

chunk ::= {stat [`;´]} [laststat [`;´]]
block ::= chunk
stat ::=  varlist `=´ explist | 
	 functioncall | 
	 do block end | 
	 while exp do block end | 
	 repeat block until exp | 
	 if exp then block {elseif exp then block} [else block] end | 
	 for Name `=´ exp `,´ exp [`,´ exp] do block end | 
	 for namelist in explist do block end | 
	 function funcname funcbody | 
	 local function Name funcbody | 
	 local namelist [`=´ explist] 

laststat ::= return [explist] | break
funcname ::= Name {`.´ Name} [`:´ Name]
varlist ::= var {`,´ var}
var ::=  Name | prefixexp `[´ exp `]´ | prefixexp `.´ Name 
namelist ::= Name {`,´ Name}
explist ::= {exp `,´} exp
exp ::=  nil | false | true | Number | String | `...´ | function | prefixexp | tableconstructor | exp binop exp | unop exp 
prefixexp ::= var | functioncall | `(´ exp `)´
functioncall ::=  prefixexp args | prefixexp `:´ Name args 
args ::=  `(´ [explist] `)´ | tableconstructor | String 
function ::= function funcbody
funcbody ::= `(´ [parlist] `)´ block end
parlist ::= namelist [`,´ `...´] | `...´
tableconstructor ::= `{´ [fieldlist] `}´
fieldlist ::= field {fieldsep field} [fieldsep]
field ::= `[´ exp `]´ `=´ exp | Name `=´ exp | exp
fieldsep ::= `,´ | `;´
binop ::= `+´ | `-´ | `*´ | `/´ | `^´ | `%´ | `..´ | `<´ | `<=´ | `>´ | `>=´ | `==´ | `~=´ | and | or
unop ::= `-´ | not | `#´