# balkon
if $ARGS[0] = 'start':
cla
clr
*clr
minut += 5
gs 'stat'
'
Apartment Balcony
'
if $clothingworntype = 'nude':
'
'
elseif tanga = 0:
'
'
else
'
'
end
'You went to the balcony.'
if hour >= 0 and hour <= 6:
'It''s dark outside. Street lamps illuminate the empty street below.'
elseif hour = 7:
'Morning is dawning out on the street, birds are singing in the trees.'
elseif hour >= 8 and hour <= 19:
'It''s clear day out on the street. You can see some people walking by.'
elseif hour >= 20 and hour <= 23:
'It''s twilight and the street below you is dimly lit.'
end
if $clothingworntype = 'nude':
if sosedBalDay ! day:
if rand(1, 4) = 4:
'A neighbor from the opposite building is out on his balcony and looking at your naked body.'
act 'Look at the neighbor':gt 'balkon2', 'sosed'
else
'No one pays you any attention.'
end
else
'No one pays you any attention.'
end
end
if sigaret >= 1:act 'Light a cigarette':gt 'balkon2', 'kurit'
!!!Probably CV edition
if horny >= 50:
act 'Masturbate':gt 'balkon2', 'masopt'
end
!!!
act 'Approach the railing':gt 'balkon2', 'niz'
act 'Leave the balcony':gt 'sitr'
end
--- balkon ---------------------------------