/*
HUI3 scoring algorithm

By:	Joanne Wu
If you found a bug or would like to comment on this program, 
please email qfw@usc.edu 
*/

	**HUI-III SCORING ALGORITHM**;
	*----VISION----;
	IF      VISION=1 THEN B1=1;
	ELSE IF VISION=2 THEN B1=0.98;
	ELSE IF VISION=3 THEN B1=0.89;
	ELSE IF VISION=4 THEN B1=0.84;
	ELSE IF VISION=5 THEN B1=0.75;
	ELSE IF VISION=6 THEN B1=0.61;

	*----HEARING----;
	IF      HEAR=1 THEN B2=1;
	ELSE IF HEAR=2 THEN B2=0.95;
	ELSE IF HEAR=3 THEN B2=0.89;
	ELSE IF HEAR=4 THEN B2=0.80;
	ELSE IF HEAR=5 THEN B2=0.74;
	ELSE IF HEAR=6 THEN B2=0.61;

	*----SPEECH----;
	IF      SPEECH=1 THEN B3=1;
	ELSE IF SPEECH=2 THEN B3=0.94;
	ELSE IF SPEECH=3 THEN B3=0.89;
	ELSE IF SPEECH=4 THEN B3=0.81;
	ELSE IF SPEECH=5 THEN B3=0.68;

	*----AMBULATION----;
	IF      AMBULATE=1 THEN B4=1;
	ELSE IF AMBULATE=2 THEN B4=0.93;
	ELSE IF AMBULATE=3 THEN B4=0.86;
	ELSE IF AMBULATE=4 THEN B4=0.73;
	ELSE IF AMBULATE=5 THEN B4=0.65;
	ELSE IF AMBULATE=6 THEN B4=0.58;

	*----DEXTERITY----;
	IF      DEXT=1 THEN B5=1;
	ELSE IF DEXT=2 THEN B5=0.95;
	ELSE IF DEXT=3 THEN B5=0.88;
	ELSE IF DEXT=4 THEN B5=0.76;
	ELSE IF DEXT=5 THEN B5=0.65;
	ELSE IF DEXT=6 THEN B5=0.56;

	*----EMOTION----;
	IF      EMOTN2=1 THEN B6=1;
	ELSE IF EMOTN2=2 THEN B6=0.95;
	ELSE IF EMOTN2=3 THEN B6=0.85;
	ELSE IF EMOTN2=4 THEN B6=0.64;
	ELSE IF EMOTN2=5 THEN B6=0.46;

	*----COGNITION----;
	IF      COGNIT=1 THEN B7=1;
	ELSE IF COGNIT=2 THEN B7=0.92;
	ELSE IF COGNIT=3 THEN B7=0.95;
	ELSE IF COGNIT=4 THEN B7=0.83;
	ELSE IF COGNIT=5 THEN B7=0.60;
	ELSE IF COGNIT=6 THEN B7=0.42;

	*----PAIN----;
	IF      PAIN2=1 THEN B8=1;
	ELSE IF PAIN2=2 THEN B8=0.96;
	ELSE IF PAIN2=3 THEN B8=0.90;
	ELSE IF PAIN2=4 THEN B8=0.77;
	ELSE IF PAIN2=5 THEN B8=0.55;

	UTHUI3=(1.371*B1*B2*B3*B4*B5*B6*B7*B8)-0.371;

	LABEL UTHUI3='HUI3 UTILITY';

	DROP B1-B8;