glife/locations/journal_work.qsrc

# journal_work
!! Created 12/9/22
!! 12/9/22 Initial code
!! Authored by Hooded Silence
!! Game Character work section. This is the container file for all work roles in game. Used to track income, work days and other relevant data.
!! V .01 Refactored code from Journal section into it''s own section to make legibility easier.
!! V. 02 New job schedule system integrated
!! V. 03 New Ad Hoc management interface integration - ongoing

if $ARGS[0] = 'start':

	*clr & cla
	act 'Put your journal down': gt $menu_loc, $menu_arg
	act 'Return to top journal page': gt 'journal', 'records'
	$jumploc = 'worktab'
	gs 'journal', 'journalmenu'

	'<center><h2>Work</h2></center>'
	if emp_job[active] < 1:
		'You need to find a job or get training to develop your career. Check the Quests or Information section.'
	else
		function_sw = 2
		gs 'emp_functions', 'job_alert'
		gs 'emp_functions', 'gen_schedule', job_start * 2
	end
	!! Show any ad hoc events or contracts

	if arrsize('evt_event') ! 0: gs 'emp_functions', 'disp_evt', 2

	if workPTU > 2: 'You work as a teacher at the Lycée and your schedule is Monday to Saturday, teaching between 14:00 and 16:00. Your salary is 300 <b>₽</b> per day.'
	if work = 1 or cheatVars['work'] = 1:
		if workKafe['job'] > 0: 'You are working as a waitress at The Roadhouse cafe. Your working days are Tuesday, Wednesday and Thursday, and you should come to work between 11:00 and 12:00. Your wages are received on the 25th of each month, but you can earn tips from customers.'
		if workhosp > 0: 'You work as a nurse in the city residential area clinic. You need to come to work between 08:00-09:00 during the week. Salary is automatically transferred on the 25th of each month.'
		if worksalon > 0: 'You work as a masseuse at the Beauty Bar in the city. Your working days are: Monday, Wednesday and Friday, and you should come to work between 09:00 and 10:00. Salary is automatically transferred on the 25th of each month.'
		if workSec > 0: 'You work as a secretary at Titran Express, Monday to Friday. You need to come to work by 09:00. Salary is automatically transferred on the 25th of each month.'
		if tanwork > 0: 'You work as a governess for Tanya at Nicholas'' luxury city apartment. Salary is automatically transferred on the 25th of each month.'
		if young_shop_work = 1: 'You work in the city as a store clerk at the Pussy Cats clothing store. Work starts at 16:00 Monday to Friday. Your salary is paid once a week on Fridays.'
		if young_shop_work1 = 1: 'You work in the city as a store clerk at the Pussy Cats clothing store. Work starts at 09:00 Saturday and Sunday. Your salary is paid once a week on Fridays.'
		if young_shop_work2 = 1: 'You work in the city as a store clerk at the Pussy Cats clothing store. Work starts at 09:00 Monday through Friday. Your salary is paid once a week on Fridays.'
		if workFabrika = 1: 'You work as a seamstress in the factory in Pavlovsk. You work every week day and your salary is automatically transferred on the 25th of each month.'
		if gpoliuborka > 1: 'You work part-time as a cleaner in the Pavlovsk clinic. Your schedule is from 14:00 to 21:00.'
!!		if TourGuide = 1: 'You work as a tour guide in the Pavlovsk park. Work is any day during the summer holidays for 8 hours, starting between 08:00 and 12:00. Salary is 1,000 <b>₽</b>.'
	end
	if workrin = 1: 'You are working in Arthur''s tent at the market as a clothing saleswoman. You work on Tuesday, Thursday and Saturday with a start time of 08:00. Salary depends on sales.'
	if maidqw = 1:
		'You work in the Pavlovsk hotel as a maid. Your work schedule is every day from 16:00 to 19:00 and your salary is 250 <b>₽</b> plus tips.'
	elseif GermanQW = 1:
		'You can find out more about becoming a maid at the Pavlovsk hotel if you visit the manager between 12:00 and 14:00.'
	end
	if postjobQW = 2 or postjobQW = 4: 'You deliver mail for the postmaster. The work day starts each Saturday between 11:00 and 12:00. Salary is 450 <b>₽</b>.'
	if stripwork >= 1: 'You work as a stripper at the Fuzzy Dice strip club every Wednesday and Thursday from 18:00 to 03:00. No salary as you earn tips.'
	if stripwork1 >= 1: 'You work as a stripper at the Fuzzy Dice strip club every Friday and Saturday from 18:00 to 03:00. No salary as you earn tips.'
