Browse Source

[fixed] Image height used in piercing management cannot to 0 anymore and teh remove option won't stay on when you have no piercing inserted

Kevin_Smarts 2 years ago
parent
commit
3b33d94ca5
1 changed files with 8 additions and 7 deletions
  1. 8 7
      locations/piercing_management.qsrc

+ 8 - 7
locations/piercing_management.qsrc

@@ -1,6 +1,7 @@
 # piercing_management
 
 If $ARGS[0] = 'main':
+	if ward_img_hgt = 0:ward_img_hgt = 150
 	*nl
 	'<center><font color="maroon">Piercing Management</font></center><center><table border=0 cellspacing=<<ward_img_hgt/25>> cellpadding=5>'
 	*p '<TH>Tongue piercing</TH><TH>Lip piercing</TH><TH>Ear piercings</TH><TH>Nose piercing</TH>'
@@ -39,7 +40,7 @@ If $ARGS[0] = 'main':
 	'</center></TD><TR><TD><center>'
 	if pirsA = 0:
 		'Not pierced'
-	elseif pirsA <= 10000:
+	elseif pirsA < 10000:
 		'<a href="exec:pirsA = 10000 & pierWearCount -= 1 & gt ''piercing_management'', ''main''">Remove</a>'
 	else
 		'Remove'
@@ -47,7 +48,7 @@ If $ARGS[0] = 'main':
 	'</center></TD><TD><center>'
 	if pirsB = 0:
 		'Not pierced'
-	elseif pirsB <= 10000:
+	elseif pirsB < 10000:
 		'<a href="exec:pirsB = 10000 & pierWearCount -= 1 & gt ''piercing_management'', ''main''">Remove</a>'
 	else
 		'Remove'
@@ -55,7 +56,7 @@ If $ARGS[0] = 'main':
 	'</center></TD><TD><center>'
 	if pirsC = 0:
 		'Not pierced'
-	elseif pirsC <= 10000:
+	elseif pirsC < 10000:
 		'<a href="exec:pirsC = 10000 & pierWearCount -= 1 & gt ''piercing_management'', ''main''">Remove</a>'
 	else
 		'Remove'
@@ -63,7 +64,7 @@ If $ARGS[0] = 'main':
 	'</center></TD><TD><center>'
 	if pirsD = 0:
 		'Not pierced'
-	elseif pirsD <= 10000:
+	elseif pirsD < 10000:
 		'<a href="exec:pirsD = 10000 & pierWearCount -= 1 & gt ''piercing_management'', ''main''">Remove</a>'
 	else
 		'Remove'
@@ -114,7 +115,7 @@ If $ARGS[0] = 'main':
 	'</center></TD><TD><center>'
 	if pirsF = 0:
 		'Not pierced'
-	elseif pirsF <= 10000:
+	elseif pirsF < 10000:
 		'<a href="exec:pirsF = 10000 & pierWearCount -= 1 & gt ''piercing_management'', ''main''">Remove</a>'
 	else
 		'Remove'
@@ -122,7 +123,7 @@ If $ARGS[0] = 'main':
 	'</center></TD><TD><center>'
 	if pirsN = 0:
 		'Not pierced'
-	elseif pirsN <= 10000:
+	elseif pirsN < 10000:
 		'<a href="exec:pirsN = 10000 & pierWearCount -= 1 & gt ''piercing_management'', ''main''">Remove</a>'
 	else
 		'Remove'
@@ -130,7 +131,7 @@ If $ARGS[0] = 'main':
 	'</center></TD><TD><center>'
 	if pirsG = 0:
 		'Not pierced'
-	elseif pirsG <= 10000:
+	elseif pirsG < 10000:
 		'<a href="exec:pirsG = 10000 & pierWearCount -= 1 & gt ''piercing_management'', ''main''">Remove</a>'
 	else
 		'Remove'