Merge remote-tracking branch 'master/master'

locations/beta_journal_quests.qsrc

@@ -51,7 +51,7 @@ end
 !! Friends and Relations
 if $ARGS[0] = 'rel_pavlovsk':
 	gs $loc_id, 'pavlovsk_array'
-	$table_gen_max = 6
+	$table_gen_max = loc_gen
 	gs $loc_id, 'table_gen'
 
 end
@@ -61,8 +61,6 @@ if $ARGS[0] = 'rel_gad':
 end
 if $ARGS[0] = 'rel_pushkin':
 	!! Ballet Maya
-
-
 end
 
 !! Game locations - quests
@@ -214,7 +212,7 @@ if $ARGS[0] = 'failure':
 	if $ARGS[1] = 'id':
 		$debug['journal'] = 'NPC ID not set, vcard not generated.'
 	elseif $ARGS[1] = 'quest_body':
-		$debug['journal'] = 'Quest body not set, quests details was not display.'
+		$debug['journal'] = 'Quest body not set, quests details was not set.'
 	elseif $ARGS[1] = 'nav_forward':
 		$debug['journal'] = 'No forward navigation set - please ensure you have set the var in quest_data'
 	elseif $ARGS[1] = 'nav_back':
@@ -310,26 +308,35 @@ end
 if $ARGS[0] = 'pavlovsk_array':
 	!! Set up locations for image paths for the loop
 	loc_gen = 1
+	!! Display Name
 	$loc_name[loc_gen] = 'Five Eight Estate'
+	!! $args[1] function name to show data
 	$loc_shortname[loc_gen] = '58_estate'
+	!! default game image file path
 	$loc_path[loc_gen] = 'images/locations/pavlovsk/resident/apartment/complex.jpg'
-	loc_gen = 2
-	$loc_name[loc_gen] = 'Commercial'
+	!! Area description to indicate what is in this area.
+	$loc_description[loc_gen] = 'Five Eight Estate where your parents and aunt Luda live. There is also the garage that your father hires to fix his car.'
+
+	!$loc_path[loc_gen] =
+
+	loc_gen += 1
+	$loc_name[loc_gen] = 'Commercial Area'
 	$loc_shortname[loc_gen] = 'commercial'
 	$loc_path[loc_gen] = 'images/locations/pavlovsk/gorodok.jpg'
-	loc_gen = 3
-	$loc_name[loc_gen] = 'Industrial'
+	$loc_description[loc_gen] = ''
+	loc_gen += 1
+	$loc_name[loc_gen] = 'Industrial Area'
 	$loc_shortname[loc_gen] = 'industrial'
 	$loc_path[loc_gen] = 'images/locations/pavlovsk/factory/pav_factory.jpg'
-	loc_gen = 4
-	$loc_name[loc_gen] = 'Market'
+	loc_gen += 1
+	$loc_name[loc_gen] = 'Pavlovsk Market'
 	$loc_shortname[loc_gen] = 'market'
 	$loc_path[loc_gen] = 'images/locations/pavlovsk/pav_market_day.jpg'
-	loc_gen = 5
-	$loc_name[loc_gen] = 'Park'
+	loc_gen += 1
+	$loc_name[loc_gen] = 'Pavlovsk Park'
 	$loc_shortname[loc_gen] = 'park'
 	$loc_path[loc_gen] = 'images/locations/pavlovsk/park/skver.jpg'
-	loc_gen = 6
+	loc_gen += 1
 	$loc_name[loc_gen] = 'Train Station'
 	$loc_shortname[loc_gen] = 'train_station'
 	$loc_path[loc_gen] = 'images/locations/pavlovsk/trainstation/vokzal.jpg'

locations/drugs.qsrc

@@ -24,8 +24,6 @@ if $ARGS[0] = 'cikl':
 	gs 'drugs', 'aphrodisiac', 'cikl'
 	gs 'drugs', 'hair_extensioncream', 'cikl'
 	gs 'drugs', 'butt_injection', 'cikl'
-	exit
-
 elseif $ARGS[0] = 'hourly_events':
 	gs 'drugs', 'smoke', 'hourly_events'
 	gs 'drugs', 'joint', 'hourly_events'
@@ -33,15 +31,11 @@ elseif $ARGS[0] = 'hourly_events':
 	gs 'drugs', 'cocaine', 'hourly_events'
 	gs 'drugs', 'amphetamine', 'hourly_events'
 	gs 'drugs', 'aphrodisiac', 'hourly_events'
-	exit
-
 elseif $ARGS[0] = 'stat':
 	gs 'drugs', 'heroin', 'stat'
 	gs 'drugs', 'alcohol', 'stat'
 	gs 'drugs', 'cocaine', 'stat'
 	gs 'drugs', 'amphetamine', 'stat'
-	exit
-
 elseif $ARGS[0] = 'pain_relief':
 	if alko > 9:
 		pain['relief'] = 70
@@ -58,11 +52,7 @@ elseif $ARGS[0] = 'pain_relief':
 	elseif pain['killer'] > 12 and alko <= 9:
 		pain['relief'] = 50
 	end
-	exit
-end
-
-
-if $ARGS[0] = 'smoke':
+elseif $ARGS[0] = 'smoke':
 	if $ARGS[1] = 'hourly_events':
 		if cheatVars['drugs_immune'] = 0:
 			if drugVars['cigarettes_used'] >= 20: drugVars['cigarettes_need'] += 1
@@ -73,78 +63,74 @@ if $ARGS[0] = 'smoke':
 			drugVars['cigarettes_need'] = 0
 			drugVars['cigarettes_used'] = 0
 		end
-		exit
-	end
+	else
+		if ARGS[1] = 0 and $ARGS[1] = '':
+			mc_inventory['cigarettes'] -= 1
+			if mc_inventory['cigarettes'] <= 0: mc_inventory['cigarettes'] = 0 & msg 'That was your last cigarette.'
+		end
 
