porn_view_construct 2.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154
  1. # porn_view_construct
  2. ! vaginal only
  3. if $args[0] = 'vaginal':
  4. i = 0
  5. :loop_bang
  6. func('porn_view_strings', 'view_31_sex_next'+i)
  7. if tabletki = 0 and prezik = 0:
  8. func('porn_view_strings', 'view_31'+iif(rand(0,10)>(6+i),'_cum'+i,'_no_condom'))
  9. else
  10. if tabletki > 0:
  11. func('porn_view_strings', 'view_31_pills')
  12. elseif prezik > 0:
  13. func('porn_view_strings', 'view_31_condom')
  14. prezik -= 1
  15. end
  16. end
  17. i += 1
  18. if i < 3: jump 'loop_bang'
  19. end
  20. ! random w/o dp
  21. if $args[0] = 'random':
  22. $_var_arr[0] = 'mouth'
  23. $_var_arr[1] = 'pussy'
  24. $_var_arr[2] = 'ass'
  25. _vaginal = 0
  26. ! i = 0 - doggy
  27. ! i > 0 - missionary
  28. i = 0
  29. :loop_random_bang
  30. _var = rand(0,2)
  31. if _var = 1: _vaginal += 1
  32. ! vaginal required
  33. if i = 2 and _vaginal = 0: _var = 1
  34. $sex_variant = $_var_arr[_var]
  35. func('porn_view_strings', 'view_pose_'+iif(i = 2 and _var = 1,3,i))
  36. ! mouth
  37. if _var = 0:
  38. func('porn_view_strings', 'view_cum_on4')
  39. stat['bj'] += 1
  40. swallow += 1
  41. end
  42. ! vag
  43. if _var = 1:
  44. gs 'porn_view_construct', 'cum_warning'
  45. if i = 2:
  46. func('porn_view_strings', 'view_pose_4')
  47. end
  48. if tabletki = 0 and prezik = 0:
  49. j = rand(0,10)
  50. func('porn_view_strings', 'view_cum_on'+iif(j>(6+i),1,iif(i=0,2,5)))
  51. if j>(6+i):
  52. func('porn_view_strings', iif(rand(0,1)=0,'view_cum_in'+rand(0,5),'view_cum_in_mind'+rand(0,2)))
  53. end
  54. else
  55. if tabletki > 0:
  56. func('porn_view_strings', 'view_pills')
  57. elseif prezik > 0:
  58. func('porn_view_strings', 'view_condom')
  59. prezik -= 1
  60. end
  61. end
  62. stat['vaginal'] += 1
  63. end
  64. ! ass
  65. if _var = 2:
  66. func('porn_view_strings', 'view_cum_on'+iif(i=0,rand(2,3),3))
  67. stat['anal'] += 1
  68. end
  69. i += 1
  70. if i < 3: jump 'loop_random_bang'
  71. func('porn_view_strings', 'view_end')
  72. killvar '_var'
  73. killvar '_vaginal'
  74. killvar '$_var_arr'
  75. end
  76. if $args[0] = 'dp':
  77. func('porn_view_strings', 'view_36_dp0')+func('porn_view_strings', 'view_36_dp1')
  78. if tabletki = 0 and prezik = 0:
  79. func('porn_view_strings', 'view_cum_in_mind'+rand(0,2))
  80. end
  81. func('porn_view_strings', 'view_36_fin')
  82. stat['anal'] += 2
  83. stat['vaginal'] += 1
  84. stat['bj'] += 3
  85. if anus <= 10: anus += 1
  86. end
  87. if $args[0] = 'cum_warning':
  88. if tabletki = 0 and prezik = 0:
  89. func('porn_view_strings', 'view_no_condom')
  90. elseif tabletki > 0:
  91. func('porn_view_strings', 'view_pills')
  92. end
  93. end
  94. if $args[0] = 'wdays':
  95. func('porn_view_strings', 'view_32_wdays')
  96. gs 'porn_view_construct', 'no_pussy'
  97. end
  98. if $args[0] = 'no_pussy':
  99. i = rand(0,3)
  100. func('porn_view_strings', 'view_31_rand'+i)
  101. if i = 0:
  102. kuni += 1
  103. stat['hj'] += 1
  104. stat['bj'] += 3
  105. swallow += 3
  106. elseif i = 1:
  107. stat['anal'] += 3
  108. stat['bj'] += 2
  109. if anus <= 10: anus += 1
  110. elseif i = 2:
  111. stat['bj'] += 3
  112. swallow += 3
  113. else
  114. kuni += 1
  115. stat['hj'] += 1
  116. stat['bj'] += 2
  117. swallow += 2
  118. stat['anal'] += 1
  119. if anus <= 5: anus += 1
  120. end
  121. end
  122. --- porn_view_construct ---------------------------------