I noticed Bar drugging mod is not working.
How would I edit this code to get it working again.
Code:
:: bar drug start [bar_exit]
{
(if:$today_events does not contain "barstuck")[
(set:$today_events to $today_events + (a:"barstuck"))
(unless:$character's "gender" is "female" or $drugging is "Non-con: Disabled")[
(set:_exit to "false")
(set:$next to "bar drug check motivation")
(display:"change screen")
]
]
}
:: bar drug check motivation
{
(set:_drugreason to "no")
<!-- this is here to account for old versions of BarDrug -->
(if:$drugpilled is "yes")[(set:$drugpilled to 1)]
(if:$drugpilled is "no")[(set:$drugpilled to 0)]
(if:$drugpilled > 0)[
(if:$character's "masculinity" < 71) [
(if:(random:1, 11) < 10)[
(set: _drugreason to "Sorry but you are way too sexy!")
]
]
(if:$stats's "sex as guy" > 2)[
(if:(random:1, 12) < 11)[
(set: _drugreason to "Stay away from our girls!")
]
]
(if:$stats's "sex as girl" < 2 )[
(if:(random:1, 12) < (12-$stats's "sex as girl")) [
(set: _drugreason to "I love the new ones!")
]
]
]
(else:)[
(if:$character's "masculinity" < 71) [
(if:(random:1, 11) < 10)[
(set: _drugreason to "Sorry but you are way too sexy!")
]
]
(if:$stats's "sex as guy" > 2)[
(if:(random:1, 12) < 11)[
(set: _drugreason to "Stay away from our girls!")
]
]
(if:$stats's "sex as girl" < 2 )[
(if:(random:1, 12) < (12-$stats's "sex as girl")) [
(set: _drugreason to "I love the new ones!")
]
]
]
(if:_drugreason is "no")[
(set:$next to "bar exit check")(display:"change screen")
]
(else:)[
(set:$drugpilled to $drugpilled + 1)
(if:$drugpilled is 5)[
(set:$next to "bar drug auction start")(display:"next")
]
(else-if: ($drugpilled > 5) and ((random:1,3) is 1))[
(set:$next to "bar drug auction start")(display:"next")
]
(else:)[
(set:$next to "bar drug backroom")(display:"next")
]
]
}
