* CubeLoad.s - code to load a pointer to cube data

********************************************************
* ** NAME: LoadCube - get pointer to cube data
*
* Purpose:
*
* Entry: None
*
* Exit:  C[A] is pointer to data: 1st 2 nibs is number of lines, then
*             a list of data, one for each line, 4 bytes each: 
*                   2 bytes giving point indices for the endpoints
*                   2 bytes pointing to normals of the polys this line is a part of
*             then 2 nibs with the point count, then coords (x,y,z) as 
*             1.7 signed fixed point numbers. There are also poly face normals stored here 
*
* Alters: C[A],A[A]
*
* Calls:
*
* Stack Levels: 0 
*
*
********************************************************

* the cube data
	NIBHEX	C0                                                 * number of lines reversed nibbles  :  2 nibs
	NIBHEX	001080C0104080B0204080D0002080A0				   * 12 line connections 12*8          : 96 nibs
	NIBHEX	306090A0607090D0507090B0305090C0
	NIBHEX	2060A0D00030A0C01050B0C04070B0D0
	NIBHEX	E0                                                 * number of points                  :  2 nibs
	NIBHEX	0000A73700927C46927CC99293467D93C97DD8007D000068   * the coords 8*3 = 24bytes          : 48 nibs
	NIBHEX  91B2327E5DDDEC00322300DD915D327EB2DD			   * and 6 normals 6*3=18 bytes        : 36 nibs

LoadCube
	C=PC					* get program counter
	LA(5)		(2+96+2+48+36)+4 * this far back in table in nibbles
	C=C-A		A			* table pointer value
	RTN				

* end - CubeLoad.s