|
@@ -46,7 +46,7 @@ $clothing_list_line = {
|
|
|
|
|
|
$RESULT += '<TD><a href="exec:gt ''clothing'', ''view_clothing_item'', ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>'', <<ARGS[2]>>">View</a>'
|
|
|
if ($ARGS[1] ! 'coat' and $ARGS[1] ! 'swimwear') and dyneval('RESULT = <<$ARGS[1]>>H[<<ARGS[2]>>]') > 0:
|
|
|
- $RESULT += '<a href="exec:gs ''clothing_attributes'', $ARGS[2], ARGS[3] & gs ''clothing'', ''wear'', ''<<$ARGS[1]>>'', <<ARGS[2]>> & gt ''clothing'', ''view_clothing_list'', ''wardrobe''">Wear</a></TD>'
|
|
|
+ $RESULT += ' <a href="exec:gs ''clothing'', ''wear'', ''<<$ARGS[1]>>'', <<ARGS[2]>> & gt ''clothing'', ''view_clothing_list'', ''wardrobe''">Wear</a></TD>'
|
|
|
else
|
|
|
$RESULT += '</TD>'
|
|
|
end
|
|
@@ -63,79 +63,79 @@ if $ARGS[0] = 'view_clothing_list':
|
|
|
|
|
|
if $ARGS[1] = 'wardrobe':
|
|
|
if $clothingworntype ! 'nude':act 'Strip':gs 'clothing', 'strip' & gt $loc, $metka
|
|
|
- if StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and ($clothingworntype ! 'school' or clothingwornnumber ! 6):dyneval($clothing_list_line, $ARGS[1], 'school', 6)
|
|
|
+ if StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and ($clothingworntype ! 'school' or clothingwornnumber ! 6):*P dyneval($clothing_list_line, $ARGS[1], 'school', 6)
|
|
|
end
|
|
|
|
|
|
i = 1
|
|
|
:loopcheap
|
|
|
- if cheap[i] = 1 and ($clothingworntype ! 'cheap' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'cheap', i)
|
|
|
+ if cheap[i] = 1 and ($clothingworntype ! 'cheap' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'cheap', i)
|
|
|
i += 1
|
|
|
if i <= 85:jump 'loopcheap'
|
|
|
|
|
|
i = 1
|
|
|
:loopaverage
|
|
|
- if average[i] = 1 and ($clothingworntype ! 'average' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'average', i)
|
|
|
+ if average[i] = 1 and ($clothingworntype ! 'average' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'average', i)
|
|
|
i += 1
|
|
|
if i <= 125:jump 'loopaverage'
|
|
|
|
|
|
i = 1
|
|
|
:loopexpensive
|
|
|
- if expensive[i] = 1 and ($clothingworntype ! 'expensive' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'expensive', i)
|
|
|
+ if expensive[i] = 1 and ($clothingworntype ! 'expensive' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'expensive', i)
|
|
|
i += 1
|
|
|
if i <= 147:jump 'loopexpensive'
|
|
|
|
|
|
i = 1
|
|
|
:loopformal
|
|
|
- if formal[i] = 1 and ($clothingworntype ! 'formal' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'formal', i)
|
|
|
+ if formal[i] = 1 and ($clothingworntype ! 'formal' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'formal', i)
|
|
|
i += 1
|
|
|
if i <= 14:jump 'loopformal'
|
|
|
|
|
|
i = 1
|
|
|
:loopoffice
|
|
|
- if office[i] = 1 and ($clothingworntype ! 'office' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'office', i)
|
|
|
+ if office[i] = 1 and ($clothingworntype ! 'office' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'office', i)
|
|
|
i += 1
|
|
|
if i <= 30:jump 'loopoffice'
|
|
|
|
|
|
i = 1
|
|
|
:loopschool
|
|
|
- if school[i] = 1 and ($clothingworntype ! 'school' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'school', i)
|
|
|
+ if school[i] = 1 and ($clothingworntype ! 'school' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'school', i)
|
|
|
i += 1
|
|
|
if i = 6: i = 7
|
|
|
if i <= 14:jump 'loopschool'
|
|
|
|
|
|
i = 1
|
|
|
:loopexercise
|
|
|
- if exercise[i] = 1 and ($clothingworntype ! 'exercise' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'exercise', i)
|
|
|
+ if exercise[i] = 1 and ($clothingworntype ! 'exercise' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'exercise', i)
|
|
|
i += 1
|
|
|
if i <= 26:jump 'loopexercise'
|
|
|
|
|
|
i = 1
|
|
|
:loopnaughty
|
|
|
- if naughty[i] = 1 and ($clothingworntype ! 'naughty' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'naughty', i)
|
|
|
+ if naughty[i] = 1 and ($clothingworntype ! 'naughty' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'naughty', i)
|
|
|
i += 1
|
|
|
if i <= 67:jump 'loopnaughty'
|
|
|
|
|
|
i = 1
|
|
|
:loopexhibit
|
|
|
- if exhibit[i] = 1 and ($clothingworntype ! 'exhibit' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'exhibit', i)
|
|
|
+ if exhibit[i] = 1 and ($clothingworntype ! 'exhibit' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'exhibit', i)
|
|
|
i += 1
|
|
|
if i <= 30:jump 'loopexhibit'
|
|
|
|
|
|
i = 1
|
|
|
:loopuniform
|
|
|
- if uniform[i] = 1 and ($clothingworntype ! 'uniform' or clothingwornnumber ! i):dyneval($clothing_list_line, $ARGS[1], 'uniform', i)
|
|
|
+ if uniform[i] = 1 and ($clothingworntype ! 'uniform' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'uniform', i)
|
|
|
i += 1
|
|
|
if i <= 24:jump 'loopuniform'
|
|
|
|
|
|
i = 1
|
|
|
:loopcoat
|
|
|
- if coat[i] = 1:dyneval($coat_list_line, $ARGS[1], 'coat', i)
|
|
|
+ if coat[i] = 1:*P dyneval($coat_list_line, $ARGS[1], 'coat', i)
|
|
|
i += 1
|
|
|
if i <= 12:jump 'loopcoat'
|
|
|
|
|
|
i = 1
|
|
|
:loopswimwear
|
|
|
- if swimwear[i] = 1:dyneval($clothing_list_line, $ARGS[1], 'swimwear', i)
|
|
|
+ if swimwear[i] = 1:*P dyneval($clothing_list_line, $ARGS[1], 'swimwear', i)
|
|
|
i += 1
|
|
|
if i <= 30:jump 'loopswimwear'
|
|
|
|
|
@@ -190,7 +190,7 @@ if $ARGS[0] = 'view_clothing_item':
|
|
|
if CloStyle = 2:h = 10
|
|
|
if CloStyle = 5:h = 20
|
|
|
h += (3 * CloQuality)
|
|
|
- money -= ARGS[4]
|
|
|
+ money -= price
|
|
|
dynamic $ARGS[2] + '[<<ARGS[3]>>] = 1'
|
|
|
if $ARGS[2] = 'cheap' or $ARGS[2] = 'office':
|
|
|
dynamic $ARGS[2] + 'H[<<ARGS[3]>>] = 70 + <<h>>'
|
|
@@ -491,38 +491,38 @@ if $ARGS[0] = 'wear':
|
|
|
end
|
|
|
end
|
|
|
|
|
|
- if PCloSkirtShortness > 0:
|
|
|
- if PCloSkirtShortness = 1:
|
|
|
+ if PCloSkirt > 0:
|
|
|
+ if PCloSkirt = 1:
|
|
|
PXCloSkirtShortness = 25
|
|
|
- elseif PCloSkirtShortness = 2:
|
|
|
+ elseif PCloSkirt = 2:
|
|
|
PXCloSkirtShortness = 50
|
|
|
- elseif PCloSkirtShortness = 3:
|
|
|
+ elseif PCloSkirt = 3:
|
|
|
PXCloSkirtShortness = 100
|
|
|
- elseif PCloSkirtShortness = 4:
|
|
|
+ elseif PCloSkirt = 4:
|
|
|
PXCloSkirtShortness = 150
|
|
|
- elseif PCloSkirtShortness = 5:
|
|
|
+ elseif PCloSkirt = 5:
|
|
|
PXCloSkirtShortness = 200
|
|
|
- elseif PCloSkirtShortness = 6:
|
|
|
+ elseif PCloSkirt = 6:
|
|
|
PXCloSkirtShortness = 300
|
|
|
- elseif PCloSkirtShortness >= 7:
|
|
|
+ elseif PCloSkirt >= 7:
|
|
|
PXCloSkirtShortness = 400
|
|
|
end
|
|
|
end
|
|
|
|
|
|
- if PCloPantsShortness > 0:
|
|
|
- if PCloPantsShortness = 1:
|
|
|
+ if PCloPants > 0:
|
|
|
+ if PCloPants = 1:
|
|
|
PXCloPantsShortness = 25
|
|
|
- elseif PCloPantsShortness = 2:
|
|
|
+ elseif PCloPants = 2:
|
|
|
PXCloPantsShortness = 50
|
|
|
- elseif PCloPantsShortness = 3:
|
|
|
+ elseif PCloPants = 3:
|
|
|
PXCloPantsShortness = 100
|
|
|
- elseif PCloPantsShortness = 4:
|
|
|
+ elseif PCloPants = 4:
|
|
|
PXCloPantsShortness = 150
|
|
|
- elseif PCloPantsShortness = 5:
|
|
|
+ elseif PCloPants = 5:
|
|
|
PXCloPantsShortness = 200
|
|
|
- elseif PCloPantsShortness = 6:
|
|
|
+ elseif PCloPants = 6:
|
|
|
PXCloPantsShortness = 300
|
|
|
- elseif PCloPantsShortness >= 7:
|
|
|
+ elseif PCloPants >= 7:
|
|
|
PXCloPantsShortness = 400
|
|
|
end
|
|
|
end
|