|
@@ -138,78 +138,78 @@ if $ARGS[0] = $trial_sections[0]:
|
|
|
if temp_rand < 10:
|
|
|
$temp_pill_color = 'cyan'
|
|
|
$experimentQW['trial_active'] = 'pill_cyan'
|
|
|
- $experimentQW['pill_cyan_taken'] += 1
|
|
|
- experimentQW['trial_duration'] = rand(1,3)
|
|
|
+ experimentQW['pill_cyan_taken'] += 1
|
|
|
+ experimentQW['trial_duration'] = rand(1,3)
|
|
|
|
|
|
!! Change stren, vital, or agil
|
|
|
elseif temp_rand < 20:
|
|
|
$temp_pill_color = 'red'
|
|
|
$experimentQW['trial_active'] = 'pill_red'
|
|
|
- $experimentQW['pill_red_taken'] += 1
|
|
|
- experimentQW['trial_duration'] = rand(2,4)
|
|
|
+ experimentQW['pill_red_taken'] += 1
|
|
|
+ experimentQW['trial_duration'] = rand(2,4)
|
|
|
|
|
|
!! Change intel, cha, perception?
|
|
|
elseif temp_rand < 30:
|
|
|
$temp_pill_color = 'blue'
|
|
|
$experimentQW['trial_active'] = 'pill_blue'
|
|
|
- $experimentQW['pill_blue_taken'] += 1
|
|
|
- experimentQW['trial_duration'] = rand(2,4)
|
|
|
+ experimentQW['pill_blue_taken'] += 1
|
|
|
+ experimentQW['trial_duration'] = rand(2,4)
|
|
|
|
|
|
!! Change skin
|
|
|
elseif temp_rand < 40:
|
|
|
$temp_pill_color = 'yellow'
|
|
|
$experimentQW['trial_active'] = 'pill_yellow'
|
|
|
- $experimentQW['pill_yellow_taken'] += 1
|
|
|
- experimentQW['trial_duration'] = rand(2,5)
|
|
|
+ experimentQW['pill_yellow_taken'] += 1
|
|
|
+ experimentQW['trial_duration'] = rand(2,5)
|
|
|
|
|
|
!! Change butt
|
|
|
elseif temp_rand < 50:
|
|
|
$temp_pill_color = 'orange'
|
|
|
$experimentQW['trial_active'] = 'pill_orange'
|
|
|
- $experimentQW['pill_orange_taken'] += 1
|
|
|
- experimentQW['trial_duration'] = rand(2,4)
|
|
|
+ experimentQW['pill_orange_taken'] += 1
|
|
|
+ experimentQW['trial_duration'] = rand(2,4)
|
|
|
|
|
|
!! Change inhib
|
|
|
elseif temp_rand < 60:
|
|
|
$temp_pill_color = 'violet'
|
|
|
$experimentQW['trial_active'] = 'pill_violet'
|
|
|
- $experimentQW['pill_violet_taken'] += 1
|
|
|
- experimentQW['trial_duration'] = 1
|
|
|
+ experimentQW['pill_violet_taken'] += 1
|
|
|
+ experimentQW['trial_duration'] = 1
|
|
|
|
|
|
!! Change min_arousal
|
|
|
elseif temp_rand < 65:
|
|
|
$temp_pill_color = 'brown'
|
|
|
$experimentQW['trial_active'] = 'pill_brown'
|
|
|
- $experimentQW['pill_brown_taken'] += 1
|
|
|
- experimentQW['trial_duration'] = rand(2,4)
|
|
|
+ experimentQW['pill_brown_taken'] += 1
|
|
|
+ experimentQW['trial_duration'] = rand(2,4)
|
|
|
|
|
|
!! Change clit
|
|
|
elseif temp_rand < 70:
|
|
|
$temp_pill_color = 'purple'
|
|
|
$experimentQW['trial_active'] = 'pill_purple'
|
|
|
- $experimentQW['pill_purple_taken'] += 1
|
|
|
- experimentQW['trial_duration'] = rand(2,4)
|
|
|
+ experimentQW['pill_purple_taken'] += 1
|
|
|
+ experimentQW['trial_duration'] = rand(2,4)
|
|
|
|
|
|
!! Change alko_status
|
|
|
elseif temp_rand < 80:
|
|
|
$temp_pill_color = 'green'
|
|
|
$experimentQW['trial_active'] = 'pill_green'
|
|
|
- $experimentQW['pill_green_taken'] += 1
|
|
|
- experimentQW['trial_duration'] = 1
|
|
|
+ experimentQW['pill_green_taken'] += 1
|
|
|
+ experimentQW['trial_duration'] = 1
|
|
|
|
|
|
!! Give exhib level or change willwpower
|
|
|
elseif temp_rand < 85:
|
|
|
$temp_pill_color = 'gray'
|
|
|
$experimentQW['trial_active'] = 'pill_gray'
|
|
|
- $experimentQW['pill_gray_taken'] += 1
|
|
|
- experimentQW['trial_duration'] = 1
|
|
|
+ experimentQW['pill_gray_taken'] += 1
|
|
|
+ experimentQW['trial_duration'] = 1
|
|
|
|
|
|
!! Give bimbo lvl or change willpower?
|
|
|
elseif temp_rand < 90:
|
|
|
$temp_pill_color = 'pink'
|
|
|
$experimentQW['trial_active'] = 'pill_pink'
|
|
|
- $experimentQW['pill_pink_taken'] += 1
|
|
|
- experimentQW['trial_duration'] = 1
|
|
|
+ experimentQW['pill_pink_taken'] += 1
|
|
|
+ experimentQW['trial_duration'] = 1
|
|
|
end
|
|
|
|
|
|
experimentQW['times_participated_0'] += 1
|