Ensured BC shot counts down regardless of main contraception method in use

locations/fertility.qsrc

@@ -69,8 +69,10 @@ if $ARGS[0] = 'birth_control':
 		end
 
 		if shotdays > -100:shotdays -=1
-		if tabletkishot > 0:tabletkishot -= 1
 	end
+	!! dropped the decrement out of the above if-statement so that players on pill would still run out of BC shot
+	!! as in for example the case of the therapist forcing you on the pill while you already had the shot.
+	if tabletkishot > 0:tabletkishot -= 1
 
 	!! birth_control['implant_status']
 	!! 0: No implant