[added] Pictures to the new dentist/teeth stuff. Thank sneg for taking the brain damage for finding these for us.

locations/city_clinic.qsrc

@@ -204,6 +204,7 @@ if $ARGS[0] = 'start':
 	if (pcs_teeth > -1 and (dentistday + 90 < daystart or dentistday = 0)) or (pcs_missing_teeth > 0  and pcs_brace = 0):
 		act 'Go to the dentist':
 			*clr & cla
+			'<center><img <<$set_imgh>> src="images/locations/shared/clinic/dentist.jpg"></center>'
 			menu_off = 1
 			minut += 15
 			gs 'stat'

locations/obj_din.qsrc

@@ -311,15 +311,19 @@ if $ARGS[0] = 'description':
 
 	if salo < 10 and strenbuf > 0 and dounspell = 0: '<b><font color="red">You are showing signs of malnourishment. You should probably eat more and more often.</font></b>'
 	if salo < 10 and strenbuf = 0 and dounspell = 0: '<b><font color="red">You are dangerously malnourished, which has led to a loss in muscle mass. You''re in a critical condition and likely to pass out!</font></b>'
-	if pcs_missing_teeth = 1:$zuba = ' tooth'
-	if pcs_missing_teeth >= 2:$zuba = ' teeth'
-	if pcs_missing_teeth > 0: 'You have lost <<pcs_missing_teeth>><<$zuba>>.'
-	if pcs_teeth = -1:
-		'You have a perfect white smile.'
+	if pcs_missing_teeth = 1:
+		 'You have lost <<pcs_missing_teeth>> <a href="exec:gs ''obj_din'', ''show_missing_teeth''">tooth</a>.'
+	elseif pcs_missing_teeth >= 2:
+		'You have lost <<pcs_missing_teeth>>  <a href="exec:gs ''obj_din'', ''show_missing_teeth''">teeth</a>.'
+	end
+	if pcs_brace = 1:
+		'You are wearing a brace on your <a href="exec:gs ''obj_din'', ''show_teeth''">teeth</a> .'
+	elseif pcs_teeth = -1:
+		'You have a perfect white <a href="exec:gs ''obj_din'', ''show_teeth''">smile</a>.'
 	elseif pcs_teeth > 0:
-		'Your teeth are not straight at all. It might be a good idea to see a dentist to straighten them.'
+		'Your <a href="exec:gs ''obj_din'', ''show_teeth''">teeth</a> are not straight at all. It might be a good idea to see a dentist to straighten them.'
 	else
-		'Your teeth are miscoloured. It might be a good idea to see a dentist to get them cleaned up.'
+		'Your <a href="exec:gs ''obj_din'', ''show_teeth''">teeth</a> are miscoloured. It might be a good idea to see a dentist to get them cleaned up.'
 	end
 
 	!! 'pcs_apprnc <<pcs_apprnc>>'
@@ -1741,6 +1745,24 @@ if $ARGS[0] = 'show_body':
 	killvar 'img_temp'
 end
 
+if $ARGS[0] = 'show_teeth':
+	if pcs_brace = 1:
+		view 'images/pc/body/teeth/brace.jpg'
+	elseif pcs_teeth = -1:
+		view 'images/pc/body/teeth/goodteeth.jpg'
+	elseif pcs_teeth = 1:
+		view 'images/pc/body/teeth/badteeth1.jpg'
+	elseif pcs_teeth = 2:
+		view 'images/pc/body/teeth/badteeth2.jpg'
+	else
+		view 'images/pc/body/teeth/averageteeth.jpg'
+	end
+end
+
+if $ARGS[0] = 'show_missing_teeth':
+	view 'images/pc/body/teeth/missing.jpg'
+end
+
 if $ARGS[0] = 'shoes':
 	*clr
 	gs 'obj_din','bodytabs'

locations/pav_clinic.qsrc

@@ -141,6 +141,7 @@ if $ARGS[0] = '':
 		if (pcs_teeth > -1 and (dentistday + 90 < daystart or dentistday = 0)) or (pcs_missing_teeth > 0  and pcs_brace = 0):
 			act 'Go to the dentist':
 				*clr & cla
+				'<center><img <<$set_imgh>> src="images/locations/shared/clinic/dentist.jpg"></center>'
 				menu_off = 1
 				minut += 15
 				gs 'stat'