|
@@ -195,12 +195,14 @@ if $ARGS[0] = 'ListBuilder':
|
|
|
! $ARGS[4] = Array name of change value display string
|
|
|
! $ARGS[5] = Array name of value to change attribute to, 'i' means, just use array position
|
|
|
! $ARGS[6] = variable name of attribute to change
|
|
|
+ ! $ARGS[7] = pain location
|
|
|
$bodyModType = $ARGS[1]
|
|
|
bodyModMana = $ARGS[2]
|
|
|
bodyModTime = $ARGS[3]
|
|
|
$bodyModDesc = $ARGS[4]
|
|
|
$bodyModIndx = $ARGS[5]
|
|
|
$bodyModStat = $ARGS[6]
|
|
|
+ $bodyModPain = $ARGS[7]
|
|
|
|
|
|
$hairColors[0]='black'
|
|
|
$hairColors[1]='brown'
|
|
@@ -257,7 +259,7 @@ if $ARGS[0] = 'ListBuilder':
|
|
|
bodymodValue = dyneval("result = <<$bodyModIndx>>[<<i>>]")
|
|
|
end
|
|
|
$bodyModDescX = dyneval('$result = <<$bodyModDesc>>[<<i>>]')
|
|
|
- $ListStr = $ListStr + "<br><a href=""EXEC:<<$bodyModStat>> = <<bodymodValue>> & pcs_mana -= <<bodyModMana>> & gs 'arousal', 'voyeur', <<bodyModTime>> & gs 'stat' & gt 'lab', 'BodyModded', '<<$bodyModType>>', '<<$bodyModDescX>>'""><<$bodyModDescX>></a>"
|
|
|
+ $ListStr = $ListStr + "<br><a href=""EXEC:<<$bodyModStat>> = <<bodymodValue>> & pcs_mana -= <<bodyModMana>> & gs 'arousal', 'voyeur', 30 & minut+=<<bodyModTime>>-30 & pain['<<$bodyModPain>>'] = 100 & gs 'stat' & gt 'lab', 'BodyModded', '<<$bodyModType>>', '<<$bodyModDescX>>'""><<$bodyModDescX>></a>"
|
|
|
i += 1
|
|
|
jump 'BodyModLoop'
|
|
|
end
|
|
@@ -334,16 +336,16 @@ if $ARGS[0] = 'Tatiana':
|
|
|
'"Tatiana, I''m having problems with my body image, I''m not happy and was hoping that you might be able to help me."'
|
|
|
'"It''s possible but I will have to draw on your magical energy, it will cost some of your mana to perform a spell."'
|
|
|
|
|
|
- $HairColorTab = func('lab', 'ListBuilder', 'Hair Color', '40', '30', '$hairColors','i', 'pcs_haircol')
|
|
|
- $HairLengthTab = func('lab', 'ListBuilder', 'Hair Length','40', '30', '$hairTypes', 'hairTypes', 'pcs_hairlng')
|
|
|
- $EyeColorTab = func('lab', 'ListBuilder', 'Eye Color', '40', '30', '$eyeColors', 'i', 'pcs_eyecol')
|
|
|
- $EyeLashTab = func('lab', 'ListBuilder', 'Eye Lashes', '40', '30', '$eyeLashes', 'i', 'pcs_lashes')
|
|
|
- $LipTab = func('lab', 'ListBuilder', 'Lip Size', '40', '30', '$lipSize', 'i', 'pcs_lip')
|
|
|
- $BreastTab = func('lab', 'ListBuilder', 'Breast Size','40', '30', '$breastSize','breastSize','nbsize')
|
|
|
+ $HairColorTab = func('lab', 'ListBuilder', 'Hair Color', '500', '60', '$hairColors','i', 'pcs_haircol','hair')
|
|
|
+ $HairLengthTab = func('lab', 'ListBuilder', 'Hair Length','200', '120','$hairTypes', 'hairTypes', 'pcs_hairlng','hair')
|
|
|
+ $EyeColorTab = func('lab', 'ListBuilder', 'Eye Color', '300', '120','$eyeColors', 'i', 'pcs_eyecol', 'eye')
|
|
|
+ $EyeLashTab = func('lab', 'ListBuilder', 'Eye Lashes', '100', '30', '$eyeLashes', 'i', 'pcs_lashes', 'eye')
|
|
|
+ $LipTab = func('lab', 'ListBuilder', 'Lip Size', '300', '120','$lipSize', 'i', 'pcs_lip', 'lip')
|
|
|
+ $BreastTab = func('lab', 'ListBuilder', 'Breast Size','1000','240','$breastSize','breastSize','nbsize', 'breasts')
|
|
|
|
|
|
- $SkinTab = "<a href=""EXEC:pcs_skin = 100 & pcs_mana -= 40 & gs 'arousal', 'voyeur', 30 & gs 'stat' & gt 'lab', 'BodyModded', 'Skin', 'clear'"">Clear Skin</a>"
|
|
|
- $VirginTab = "<a href=""EXEC:pcs_vag = 0 & pcs_mana -= 40 & gs 'arousal', 'voyeur', 30 & gs 'stat' & gt 'lab', 'BodyModded', 'Virginity', 'renewed'"">Renew Virginity</a>"
|
|
|
- $SiliconeTab = "<a href=""EXEC:brSurTemp = 0 & stringimplant = 0 & fillimplant = 0 & pcs_mana -= 40 & gs 'arousal', 'voyeur', 30 & gs 'stat' & gt 'lab', 'BodyModded', 'Boobs', 'natural again'"">Remove Silicone</a>"
|
|
|
+ $SkinTab = "<a href=""EXEC:pcs_skin = 100 & pcs_mana -= 1000 & gs 'arousal', 'voyeur', 30 & minut+=240-30 & pain['back'] = 100 & pain['chest'] = 100 & gs 'stat' & gt 'lab', 'BodyModded', 'Skin', 'clear'"">Clear Skin</a>"
|
|
|
+ $VirginTab = "<a href=""EXEC:pcs_vag = 0 & pcs_mana -= 1000 & gs 'arousal', 'voyeur', 30 & minut+=120-30 & pain['vaginal'] = 100 & gs 'stat' & gt 'lab', 'BodyModded', 'Virginity', 'renewed'"">Renew Virginity</a>"
|
|
|
+ $SiliconeTab = "<a href=""EXEC:brSurTemp = 0 & stringimplant = 0 & fillimplant = 0 & pcs_mana -= 1000 & gs 'arousal', 'voyeur', 30 & minut+=240-30 & pain['breasts'] = 100 & gs 'stat' & gt 'lab', 'BodyModded', 'Boobs', 'natural again'"">Remove Silicone</a>"
|
|
|
|
|
|
$SpellListStr = "<CENTER>
|
|
|
<TABLE CELLPADDING = '5'>
|