ZSprite.java

import java.util.ArrayList;
import java.util.Map;
import java.util.TreeMap;

public class ZSprite extends ZDraw implements ScenePrimitive, JSONSerializable{
	//transparent ZDraw
	int x,y,z;
	boolean transparent; //transparent <=> dataVisible!=null (should be)
	boolean dataVisible[];
	int color[];
	
	
	public ZSprite(){}
	//reads a heightmap from the given array and normalize it
	public ZSprite(int[] heightMap, int w, int h){
		transparent=true;
		setSize(w,h);
		readHeightMapFrom(heightMap);
		normalizeZ();
	}
	
	public ZSprite(int width, int height)
	{
		transparent=false;
		setSize(width, height);
	}

	//O(1) shared copy (should never be modified)
	public ZSprite fastClone(){
		ZSprite res = new ZSprite();
		res.data = data;
		res.w=w;
		res.h=h;
		res.start=start;
		res.stride=stride;
		res.transparent = transparent;
		res.dataVisible = dataVisible;
		res.color = color;
		res.x=x;
		res.y=y;
		res.z=z;
		return res;
	}

	@Override
	public void setSize(int nw, int nh){	
		super.setSize(nw,nh);
		if (transparent)
			dataVisible=new boolean[start+stride*nh];
	}	
	
	//subtracts the z value of the first invisible point (!!!!!!!) from every z-vaue
	public void normalizeZ(){
		int baseZ=0;
		int b=getLineIndex(0);
		for (int x=0;x<w;x++)
			if (transparent && !dataVisible[b+x]) {
				baseZ=data[b+x];
				break;
			}
		normalizeZ(baseZ);
	}
	
	//subtracts baseZ from every z value
	public void normalizeZ(int baseZ){
		if (baseZ==0) return;
		for (int y=0; y<h; y++)
		{
			int b = getLineIndex(y);
			for (int x=0; x<w; x++)
				data[b+x]-=baseZ;
		}
	}
	
	public void readHeightMapFrom(int[] from){
		//read height data
		super.readHeightMapFrom(from);
        if (transparent) {
            //set inverse alpha channel
            for (int y=0; y<h; y++)
            {
                int b = getLineIndex(y);
                for (int x=0; x<w; x++)
                    dataVisible[b+x]=((from[b+x]&0xff000000)>>>24) > 0x80;
            }
        }
	}
	
	public void drawTo(ZDraw zbuffer, int xo, int yo){
	//	System.out.println("print to: " +x+"/"+y+" size: "+w+":"+h);
		int fx=0;
		int fy=0;
		int tx=w;
		int ty=h;

		int rx=x+xo-fx;//relativ offset (local->global system)
		int ry=y+yo-fy;

		//intersect own bounding box with buffer bounding box
		if (fx+rx < 0) fx = - rx;
		if (tx+rx > zbuffer.w) tx = zbuffer.w - rx;
		if (fy+ry < 0) fy = -ry;
		if (ty+ry > zbuffer.h) ty = zbuffer.h - ry;
		if (fx >= tx) return;
		//try{
		for (int cy=fy; cy<ty; cy++)
		{
			int b = getLineIndex(cy);
			int bo = zbuffer.getLineIndex(cy+ry)+rx;
			if (!transparent) {
				for (int cx=fx; cx<tx; cx++)
					zbuffer.customPut(bo+cx,data[b+cx]+z);
			} else {
				for (int cx=fx; cx<tx; cx++)
					if (dataVisible[b+cx])
						zbuffer.customPut(bo+cx,data[b+cx]+z);
			}
		}
/*		} catch (ArrayIndexOutOfBoundsException e){
			System.out.println(x+"/"+y+"/"+z+": "+h+"/"+w+"/"+tx+"/"+ty+"=>"+getLineIndex(ty-1)+" "+ data.length+" "+dataVisible.length+"  roi: "+start+" - "+stride);
			throw e;
		}*/
	}

	public static void colorPut(ZDraw buffer, ZDraw colorMap, int pos, int value, int color){
		if (buffer.data[pos] < value) {
			buffer.data[pos] = value;
			colorMap.data[pos] = color;
		}
	}