-	if ARGS[1] = 0 and $ARGS[1] = '':
-		mc_inventory['cigarettes'] -= 1
-		if mc_inventory['cigarettes'] <= 0: mc_inventory['cigarettes'] = 0 & msg 'That was your last cigarette.'
-	end
+		if cheatVars['drugs_immune'] = 0:
+			drugVars['cigarettes_used'] += 1
+			if drugVars['cigarettes_used'] > 20 and drugVars['cigarettes_exp'] = 0: drugVars['cigarettes_exp'] = 1
+		end
 
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['cigarettes_used'] += 1
-		if drugVars['cigarettes_used'] > 20 and drugVars['cigarettes_exp'] = 0: drugVars['cigarettes_exp'] = 1
-	end
+		stat['cigarettes_smoked'] += 1
+		drugVars['cigarettes_day'] = daystart
+		drugVars['cigarettes_hour'] = hour
+		drugVars['cigarettes_minute'] = minut + 3
+		drugVars['cigarettes_need'] = 0
+		teeth['smoked'] += 1
+
+		pcs_breath = 0
+		pcs_mood += 100
+		if pcs_hydra >= 100:
+			pcs_hydra -= 5
+		else
+			pcs_hydra -= 10
+		end
+		if pcs_energy < 80: pcs_energy += 4
 
-	stat['cigarettes_smoked'] += 1
-	drugVars['cigarettes_day'] = daystart
-	drugVars['cigarettes_hour'] = hour
-	drugVars['cigarettes_minute'] = minut + 3
-	drugVars['cigarettes_need'] = 0
-	teeth['smoked'] += 1
-
-	pcs_breath = 0
-	pcs_mood += 100
-	if pcs_hydra >= 100:
-		pcs_hydra -= 5
-	else
-		pcs_hydra -= 10
+		cumspclnt = 2
+		gs 'cum_cleanup'
+		gs 'stat'
 	end
-	if pcs_energy < 80: pcs_energy += 4
-
-	cumspclnt = 2
-	gs 'cum_cleanup'
-	gs 'stat'
-
 
 elseif $ARGS[0] = 'joint':
 	if $ARGS[1] = 'hourly_events':
 		if drugVars['weed_high'] > 0: drugVars['weed_high'] -= 1
-		exit
-	end
+	else
+		if ARGS[1] = 0 and $ARGS[1] = '':
+			mc_inventory['joints'] -= 1
+			if mc_inventory['joints'] <= 0: mc_inventory['joints'] = 0 & msg 'That was your last joint.'
+		end
 
-	if ARGS[1] = 0 and $ARGS[1] = '':
-		mc_inventory['joints'] -= 1
-		if mc_inventory['joints'] <= 0: mc_inventory['joints'] = 0 & msg 'That was your last joint.'
-	end
+		if cheatVars['drugs_immune'] = 0:
+			drugVars['weed_used'] += 1
+			if drugVars['weed_used'] > 5 and drugVars['weed_exp'] = 0: drugVars['weed_exp'] = 1
+		end
 
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['weed_used'] += 1
-		if drugVars['weed_used'] > 5 and drugVars['weed_exp'] = 0: drugVars['weed_exp'] = 1
-	end
+		if minut > 30:
+			drugVars['weed_high'] = 2
+		else
+			drugVars['weed_high'] = 1
+		end
+		drugVars['weed_day'] = daystart
+		drugVars['weed_hour'] = hour
+		drugVars['weed_minute'] = minut + 2
+
+		pcs_breath = 0
+		pcs_mood += 100
+		if pcs_hydra >= 100:
+			pcs_hydra -= 5
+		else
+			pcs_hydra -= 10
+		end
+		pcs_energy = max(0, pcs_energy - 20)
 
-	if minut > 30:
-		drugVars['weed_high'] = 2
-	else
-		drugVars['weed_high'] = 1
-	end
-	drugVars['weed_day'] = daystart
-	drugVars['weed_hour'] = hour
-	drugVars['weed_minute'] = minut + 2
-
-	pcs_breath = 0
-	pcs_mood += 100
-	if pcs_hydra >= 100:
-		pcs_hydra -= 5
-	else
-		pcs_hydra -= 10
+		cumspclnt = 2
+		gs 'cum_cleanup'
+		gs 'stat'
 	end
-	pcs_energy = max(0, pcs_energy - 20)
-
-	cumspclnt = 2
-	gs 'cum_cleanup'
-	gs 'stat'
-
 
 elseif $ARGS[0] = 'heroin':
 	if $ARGS[1] = 'hourly_events':
@@ -161,7 +147,6 @@ elseif $ARGS[0] = 'heroin':
 			drugVars['heroin_need'] = 0
 			drugVars['heroin_used'] = 0
 		end
-		exit
 	elseif $ARGS[1] = 'stat':
 		if drugVars['heroin_high'] >= 20 and alko > 0: alko = 0
 		if drugVars['heroin_high'] <= 0:
@@ -174,21 +159,20 @@ elseif $ARGS[0] = 'heroin':
 			if drugVars['heroin_penalty'] > 0: vidage += 1
 			drugVars['heroin_penalty'] += 1
 		end
-		exit
-	end
-
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['heroin_used'] += 1
-		if drugVars['heroin_used'] > 1 and drugVars['heroin_exp'] = 0: drugVars['heroin_exp'] = 1
-	end
+	else
 
-	drugVars['heroin_high'] += 25
-	drugVars['heroin_day'] = daystart
+		if cheatVars['drugs_immune'] = 0:
+			drugVars['heroin_used'] += 1
+			if drugVars['heroin_used'] > 1 and drugVars['heroin_exp'] = 0: drugVars['heroin_exp'] = 1
+		end
 
-	pcs_mood = 100
-	pcs_health -= 10
-	gs 'stat'
+		drugVars['heroin_high'] += 25
+		drugVars['heroin_day'] = daystart
 
