glife/locations/gdkbibl.qsrc

# gdkbibl

$metka = ''
$loc = 'gdkbibl'
$location_type = 'public_indoors'
frost = 0
gs 'stat'
	gs 'themes', 'indoors'
'<center><b><font color="maroon">Community center library</font></b></center>'
'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/library/gdkbibl.jpg"></center>'
'For such a small town, this library is surprisingly large - containing many interesting books on a wide variety of subjects.'

act 'Leave':gt 'gdk'

act 'Go to the toilets': gt 'gdktoilet', 'start'

if hour >= 8 and hour < 18:
	act 'Read a book on science (1:00)':
		*clr & cla
		if blizoruk = 100 or glassqw = 1:
		glassqw = 1
		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
		end
		if pcs_nerd > 0:
			lastread = totminut
			lastreadday = daystart
			pcs_nerd += 1
		end
		minut += 60
		intel_exp += RAND(3,6) + (mentats_dose - rand(0,mentats_dose))
		blizoruk += 1
		grupvalue[3] +=1
		gs'stat'
		'<center><img <<$set_imgh>> src="images/shared/accessories/books/science1.jpg"></center>'
		'You spend an hour reading, trying to make sense of all the clever propositions writen inside and to finally understand the subject it describes.'
		act 'Put the book back':gt 'gdkbibl'
	end
	act 'Read an adventure novel (1:00)':
		*clr & cla
		if blizoruk = 100 or glassqw = 1:
		glassqw = 1
		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
		end
		if pcs_nerd > 0:
			lastread = totminut
			lastreadday = daystart
			pcs_nerd += 1
		end
		minut += 60
		pcs_mood = 100
		pcs_willpwr += 100
		blizoruk += 1
		grupvalue[3] +=1
		gs'stat'
		'<center><img <<$set_imgh>> src="images/shared/accessories/books/fiction' + rand(1,2) + '.jpg"></center>'
		'You spend an hour reading an adventure novel, immersing yourself in daring deeds and awesome twists.'
		act 'Put the book back':gt 'gdkbibl'
	end
	act 'Read a fantasy novel (1:00)':
		*clr & cla
		if blizoruk = 100 or glassqw = 1:
		glassqw = 1
		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
		end
		if pcs_nerd > 0:
			lastread = totminut
			lastreadday = daystart
			pcs_nerd += 1
		end
		minut += 60
		pcs_mood = 100
		pcs_willpwr += 100
		blizoruk += 1
		grupvalue[3] +=1
		gs'stat'
		'<center><img <<$set_imgh>> src="images/shared/accessories/books/fantasy' + rand(1,9) + '.jpg"></center>'
		'You spend an hour reading a fantasy novel, rescuing damsels from dragons, digging for jewels with dwarves and performing word changing magic alongside elves and druids.'
		act 'Put the book back':gt 'gdkbibl'
	end
	act 'Read a science fiction novel (1:00)':
		*clr & cla
		if blizoruk = 100 or glassqw = 1:
		glassqw = 1
		msg'The text blurs across the page - it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
		end
		if pcs_nerd > 0:
			lastread = totminut
			lastreadday = daystart
			pcs_nerd += 1
		end
		minut += 60
		pcs_mood = 100
		pcs_willpwr += 100
		blizoruk += 1
		grupvalue[3] +=1
		gs'stat'
		'<center><img <<$set_imgh>> src="images/shared/accessories/books/scifi' + rand(1,6) + '.jpg"></center>'
		'You spend an hour reading a science fiction novel - flying off into space, travelling though time, running from rogue AI''s and creating monsters with your hunchbacked assistant.'
		act 'Put the book back':gt 'gdkbibl'
	end
	act 'Read a romance novel (1:00)':
		*clr & cla
		if blizoruk = 100 or glassqw = 1:
		glassqw = 1
		msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
		end
		if pcs_nerd > 0:
			lastread = totminut
			lastreadday = daystart
			pcs_nerd += 1
		end
		minut += 60
		pcs_mood = 100
		pcs_willpwr += 100
		blizoruk += 1
		pcs_horny += 20
		gs'stat'
		'<center><img <<$set_imgh>> src="images/shared/accessories/books/romance' + rand(1,20) + '.jpg"></center>'
		'You spend a very short hour reading a romance novel - choosing between a vampire or a werewolf, falling in love with an obscenely wealthy Grey...several of the scenes are very steamy and you find yourself getting quite aroused.'
		act 'Put the book back':gt 'gdkbibl'
	end
	act 'Study for an hour':
		*clr & cla
		if blizoruk = 100 or glassqw = 1:
			glassqw = 1
			msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'
			gt 'gdkbibl'
		end
		if pcs_nerd > 0:
			lastread = totminut
			lastreadday = daystart
			pcs_nerd += 1
		end
		minut += 60
		lern += RAND(1,3)
		blizoruk += 1
		grupvalue[3] += 2
		gs'stat'
		'<center><img <<$set_imgh>> src="images/shared/accessories/books/learning' + rand(1,3) + '.jpg"></center>'
		'You read several books that should help you with your school work, you feel that you learned something today.'
		act 'Put the book back':gt 'gdkbibl'
	end
	act 'Read from the collected works of Leo Tolstoy (1:00)':
		*clr & cla
		if blizoruk = 100 or glassqw = 1:
			glassqw = 1
			msg'The text blurs across the page, it seems that your eyesight is actually pretty poor. Maybe you should head to the city and visit an ophthalmologist.'&gt $curloc
		end
		if pcs_nerd > 0:
			lastread = totminut
			lastreadday = daystart
			pcs_nerd += 1
		end
		minut += 60
		sprt_exp += RAND(3,6)
		blizoruk += 1
		grupvalue[3] +=2
		gs'stat'
		'<center><img <<$set_imgh>> src="images/shared/accessories/books/tolstoy.jpg"></center>'
		'You read the book for an hour. Tolstoy is certainly a classic writer, no one denies this, but he used a shit-load of words.'
		act 'Put the book back':gt 'gdkbibl'
	end
else
	'The library is closed.'
end

--- gdkbibl ---------------------------------