|
@@ -6,6 +6,8 @@
|
|
|
!! Heroin: gs 'drugs', 'heroin'
|
|
|
!! Cocaine: gs 'drugs', 'cocaine' (if it isn''t svetas cocaine, you have to add dur += 1)
|
|
|
!! Amphetamine: gs 'drugs', 'amphetamine' (if it isn''t svetas amphetamine, you have to add amphetamine += 1)
|
|
|
+!! Neurobooster: gs 'drugs', 'mentats' (if it isn''t svetas mentats, you have to add mentats_have += 1)
|
|
|
+!! Aphrodisiac: gs 'drugs', 'aphrodisiac' (if it isn''t svetas aphrodisiac, you have to add aphrodisiac_have += 1)
|
|
|
|
|
|
!! Alcohol: gs 'drugs', 'alcohol', 'type', count
|
|
|
!! Types: beer, champagne, moonshine, rum, scotch, vodka, wine, whiskey
|
|
@@ -158,6 +160,52 @@ elseif $ARGS[0] = 'alcohol':
|
|
|
if alc_count > 0: jump 'alcohol_jump'
|
|
|
killvar 'alc_count'
|
|
|
gs 'stat'
|
|
|
+elseif $ARGS[0] = 'mentats':
|
|
|
+ mentats_dose += 1
|
|
|
+ mentats_have -= 1
|
|
|
+elseif $ARGS[0] = 'aphrodisiac':
|
|
|
+ if aphrodisiac_overdose = 1:
|
|
|
+ $aphrodisiac_msg = '<br>You''ve had enough aphrodisiac for today.'
|
|
|
+ elseif aphrodisiac_timer = 0:
|
|
|
+ $aphrodisiac_msg = '<font color = #DB7093><br>You take a gum and chew it. It tastes like strawberry, but is also kind of spicy.</font>'
|
|
|
+ aphrodisiac_have -= 1
|
|
|
+ aphrodisiac_timer += 8
|
|
|
+ pcs_horny = 80
|
|
|
+ elseif aphrodisiac_timer > 0 and aphrodisiac_timer <= 8:
|
|
|
+ $aphrodisiac_msg = '<font color = #DB7093><br>You take another gum and chew it. It makes your mouth feel kinda tingly.</font>'
|
|
|
+ aphrodisiac_have -= 1
|
|
|
+ aphrodisiac_timer += 8
|
|
|
+ pcs_horny = 100
|
|
|
+ elseif aphrodisiac_timer > 8 and min_arousal < 60:
|
|
|
+ $aphrodisiac_msg = '<font color = red><b><br>You take yet another gum and start chewing it. Suddenly you find yourself in grip of an intense orgasm!<br>It goes on and on and you sink to the ground and do your best to endure it.</b></font>'
|
|
|
+ aphrodisiac_have -= 1
|
|
|
+ orgasm += 1
|
|
|
+ pcs_mood = 100
|
|
|
+ min_arousal += 10
|
|
|
+ aphrodisiac_overdose = 1
|
|
|
+ if min_arousal = 10:
|
|
|
+ pcs_horny = min_arousal
|
|
|
+ $min_arousal_msg = '<font color = #DB7093>That was intense! You can still feel the tingles.</font>'
|
|
|
+ elseif min_arousal = 20:
|
|
|
+ pcs_horny = min_arousal
|
|
|
+ $min_arousal_msg = '<font color = #DB7093>You are really starting to enjoy these! Your crotch still feels kinda hot though.</font>'
|
|
|
+ elseif min_arousal = 30:
|
|
|
+ pcs_horny = min_arousal
|
|
|
+ $min_arousal_msg = '<font color = #DB7093>As you are trying to get back to your feet you notice that you are still horny. What is happening to you?</font>'
|
|
|
+ elseif min_arousal = 40:
|
|
|
+ pcs_horny = min_arousal
|
|
|
+ $min_arousal_msg = '<font color = #DB7093>You are certain of it. Every time those gums give you an orgasm they also increase your libido.</font>'
|
|
|
+ elseif min_arousal = 50:
|
|
|
+ pcs_horny = min_arousal
|
|
|
+ $min_arousal_msg = '<font color = #DB7093>You run a finger across your slit and shudder. You really should stop chewing these gums while you can still think of something other than sex.</font>'
|
|
|
+ elseif min_arousal = 60:
|
|
|
+ pcs_horny = min_arousal
|
|
|
+ $min_arousal_msg = '<font color = #DB7093>You are burning up. You feel like you could fuck anything and everything all day long.</font>'
|
|
|
+ end
|
|
|
+ else
|
|
|
+ $aphrodisiac_msg = '<font color = #DB7093>You chew another gum with trepidation, looking forward to more orgasms but nothing happens. Huh. Have you become immune?</font>'
|
|
|
+ aphrodisiac_have -= 1
|
|
|
+ end
|
|
|
else
|
|
|
'<br><font color = red>Developer note: The type of drug is wrong or missing in this scene. Please report this and a small part of the text of the current scene as a bug.</font>'
|
|
|
end
|