Drawprimitive
BlitzMax Forums/BlitzMax Beginners Area/Drawprimitive
| ||
Can anybody see what I've done wrong here as it displayed a blank screen...Function DrawRecttg( x0#,y0#,x1#,y1#,tx#,ty# ) Local cverts#[16] cverts[0]=x0+y0+tx cverts[1]=x0+y0+ty cverts[4]=x1+y0+tx cverts[5]=x1+y0+ty cverts[8]=x0+y1+tx cverts[9]=x0+y1+ty cverts[12]=x1+y1+tx cverts[13]=x1+y1+ty For i:Int = 0 To 15 Print "cverts[" + i + "] = " + cverts[i] Next primarydevice.device.DrawPrimitive(D3DPT_TRIANGLESTRIP,D3DFVF_XYZ|D3DFVF_DIFFUSE,cverts,4,0) End Function Graphics 800,600 While Not AppTerminate() Cls drawrecttg(0.0,0.0,100.0,100.0,0.0,0.0) ' _max2ddriver.drawrect(0.0,0.0,100.0,100.0,0.0,0.0) Flip Wend Calling _max2ddriver.drawrect directly with same parms works OK. <edit> OK, got it. I wasn't setting any vertex colours. |