//
//
//	VECG Copyright 1998-2003, Foundation Internet Services
//
//


import java.net.*;
import java.io.*;
import java.applet.*;
import java.awt.*;

public class Vecg extends Applet {

URL url;
int leadOn = 12;
TextArea text = new TextArea();
Choice ls = new Choice();
Choice dx = new Choice();
DataInputStream inStream;
Ecg[] lead = new Ecg[12];
Ecg[] plane = new Ecg[2];
int[][] tears = new int[120][3];
int numtears;
String descText;
String startVecg;

boolean highlight;

public void init() {
	
	lead[0] = new Ecg("I", 0,0);
	lead[1] = new Ecg("II",0,1);
	lead[2] = new Ecg("III",0,2);
	lead[3] = new Ecg("aVR",1,0);
	lead[4] = new Ecg("aVL",1,1);
	lead[5] = new Ecg("aVF",1,2);
	lead[6] = new Ecg("V1",2,0);
	lead[7] = new Ecg("V2",2,1);
	lead[8] = new Ecg("V3",2,2);
	lead[9] = new Ecg("V4",3,0);
	lead[10] = new Ecg("V5",3,1);
	lead[11] = new Ecg("V6",3,2);

	plane[0] = new Ecg("Frontal",0);
	plane[1] = new Ecg("Transverse",2);
	
	setLayout(null);	
	add(dx);
	add(ls);
	add(text);
	
	loadChoice(dx,"vecgs");
	loadChoice(ls,"leadsys");

	text.reshape(5,5,340,100);
	dx.reshape(350,5,150,15);
	ls.reshape(350,30,150,15);
	startVecg = getParameter("startwith");
	if ( startVecg == null ) { startVecg = "normal"; }
	dx.select(startVecg);
	loadVe();
	loadLd();
	}


void loadChoice(Choice which, String file){
	String inline;
	try{
	url= new URL(getDocumentBase(),file);
	inStream = new DataInputStream(url.openStream());
	
	while((inline = inStream.readLine()) != null) {
	which.addItem(inline.trim());
	}
	}

catch (MalformedURLException ex) { text.setText("Bad URL"); }
catch (IOException ex) { text.setText("IO Exception"); }

}


void loadVe(){
	String inline;	
	descText = "";
	try{
	url= new URL(getDocumentBase(), dx.getSelectedItem() + ".ve");
	inStream = new DataInputStream(url.openStream());


	inline = inStream.readLine();	
	numtears = Integer.parseInt(inline.trim());

	for (int i=0; i < numtears; i++){
		for (int j=0; j<3; j++){
		inline = inStream.readLine();
		tears[i][j] = Integer.parseInt(inline.trim());
		}
	}
	
	while((inline = inStream.readLine()) != null) {
		descText += inline + "\n";
	}
	
	}

catch (MalformedURLException ex) { text.setText("Bad URL"); }
catch (IOException ex) { text.setText("IO Exception"); }

}

void loadLd(){
	String inline;
	try{
	url = new URL(getDocumentBase(), ls.getSelectedItem() + ".ld");
	inStream = new DataInputStream(url.openStream());

	for (int i=0; i < 12; i++){	
		inline = inStream.readLine();
		lead[i].vx = -Integer.parseInt(inline.trim());
		inline = inStream.readLine();
		lead[i].vy = -Integer.parseInt(inline.trim());
		inline = inStream.readLine();
		lead[i].vz = -Integer.parseInt(inline.trim());
	
		lead[i].vl = Math.sqrt(lead[i].vx*lead[i].vx + lead[i].vy*lead[i].vy + lead[i].vz*lead[i].vz);
		}

	}

catch (MalformedURLException ex) { text.setText("Bad URL"); }
catch (IOException ex) { text.setText("IO Exception"); }

}


public void update(Graphics g){
	paint(g);
	}

public void paint(Graphics g){

int voltage;
Rectangle r = bounds();
g.setColor(Color.white);
g.fillRect(r.x,r.y,r.width,r.height);

for (int i = 0; i < 2; i++){ plane[i].drawAxes(g); }
for (int i = 0; i < 12; i++){ 
	highlight = false;
	if (i==leadOn) highlight = true;
	lead[i].drawBox(g,highlight); }

for (int i=0; i<numtears; i++){
	for (int j=0; j<12; j++){
		lead[j].drawSeg(g, lead[j].nextX(i), lead[j].voltage(tears[i][0], tears[i][1], tears[i][2]));	
		}
	}
for (int i=0; i<12; i++){ lead[i].finishLead(g); }

text.setText(descText);

if ( leadOn < 12) {
	int x = (int) (-lead[leadOn].vx/20);
	int y = (int) (-lead[leadOn].vy/20);
	int z = (int) (lead[leadOn].vz/20);
	double xyl = Math.sqrt(lead[leadOn].vx*lead[leadOn].vx + lead[leadOn].vy*lead[leadOn].vy);
	double xzl = Math.sqrt(lead[leadOn].vx*lead[leadOn].vx + lead[leadOn].vz*lead[leadOn].vz);
	int ux = (int) (-lead[leadOn].vx * 50 / xyl);
	int uy = (int) (-lead[leadOn].vy * 50 / xyl); 	
	plane[0].drawVector(g, -uy, ux);	
	plane[0].drawVector(g, uy, -ux);
	ux = (int) (-lead[leadOn].vx * 50 / xzl);
	int uz = (int) (lead[leadOn].vz * 50 / xzl);
	plane[1].drawVector(g, -uz, ux);	
	plane[1].drawVector(g, uz, -ux);
	
	plane[0].drawVector(g, x, y); 
	plane[1].drawVector(g, x, z);

	
	leadOn = 12; 
	}

g.setColor(Color.red);
for (int i=0; i<numtears; i++){
	plane[0].drawSeg(g,tears[i][0],tears[i][1]);
	plane[1].drawSeg(g,tears[i][0],-tears[i][2]);
	try{ Thread.sleep(60); }
	catch (InterruptedException e){ break; }
	}
}

public boolean action(Event e, Object what){
	if (!(e.target instanceof Choice)) return false;
	if ( (Choice) e.target == dx ) { loadVe(); }
	else { loadLd(); }
	repaint();
	return true;
	}

public boolean mouseDown(Event e, int x, int y){

for (int i=0; i<12; i++){
	if (lead[i].here(x,y)) { leadOn = i; break; }
	}
if (leadOn < 12) { repaint(); return true; }
return false;
}


}


