|
@@ -14,7 +14,10 @@
|
|
|
!! Example 2: sveta drinks 2 beer gs 'drugs', 'alcohol', 'beer', 2
|
|
|
|
|
|
if $ARGS[0] = 'smoke':
|
|
|
- if NarkImmune = 0: smoker += 1
|
|
|
+ if NarkImmune = 0:
|
|
|
+ smoker += 1
|
|
|
+ if smoker > 20 and smoke_exp = 0: smoke_exp = 1
|
|
|
+ end
|
|
|
siga -= 1
|
|
|
smokeDay = daystart
|
|
|
smokeHour = hour
|
|
@@ -33,7 +36,10 @@ if $ARGS[0] = 'smoke':
|
|
|
if pcs_energy < 80: pcs_energy += 4
|
|
|
gs 'stat'
|
|
|
elseif $ARGS[0] = 'joint':
|
|
|
- if NarkImmune = 0: joint_smoked += 1
|
|
|
+ if NarkImmune = 0:
|
|
|
+ joint_smoked += 1
|
|
|
+ if joint_smoked > 5 and joint_exp = 0: joint_exp = 1
|
|
|
+ end
|
|
|
joint -= 1
|
|
|
jointday = daystart
|
|
|
jointhour = hour
|
|
@@ -59,12 +65,19 @@ elseif $ARGS[0] = 'joint':
|
|
|
end
|
|
|
gs 'stat'
|
|
|
elseif $ARGS[0] = 'heroin':
|
|
|
- if NarkImmune = 0: SNarkTimes += 1
|
|
|
+ if NarkImmune = 0:
|
|
|
+ SNarkTimes += 1
|
|
|
+ if SNarkTimes > 1 and heroin_exp = 0: heroin_exp = 1
|
|
|
+ end
|
|
|
StrongNarkota += 25
|
|
|
pcs_mood = 100
|
|
|
pcs_health -= 10
|
|
|
gs 'stat'
|
|
|
elseif $ARGS[0] = 'cocaine':
|
|
|
+ if NarkImmune = 0:
|
|
|
+ cocaine_count += 1
|
|
|
+ if cocaine_count > 3 and cocaine_exp = 0: cocaine_exp = 1
|
|
|
+ end
|
|
|
dur -= 1
|
|
|
pcs_health = pcs_vital * 10 + pcs_stren * 5
|
|
|
pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5
|
|
@@ -73,6 +86,10 @@ elseif $ARGS[0] = 'cocaine':
|
|
|
nark += 10
|
|
|
gs 'stat'
|
|
|
elseif $ARGS[0] = 'amphetamine':
|
|
|
+ if NarkImmune = 0:
|
|
|
+ amphetamine_count += 1
|
|
|
+ if amphetamine_count > 5 and amphetamine_exp = 0: amphetamine_exp = 1
|
|
|
+ end
|
|
|
if amphIntake < 2:
|
|
|
'<font color= blue>You swallow the white pill.</font>'
|
|
|
amphIntake += 1
|
|
@@ -83,6 +100,10 @@ elseif $ARGS[0] = 'amphetamine':
|
|
|
end
|
|
|
gs 'stat'
|
|
|
elseif $ARGS[0] = 'alcohol':
|
|
|
+ if NarkImmune = 0:
|
|
|
+ alcohol_count += 1
|
|
|
+ if alcohol_count > 15 and alcohol_exp = 0: alcohol_exp = 1
|
|
|
+ end
|
|
|
if ARGS[2] <= 1:
|
|
|
alc_count = 1
|
|
|
else
|
|
@@ -140,5 +161,17 @@ 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
|
|
|
|
|
|
+!!Addictive Personality Trait
|
|
|
+addictive_exp = smoke_exp + joint_exp + heroin_exp + cocaine_exp + alcohol_exp + amphetamine_exp
|
|
|
+
|
|
|
+if addictive_exp = 2 and addictive_trait_lvl < 1:
|
|
|
+ addictive_trait_lvl = 1
|
|
|
+elseif addictive_exp = 3 and addictive_trait_lvl < 2:
|
|
|
+ addictive_trait_lvl = 2
|
|
|
+elseif addictive_exp >= 4 or (heroin_exp = 1 and cocaine_exp = 1) and addictive_trait_lvl < 3:
|
|
|
+ addictive_trait_lvl = 3
|
|
|
+end
|
|
|
+
|
|
|
+
|
|
|
--- drugs ---------------------------------
|
|
|
|