+		pcs_mood = 100
+		pcs_health -= 10
+		gs 'stat'
+	end
 
 elseif $ARGS[0] = 'cocaine':
 	if $ARGS[1] = 'cikl':
@@ -199,7 +183,6 @@ elseif $ARGS[0] = 'cocaine':
 		elseif drugVars['cocaine_system'] > 0:
 			drugVars['cocaine_system'] -= 1
 		end
-		exit
 	elseif $ARGS[1] = 'hourly_events':
 		if drugVars['cocaine_addict'] = 1 and drugVars['cocaine_day'] ! daystart:
 			pcs_health -= 5
@@ -211,7 +194,6 @@ elseif $ARGS[0] = 'cocaine':
 				pcs_mood = 5
 			end
 		end
-		exit
 	elseif $ARGS[1] = 'stat':
 		if cheatVars['drugs_immune'] = 1:
 			if drugVars['cocaine_addict'] ! 0: drugVars['cocaine_addict'] = 0
@@ -220,28 +202,27 @@ elseif $ARGS[0] = 'cocaine':
 		elseif drugVars['cocaine_system'] = 0 and drugVars['cocaine_addict'] = 1:
 			drugVars['cocaine_addict'] = 0
 		end
-		exit
-	end
-
-	if ARGS[1] = 0 and $ARGS[1] = '':
-		mc_inventory['cocaine'] -= 1
-		if mc_inventory['cocaine'] <= 0: mc_inventory['cocaine'] = 0 & msg 'That was your last line of cocaine.'
-	end
+	else
 
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['cocaine_used'] += 1
-		if drugVars['cocaine_used'] > 3 and drugVars['cocaine_exp'] = 0: drugVars['cocaine_exp'] = 1
-	end
+		if ARGS[1] = 0 and $ARGS[1] = '':
+			mc_inventory['cocaine'] -= 1
+			if mc_inventory['cocaine'] <= 0: mc_inventory['cocaine'] = 0 & msg 'That was your last line of cocaine.'
+		end
 
-	drugVars['cocaine_system'] += 10
-	drugVars['cocaine_day'] = daystart
-	if drugVars['cocaine_willday'] ! daystart: drugVars['cocaine_willday'] = daystart & pcs_willpwr += 10
+		if cheatVars['drugs_immune'] = 0:
+			drugVars['cocaine_used'] += 1
+			if drugVars['cocaine_used'] > 3 and drugVars['cocaine_exp'] = 0: drugVars['cocaine_exp'] = 1
+		end
 
-	pcs_health = pcs_vital * 10 + pcs_stren * 5
-	pcs_mood = 100
-	pcs_horny = 100
-	gs 'stat'
+		drugVars['cocaine_system'] += 10
+		drugVars['cocaine_day'] = daystart
+		if drugVars['cocaine_willday'] ! daystart: drugVars['cocaine_willday'] = daystart & pcs_willpwr += 10
 
+		pcs_health = pcs_vital * 10 + pcs_stren * 5
+		pcs_mood = 100
+		pcs_horny = 100
+		gs 'stat'
+	end
 
 elseif $ARGS[0] = 'amphetamine':
 	if $ARGS[1] = 'hourly_events':
@@ -297,7 +278,6 @@ elseif $ARGS[0] = 'amphetamine':
 			drugVars['amphetamine_bonus'] = 1
 			drugVars['amphetamine_used'] = 0
 		end
-		exit
 
 	elseif $ARGS[1] = 'stat':
 		if drugVars['amphetamine_used'] > 3 and drugVars['amphetamine_high'] <= 0:
@@ -307,30 +287,27 @@ elseif $ARGS[0] = 'amphetamine':
 			end
 			killvar 'temp_addictChance'
 		end
-		exit
-	end
 
-	if drugVars['amphetamine_intake'] >= 2:
+	elseif drugVars['amphetamine_intake'] >= 2:
 		'Your heart is already beating uncontrollably in your chest, you should avoid taking anymore pills.'
-		exit
-	end
-
-	'<font color= blue>You swallow the white pill.</font>'
+	else
 
-	if ARGS[1] = 0 and $ARGS[1] = '':
-		mc_inventory['amphetamine'] -= 1
-		if mc_inventory['amphetamine'] <= 0: mc_inventory['amphetamine'] = 0 & msg 'That was your last amphetamine pill.'
-	end
+		'<font color= blue>You swallow the white pill.</font>'
 
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['amphetamine_used'] += 1
-		if drugVars['amphetamine_used'] > 5 and drugVars['amphetamine_exp'] = 0: drugVars['amphetamine_exp'] = 1
-	end
+		if ARGS[1] = 0 and $ARGS[1] = '':
+			mc_inventory['amphetamine'] -= 1
+			if mc_inventory['amphetamine'] <= 0: mc_inventory['amphetamine'] = 0 & msg 'That was your last amphetamine pill.'
+		end
 
-	drugVars['amphetamine_intake'] += 1
-	drugVars['amphetamine_high'] = 12
-	gs 'stat'
+		if cheatVars['drugs_immune'] = 0:
+			drugVars['amphetamine_used'] += 1
+			if drugVars['amphetamine_used'] > 5 and drugVars['amphetamine_exp'] = 0: drugVars['amphetamine_exp'] = 1
+		end
 
+		drugVars['amphetamine_intake'] += 1
+		drugVars['amphetamine_high'] = 12
+		gs 'stat'
+	end
 
 elseif $ARGS[0] = 'mentats':
 	if $ARGS[1] = 'cikl':
@@ -340,21 +317,20 @@ elseif $ARGS[0] = 'mentats':
 			pain['head'] += 20 * drugVars['mentats_dose']
 			drugVars['mentats_dose'] = 0
 		end