	public void drawTo(ZDraw zbuffer, ZDraw colorMap, int xo, int yo){
		if (color == null) {
			drawTo(zbuffer, xo, yo);
			return;
		}
/*		} catch (ArrayIndexOutOfBoundsException e){
			System.out.println(x+"/"+y+"/"+z+": "+h+"/"+w+"/"+tx+"/"+ty+"=>"+getLineIndex(ty-1)+" "+ data.length+" "+dataVisible.length+"  roi: "+start+" - "+stride);
			throw e;
		}*/
		int fx=0;
		int fy=0;
		int tx=w;
		int ty=h;

		int rx=x+xo-fx;//relativ offset (local->global system)
		int ry=y+yo-fy;

		//intersect own bounding box with buffer bounding box
		if (fx+rx < 0) fx = - rx;
		if (tx+rx > zbuffer.w) tx = zbuffer.w - rx;
		if (fy+ry < 0) fy = -ry;
		if (ty+ry > zbuffer.h) ty = zbuffer.h - ry;
		if (fx >= tx) return;
		//try{
		for (int cy=fy; cy<ty; cy++)
		{
			int b = getLineIndex(cy);
			int bo = zbuffer.getLineIndex(cy+ry)+rx;
			if (!transparent) {
				for (int cx=fx; cx<tx; cx++)
					colorPut(zbuffer, colorMap, bo+cx,data[b+cx]+z,color[b+cx]);
			} else {
				for (int cx=fx; cx<tx; cx++)
					if (dataVisible[b+cx])
						colorPut(zbuffer, colorMap, bo+cx,data[b+cx]+z,color[b+cx]);
			}
		}
	}



	public Vector3i centerI(){
		return new Vector3i(x+w/2,y+h/2,z);
	}
	public void move(int x, int y, int z){
		this.x+=x;
		this.y+=y;
		this.z+=z;
	}

	public void moveTo(Vector3i to){
		this.x=to.x-w/2;
		this.y=to.y-h/2;
		this.z=to.z;
	}
	public void moveTo(int x, int y, int z){
		this.x=x-w/2;
		this.y=y-h/2;
		this.z=z;
	}
	public Vector3i cornerLTF(){
		return new Vector3i(x, y, z);
	}
	public Vector3i cornerRBN(){
		return new Vector3i(x+w, y+h, ZDraw.MAXZ);
	}

	public int zAt(int wx, int wy){
		if (!inBounds(wx-x, wy-y)) return -1;
		if (transparent && !dataVisible[getIndex(wx-x, wy-y)]) return -1;
		return data[getIndex(wx-x, wy-y)];
	}

	public boolean intersectBoundaries2D(ZSprite sprite, int[] boundary) {
		//calculate intersection rect in local coords
		int ox = sprite.x - x;
		int il = Math.max(0, ox);
		int ir = Math.min(w, ox + sprite.w);
		if (il >= ir)
			return false;
		int oy = sprite.y - y;
		int it = Math.max(0, oy);
		int ib = Math.min(h, sprite.h + oy);
		if (it >= ib)
			return false;

		boundary[0] = il;
		boundary[1] = it;
		boundary[2] = ir;
		boundary[3] = ib;
		return true;
	}

	public boolean intersect(ZSprite sprite, int dx, int dy, boolean removeIntersectionInThis){
		//calculate intersection rect in local coords
		int ox = sprite.x - x + dx;
		int il = Math.max(0, ox);
		int ir = Math.min(w, ox + sprite.w);
		if (il >= ir)
			return false;
		int oy = sprite.y - y + dy;
		int it = Math.max(0, oy);
		int ib = Math.min(h, sprite.h + oy);
		if (it >= ib)
			return false;

		//sprite equal to bounding rect
		if (!transparent && !sprite.transparent)
			return true;

		//pixel check
		removeIntersectionInThis = removeIntersectionInThis && transparent;

		boolean result=false;

		int oz=sprite.z - z;
		int zeps = 2;
		for (int y=it;y<ib;y++){
			int b = getLineIndex(y);
			int b2 = sprite.getLineIndex(y - oy);
			for (int x=il;x<ir;x++)
				if (dataVisible[b+x] && sprite.dataVisible[b2+x-ox]&&
				    Math.abs(data[b+x]    - sprite.data[b2+x-ox]  - oz) <= zeps){
					result=true;
					if (removeIntersectionInThis) dataVisible[b+x]=false;
					else return result;
				}
		}
		return result;
	}


	public int minZ(){
		assert transparent;
		int res = Integer.MAX_VALUE;
		for (int y=0; y<h; y++)
		{
			int b = getLineIndex(y);
			for (int x=0; x<w; x++)
				if (dataVisible[b+x])
					res = Math.min(res, data[b+x]);
		}
		return res;
	}
	public int maxZ(){
		assert transparent;
		int res = Integer.MIN_VALUE;
		for (int y=0; y<h; y++)
		{
			int b = getLineIndex(y);
			for (int x=0; x<w; x++)
				if (dataVisible[b+x])
					res = Math.max(res, data[b+x]);
		}
		return res;
	}

	public Object jsonSerialize(){
		TreeMap<String,Object> tm = new TreeMap<String,Object>();
		tm.put("type", "ZSprite");
		tm.put("position", new int[]{x, y, z});
		return tm;
	}
	public void jsonDeserialize(Object obj){
		Map<String, Object> map = ((Map<String, Object>)obj);
		assert ("ZSprite".equals( map.get("type")));
		ArrayList<Number> p = (ArrayList<Number>) map.get("position");
		x=p.get(0).intValue();
		y=p.get(1).intValue();
		z=p.get(2).intValue();
	}

}