Palatka 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869
  1. # Palatka
  2. $location_type = 'event'
  3. if $ARGS[0] = 'start':
  4. $sexloc = $CURLOC
  5. $metkaM = $ARGS[0]
  6. $locM = $CURLOC
  7. $location_type = 'private'
  8. palMir = 1
  9. gs 'stat'
  10. '<center><b><font color="maroon">tent</font></b></center>'
  11. '<center><img <<$set_imgh>> src="images/locations/city/shared/military/palatka.jpg"></center>'
  12. palrand = rand(0, 10)
  13. if palrand = 0:gt 'Palatka', 'pal0'
  14. if palrand = 1:gt 'Palatka', 'pal1'
  15. 'To your surprise quite spacious tent has a bed here, <a href="exec:gt ''mirror'', ''start''">mirror</a>, and even made improvizorovany <a href="exec:gt ''vann'', ''start''">shower</a>.'
  16. act 'Leave':palMir = 0 & gt 'Military', 'start'
  17. act 'Sleep':
  18. hour += 8
  19. pcs_sleep = 100
  20. gt 'palatka', 'start'
  21. end
  22. end
  23. if $ARGS[0] = 'pal0':
  24. cla
  25. *clr
  26. '<center><img <<$set_imgh>> src="images/locations/city/shared/military/sex/pal0.jpg"></center>'
  27. 'Once you begin to change as the tent includes two soldiers and see you half-naked, running up to you with the members on the edge, you hvaete for their members, but what to do to squeeze harder and get them out of the tent or relax after a hard day.'
  28. act 'Send':gt 'palatka', 'start'
  29. act 'Post':
  30. gs 'npcgeneratec', 0, 'Soldier', rand(18,34)
  31. gs 'boyStat', $npclastgenerated
  32. $boy[0] = $boy
  33. gs 'npcgeneratec', 0, 'Soldier', rand(18,34)
  34. $boy[1] = $npclastgenerated
  35. guy += 2
  36. picrand = 22
  37. xgt 'sexdvoe', 'var'
  38. end
  39. end
  40. if $ARGS[0] = 'pal1':
  41. cla
  42. *clr
  43. '<center><img <<$set_imgh>> src="images/locations/city/shared/military/pal1.jpg"></center>'
  44. 'By accessing the tent you stumble and already flying nose to the ground, but suddenly you pick up strong hands, opening her eyes you see a hefty black.'
  45. act 'Say thank you':gt 'palatka', 'start'
  46. act 'Repay in full':
  47. sexpartkno = 1
  48. gs 'npcgeneratec', 0, 'Black Soldier', rand(18,35)
  49. npc_Malen[$npclastgenerated] = rand(10,15)
  50. gs 'boyStat', $npclastgenerated
  51. guy += 1
  52. picrand = 43
  53. gt 'sex', 'minet'
  54. end
  55. end
  56. --- Palatka ---------------------------------