-		exit
-	end
-
-	if ARGS[1] = 0 and $ARGS[1] = '':
-		mc_inventory['mentats'] -= 1
-		if mc_inventory['mentats'] <= 0: mc_inventory['mentats'] = 0 & msg 'That was your last neurobooster pill.'
-	end
+	else
 
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['mentats_used'] += 1
-	end
+		if ARGS[1] = 0 and $ARGS[1] = '':
+			mc_inventory['mentats'] -= 1
+			if mc_inventory['mentats'] <= 0: mc_inventory['mentats'] = 0 & msg 'That was your last neurobooster pill.'
+		end
 
-	drugVars['mentats_dose'] += 1
-	gs 'stat'
+		if cheatVars['drugs_immune'] = 0:
+			drugVars['mentats_used'] += 1
+		end
 
+		drugVars['mentats_dose'] += 1
+		gs 'stat'
+	end
 
 elseif $ARGS[0] = 'steroids':
 	if $ARGS[1] = 'cikl':
@@ -365,27 +341,25 @@ elseif $ARGS[0] = 'steroids':
 			end
 			drugVars['steroids_dose'] = 0
 		end
-		exit
-	end
 
-	if drugVars['steroids_dose'] >= 3:
+	elseif drugVars['steroids_dose'] >= 3:
 		'You really shouldn''t take any more pills today.'
-		exit
-	end
+	else
+		'<font color = blue>You swallow the orange pill.</font>'
 
-	'<font color = blue>You swallow the orange pill.</font>'
+		if ARGS[1] = 0 and $ARGS[1] = '':
+			mc_inventory['steroids'] -= 1
+			if mc_inventory['steroids'] <= 0: mc_inventory['steroids'] = 0 & msg 'That was your last steroid pill.'
+		end
 
-	if ARGS[1] = 0 and $ARGS[1] = '':
-		mc_inventory['steroids'] -= 1
-		if mc_inventory['steroids'] <= 0: mc_inventory['steroids'] = 0 & msg 'That was your last steroid pill.'
-	end
+		if cheatVars['drugs_immune'] = 0:
+			drugVars['steroids_used'] += 1
+		end
 
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['steroids_used'] += 1
-	end
+		drugVars['steroids_dose'] += 1
+		gs 'stat'
 
-	drugVars['steroids_dose'] += 1
-	gs 'stat'
+	end
 
 
 elseif $ARGS[0] = 'breastcream':
@@ -402,28 +376,24 @@ elseif $ARGS[0] = 'breastcream':
 			end
 			killvar 'temp'
 		end
-		exit
-	end
-
-	if drugVars['breastcream_dose'] >= 1:
+	elseif drugVars['breastcream_dose'] >= 1:
 		'Using any more cream won''t have any effect.'
-		exit
-	end
-
-	'<font color = #DB7093>You smear the cream onto your breasts and rub it in.</font>'
+	else
 
-	if ARGS[1] = 0 and $ARGS[1] = '':
-		mc_inventory['breastcream'] -= 1
-		if mc_inventory['breastcream'] <= 0: mc_inventory['breastcream'] = 0 & msg 'That was your last bit of breast cream.'
-	end
+		'<font color = #DB7093>You smear the cream onto your breasts and rub it in.</font>'
 
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['breastcream_used'] += 1
-	end
+		if ARGS[1] = 0 and $ARGS[1] = '':
+			mc_inventory['breastcream'] -= 1
+			if mc_inventory['breastcream'] <= 0: mc_inventory['breastcream'] = 0 & msg 'That was your last bit of breast cream.'
+		end
 
-	drugVars['breastcream_dose'] = 1
-	gs 'stat'
+		if cheatVars['drugs_immune'] = 0:
+			drugVars['breastcream_used'] += 1
+		end
 
+		drugVars['breastcream_dose'] = 1
+		gs 'stat'
+	end
 
 elseif $ARGS[0] = 'painkiller':
 	if ARGS[1] = 0 and $ARGS[1] = '':
@@ -448,113 +418,112 @@ elseif $ARGS[0] = 'alcohol':
 		elseif alko > 3:
 			pain['relief'] = 15
 		end
-		exit
-	end
-
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['alcohol_used'] += 1
-		if drugVars['alcohol_used'] > 15 and drugVars['alcohol_exp'] = 0: drugVars['alcohol_exp'] = 1
-	end
-
-	if ARGS[2] <= 1:
-		temp_alc_count = 1
 	else
-		temp_alc_count = ARGS[2]
-	end
-
-	:alcohol_jump
-		temp_alc_count -= 1
-		pcs_health -= 5
-		pcs_energy -= 5
 
-		if $ARGS[1] = 'beer':
-			if pcs_traits['alko_status'] = -1:
-				alko += rand(1,2)
-			elseif pcs_traits['alko_status'] = 1:
-				alko += rand(0,1)
-			else
-				alko += 1
-			end
-			pcs_traits['alko_day'] += 1
-
-			fat += 3
-			pcs_mood += 10
-			if pcs_hydra >= 100:
-				pcs_hydra += 5
-			else
-				pcs_hydra += 10
-			end
-
-		elseif $ARGS[1] = 'wine' or $ARGS[1] = 'champagne':
-			if pcs_traits['alko_status'] = -1:
-				alko += 3
-			elseif pcs_traits['alko_status'] = 1:
-				alko += 1
-			else
-				alko += 2
-			end
-			pcs_traits['alko_day'] += 2
-
-			fat += 4
-			pcs_mood += 20
-			if pcs_hydra >= 100:
-				pcs_hydra += 5
-			else
-				pcs_hydra += 10
-			end
-
-		elseif $ARGS[1] = 'vodka' or $ARGS[1] = 'whiskey' or $ARGS[1] = 'scotch' or $ARGS[1] = 'rum':
-			if pcs_traits['alko_status'] = -1:
-				alko += rand(4,5)
-			elseif pcs_traits['alko_status'] = 1:
-				alko += rand(1,2)
-			else
-				alko += 3
-			end
-			pcs_traits['alko_day'] += 3
+		if cheatVars['drugs_immune'] = 0:
+			drugVars['alcohol_used'] += 1
+			if drugVars['alcohol_used'] > 15 and drugVars['alcohol_exp'] = 0: drugVars['alcohol_exp'] = 1
+		end
 
