|
@@ -10,11 +10,16 @@ menu_off = 1
|
|
if $ARGS[0] = 'remove':
|
|
if $ARGS[0] = 'remove':
|
|
$coatworntype = 'none'
|
|
$coatworntype = 'none'
|
|
coatwornnumber = 0
|
|
coatwornnumber = 0
|
|
|
|
+ killvar 'PCoatWarm'
|
|
|
|
+ killvar 'PCoatQuality'
|
|
end
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'wear':
|
|
if $ARGS[0] = 'wear':
|
|
$coatworntype = $ARGS[1]
|
|
$coatworntype = $ARGS[1]
|
|
coatwornnumber = ARGS[2]
|
|
coatwornnumber = ARGS[2]
|
|
|
|
+ FUNC('$coat_attributes', $ARGS[1], ARGS[2])
|
|
|
|
+ PCoatWarm = CoatWarm
|
|
|
|
+ PCoatQuality = CoatQuality
|
|
|
|
|
|
dynamic $ARGS[1] + '_w[<<ARGS[2]>>] = 1'
|
|
dynamic $ARGS[1] + '_w[<<ARGS[2]>>] = 1'
|
|
end
|
|
end
|