# balkon
if $ARGS[0] = 'start':
CLOSE ALL
cla
*clr
set minut += 5
gs 'stat'
'Apartment Balcony'
!Картинка!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
if nude = 0:
'
'
end
if nude = 1:
if tanga = 0: '
'
if tanga = 1: '
'
end
'You went to the balcony.'
!Погода!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
if hour >= 0 and hour <= 6:
'Dark outside, the street lamp illuminates.'
end
if hour = 7:
'On the street the morning dawn, singing birds.'
end
if hour >= 8 and hour <= 19:
'On a clear day the street.'
end
if hour >= 20 and hour <= 23:
'At twilight street.'
end
!Если голая!!!!!
if nude = 1:
if sosedBalDay ! day: Set temp = RAND(1,4)
if sosedBalDay = day: Set temp = RAND(1,3)
if temp = 1:
'You no one pays attention.'
end
if temp = 2:
'You no one pays attention.'
end
if temp = 3:
'You no one pays attention.'
end
if temp = 4:
'Neighbor left out on the balcony and looking at you naked.'
act 'Look at the neighbor': gt 'balkon2','sosed'
end
end
if horny >= 50:
act 'Masturbate': gt 'balkon2','masopt'
end
act 'Approach the railing': gt 'balkon2','niz'
act 'Leave from the balcony': gt 'sitr'
end
--- balkon ---------------------------------