|
@@ -61,7 +61,7 @@ end
|
|
|
act'Leave the secluded beach': minut += 10 & gt 'glake'
|
|
|
|
|
|
if month >= 5 and month <= 9:
|
|
|
- if arrsize('swimwear') > 0:
|
|
|
+ if func('changingroom','count_swim_item') > 0:
|
|
|
act 'Use changing room':gt 'changingroom', 'view_swim_list'
|
|
|
else
|
|
|
*nl
|
|
@@ -132,11 +132,11 @@ if temper >= 15 and month >= 5 and month <= 9:
|
|
|
pcs_mood += 5
|
|
|
gs 'stat'
|
|
|
|
|
|
- if $clothingworntype = 'swimwear' and pcs_hips<=90:
|
|
|
+ if ($clothingworntype = 'swimwear' or $clothingworntype = 'beach') and pcs_hips<=90:
|
|
|
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/lake.walk.bikini0,'+rand(0,3)+'.jpg"></center>'
|
|
|
- elseif $clothingworntype = 'swimwear' and pcs_hips >= 90 and pcs_hips<=110:
|
|
|
+ elseif ($clothingworntype = 'swimwear' or $clothingworntype = 'beach') and pcs_hips >= 90 and pcs_hips<=110:
|
|
|
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/lake.walk.bikini.fat0,0.jpg"></center>'
|
|
|
- elseif $clothingworntype = 'swimwear' and pcs_hips>=110:
|
|
|
+ elseif ($clothingworntype = 'swimwear' or $clothingworntype = 'beach') and pcs_hips>=110:
|
|
|
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/lake.walk.bikini.fat0,1.jpg"></center>'
|
|
|
if pcs_inhib < 50:inhib_exp += rand(1,2)
|
|
|
elseif $clothingworntype = 'nude':
|
|
@@ -150,7 +150,7 @@ if temper >= 15 and month >= 5 and month <= 9:
|
|
|
act 'Continue':gt'gLakeNude'
|
|
|
end
|
|
|
|
|
|
- if hour >= 6 and hour <= 20 and ($clothingworntype = 'swimwear' or $clothingworntype = 'nude'):
|
|
|
+ if hour >= 6 and hour <= 20 and ($clothingworntype = 'swimwear' or $clothingworntype = 'beach' or $clothingworntype = 'nude'):
|
|
|
act 'Go swimming (30 minutes)':
|
|
|
menu_off = 1
|
|
|
*clr & cla
|
|
@@ -160,7 +160,7 @@ if temper >= 15 and month >= 5 and month <= 9:
|
|
|
pcs_mood += 5
|
|
|
! Seems appropriate. Potentially worth revisiting
|
|
|
if willday_swim ! daystart: willday_swim = daystart & pcs_willpwr += 1
|
|
|
- if $clothingworntype = 'swimwear':
|
|
|
+ if $clothingworntype = 'swimwear' or $clothingworntype = 'beach':
|
|
|
if pcs_inhib < 50:inhib_exp += rand(1,2)
|
|
|
elseif $clothingworntype = 'nude':
|
|
|
inhib_exp += rand(1,3)
|
|
@@ -182,15 +182,15 @@ if temper >= 15 and month >= 5 and month <= 9:
|
|
|
end
|
|
|
end
|
|
|
|
|
|
- if sunWeather = 1 and hour >= 6 and hour <= 20 and ($clothingworntype = 'swimwear' or $clothingworntype = 'nude'):
|
|
|
+ if sunWeather = 1 and hour >= 6 and hour <= 20 and ($clothingworntype = 'swimwear' or $clothingworntype = 'beach' or $clothingworntype = 'nude'):
|
|
|
act 'Go sunbathing (30 minutes)':
|
|
|
menu_off = 1
|
|
|
- if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
|
|
|
+ if $clothingworntype = 'swimwear' or $clothingworntype = 'beach' or $clothingworntype = 'nude':
|
|
|
*clr & cla
|
|
|
minut = minut + 30
|
|
|
if pcs_sweat < 35 : gs 'sweat', 'add', 5
|
|
|
pcs_mood += 5
|
|
|
- if $clothingworntype = 'swimwear':
|
|
|
+ if $clothingworntype = 'swimwear' or $clothingworntype = 'beach':
|
|
|
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/sunbath.jpg"></center>'
|
|
|
if pcs_inhib < 50:inhib_exp += rand(1,2)
|
|
|
else
|
|
@@ -319,7 +319,7 @@ if $ARGS[0] = 'sauna':
|
|
|
end
|
|
|
end
|
|
|
|
|
|
- if arrsize('swimwear') > 0:
|
|
|
+ if func('changingroom','count_swim_item') > 0:
|
|
|
act 'Use changing room':gt 'changingroom', 'view_swim_list'
|
|
|
else
|
|
|
*nl
|
|
@@ -350,7 +350,7 @@ if $ARGS[0] = 'sauna':
|
|
|
end
|
|
|
end
|
|
|
|
|
|
- if $clothingworntype = 'nude' or $clothingworntype = 'swimwear':
|
|
|
+ if $clothingworntype = 'nude' or $clothingworntype = 'swimwear' or $clothingworntype = 'beach':
|
|
|
act 'Go to the womens section':
|
|
|
*clr & cla
|
|
|
menu_off = 1
|
|
@@ -382,7 +382,7 @@ if $ARGS[0] = 'sauna':
|
|
|
pcs_skin += rand(2,4)
|
|
|
pcs_willpwr += 3
|
|
|
end
|
|
|
- if $clothingworntype = 'swimwear':
|
|
|
+ if $clothingworntype = 'swimwear' or $clothingworntype = 'beach':
|
|
|
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunabikini.jpg"></center>'
|
|
|
if pcs_inhib < 40: inhib_exp += rand(0,1)
|
|
|
else
|
|
@@ -405,7 +405,7 @@ if $ARGS[0] = 'sauna':
|
|
|
'It appears to be empty at the moment.'
|
|
|
act 'Leave': gt 'gLakeNude', 'sauna'
|
|
|
gs 'willpower', 'exhib', 'self', 'hard'
|
|
|
- if saunarand < 4 or $clothingworntype = 'swimwear': will_cost = 3
|
|
|
+ if saunarand < 4 or $clothingworntype = 'swimwear' or $clothingworntype = 'beach': will_cost = 3
|
|
|
if will_cost <= pcs_willpwr:
|
|
|
act 'Use the sauna (<<will_cost>> Willpower)':
|
|
|
*clr & cla
|
|
@@ -416,7 +416,7 @@ if $ARGS[0] = 'sauna':
|
|
|
pcs_skin += rand(2,4)
|
|
|
pcs_willpwr += 3
|
|
|
end
|
|
|
- if $clothingworntype = 'swimwear':
|
|
|
+ if $clothingworntype = 'swimwear' or $clothingworntype = 'beach':
|
|
|
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunabikini.jpg"></center>'
|
|
|
if pcs_inhib < 40: inhib_exp += rand(0,1)
|
|
|
else
|
|
@@ -454,9 +454,9 @@ if $ARGS[0] = 'sauna':
|
|
|
end
|
|
|
end
|
|
|
gs 'willpower', 'exhib', 'self', 'easy'
|
|
|
- if saunarand < 4 or $clothingworntype = 'swimwear': will_cost = 0
|
|
|
+ if saunarand < 4 or $clothingworntype = 'swimwear' or $clothingworntype = 'beach': will_cost = 0
|
|
|
if will_cost <= pcs_willpwr:
|
|
|
- act iif(saunarand < 4 or $clothingworntype = 'swimwear', 'Use the sauna', 'Use the sauna (<<will_cost>> Willpower)'):
|
|
|
+ act iif(saunarand < 4 or $clothingworntype = 'swimwear' or $clothingworntype = 'beach', 'Use the sauna', 'Use the sauna (<<will_cost>> Willpower)'):
|
|
|
*clr & cla
|
|
|
gs 'willpower', 'pay', 'self'
|
|
|
minut += 30
|
|
@@ -466,7 +466,7 @@ if $ARGS[0] = 'sauna':
|
|
|
pcs_skin += rand(2,4)
|
|
|
pcs_willpwr += 3
|
|
|
end
|
|
|
- if $clothingworntype = 'swimwear':
|
|
|
+ if $clothingworntype = 'swimwear' or $clothingworntype = 'beach':
|
|
|
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunabikini.jpg"></center>'
|
|
|
if pcs_inhib < 40: inhib_exp += rand(0,1)
|
|
|
else
|
|
@@ -497,7 +497,7 @@ if $ARGS[0] = 'ice_plunge':
|
|
|
minut += 10
|
|
|
pcs_mood += 10
|
|
|
if pcs_sweat > 10: pcs_sweat = 10 + rand(0,4)
|
|
|
- if $clothingworntype = 'swimwear':
|
|
|
+ if $clothingworntype = 'swimwear' or $clothingworntype = 'beach':
|
|
|
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/secluded_beach/sauna/icedipbikini.jpg"></center>'
|
|
|
if pcs_inhib < 50:inhib_exp += rand(0,1)
|
|
|
else
|