|
|
@@ -595,19 +595,19 @@ if $ARGS[0] = 'default_entry_wear':
|
|
|
|
|
|
!! default school girl uniform is always allowed to be worn if still in school
|
|
|
if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and $temp1 = 'gm_school' and temp2 = 6:
|
|
|
- cls
|
|
|
+ cla & *clr
|
|
|
'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
|
|
|
'Your put on your <<$def_clothing_name[default_entry]>> outfit without any problems.'
|
|
|
act 'Return': gt 'wardrobe', $wloc
|
|
|
!! do not own this clothing anymore
|
|
|
elseif dyneval('RESULT = <<$temp1>>[<<temp2>>]') = 0 and temp2 ! 0:
|
|
|
- cls
|
|
|
+ cla & *clr
|
|
|
'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/school/strip/strip2.jpg"></center>'
|
|
|
'As you go to pull your <<$def_clothing_name[default_entry]>> outfit out of your wardrobe you remember you don''t own that piece of clothing anymore. Maybe you should buy it again? Guess you will have to find something else to wear.'
|
|
|
act 'Return': gt 'wardrobe', $wloc
|
|
|
!! strength of clothing is less than or equal to 0
|
|
|
elseif dyneval('RESULT = <<$temp1>>_h[<<temp2>>]') <= 0 and $temp1 ! 'nude':
|
|
|
- cls
|
|
|
+ cla & *clr
|
|
|
'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/vicky/event/vika_game_strip16.mp4"></video></center>'
|
|
|
'Your <<$def_clothing_name[default_entry]>> outfit has worn out and can''t be used anymore. Guess you will have to find something else to wear.'
|
|
|
act 'Strip out of worn out clothing':
|
|
|
@@ -639,7 +639,7 @@ if $ARGS[0] = 'default_entry_wear':
|
|
|
end
|
|
|
!! clothing exhibition is greater than player exhibition
|
|
|
elseif CloInhibit > pcs_inhib:
|
|
|
- cls
|
|
|
+ cla & *clr
|
|
|
'<center><video autoplay loop src="images/locations/pavlovsk/trainstation/bimbo.strip6.mp4"></video></center>'
|
|
|
'You don''t feel daring enough to wear your <<$def_clothing_name[default_entry]>> outfit. Maybe you will be confident enough in the future? Guess you will have to find something else to wear.'
|
|
|
act 'Strip out of revealing clothing':
|
|
|
@@ -653,7 +653,7 @@ if $ARGS[0] = 'default_entry_wear':
|
|
|
!! check for if the hipsize is too far from your hipsize
|
|
|
dynamic 'RESULT = <<$temp1>>_b[<<temp2>>]'
|
|
|
if RESULT < pcs_hips - 8 or RESULT > pcs_hips + 8:
|
|
|
- cls
|
|
|
+ cla & *clr
|
|
|
iif(RESULT < pcs_hips - 8,'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/dressup.mp4"></video></center>','<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/stripping<<rand(1,4)>>.mp4"></video></center>')
|
|
|
'As you put on your <<$def_clothing_name[default_entry]>> outfit you notice it doesn''t fit correctly anymore. It''s ' + iif(RESULT < pcs_hips - 8,'unbearably tight and uncomfortable to wear.','extremely loose and won''t stay in place no matter how hard you try.') + ' You must have ' + iif(RESULT < pcs_hips - 8,'gained','lost') + ' some weight since this was purchased or last tailored. You will have to get this clothing resized before you can wear it again.'
|
|
|
act 'Strip out of ill-fitting clothing':
|
|
|
@@ -664,14 +664,14 @@ if $ARGS[0] = 'default_entry_wear':
|
|
|
end
|
|
|
!! clothing ok to wear after passing hip check
|
|
|
else
|
|
|
- cls
|
|
|
+ cla & *clr
|
|
|
'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
|
|
|
- 'Your put on your <<$def_clothing_name[default_entry]>> outfit without any problems.'
|
|
|
+ 'You put on your <<$def_clothing_name[default_entry]>> outfit without any problems.'
|
|
|
act 'Return': gt 'wardrobe', $wloc
|
|
|
end
|
|
|
!! clothing ok to wear without needing hip check and passing all other checks
|
|
|
else
|
|
|
- cls
|
|
|
+ cla & *clr
|
|
|
'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
|
|
|
'Your put on your <<$def_clothing_name[default_entry]>> outfit without any problems.'
|
|
|
act 'Return': gt 'wardrobe', $wloc
|
