1
0

katspalnya.qsrc 2.9 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192
  1. # katspalnya
  2. $sexloc = $CURLOC
  3. if $ARGS[0] = 'start':
  4. $metka = 'start'
  5. $loc = 'katspalnya'
  6. $location_type = 'private'
  7. $locclass = 'bedr'
  8. $menu_loc = 'katspalnya'
  9. $menu_arg = 'start'
  10. menu_off = 0
  11. cls
  12. gs 'stat'
  13. '<center><b><font color="maroon">Katja''s apartment</font></b></center>'
  14. '<center><img <<$set_imgh>> src="images/characters/city/katja/bedroom.jpg"></center>'
  15. 'Katja''s apartment. It''s mostly just one large room, with a huge bed in it. There''s a small couch to the side.'
  16. if hour >= 18 and hour < 23:'<a href="exec:gt ''katspalnya'', ''kat''">Kat</a> is sitting on the couch. She''s watching TV.'
  17. if hour >= 23 or hour < 6:'<a href="exec:gt ''katspalnya'', ''katslip''">Kat</a> is sound asleep in her huge bed.'
  18. act 'Leave Kat''s apartment':gt 'street'
  19. end
  20. if $ARGS[0] = 'katslip':
  21. cla
  22. clr
  23. *clr
  24. minut += 30
  25. if katjob = 0 and npc_rel['A219'] > 60:gt 'katspalnya', 'katjobs'
  26. '<center><img <<$set_imgh>> src="images/characters/city/katja/kat.jpg"></center>'
  27. 'When you awaken Kat, she rubs her eyes tiredly: "Hey, <<$pcs_nickname>>... what''s up?"'
  28. act 'Chat with her for a while':gt 'katspalnya', 'start'
  29. if npc_rel['A219'] > 50:act 'Seduce her':gt 'lezbsex', 'start'
  30. end
  31. if $ARGS[0] = 'kat':
  32. cla
  33. clr
  34. *clr
  35. minut += 30
  36. if katjob = 0 and npc_rel['A219'] > 60:gt 'katspalnya', 'katjobs'
  37. '<center><img <<$set_imgh>> src="images/characters/city/katja/kat.jpg"></center>'
  38. 'Kat smiles when she sees you approach and says cheerfully: "<<$pcs_nickname>>, hi! How''s it going? Come, sit with me!"'
  39. act 'Make up an excuse and leave':gt 'katspalnya', 'start'
  40. if npc_rel['A219'] > 50:act 'Seduce her':gt 'lezbsex', 'start'
  41. act 'Chat with Kat':
  42. cla
  43. clr
  44. *clr
  45. if telkat = 0:telkat = 1
  46. npc_rel['A219'] += 1
  47. minut += 30
  48. '<center><img <<$set_imgh>> src="images/characters/city/katja/kat.jpg"></center>'
  49. 'You talk with Kat for half an hour, occasionally glancing at the TV. She''s a lot of fun to be around.'
  50. act 'Finish':gt 'katspalnya', 'start'
  51. end
  52. end
  53. if $ARGS[0] = 'katjobs':
  54. cla
  55. clr
  56. *clr
  57. katjob = 1
  58. minut += 30
  59. '<center><img <<$set_imgh>> src="images/characters/city/katja/kat.jpg"></center>'
  60. 'Kat talks about her job for a while, and then suggests: "By the way... if you want, I can put in a good word for you! Maybe you could work at the clinic as well!"'
  61. act '"But I''m not qualified to work as a nurse!"':
  62. cla
  63. 'You shrug off the idea at first, saying: "But I''m not a nurse! I wouldn''t know what to do!"'
  64. 'Kat laughs and says: "Oh, come on! Do you think I knew what I was doing when I started? Just wear the fancy coat and be there, you''ll learn as you go! It''ll be fun, I promise! We could have so much fun, working together!"'
  65. '"Well, okay, I''ll think about it!" you say, earning you an enthusiastic hug and a "Yay!" cheer from Kat. How bad could it be?'
  66. act 'Continue':gt 'katspalnya', 'start'
  67. end
  68. end
  69. --- katspalnya ---------------------------------