# city_mansion_residence_2
if $ARGS[0] = 'yliving':
$loc = 'city_mansion_residence_2'
$loc_arg = 'yliving'
$menu_loc = 'city_mansion_residence_2'
$menu_arg = 'yliving'
$location_type = 'private'
$locclass = 'livingr'
menu_off = 0
minut += 1
gs 'stat'
*clr & cla
'
Living Room'
if ymanrem[7] = 2:
'> src="images/locations/city/suburb/mansion/y_living.jpg">'
elseif ymanrem[7] = 1:
'> src="images/locations/city/suburb/mansion/i_finished.jpg">'
else
'> src="images/locations/city/suburb/mansion/i_unfinished.jpg">'
end
act 'Leave the room': gt 'city_mansion_residence_1', 'yfoyer'
if ymanrem[7] = 2:
'A large room where you can watch TV, or relax on your luxury leather sofa.'
gs 'subkid'
end
end
if $ARGS[0] = 'ylounge':
$loc = 'city_mansion_residence_2'
$loc_arg = 'ylounge'
$menu_loc = 'city_mansion_residence_2'
$menu_arg = 'ylounge'
$location_type = 'private'
menu_off = 0
minut += 1
gs 'stat'
*clr & cla
'Lounge'
if ymanrem[8] = 2:
'> src="images/locations/city/suburb/mansion/y_lounge.jpg">'
elseif ymanrem[8] = 1:
'> src="images/locations/city/suburb/mansion/i_finished.jpg">'
else
'> src="images/locations/city/suburb/mansion/i_unfinished.jpg">'
end
act 'Leave the room': gt 'city_mansion_residence_1', 'yfoyer'
if ymanrem[8] = 2:
'The lounge, where you can work on your tapestries and relax in front of the fireplace.'
if sewing_kit = 1:
'Your sewing kit is stored next to your favorite chair.'
*nl
if gobelen > 0:
'You have completed <> tapestries.'
*nl
end
if tkan <= 0:
'You do not have any fabric.'
else
if pcs_sewng < 40:
'You have <> pieces of sewing fabric left.'
elseif pcs_sewng < 80:
'You have enough fabric for <> lessons.'
else
if newgobelen = 0:
act'Start a new tapestry (00:15)':
*clr & cla
menu_off = 1
tkan -= 1
newgobelen = 1
minut += 15
gs'stat'
'You spend 15 minutes at the embroidery frame, preparing the fabric and outlining the pattern for the tapestry.'
act'Set the tapestry aside':gt $curloc
end
end
end
end
if newgobelen >= 1:
'Your tapestry is <> percent finished.'
act'Work on the tapestry (01:00)':
*clr & cla
menu_off = 1
minut += 60
gs 'exp_gain', 'sewng', rand(pcs_intel/10, pcs_intel/5)
gobramax = (pcs_sewng - 70) * 6
gobramin = (pcs_sewng - 70) * 2
newgobelen += rand(gobramin,gobramax)
gs'stat'
if newgobelen < 1000:'You spend an hour working on your tapestry, which is now <> percent finished.'
if newgobelen >= 1000:
newgobelen = 0
gobelen += 1
'Your work on the tapestry is done.'
end
act'Set the tapestry aside':gt $curloc
end
end
end
end
end
if $ARGS[0] = 'ylibrary':
$loc = 'city_mansion_residence_2'
$loc_arg = 'ylibrary'
$menu_loc = 'city_mansion_residence_2'
$menu_arg = 'ylibrary'
$location_type = 'private'
menu_off = 0
minut += 1
gs 'stat'
*clr & cla
'Library'
if ymanrem[10] = 2:
'> src="images/locations/city/suburb/mansion/y_library.jpg">'
elseif ymanrem[10] = 1:
'> src="images/locations/city/suburb/mansion/i_finished.jpg">'
else
'> src="images/locations/city/suburb/mansion/i_unfinished.jpg">'
end
act 'Leave the room': gt 'city_mansion_residence_1', 'yfoyer'
if ymanrem[10] = 2:
'A huge collection of books are neatly placed on the bookshelves.'
act 'Read a book on science (1:00)':
*clr & cla
menu_off = 1
if blizoruk = 500 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
if pcs_nerd > 0: lastread = totminut & lastreadday = daystart & pcs_nerd += 1
minut += 60
gs 'exp_gain', 'intel', rand(3,6) + (mentats_dose - rand(0,mentats_dose))
blizoruk += 1
grupvalue[3] +=1
gs'stat'
'> src="images/pc/items/accessories/books/science1.jpg">'
'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 'city_mansion_residence_2', 'ylibrary'
end
act 'Read an adventure novel (1:00)':
*clr & cla
menu_off = 1
if blizoruk = 500 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
if pcs_nerd > 0: lastread = totminut & lastreadday = daystart & pcs_nerd += 1
minut += 60
pcs_mood = 100
blizoruk += 1
grupvalue[3] +=1
gs'stat'
'> src="images/pc/items/accessories/books/fiction' + rand(1,2) + '.jpg">'
'You spend an hour reading an adventure novel, immersing yourself in daring deeds and awesome twists.'
act 'Put the book back': gt 'city_mansion_residence_2', 'ylibrary'
end
act 'Read a fantasy novel (1:00)':
*clr & cla
menu_off = 1
if blizoruk = 500 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
if pcs_nerd > 0: lastread = totminut & lastreadday = daystart & pcs_nerd += 1
minut += 60
pcs_mood = 100
blizoruk += 1
grupvalue[3] +=1
gs'stat'
'> src="images/pc/items/accessories/books/fantasy' + rand(1,9) + '.jpg">'
'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 'city_mansion_residence_2', 'ylibrary'
end
act 'Read a science fiction novel (1:00)':
*clr & cla
menu_off = 1
if blizoruk = 500 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
if pcs_nerd > 0: lastread = totminut & lastreadday = daystart & pcs_nerd += 1
minut += 60
pcs_mood = 100
blizoruk += 1
grupvalue[3] +=1
gs'stat'
'> src="images/pc/items/accessories/books/scifi' + rand(1,6) + '.jpg">'
'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 'city_mansion_residence_2', 'ylibrary'
end
act 'Read a romance novel (1:00)':
*clr & cla
menu_off = 1
if blizoruk = 500 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
if pcs_nerd > 0: lastread = totminut & lastreadday = daystart & pcs_nerd += 1
minut += 60
pcs_mood = 100
blizoruk += 1
pcs_horny += 20
gs'stat'
'> src="images/pc/items/accessories/books/romance' + rand(1,20) + '.jpg">'
'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 'city_mansion_residence_2', 'ylibrary'
end
act 'Read from the collected works of Leo Tolstoy (1:00)':
*clr & cla
menu_off = 1
if blizoruk = 500 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
if pcs_nerd > 0: lastread = totminut & lastreadday = daystart & pcs_nerd += 1
minut += 60
gs 'exp_gain', 'sprt', rand(3,6)
blizoruk += 1
grupvalue[3] +=2
gs'stat'
'> src="images/pc/items/accessories/books/tolstoy.jpg">'
'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 'city_mansion_residence_2', 'ylibrary'
end
end
end
if $ARGS[0] = 'yoffice':
$loc = 'city_mansion_residence_2'
$loc_arg = 'yoffice'
$menu_loc = 'city_mansion_residence_2'
$menu_arg = 'yoffice'
$locM = 'city_mansion_residence_2'
$locM_arg = 'yoffice'
$location_type = 'private'
menu_off = 0
minut += 1
gs 'stat'
*clr & cla
'Office'
if ymanrem[12] = 2:
'> src="images/locations/city/suburb/mansion/y_office.jpg">'
elseif ymanrem[12] = 1:
'> src="images/locations/city/suburb/mansion/i_finished.jpg">'
else
'> src="images/locations/city/suburb/mansion/i_unfinished.jpg">'
end
act 'Leave the room': gt 'city_mansion_residence_1', 'yfoyer'
if ymanrem[12] = 2:
'Your work room where you spend most of the time signing important papers and handling your business needs.'
'There''s a computer sitting on your antique desk.'
if ml_guitar['carried'] = 1:
act 'Place the guitar next to your desk':
ml_guitar['carried'] = 0
$ml_guitar['location'] = $curloc
gt $loc, $loc_arg
end
elseif $ml_guitar['location'] = $curloc:
act 'Pick up the guitar':
ml_guitar['carried'] = 1
$ml_guitar['location'] = ''
gt $loc, $loc_arg
end
end
if ml_online['account'] = 0 and internet > 0:
act 'Set up an online music account': gt 'music_onlinemusic', 'setupAccount'
end
!!Uploading recorded music if there are any not uploaded yet
if ml_uploadablemusic > 0 and internet > 0 and ml_online['account'] = 1:
if pcs_inhib < 30:
if pcs_inhib < 10:
$diff = 'hard'
elseif pcs_inhib < 20:
$diff = 'medium'
else
$diff = 'easy'
end
gs 'willpower', 'skill', 'self', $diff
will_cost = (will_cost * 2) - (pcs_perform)
if will_cost <= pcs_willpwr:
act 'Upload music (<> Willpower)': gt 'music_onlinemusic', 'uploadmusic'
else
act 'Upload music (<> Willpower)': '
You don''t have enough willpower to use this action.'
end
end
act 'Upload music': gt 'music_onlinemusic', 'uploadallmusic'
end
if ml_uploadablemusic > 0:
act 'Delete old recordings': gt 'music_onlinemusic', 'deleteoldmusic'
end
if hour > 8 and hour < 22:
if ml_guitar['hasguitar'] = 1:
act 'Play something on the guitar':
pcs_mood += 10
minut += 10
gs 'stat'
'You pick up your guitar and start to play some songs you know, just for your own entertainment.'
'You hum along to the tune, relaxing into the music and enjoying it. When you look up, 10 minutes has passed and you are in a much better mood.'
end
end
if ml_guitar['hasguitar'] = 1 and (ml_guitar['chordbook'] = 1 or ml_guitarlesson['lessoncount'] > 0) and ml_performance['performed_minutes'] < ml_performance['max_perform_minutes'] and alko < 5:
if pcs_inhib < 30:
if pcs_inhib < 10:
$diff = 'hard'
elseif pcs_inhib < 20:
$diff = 'medium'
else
$diff = 'easy'
end
gs 'willpower', 'skill', 'self', $diff
will_cost = (will_cost * 3) - (pcs_perform)
if will_cost <= pcs_willpwr:
act 'Practice guitar (<> Willpower)':
inhib_exp += rand(1,2)
gs 'willpower', 'pay', 'self'
gs 'stat'
gt 'music_bedroomPractice', 'guitar'
end
else
act 'Practice guitar (<> Willpower)': '
You feel too embarrassed to pick up your guitar in front of people'
end
else
act 'Practice guitar': gt 'music_bedroomPractice', 'guitar'
end
end
!! Streaming music
if ml_guitar['hasguitar'] = 1 and ml_online['account'] = 1 and internet > 0 and ml_performance['performed_minutes'] < ml_performance['max_perform_minutes'] and ml_performance['max_perform_minutes'] >= 15 and alko < 5 and ml_streaming['lastday'] ! daystart:
ml_streamtime = min((ml_performance['max_perform_minutes']-ml_performance['performed_minutes']), 60)
if pcs_inhib < 30:
if pcs_inhib < 10:
$diff = 'hard'
elseif pcs_inhib < 20:
$diff = 'medium'
else
$diff = 'easy'
end
gs 'willpower', 'skill', 'self', $diff
will_cost = (will_cost * 3) - (pcs_perform)
if will_cost <= pcs_willpwr:
act 'Live stream (<> minutes) (<> Willpower)':
inhib_exp += rand(1,3)
gs 'willpower', 'pay', 'self'
gs 'stat'
gt 'music_onlinemusic', 'liveStream'
end
else
act 'Live stream (<> minutes) (<> Willpower)': '
You don''t have enough willpower to use this action.'
end
else
act 'Live stream (<> minutes)': gt 'music_onlinemusic', 'liveStream'
end
end
!! Recording music
if ml_guitar['hasguitar'] = 1 and ml_performance['performed_minutes'] < ml_performance['max_perform_minutes'] and alko < 5:
if pcs_inhib < 20:
if pcs_inhib < 10:
$diff = 'medium'
elseif pcs_inhib < 20:
$diff = 'easy'
end
gs 'willpower', 'skill', 'self', $diff
if will_cost <= pcs_willpwr:
act 'Record a song with your phone (<> Willpower)':
inhib_exp += rand(1,2)
gs 'willpower', 'pay', 'self'
gs 'stat'
gt 'music_onlinemusic', 'recordSong'
end
if komp = 1 and webcamera = 1 and ml_studio['scarlet-3rd-gen'] = 1:
act 'Record and edit a song (<> Willpower)':
inhib_exp += rand(1,2)
gs 'willpower', 'pay', 'self'
gs 'stat'
gt 'music_onlinemusic', 'recordAndEditSong'
end
end
else
act 'Record a song (<> Willpower)': '
You don''t have enough willpower to use this action.'
act 'Record and edit a song (<> Willpower)': '
You don''t have enough willpower to use this action.'
end
else
act 'Record a song with your phone': gt 'music_onlinemusic', 'recordSong'
if komp = 1 and webcamera = 1 and ml_studio['scarlet-3rd-gen'] = 1:
act 'Record and edit a song': gt 'music_onlinemusic', 'recordAndEditSong'
end
end
end
end
end
end
if $ARGS[0] = 'ynursery':
$loc = 'city_mansion_residence_2'
$loc_arg = 'ynursery'
$menu_loc = 'city_mansion_residence_2'
$menu_arg = 'ynursery'
$location_type = 'private'
menu_off = 0
minut += 1
gs 'stat'
*clr & cla
'Nursery'
if ymanrem[9] = 2:
'> src="images/locations/city/suburb/mansion/y_nursery.jpg">'
'The neatly designed nursery room, only the best for your children.'
elseif ymanrem[9] = 1:
'> src="images/locations/city/suburb/mansion/i_finished.jpg">'
else
'> src="images/locations/city/suburb/mansion/i_unfinished.jpg">'
end
act 'Leave the room': gt 'city_mansion_residence_1', 'yfoyer'
if ymanrem[9] = 2: gs 'subkid'
end
--- city_mansion_residence_2 ---------------------------------