pill display fix, expanded variable tracker

locations/Cheatmenu_din

@@ -1412,6 +1412,23 @@ $cheatmenu['vartracker'] = {
 	pl'hypnoAddict: <<hypnoAddict>>'
 	pl'missCum: <<missCum>>'
 	pl'condoms/bad condoms: <<prezik>>/<<badprezik>>'
+	if tabletki > 0: 
+		pl'pack of birth control pills: <<tabletki>>'
+		if tabletkiold > 0: pl'   <<tabletkiold>> old pack'
+		if tabletkifake > 0: pl'   <<tabletkifake>> fake pack'
+		if tabletkirej > 0: pl'   <<tabletkirej>> unusable pack'
+		if tabletkifert > 0: pl'   <<tabletkifert>> fertility pack'
+		if tabletkisug > 0: pl'   <<tabletkisug>> sugar pack'
+	end
+	if pillsleft[ptype] > 0:
+		if ptype = 1: $pilltype = 'old '
+		if ptype = 2: $pilltype = 'fake '
+		if ptype = 3: $pilltype = 'unusable '
+		if ptype = 4: $pilltype = 'sugar '
+		if ptype = 5: $pilltype = 'fertility '
+		pl'<<pillsleft[ptype]>> <<$pilltype>>pills left of your currently used pack'
+		killvar '$pilltype'
+	end
 }
 
 $cheatmenu['bdimmain'] = {

locations/din_bad

@@ -586,13 +586,13 @@ $d_bag = {
 		pl 'You are out of condoms.'
 	end
 	if tabletki > 0 and pillsleft[ptype] > 0:
-		'You have <<tabletki>> <a href="exec:dynamic $d_tabletkied">unopened packages of birth control pills and <<pillsleft[ptype]>> pills left in your opened package.</b></a>'
+		pl 'You have <<tabletki>> unopened packages of <a href="exec:dynamic $d_tabletkied">birth control pills</a> and <<pillsleft[ptype]>> pills left in your opened package.</b>'
 	elseif tabletki	= 0 and pillsleft[ptype] > 0:
-		'You have <<pillsleft[ptype]>> <a href="exec:dynamic $d_tabletkied"> birth control pills left.</b></a>'
+		pl 'You have <<pillsleft[ptype]>> <a href="exec:dynamic $d_tabletkied">birth control pills</a> left.</b>'
 	elseif tabletki > 0 and pillsleft[ptype] = 0:
-		'You have <<tabletki>> <a href="exec:dynamic $d_tabletkied">unopened packages of birth control pills.'
+		pl 'You have <<tabletki>> unopened packages of <a href="exec:dynamic $d_tabletkied">birth control pills</a>.'
 	else
-		'You are out of birth control pills.'
+		pl 'You are out of birth control pills.'
 	end
     if mentats_have > 0:
         pl'<a href="exec:dynamic $use_mentats & dynamic $d_bag"><b>Take neurobooster pill.</b></a> Uses left: <<mentats_have>>. Warning on the box says not to take more than one per day.'

locations/stol

@@ -107,11 +107,11 @@ if $ARGS[0] = 'bc':
 		pl 'You are out of condoms.'
 	end
 	if tabletki > 0 and pillsleft[ptype] > 0:
-		'You have <<tabletki>> <a href="exec:dynamic $d_tabletkied">unopened packages of birth control pills and <<pillsleft[ptype]>> pills left in your opened package.</b></a>'
+		'You have <<tabletki>> unopened packages of <a href="exec:dynamic $d_tabletkied">birth control pills</a> and <<pillsleft[ptype]>> pills left in your opened package.</b>'
 	elseif tabletki	= 0 and pillsleft[ptype] > 0:
-		'You have <<pillsleft[ptype]>> <a href="exec:dynamic $d_tabletkied"> birth control pills left.</b></a>'
+		'You have <<pillsleft[ptype]>> <a href="exec:dynamic $d_tabletkied">birth control pills</a> left.</b>'
 	elseif tabletki > 0 and pillsleft[ptype] = 0:
-		'You have <<tabletki>> <a href="exec:dynamic $d_tabletkied">unopened packages of birth control pills.'
+		'You have <<tabletki>> unopened packages of <a href="exec:dynamic $d_tabletkied">birth control pills</a>.'
 	else
 		'You are out of birth control pills.'
 	end