!!	if stripbarwork >= 1: 'You work as a bargirl at the Fuzzy Dice strip club every Wednesday and Thursday from 18:00 to 03:00. Salary is automatically transferred on the 25th of each month.'
!!	if stripbarwork1 >= 1: 'You work as a bargirl at the Fuzzy Dice strip club every Friday and Saturday from 18:00 to 03:00. Salary is automatically transferred on the 25th of each month.'
	if film > 0: 'You are working as a pornographic actress under the name <<$pfname>>.'
	if bumtolik = 4: 'You have been asked to help the homeless at the Mercy Clinic in the city industrial region.'
	if bumtolik >= 5: 'You volunteer at the Mercy Clinic in the city industrial region and work with the homeless. Working hours are from 09:00 to 17:00 on Saturday and Sunday.'

	*nl

	if audition['day'] = daystart:
		'Your audition for the role of <<$role>> is today!'
	elseif audition['day'] - daystart = 1:
		'You are auditioning for the role of <<$role>> tomorrow.'
	elseif audition['day'] - daystart > 1:
		'You are auditioning for the role of <<$role>> in <<audition[''day''] - daystart>> days.'
	end

	if actress_cast = 1:
		if acting['shoot_day'] = daystart:
			'You are '
		elseif acting['shoot_day'] - daystart = 1:
			'You are scheduled to play the part of <<$role>> <<acting[''shoot_day''] - daystart>> days from now.'
		elseif acting['shoot_day'] - daystart > 1:
			'You are scheduled to play the part of <<$role>> <<acting[''shoot_day''] - daystart>> days from now.'
		end
	end


	if modelfoto['shoots'] > 0:
		*nl
		if modelfoto['erotic'] > modelfoto['nude'] and modelfoto['erotic'] > modelfoto['fashion'] and modelfoto['erotic'] > modelfoto['fitness'] and modelfoto['erotic'] > modelfoto['glamour'] and modelfoto['erotic'] > modelfoto['lingerie'] and modelfoto['erotic'] > modelfoto['catalog']:
			'You are working as an erotic model at Aphrodite Photography.'
		elseif modelfoto['nude'] > modelfoto['fashion'] and modelfoto['nude'] > modelfoto['fitness'] and modelfoto['nude'] > modelfoto['glamour'] and modelfoto['nude'] > modelfoto['lingerie'] and modelfoto['nude'] > modelfoto['catalog'] and modelfoto['nude'] > modelfoto['erotic']:
			'You are working as an artistic nude model at Aphrodite Photography.'
		elseif modelfoto['fitness'] > modelfoto['fashion'] and modelfoto['fitness'] > modelfoto['nude'] and modelfoto['fitness'] > modelfoto['glamour'] and modelfoto['fitness'] > modelfoto['lingerie'] and modelfoto['fitness'] > modelfoto['catalog'] and modelfoto['fitness'] > modelfoto['erotic']:
			'You are working as a fitness model at Aphrodite Photography.'
		elseif modelfoto['glamour'] > modelfoto['fashion'] and modelfoto['glamour'] > modelfoto['nude'] and modelfoto['glamour'] > modelfoto['fitness'] and modelfoto['glamour'] > modelfoto['lingerie'] and modelfoto['glamour'] > modelfoto['catalog'] and modelfoto['glamour'] > modelfoto['erotic']:
			'You are working as a glamour model at Aphrodite Photography.'
		elseif modelfoto['lingerie'] > modelfoto['fashion'] and modelfoto['lingerie'] > modelfoto['nude'] and modelfoto['lingerie'] > modelfoto['fitness'] and modelfoto['lingerie'] > modelfoto['glamour'] and modelfoto['lingerie'] > modelfoto['catalog'] and modelfoto['lingerie'] > modelfoto['erotic']:
			'You are working as a lingerie model at Aphrodite Photography.'
		elseif modelfoto['fashion'] > modelfoto['lingerie'] and modelfoto['fashion'] > modelfoto['nude'] and modelfoto['fashion'] > modelfoto['fitness'] and modelfoto['fashion'] > modelfoto['glamour'] and modelfoto['fashion'] > modelfoto['catalog'] and modelfoto['fashion'] > modelfoto['erotic']:
			'You are working as a fashion model at Aphrodite Photography.'
		elseif modelfoto['catalog'] > 0:
			'You are working as a catalog model at Aphrodite Photography.'
		end
		*nl
		if model_week = (daystart - week) / 7 and model_job_week >= 2:
			'You have no more modeling jobs available this week.'
		elseif model_week < (daystart - week) / 7 and model_job_week = 1:
			'You can get paid for 1 more modeling job this week.'
		elseif model_week < (daystart - week) / 7 and model_job_week < 1:
			'You can get paid for 2 modeling jobs this week.'
		end
	end
	if masseuse['jobtype'] > 0:
		*nl
		'You have worked <<masseuse[''shifts_worked'']>> shifts at the salon this week.'
		if masseuse['<<week>>_shift_1'] = 1 and hour < 9:
			'<BR><b><font color="blue">You have a shift at the salon today at 09:00.</font></b>'
		elseif masseuse['<<week>>_shift_1'] = 1 and hour <= 9:
			'<BR><b><font color="red">You''re late for your 09:00 shift at the salon!</font></b>'
		elseif masseuse['<<week>>_shift_2'] = 1 and hour < 13:
			'<BR><b><font color="blue">You have a shift at the salon today at 13:00.</font></b>'
		elseif masseuse['<<week>>_shift_2'] = 1 and hour <= 13:
			'<BR><b><font color="red">You''re late for your 13:00 shift at the salon!</font></b>'
		elseif masseuse['<<week>>_shift_3'] = 1 and hour < 17:
			'<BR><b><font color="blue">You have a shift at the salon today at 17:00.</font></b>'
		elseif masseuse['<<week>>_shift_3'] = 1 and hour <= 17:
			'<BR><b><font color="red">You''re late for your 17:00 shift at the salon!</font></b>'
		end
	end


	if pornstack > 0:
		if pfilmday[0] = 0:
			if pfilmday[1] = 0:
				'<br><b>You are scheduled for a porn shoot in <<porndays>> days.</b>'
			else
				'<br><b>You have a porn shoot scheduled tomorrow.</b>'
			end
		else
			if hour < 11:
				'<br>You are expected to be in the porn studio at 10:00.'
			elseif hour >= 11 and hour < 13:
				'<br>You should be at the porn studio!'
			elseif hour >= 13:
				'<br>You missed a scheduled porn shoot!'
			end
		end
	end

	if pornmiss = 1: '<br><b>You missed a scheduled porn shoot!</b>'
	if prodcosttrue > 0: '<br><b>You owe money to the porn studio <<prodcost>>?</b>'
	if firstkasting > 0 and pfilmNO < 1:
		if pornstack >= 10:
			'<br>You are currently unable to book any more porn shoots at the porn studio.'
		elseif pornstack = 11:
			'<br>You can contract <<10-pornstack>> porn shoot(s) at the porn studio.'
		else
			'<br>You can contract up to <<10-pornstack>> porn shoot(s) at the porn studio.'
		end
	end
end
--- journal_work ---------------------------------