-			fat += 6
-			if pcs_hydra >= 100:
-				pcs_hydra -= 5
-			else
-				pcs_hydra -= 10
-			end
+		if ARGS[2] <= 1:
+			temp_alc_count = 1
+		else
+			temp_alc_count = ARGS[2]
+		end
 
-		elseif $ARGS[1] = 'moonshine':
-			if pcs_traits['alko_status'] = -1:
-				alko += rand(7,8)
-			elseif pcs_traits['alko_status'] = 1:
-				alko += rand(2,3)
-			else
-				alko += 5
-			end
-			pcs_traits['alko_day'] += 5
+		:alcohol_jump
+			temp_alc_count -= 1
+			pcs_health -= 5
+			pcs_energy -= 5
+
+			if $ARGS[1] = 'beer':
+				if pcs_traits['alko_status'] = -1:
+					alko += rand(1,2)
+				elseif pcs_traits['alko_status'] = 1:
+					alko += rand(0,1)
+				else
+					alko += 1
+				end
+				pcs_traits['alko_day'] += 1
+
+				fat += 3
+				pcs_mood += 10
+				if pcs_hydra >= 100:
+					pcs_hydra += 5
+				else
+					pcs_hydra += 10
+				end
+
+			elseif $ARGS[1] = 'wine' or $ARGS[1] = 'champagne':
+				if pcs_traits['alko_status'] = -1:
+					alko += 3
+				elseif pcs_traits['alko_status'] = 1:
+					alko += 1
+				else
+					alko += 2
+				end
+				pcs_traits['alko_day'] += 2
+
+				fat += 4
+				pcs_mood += 20
+				if pcs_hydra >= 100:
+					pcs_hydra += 5
+				else
+					pcs_hydra += 10
+				end
+
+			elseif $ARGS[1] = 'vodka' or $ARGS[1] = 'whiskey' or $ARGS[1] = 'scotch' or $ARGS[1] = 'rum':
+				if pcs_traits['alko_status'] = -1:
+					alko += rand(4,5)
+				elseif pcs_traits['alko_status'] = 1:
+					alko += rand(1,2)
+				else
+					alko += 3
+				end
+				pcs_traits['alko_day'] += 3
+
+				fat += 6
+				if pcs_hydra >= 100:
+					pcs_hydra -= 5
+				else
+					pcs_hydra -= 10
+				end
+
+			elseif $ARGS[1] = 'moonshine':
+				if pcs_traits['alko_status'] = -1:
+					alko += rand(7,8)
+				elseif pcs_traits['alko_status'] = 1:
+					alko += rand(2,3)
+				else
+					alko += 5
+				end
+				pcs_traits['alko_day'] += 5
+
+				fat += 6
+				if pcs_hydra >= 100:
+					pcs_hydra -= 5
+				else
+					pcs_hydra -= 10
+				end
 
-			fat += 6
-			if pcs_hydra >= 100:
-				pcs_hydra -= 5
 			else
-				pcs_hydra -= 10
+				'<br><font color = red>Developer note: The type of alcohol: (<<$ARGS[1]>>) is missing in this scene. Please report this and a small part of the text of the current scene as a bug.</font>'
 			end
+		if temp_alc_count > 0: jump 'alcohol_jump'
+		killvar 'temp_alc_count'
 
-		else
-			'<br><font color = red>Developer note: The type of alcohol: (<<$ARGS[1]>>) is missing in this scene. Please report this and a small part of the text of the current scene as a bug.</font>'
-		end
-	if temp_alc_count > 0: jump 'alcohol_jump'
-	killvar 'temp_alc_count'
-
-	frost = 0
-	pcs_breath = 0
-	cumspclnt = 2
-	gs 'cum_cleanup'
-	gs 'stat'
+		frost = 0
+		pcs_breath = 0
+		cumspclnt = 2
+		gs 'cum_cleanup'
+		gs 'stat'
+	end
 
 
 elseif $ARGS[0] = 'aphrodisiac':
 	if $ARGS[1] = 'cikl':
 		if drugVars['aphrodisiac_overdose'] = 1: drugVars['aphrodisiac_overdose'] = 0
 		if drugVars['aphrodisiac_timer'] ! 0: drugVars['aphrodisiac_timer']	= 0
-		exit
 	elseif $ARGS[1] = 'hourly_events':
 		if drugVars['aphrodisiac_timer'] >= 1:
 			!! Changed from pcs_horny < 80 -> pcs_horny < 70 to ensure a minimum increase of +10. Blame Anjuna
@@ -565,57 +534,57 @@ elseif $ARGS[0] = 'aphrodisiac':
 			end
 			drugVars['aphrodisiac_timer'] -= 1
 		end
-		exit
-	end
-
-	if drugVars['aphrodisiac_overdose'] = 1:
-		$drugVars['aphrodisiac_msg'] = '<br>You''ve had enough aphrodisiac for today.'
-		exit
-	end
+	else
+		if drugVars['aphrodisiac_overdose'] = 1:
+			$drugVars['aphrodisiac_msg'] = '<br>You''ve had enough aphrodisiac for today.'
 
-	if ARGS[1] = 0 and $ARGS[1] = '':
-		mc_inventory['aphrodisiac'] -= 1
-		if mc_inventory['aphrodisiac'] <= 0: mc_inventory['aphrodisiac'] = 0 & msg 'That was your last aphrodisiac pill.'
-	end
+		else
 
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['aphrodisiac_used'] += 1
-	end
+			if ARGS[1] = 0 and $ARGS[1] = '':
+				mc_inventory['aphrodisiac'] -= 1
+				if mc_inventory['aphrodisiac'] <= 0: mc_inventory['aphrodisiac'] = 0 & msg 'That was your last aphrodisiac pill.'
+			end
 
