film 3.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126
  1. # film
  2. if $ARGS[0] = 'movie':
  3. cla
  4. clr
  5. gs 'stat'
  6. !!pfilmA
  7. if pfilmA >= 5:
  8. cla
  9. pfilmA = 0
  10. 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 hour >= 22 and pfilmA < 5:
  17. cla
  18. 'Time is too late for filming'
  19. act 'Go home':gt 'down'
  20. elseif hour < 22 and pfilmA < 5 and pfilm > 0:
  21. cla
  22. minut += 60
  23. money += 1000
  24. if pfilmA = 0:guy+= 1
  25. bj += 1
  26. pfilmA += 1
  27. gs 'stat'
  28. 'You undress and start shooting.'
  29. prand = rand(1, 2)
  30. if prand = 1:
  31. porand = rand(1, 10)
  32. '<center><img src="images/picBJ/bj<<porand>>.jpg"></center>'
  33. '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.'
  34. elseif prand = 2:
  35. facial += 1
  36. porand = rand(1, 10)
  37. '<center><img src="images/picBJ/fa<<picrand>>.jpg"></center>'
  38. '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.'
  39. end
  40. act 'Finish':gt 'down'
  41. if hour < 22:act 'Acting on':gt 'film', 'movie'
  42. end
  43. end
  44. if $ARGS[0] = 'movie2':
  45. cla
  46. clr
  47. gs 'stat'
  48. !!pfilmB
  49. if pfilmB >= 10:
  50. cla
  51. pfilmB = 0
  52. pfilm = 0
  53. film = film + 1
  54. 'You dosnyal in the film.'
  55. act 'Approach to Peter':gt 'pornstudio', 'start'
  56. act 'Go home':gt 'down'
  57. end
  58. if h >= 22 and pfilmB < 10:
  59. cla
  60. 'Time is too late for filming'
  61. act 'Go home':gt 'down'
  62. elseif hour < 22 and pfilmB < 10 and pfilm > 0:
  63. cla
  64. minut += 60
  65. money += 3000
  66. if pfilmB = 0:guy += 1
  67. pfilmB += 1
  68. gs 'stat'
  69. 'You undress and start shooting.'
  70. prand = rand(1, 3)
  71. if prand = 1:
  72. bj += 1
  73. porand = rand(1, 10)
  74. '<center><img src="images/picBJ/bj<<picrand>>.jpg"></center>'
  75. '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.'
  76. elseif prand = 2:
  77. anus += 1
  78. anal += 1
  79. porand = rand(1, 10)
  80. '<center><img src="images/pics/anal<<picrand>>.jpg"></center>'
  81. '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.'
  82. elseif prand = 3:
  83. sex += 1
  84. vagina+= 1
  85. facial += 1
  86. porand = rand(0, 1)
  87. if porand = 0:
  88. picrand = rand(1, 5)
  89. '<center><img src="images/pics/vagcow<<picrand>>.jpg"></center>'
  90. else
  91. picrand = rand(1, 5)
  92. '<center><img src="images/pics/vagdog<<picrand>>.jpg"></center>'
  93. end
  94. '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.'
  95. end
  96. act 'Go home':gt 'down'
  97. if hour < 22:act 'Acting on':gt 'film', 'movie2'
  98. end
  99. end
  100. --- film ---------------------------------