# MLanding
$location_type = 'private'
killvar '$locclass'
if $ARGS[0] = 'west':
cls
gs 'stat'
'
> src="images/locations/city/suburb/bdsm_club/wlanding.jpg">'
act 'Go to the east wing landing':gt 'MLanding', 'east'
act 'Go downstairs to the foyer':gt 'MHall', 'foyer'
act 'Visit the master bedroom':gt 'MWestbed', 'master'
act 'Visit guest bedroom A':gt 'MWestbed', 'guest'
act 'Visit the games room':gt 'MGames'
if rand (0,100) < 3:
cls
gs 'stat'
''
'A maid is being helped with the vacuum cleaning by a man in casual clothing, you think about reporting him, but he''s a bit busy right now.'
gs 'arousal', 'voyeur', 5
gs 'arousal', 'end'
gs 'stat'
act 'Return': gt 'MLanding', 'west'
end
end
if $ARGS[0] = 'east':
cls
killvar '$locclass'
gs 'stat'
'> src="images/locations/city/suburb/bdsm_club/elanding.jpg">'
act 'Go to the west wing landing':gt 'MLanding', 'west'
act 'Go downstairs to the foyer':gt 'MHall', 'foyer'
act 'Go downstairs to the west wing hallway':gt 'MHall', 'west'
act 'Visit guest bedroom B':gt 'MEastbed', 'guestB'
act 'Visit guest bedroom C':gt 'MEastbed', 'guestC'
act 'Visit guest bedroom D':gt 'MEastbed', 'guestD'
act 'Go to the bathroom': gt 'MBathrooms', 'bath'
act 'Go to the living room': gt 'MLiving'
end
--- MLanding ---------------------------------