0 Members and 4 Guests are viewing this topic.
.TESTprgmGCOREData(40r,-40r,40r)→GDB1Data(40r,40r,40rData(-40r,-40r,40rData(-40r,40r,40rData(40r,-40r,-40rData(40r,40r,-40rData(-40r,-40r,-40rData(-40r,40r,-40rData(0,1,2,3,4,5,6,7)->°LinkListData(0,2,2,4,4,6,6,0Data(1,3,3,5,5,7,7,1GNewCam(°GMODELVIEW)GGenBuffer(8)→G //take in argument number of vertices and return an id OR 0 if failReturn!IfGBufferData(GDB1,G,8) //data to copy, id, size in vertices.While 1GUpdateBuffer(G) //take idFor(M,0,11) .there is 12 line to draw in a cubeGClipLine({M*2+°LinkList},{M*2+1+°LinkList}EndGGetkey()DispgraphClrdrawEndIf getkey(15)
GBufferUpdate(id, start_update,end_update)
GNewCam(°GWORLDVIEW)While 1GNewCam(Data(Ar,Br,Xr,Yr,Zr,0r))GRotate(10,10,10)GDelCam()GVertex({°GVertex}r,{°GVertex+2}r,{°GVertex+4}r)Pxl-on(,{°Gvertex+2}r)GGetkey()DispgraphClrdrawEndIf getkey(15)