331_film 5.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156
  1. # film
  2. if $ARGS[0] = 'film':
  3. cla
  4. clr
  5. gs 'stat'
  6. !pfilmA
  7. if pfilmA >= 5:
  8. cla
  9. Set pfilmA = 0
  10. Set pfilm = 0
  11. film = film + 1
  12. 'You dosnyal in the film.'
  13. act 'Approach to Peter': gt 'pornstudio', 'start'
  14. act 'Finish': gt 'down'
  15. end
  16. if час >= 22 and pfilmA < 5:
  17. cla
  18. 'Time is too late for filming'
  19. act 'Go home': gt 'down'
  20. end
  21. if hour < 22 and pfilmA < 5 and pfilm > 0:
  22. cla
  23. Set minut += 60
  24. gs 'stat'
  25. Set money += 1000
  26. if pfilmA = 0: Set guy+= 1
  27. bj += 1
  28. Set pfilmA += 1
  29. 'You undress and start shooting.'
  30. Set prand = RAND(1,2)
  31. if prand = 1:
  32. Set porand = RAND(1,10)
  33. if porand = 1: '<center><img src="images\picBJ\bj.jpg"></center>'
  34. if porand = 2: '<center><img src="images\picBJ\bj2.jpg"></center>'
  35. if porand = 3: '<center><img src="images\picBJ\bj3.jpg"></center>'
  36. if porand = 4: '<center><img src="images\picBJ\bj4.jpg"></center>'
  37. if porand = 5: '<center><img src="images\picBJ\bj5.jpg"></center>'
  38. if porand = 6: '<center><img src="images\picBJ\bj6.jpg"></center>'
  39. if porand = 7: '<center><img src="images\picBJ\bj7.jpg"></center>'
  40. if porand = 8: '<center><img src="images\picBJ\bj8.jpg"></center>'
  41. if porand = 9: '<center><img src="images\picBJ\bj9.jpg"></center>'
  42. if porand = 10: '<center><img src="images\picBJ\bj10.jpg"></center>'
  43. 'You suck dick for an hour at the actor portraying the passion and lust. Really hard to concentrate when there are fixtures, Assistant, you continually shoved the camera to face.'
  44. end
  45. if prand = 2:
  46. facial += 1
  47. Set porand = RAND(1,10)
  48. if porand = 1: '<center><img src="images\picBJ\fa.jpg"></center>'
  49. if porand = 2: '<center><img src="images\picBJ\fa2.jpg"></center>'
  50. if porand = 3: '<center><img src="images\picBJ\fa3.jpg"></center>'
  51. if porand = 4: '<center><img src="images\picBJ\fa4.jpg"></center>'
  52. if porand = 5: '<center><img src="images\picBJ\fa5.jpg"></center>'
  53. if porand = 6: '<center><img src="images\picBJ\fa6.jpg"></center>'
  54. if porand = 7: '<center><img src="images\picBJ\fa7.jpg"></center>'
  55. if porand = 8: '<center><img src="images\picBJ\fa8.jpg"></center>'
  56. if porand = 9: '<center><img src="images\picBJ\fa9.jpg"></center>'
  57. if porand = 10: '<center><img src="images\picBJ\fa10.jpg"></center>'
  58. 'You suck dick for an hour at the actor portraying the passion and lust. He ends up on your face, you lick the sperm. You every minute shoved the camera in person, running an assistant and illuminators.'
  59. end
  60. act 'Finish': gt 'down'
  61. if hour < 22: act 'Acting on': gt 'film','film'
  62. end
  63. end
  64. if $ARGS[0] = 'film2':
  65. cla
  66. clr
  67. gs 'stat'
  68. !pfilmB
  69. if pfilmB >= 10:
  70. cla
  71. Set pfilmB = 0
  72. Set pfilm = 0
  73. film = film + 1
  74. 'You dosnyal in the film.'
  75. act 'Approach to Peter': gt 'pornstudio', 'start'
  76. act 'Go home': gt 'down'
  77. end
  78. if час >= 22 and pfilmB < 10:
  79. cla
  80. 'Time is too late for filming'
  81. act 'Go home': gt 'down'
  82. end
  83. if hour < 22 and pfilmB < 10 and pfilm > 0:
  84. cla
  85. Set minut += 60
  86. gs 'stat'
  87. Set money += 3000
  88. if pfilmB = 0: guy += 1
  89. Set pfilmB += 1
  90. 'You undress and start shooting.'
  91. Set prand = RAND(1,3)
  92. if prand = 1:
  93. bj += 1
  94. Set porand = RAND(1,10)
  95. if porand = 1: '<center><img src="images\picBJ\bj.jpg"></center>'
  96. if porand = 2: '<center><img src="images\picBJ\bj2.jpg"></center>'
  97. if porand = 3: '<center><img src="images\picBJ\bj3.jpg"></center>'
  98. if porand = 4: '<center><img src="images\picBJ\bj4.jpg"></center>'
  99. if porand = 5: '<center><img src="images\picBJ\bj5.jpg"></center>'
  100. if porand = 6: '<center><img src="images\picBJ\bj6.jpg"></center>'
  101. if porand = 7: '<center><img src="images\picBJ\bj7.jpg"></center>'
  102. if porand = 8: '<center><img src="images\picBJ\bj8.jpg"></center>'
  103. if porand = 9: '<center><img src="images\picBJ\bj9.jpg"></center>'
  104. if porand = 10: '<center><img src="images\picBJ\bj10.jpg"></center>'
  105. 'You suck dick for an hour at the actor portraying the passion and lust. Really hard to concentrate when there are fixtures, Assistant, you continually shoved the camera to face.'
  106. end
  107. if prand = 2:
  108. anus += 1
  109. Set anal += 1
  110. Set porand = RAND(1,10)
  111. if porand = 1: '<center><img src="images\pics\anal.jpg"></center>'
  112. if porand = 2: '<center><img src="images\pics\anal2.jpg"></center>'
  113. if porand = 3: '<center><img src="images\pics\anal3.jpg"></center>'
  114. if porand = 4: '<center><img src="images\pics\anal4.jpg"></center>'
  115. if porand = 5: '<center><img src="images\pics\anal5.jpg"></center>'
  116. if porand = 6: '<center><img src="images\pics\anal6.jpg"></center>'
  117. if porand = 7: '<center><img src="images\pics\anal7.jpg"></center>'
  118. if porand = 8: '<center><img src="images\pics\anal8.jpg"></center>'
  119. if porand = 9: '<center><img src="images\pics\anal9.jpg"></center>'
  120. if porand = 10: '<center><img src="images\pics\anal10.jpg"></center>'
  121. 'An hour you fucked in the ass for the camera, you do not pleasant, but you portray passion and pleasure. Finally, the actor does not stand up and fills your ass with his sperm. You every minute shoved the camera in person, running an assistant and illuminators.'
  122. end
  123. if prand = 3:
  124. Set sex += 1
  125. vagina+= 1
  126. facial += 1
  127. set porand = RAND(0,1)
  128. if porand = 0:
  129. picrand = RAND(1,6)
  130. '<center><img src="images\pics\vagcow<<picrand>>.jpg"></center>'
  131. else
  132. picrand = RAND(1,5)
  133. '<center><img src="images\pics\vagdog<<picrand>>.jpg"></center>'
  134. end
  135. 'You have an hour before the camera, you portray passion and lust. He ends up on your face, you lick the sperm. You every minute shoved the camera in person, running an assistant and illuminators.'
  136. end
  137. act 'Go home': gt 'down'
  138. if hour < 22: act 'Acting on': gt 'film','film2'
  139. end
  140. end
  141. --- film ---------------------------------