-	if drugVars['aphrodisiac_timer'] = 0:
-		$drugVars['aphrodisiac_msg'] = '<font color = #DB7093><br>You take a gum and chew it. It tastes like strawberry, but is also kind of spicy.</font>'
-		drugVars['aphrodisiac_timer'] += 8
-		pcs_horny = 80
-	elseif drugVars['aphrodisiac_timer'] > 0 and drugVars['aphrodisiac_timer'] <= 8:
-		$drugVars['aphrodisiac_msg'] = '<font color = #DB7093><br>You take another gum and chew it. It makes your mouth feel kinda tingly.</font>'
-		drugVars['aphrodisiac_timer'] += 8
-		pcs_horny = 100
-	elseif drugVars['aphrodisiac_timer'] > 8 and min_arousal < 60:
-		$drugVars['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>'
-		drugVars['aphrodisiac_overdose'] = 1
-		pcs_horny = min_arousal
+			if cheatVars['drugs_immune'] = 0:
+				drugVars['aphrodisiac_used'] += 1
+			end
 
-		orgasm += 1
-		pcs_mood = 100
-		min_arousal += 10
-
-		if min_arousal <= 10:
-			$min_arousal_msg = '<font color = #DB7093>That was intense! You can still feel the tingles.</font>'
-		elseif min_arousal <= 20:
-			$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:
-			$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:
-			$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:
-			$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>'
-		else
-			$min_arousal_msg = '<font color = #DB7093>You are burning up. You feel like you could fuck anything and everything all day long.</font>'
+			if drugVars['aphrodisiac_timer'] = 0:
+				$drugVars['aphrodisiac_msg'] = '<font color = #DB7093><br>You take a gum and chew it. It tastes like strawberry, but is also kind of spicy.</font>'
+				drugVars['aphrodisiac_timer'] += 8
+				pcs_horny = 80
+			elseif drugVars['aphrodisiac_timer'] > 0 and drugVars['aphrodisiac_timer'] <= 8:
+				$drugVars['aphrodisiac_msg'] = '<font color = #DB7093><br>You take another gum and chew it. It makes your mouth feel kinda tingly.</font>'
+				drugVars['aphrodisiac_timer'] += 8
+				pcs_horny = 100
+			elseif drugVars['aphrodisiac_timer'] > 8 and min_arousal < 60:
+				$drugVars['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>'
+				drugVars['aphrodisiac_overdose'] = 1
+				pcs_horny = min_arousal
+
+				orgasm += 1
+				pcs_mood = 100
+				min_arousal += 10
+
+				if min_arousal <= 10:
+					$min_arousal_msg = '<font color = #DB7093>That was intense! You can still feel the tingles.</font>'
+				elseif min_arousal <= 20:
+					$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:
+					$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:
+					$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:
+					$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>'
+				else
+					$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
+				$drugVars['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>'
+			end
+			gs 'stat'
 		end
-	else
-		$drugVars['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>'
 	end
-	gs 'stat'
 
 
 elseif $ARGS[0] = 'hair_extensioncream':
@@ -628,27 +597,24 @@ elseif $ARGS[0] = 'hair_extensioncream':
 				'Feels like your hair has grown slightly.'
 			end
 		end
-		exit
-	end
-
-	if drugVars['hair_extensioncream_dose'] >= 1:
+	elseif drugVars['hair_extensioncream_dose'] >= 1:
 		'Using any more hair extension shampoo won''t have any effect.'
-		exit
-	end
+	else
 
-	'<font color = #DB7093>You smear the shampoo into your hair and rub it in, then wash it out shortly later.</font>'
+		'<font color = #DB7093>You smear the shampoo into your hair and rub it in, then wash it out shortly later.</font>'
 
-	if ARGS[1] = 0 and $ARGS[1] = '':
-		mc_inventory['hair_extensioncream'] -= 1
-		if mc_inventory['hair_extensioncream'] <= 0: mc_inventory['hair_extensioncream'] = 0 & msg 'That was your last bit of hair extension shampoo.'
-	end
+		if ARGS[1] = 0 and $ARGS[1] = '':
+			mc_inventory['hair_extensioncream'] -= 1
+			if mc_inventory['hair_extensioncream'] <= 0: mc_inventory['hair_extensioncream'] = 0 & msg 'That was your last bit of hair extension shampoo.'
+		end
 
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['hair_extensioncream_used'] += 1
-	end
+		if cheatVars['drugs_immune'] = 0:
+			drugVars['hair_extensioncream_used'] += 1
+		end
 
-	drugVars['hair_extensioncream_dose'] = 1
-	gs 'stat'
+		drugVars['hair_extensioncream_dose'] = 1
+		gs 'stat'
+	end
 
 
 elseif $ARGS[0] = 'butt_injection':
@@ -665,27 +631,25 @@ elseif $ARGS[0] = 'butt_injection':
 			end
 			killvar 'temp'
 		end
-		exit
-	end
-
-	if drugVars['butt_injection_dose'] >= 1:
+	elseif drugVars['butt_injection_dose'] >= 1:
 		'Using any more injections won''t have any effect.'
-		exit
-	end
+	else
 
-	'<font color = #DB7093>You inject the KBI formula into your ass.</font>'
+		'<font color = #DB7093>You inject the KBI formula into your ass.</font>'
 
-	if ARGS[1] = 0 and $ARGS[1] = '':
-		mc_inventory['butt_injection'] -= 1
-		if mc_inventory['butt_injection'] <= 0: mc_inventory['butt_injection'] = 0 & msg 'That was your last KBI shot.'
-	end
+		if ARGS[1] = 0 and $ARGS[1] = '':
+			mc_inventory['butt_injection'] -= 1
+			if mc_inventory['butt_injection'] <= 0: mc_inventory['butt_injection'] = 0 & msg 'That was your last KBI shot.'
+		end
 
-	if cheatVars['drugs_immune'] = 0:
-		drugVars['butt_injection_used'] += 1
-	end
+		if cheatVars['drugs_immune'] = 0:
+			drugVars['butt_injection_used'] += 1
+		end
 
-	drugVars['butt_injection_dose'] = 1
-	gs 'stat'
+		drugVars['butt_injection_dose'] = 1
+		gs 'stat'
+
+	end
 
 
 else

locations/emp_functions.qsrc

@@ -63,7 +63,7 @@ if $ARGS[0] = 'gen_schedule':
 			$tableheader += '<th style="padding: 10px;"><font color="<<$font_theme>>">' + iif(display_hour < 10, '0<<display_hour >>', display_hour) + ':00</font></th>'
 		elseif header_switch=2:
 			header_switch = 1
-			$tableheader += '<th style="padding: 10px;"><font color="<<$font_theme>>">' + iif(display_hour < 10, '0<< display_hour>>', display_hour) + ':30</font></th>'
+			$tableheader += '<th style="padding: 10px;"><font color="<<$font_theme>>">' + iif(display_hour < 10, '0<<display_hour>>', display_hour) + ':30</font></th>'
 		end
 		i_hour += 1
 	if i_hour <= mod_max_hour: jump 'jmp_header_create'

locations/pushkin_ballet_class.qsrc

@@ -34,8 +34,12 @@ if $ARGS[0] = 'start':
 
 	!! Random trivia - Terpsichore is one of the nine Greecian muses. Her sphere was dance, rhythm and choral music.
 
-	if ballet_day = 6 and balletqw['school'] ! 1:
+	if (balletqw['daystart'] + 7 = daystart) and hour = 7:
 		gt $loc, 'assessment'
+	elseif ( daystart >= balletqw['daystart'] + 8 ) or (balletqw['daystart'] + 7 = daystart and hour > 7):
+		mod_grade_score['class'] -= 500
+		'You were late or did not attend the exam. You have failed the course.'
+		act 'Return home' : gt 'pav_commcenter'
 	elseif ballet_day = 6 and balletqw['school'] = 1:
 		gs 'stat'
 		gs 'core_library', 'stage_title'
@@ -314,7 +318,8 @@ if $ARGS[0] = 'shower':
 	end
 end
 if $ARGS[0] = 'grade_check':
-	$popup_advise = '<center><h3>You critically look at your appearance according to the schools assessment guidelines:</h3></center>'
+	$popup_advise = '<center><h3>Appearance</h3></center>'
+	$popup_advise += 'You critically look at your appearance according to the schools assessment guidelines:'
 	$popup_advise += '<br><br>'
 	if pcs_makeup > 1:
 		$popup_advise += '<font color = "green">✓</font> Your make up is of an acceptable standard.</font>'

locations/pushkin_ballet_evt.qsrc

@@ -337,6 +337,7 @@ end
 
 if $ARGS[0] = 'intro_274':
 	*clr & cla
+	mayaqw['path'] = 1
 	'<center><a><img <<$set_imgh>> src="<<$npc_img_path[''A274'']>>/274-1.jpg"></center>'
 	'You walk over to a tall willowly blonde girl, "Hi I''m <<$pcs_nickname>>". The girl gives you a warm smile, "I''m <<$npc_firstname[''A274'']>> pleased to meet you. Where you from?" ''Pavlosk'' you reply, ''Yourself?'''
 	'"I live Pushkin now but from Moscow originally.", <<$npc_firstname[''A274'']>> replles before another girl jumps in taking her attention.'

locations/pushkin_ballet_init.qsrc

@@ -25,6 +25,7 @@
 !! balletqw[performances] - How many shows perfomed
 !! mayaqw[grave] - Did you attend Anitchka's grave with Maya, 3 means you talked to Maya, 4 means you were empathic. Has impact later on Maya''s actions towards the player.
 !! mayaqw[trust] - How much Maya trusts you and works in conjunction with npc_rel
+!! mayaqw[path] - progress tracker for maya quests
 !! Rudolph quest is broken into two variables the main tracker being rudolphqw[stage] and rudolphqw[corruption], the latter reflects his slow insidious undermining of Sveta''s confidence and the former is how
 !! much she has submitted to his authority and demands. Corruption opens dialogue options.
 !!
@@ -220,7 +221,7 @@ if $ARGS[0] = 'cleanup_var':
 	killvar 'mod_grade_uniform'
 	killvar 'mod_grade_health'
 	killvar 'mod_class_debug'
-
+	gs 'shortgs', 'remove_array_element', 'balletqw', 'daystart'
 	gs 'shortgs', 'remove_array_element', 'ballet_mod', 'letter'
 	gs 'shortgs', 'remove_array_element', 'ballet_mod', 'res_mg'
 end

locations/pushkin_ballet_res.qsrc

@@ -11,7 +11,7 @@
 !!
 !! Variables
 !!
-!! ballet_first_visit - used to set first night
+!! balletqw[daystart] - used to set first night
 !! ballet_day - Sets which day of the course you are on.
 
 $default_img_path = 'locations/pushkin/'
@@ -48,10 +48,10 @@ if $ARGS[0] = 'bedroom':
 	gs 'stat'
 	gs 'core_library', 'stage_title'
 
-	if ballet_first_visit = 0:
+	if balletqw['daystart'] = 0:
 		gs 'homes_properties', 'set_home', 'pushkin_ballet_dorm'
 
-		ballet_first_visit = 1
+		balletqw['daystart'] = daystart
 		if week ! 7 : ballet_day = week
 
 		'You look around your room that will be the bedroom for the next week, and a small comfortable bed sits in the corner. You have a desk you can study on. In the corner, there''s a full-size <a href="exec:gt ''wardrobe'', ''start''">wardrobe</a> with a mirror on one of the doors.'
@@ -82,6 +82,8 @@ if $ARGS[0] = 'bedroom':
 			act 'Answer the knock' : gs 'npc_274_init','grave'
 		elseif ballet_day = 3 and hour > 19 and mayaqw['grave'] = 1:
 			act 'Another knock': gt 'npc_274_init', 'post_grave'
+		else
+			mayaqw['grave'] = -1
 		end
 		!! Default actions
 		gs 'core_library', 'bedroom'
@@ -309,9 +311,13 @@ if $ARGS[0] = 'class_schedule':
 	'1600 - 1700: Ballet and musical theory.'
 	*nl
 	'Saturday:'
+	'0730 - Depart residence.'
 	'0800 - 1200: Graded assessment.'
 	*nl
+	'Transportation will be provided after the assessment and you will be informed of your results by letter in two weeks.'
+	*nl
 	'Rules:'
+	*nl
 	'Whilst attending classes students are expected dressed in sports clothing, perferably a leotard.'
 	'You must also set your hair in a braid or a bun, no other styles are acceptable.'
 	'Make up must be worn at all times, and you must be clean and presentable during classes. You will have access to showers during the day.'

locations/quest_data_a274.qsrc

@@ -1,14 +1,19 @@
 # quest_data_a274
-
 !! NPC 274 Maya Semionova
 
 if $ARGS[0] = 'init':
+    $loc_id = 'quest_data_a274'
     !! init all vars and data
 
     if ballet['debug'] = 1:  debug['code']  = 1
-
+    if qstage ! 0:
+		gs $loc_id, 'quest_body', 'stage_<<qstage>>'
+	else
+		gt $loc_id, 'debug'
+	end
 end
-if ARGS[0] = '':
+if $ARGS[0] = '':
+	gt $loc_id, 'debug'
 end
 if $ARGS[0] = 'quest_body':
     !! create quest body and navigation as required - mandatory fields:
@@ -20,28 +25,50 @@ if $ARGS[0] = 'quest_body':
 
     !! Stage 1
 
-    if $ARGS[1] = 'stage1':
+    if $ARGS[1] = 'stage_1':
     !! first stage, so set to null to ensure nav works.
         $npc_quest['q_back'] = 'null'
-        $npc_quest['q_next'] = 'stage2'
+        if mayaqw['path'] >= 1:
+            $npc_quest['q_next'] = 'stage_2'
+        else
+            $npc_quest['q_next'] = 'null'
+        end
+        $npc_quest['hints'] = 'Attend the Pushken Ballet School and interact with the students.'
     !! Quest body text:
-        $npc_['quest_body'] = 'Build Maya''s trust: Meet Maya at the Residential Dance School in Pushkin.'
+        $npc_quest['body'] = 'Build Maya''s trust: Meet Maya at the Residential Dance School in Pushkin.'
     end
 
     !! Stage 2
-    if $ARGS[1] = 'stage2':
-        !! first stage, so set to null to ensure nav works.
-            $npc_quest['q_back'] = 'stage1'
+    if $ARGS[1] = 'stage_2':
+		$npc_quest['q_back'] = 'stage_1'
+        if mayaqw['path'] >= 3:
+            $npc_quest['q_next'] = 'stage_3'
+        else
             $npc_quest['q_next'] = 'null'
-        !! Quest body text:
-            $npc_['quest_body'] = 'Build Maya''s trust: Continue to meet and talk to Maya.'
         end
 
+		$npc_quest['q_next'] = 'null'
+        $npc_quest['hints'] = 'Accept Maya''s invitation.'
+        if mayaqw['grave'] = 0:
+            $npc_quest['body'] = 'Build Maya''s trust: Continue to meet and talk to Maya.'
+        elseif mayaqw['grave'] = -1:
+            $npc_quest['body'] = 'You spent the evening dedicated to studying ballet and ignored Maya''s visit to your room.'
+        elseif mayaqw['grave'] = 1:
+            $npc_quest['body'] = 'You ignored Maya''s first knock when she came to visit.'
+        elseif mayaqw['grave'] = 3:
+            $npc_quest['body'] =  'You invited Maya into your room and had a brief heartfelt conversation about her past.'
+        elseif mayaqw['grave'] = 4:
+            $npc_quest['body'] = 'You went to graveyard and supported Maya in her grief, and had a hearftelt conversation with her afterwards in your room.'
+        end
+    end
+
 
     !! Stage 3
 
+
 end
 if $ARGS[0] = 'debug':
     !! creata debug data sheet of all associated variables to be displayed in a pop up
+    'Event init failed, $ARGS not set.'
 end
 --- quest_data_a274 ---------------------------------

qsrc2tw/twine-code/start/start.tw

@@ -11,7 +11,7 @@
 <center>Version <<=`${QSP.version_major[0]}.${QSP.version_minor[0]}.${QSP.version_revision[0]}.${QSP.version_patch[0]}`>></center>
 <center><font color="red"><b>Children under 18 years are strictly forbidden to play</b></font>
 <br/>
-<<='<center><img '+(QSP.$set_imgh[0])+' src="images/system/1_openings/splashes/splash' + setup.qsp_rand(1 , 30) + '.jpg" ></center>'>>
+<<='<center><img '+(QSP.$set_imgh[0])+' src="images/system/1_openings/splashes/splash' + setup.qsp_rand(1 , 30) + '.jpg" alt="If you see this message, your images-folder is set up incorrectly." style="color: red;font-size: 2em;font-weight: bold;" ></center>'>>
 <center>Based on the Russian game ЭТО by DeGross.</center>
 <br/>
 This game is about the simulated life of a woman containing elements of RPG, strategy, porn and magical combat.