Browse Source

Add willpower check to nude exercise

pfffbft 4 years ago
parent
commit
dacccfcbe5
1 changed files with 13 additions and 8 deletions
  1. 13 8
      locations/meadow.qsrc

+ 13 - 8
locations/meadow.qsrc

@@ -79,18 +79,23 @@ if $ARGS[0] = 'start' or $ARGS[0] = '':
 			if $clothingworntype ! 'exercise':
 				*nl
 				'Your meadow is a perfect place to workout if you were wearing exercise clothes'
-			   if pcs_inhib <= 50 and temper >= 10:
+			   if temper >= 10:
                     *nl
-                    act 'Exercise': gt 'meadow', 'workout'
+                    gs 'willpower', 'skill', 'pcs_inhib', 'resist'
                     if Miraloc ! 2 or npc_rel['A60'] > 40 or mirasex = 1:
-                        if Miraloc = 2:
-                            'Your meadow is a perfect place to exercise. Mira is here but she wouldn''t mind if you exercised for a little bit, even if in the nude.'
-                        else
-                            'Your meadow is a perfect place to exercise. There is no one around, so you could probably exercise nude if you wanted.'
-                        end
+                    if Miraloc = 2:
+                        'Your meadow is a perfect place to exercise. Mira is here but she wouldn''t mind if you exercised for a little bit, even if in the nude.'
+                    else
+                        'Your meadow is a perfect place to exercise. There is no one around, so you could probably exercise nude if you wanted.'
+                    end
+                    if will_cost <= pcs_willpwr:
                         act 'Exercise nude':gt 'meadow', 'workout', 'nude'
+                    else
+                        act'Exercise nude (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
                     end
-			    end
+                end
+
+			   end
 			else
 				*nl
 				'Your meadow is a perfect place to exercise.'