balkon.qsrc 2.1 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061
  1. # balkon
  2. if $ARGS[0] = 'start':
  3. cla
  4. *clr
  5. minut += 1
  6. gs 'stat'
  7. '<center><b><font color="maroon">Apartment Balcony</font></b></center>'
  8. if $clothingworntype = 'nude':
  9. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/balcony_naked1.jpg"></center>'
  10. elseif $pantyworntype = 'none':
  11. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/balcony_dressed1.jpg"></center>'
  12. else
  13. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/balcony_underwear1.jpg"></center>'
  14. end
  15. 'You step out on the balcony. As you step out on the balcony you feel a light breeze making you a bit chilly.'
  16. if hour >= 0 and hour <= 6:
  17. 'It''s dark outside. The street lamps brighten the empty streets below.'
  18. elseif hour = 7:
  19. 'The sun is dawning outside, the birds are waking up and are happily chirping.'
  20. elseif hour >= 8 and hour <= 19:
  21. 'It''s quite nice outside today. The busy streets are reflecting that, there are lot of people walking at a fast pace.'
  22. elseif hour >= 20 and hour <= 23:
  23. 'It''s twilight and the street lights are dimly lit. There''s far less movement on the streets.'
  24. end
  25. if $clothingworntype = 'nude':
  26. if sosedBalDay ! daystart:
  27. if rand(1, 4) = 4:
  28. 'A neighbor from the opposite building is out on his balcony and looking your way. He''s noticed that you''re naked...'
  29. act 'Look at the neighbor':gt 'balkon2', 'sosed'
  30. else
  31. 'A neighbor from the opposite building is out on his balcony and looking your way. You feel a bit creeped out that he''s following you closely with his gaze.'
  32. end
  33. else
  34. 'No one notices that you''re standing naked on your balcony. You feel a bit dejected that no one payed you any attention.'
  35. end
  36. end
  37. act 'Return to the living room':
  38. if $loc = 'sitr':
  39. gt 'sitr'
  40. else
  41. gt 'sitr2x'
  42. end
  43. end
  44. act 'Approach the railing':gt 'balkon2', 'niz'
  45. if siga >= 1:act 'Light a cigarette':gt 'balkon2', 'kurit'
  46. !!!Probably CV edition
  47. if pcs_horny >= 50 and pcs_inhib > 30:
  48. act 'Masturbate':gt 'balkon2', 'masopt'
  49. end
  50. end
  51. --- balkon ---------------------------------