Check condition adult

CHCKADULTCONDITION	BEGSR
	RANDOMIZE	COMFORT
COMFORT	IFEQ	*TRUE
	ADD	50	CONDITIONCOUNT
	ELSE
	SUBTR	50	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	CURIOSITY
CURIOSITY	IFEQ	*TRUE
	ADD	50	CONDITIONCOUNT
	ELSE
	SUBTR	50	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	DREAMS
DREAMS	IFEQ	*TRUE
	ADD	51	CONDITIONCOUNT
	ELSE
	SUBTR	51	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	PHANTASY
PHANTASY	IFEQ	*TRUE
	ADD	70	CONDITIONCOUNT
	ELSE
	SUBTR	70	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	FREEDOM
FREEDOM	IFEQ	*TRUE
	ADD	100	CONDITIONCOUNT
	ELSE
	SUBTR	100	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	FRIENDSHIP
FRIENDSHIP	IFEQ	*TRUE
	ADD	123	CONDITIONCOUNT
	ELSE
	SUBTR	123	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	FOOD
FOOD	IFEQ	*TRUE
	ADD	350	CONDITIONCOUNT
	ELSE
	SUBTR	350	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	FUTURE
FUTURE	IFEQ	*TRUE
	ADD	150	CONDITIONCOUNT
	ELSE
	SUBTR	150	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	HUMOR
HUMOR	IFEQ	*TRUE
	ADD	180	CONDITIONCOUNT
	ELSE
	SUBTR	180	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	IMAGINATION
IMAGINATION	IFEQ	*TRUE
	ADD	200	CONDITIONCOUNT
	ELSE
	SUBTR	200	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	INTIMACY
INTIMACY	IFEQ	*TRUE
	ADD	350	CONDITIONCOUNT
	ELSE
	SUBTR	350	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	LAUGHTER
LAUGHTER	IFEQ	*TRUE
	ADD	187	CONDITIONCOUNT
	ELSE
	SUBTR	187	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	LOVE
LOVE	IFEQ	*TRUE
	ADD	349	CONDITIONCOUNT
	ELSE
	SUBTR	349	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	MESSAGE
MESSAGE	IFEQ	'I love you'
	ADD	351	CONDITIONCOUNT
	ELSE
	SUBTR	351	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	PROTECTION
PROTECTION	IFEQ	*TRUE
	ADD	74	CONDITIONCOUNT
	ELSE
	SUBTR	74	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	SELF-CONFIDENCE
SELF-CONFIDENCE	IFEQ	*TRUE
	ADD	64	CONDITIONCOUNT
	ELSE
	SUBTR	64	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	SOLIDARITY
SOLIDARITY	IFEQ	*TRUE
	ADD	32	CONDITIONCOUNT
	ELSE
	SUBTR	32	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	SPONTANEITY
SPONTANEITY	IFEQ	*TRUE
	ADD	351	CONDITIONCOUNT
	ELSE
	SUBTR	351	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	STABILITY
STABILITY	IFEQ	*TRUE
	ADD	164	CONDITIONCOUNT
	ELSE
	SUBTR	164	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	TOLERANCE
TOLERANCE	IFEQ	*TRUE
	ADD	52	CONDITIONCOUNT
	ELSE
	SUBTR	52	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	TRUST
TRUST	IFEQ	*TRUE
	ADD	74	CONDITIONCOUNT
	ELSE
	SUBTR	74	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	WARMTH
WARMTH	IFEQ	*TRUE
	ADD	70	CONDITIONCOUNT
	ELSE
	SUBTR	70	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	DRUGS
DRUGS	IFEQ	*TRUE
	RANDOMIZE	TOBACCO
	RANDOMIZE	ALCOHOL
	RANDOMIZE	CANDY
	RANDOMIZE	COCAINE
	RANDOMIZE	HEROINE
	RANDOMIZE	JOGGING
TOBACCO	IFEQ	*TRUE
	SUBTR	150	CONDITIONCOUNT
	ENDIF
ALCOHOL	IFEQ	*TRUE
	SUBTR	150	CONDITIONCOUNT
	ENDIF
CANDY	IFEQ	*TRUE
	SUBTR	150	CONDITIONCOUNT
	ENDIF
COCAINE	IFEQ	*TRUE
	SUBTR	150	CONDITIONCOUNT
	ENDIF
HEROINE	IFEQ	*TRUE
	SUBTR	150	CONDITIONCOUNT
	ENDIF
JOGGING	IFEQ	*TRUE
	ADD	150	CONDITIONCOUNT
	ENDIF
	ENDIF
	RANDOMIZE	CANCER
CANCER	IFEQ	*TRUE
	MOVE	*MIN	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	AIDS
AIDS	IFEQ	*TRUE
	MOVE	*MIN	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	TRAFFIC-ACCIDENT
TRAFFIC-ACCIDENT	IFEQ	*TRUE
	MOVE	*MIN	CONDITIONCOUNT
	ENDIF
	RANDOMIZE	MURDER-VICTIM
MURDER-VICTIM	IFEQ	*TRUE
	MOVE	*MIN	CONDITIONCOUNT
	ENDIF
CONDITIONCOUNT	IFLT	100
	MOVE	*FALSE	LETSGO
	ENDIF
	RETURN	(PERFORM-ADULT-LIFE)
	RETURN	(END-ADULT-LIFE)