class Ecg {

public String sname;
public static int sw = 80;
public static int sh = 50;
public static int sep = 5;
public static int aw = 100;
public static int startScalarY = 150;
public static int startPlaneY = 125;
public int ox;
public int oy;
public int cx;
public int cy;
public int vx;
public int vy;
public int vz;
public double vl;
public int speed = 2;

Ecg(String n, int x, int y) {
	ox = sep + x*(sep+sw);
	oy = startScalarY + y * (sep+sh);
	sname = n;
	}

Ecg(String n, int y){
	ox = 4*(sw+sep) + sep*2 +aw/2;
	oy = startPlaneY + y * (sep+sh);
	sname = n;
	}
	
public void zero(){
	cx = 0;
	cy = 0;
	}

public boolean here(int x, int y){
	if ((Math.abs(ox+sw/2-x) < sw/2) & (Math.abs(oy-y) < sh/2)) return true;
	return false;
	}

public void drawBox(Graphics g, boolean highlight){
	g.setColor(Color.white);
	g.fillRect(ox,oy-sh/2,sw,sh);
	g.setColor(Color.black);
	if (highlight) g.setColor(Color.blue);
	g.drawRect(ox,oy-sh/2,sw,sh);
	g.drawString(sname,ox+5,oy+10-sh/2);
	zero();
	g.setColor(Color.black);
	drawSeg(g, 20, 0);
	}

	
public void drawSeg(Graphics g, int x, int y){
	g.drawLine(cx+ox, cy+oy, x+ox, y+oy);
	cx = x;
	cy = y;
	}

public int nextX(int i){
	return cx + i%speed;
	}

public void finishLead(Graphics g){
	drawSeg(g, sw, 0);
	}

public int voltage(int x, int y, int z){
	return (int) ((x*vx + y*vy + z*vz) * .35 / vl);
	}

public void drawAxes(Graphics g){
	g.setColor(Color.white);
	g.fillRect(ox-aw/2,oy-aw/2,aw,aw);
	g.setColor(Color.black);
	g.drawLine(ox-aw/2, oy, ox+aw/2, oy);
	g.drawLine(ox, oy-aw/2, ox, oy+aw/2);
	g.drawString(sname,ox+5,oy-aw/2+10);
	zero();
	}

public void drawVector(Graphics g, int x, int y){
	g.setColor(Color.blue);
	g.drawLine(ox, oy, ox+x, oy+y);
	}
}