416_boy 8.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251
  1. # boy
  2. <<<<<<< 416_boy
  3. !'<<$boy>> <<$boybody>> <<$boybod>> <<$boyface>>. <<$boy>> <<$boyClo>>'
  4. !Рандомные мужские имена
  5. Set boynamerand = RAND(1,38)
  6. !Русские имена
  7. if boynamerand = 1: Set $boy = 'Alexander'
  8. if boynamerand = 2: Set $boy = 'Alexey'
  9. if boynamerand = 3: Set $boy = 'Albert'
  10. if boynamerand = 4: Set $boy = 'Anatoly'
  11. if boynamerand = 5: Set $boy = 'Anton'
  12. if boynamerand = 6: Set $boy = 'Arkady'
  13. if boynamerand = 7: Set $boy = 'Andrew'
  14. if boynamerand = 8: Set $boy = 'Boris'
  15. if boynamerand = 9: Set $boy = 'Vadim'
  16. if boynamerand = 10: Set $boy = 'Valentine'
  17. if boynamerand = 11: Set $boy = 'Valery'
  18. if boynamerand = 12: Set $boy = 'Basil'
  19. if boynamerand = 13: Set $boy = 'Victor'
  20. if boynamerand = 14: Set $boy = 'Vitaly'
  21. if boynamerand = 15: Set $boy = 'Vladimir'
  22. if boynamerand = 16: Set $boy = 'Vyacheslav'
  23. if boynamerand = 17: Set $boy = 'Gennady'
  24. if boynamerand = 18: Set $boy = 'George'
  25. if boynamerand = 19: Set $boy = 'Gregory'
  26. if boynamerand = 20: Set $boy = 'Denis'
  27. if boynamerand = 21: Set $boy = 'Eugene'
  28. if boynamerand = 22: Set $boy = 'Yegor'
  29. if boynamerand = 23: Set $boy = 'Ivan'
  30. if boynamerand = 24: Set $boy = 'Igor'
  31. if boynamerand = 25: Set $boy = 'Kirill'
  32. if boynamerand = 26: Set $boy = 'Leonid'
  33. if boynamerand = 27: Set $boy = 'Maxim'
  34. if boynamerand = 28: Set $boy = 'Michael'
  35. if boynamerand = 29: Set $boy = 'Oleg'
  36. if boynamerand = 30: Set $boy = 'Paul'
  37. if boynamerand = 31: Set $boy = 'Peter'
  38. if boynamerand = 32: Set $boy = 'Semen'
  39. if boynamerand = 33: Set $boy = 'Sergey'
  40. if boynamerand = 34: Set $boy = 'Stepan'
  41. if boynamerand = 35: Set $boy = 'Fedor'
  42. if boynamerand = 36: Set $boy = 'Edward'
  43. if boynamerand = 37: Set $boy = 'Yuri'
  44. if boynamerand = 38: Set $boy = 'Jacob'
  45. $namev = $boy
  46. !Внешность
  47. Set boybodyrand = RAND(1,3)
  48. if boybodyrand = 1: Set $boybody = 'tall'
  49. if boybodyrand = 2: Set $boybody = 'average'
  50. if boybodyrand = 3: Set $boybody = 'short'
  51. Set boybodrand = RAND(1,4)
  52. if boybodrand = 1: Set $boybod = 'thin'
  53. if boybodrand = 2: Set $boybod = 'athletic'
  54. if boybodrand = 3: Set $boybod = 'chunky'
  55. if boybodrand = 4: Set $boybod = 'fat'
  56. Set boyfacerand = RAND(1,3)
  57. if boyfacerand = 1: Set $boyface = 'black'
  58. if boyfacerand = 2: Set $boyface = 'brunet'
  59. if boyfacerand = 3: Set $boyface = 'blond'
  60. !размер елды
  61. set grdikrand = RAND(0,100)
  62. if grdikrand < 80:
  63. set dick = RAND(12,18)
  64. =======
  65. !'<<$boy>> <<$boybody>> <<$boybod>> <<$boyface>>.<<$boy>> <<$boyClo>>'
  66. !Randomly male names
  67. Set boynamerand = RAND (1,38)
  68. !Russian names
  69. if boynamerand = 1:Set $boy = 'Alexander'
  70. if boynamerand = 2:Set $boy = 'Alexey'
  71. if boynamerand = 3:Set $boy = 'Albert'
  72. if boynamerand = 4:Set $boy = 'Anatoly'
  73. if boynamerand = 5:Set $boy = 'Anton'
  74. if boynamerand = 6:Set $boy = 'Arkady'
  75. if boynamerand = 7:Set $boy = 'Andrew'
  76. if boynamerand = 8:Set $boy = 'Boris'
  77. if boynamerand = 9:Set $boy = 'Vadim'
  78. if boynamerand = 10:Set $boy = 'Valentine'
  79. if boynamerand = 11:Set $boy = 'Valery'
  80. if boynamerand = 12:Set $boy = 'Basil'
  81. if boynamerand = 13:Set $boy = 'Victor'
  82. if boynamerand = 14:Set $boy = 'Vitali'
  83. if boynamerand = 15:Set $boy = 'Vladimir'
  84. if boynamerand = 16:Set $boy = 'Vyacheslav'
  85. if boynamerand = 17:Set $boy = 'Gennady'
  86. if boynamerand = 18:Set $boy = 'George'
  87. if boynamerand = 19:Set $boy = 'Gregory'
  88. if boynamerand = 20:Set $boy = 'Denis'
  89. if boynamerand = 21:Set $boy = 'Eugene'
  90. if boynamerand = 22:Set $boy = 'Egor'
  91. if boynamerand = 23:Set $boy = 'Ivan'
  92. if boynamerand = 24:Set $boy = 'Igor'
  93. if boynamerand = 25:Set $boy = 'Cyril'
  94. if boynamerand = 26:Set $boy = 'Leonid'
  95. if boynamerand = 27:Set $boy = 'Maxim'
  96. if boynamerand = 28:Set $boy = 'Michael'
  97. if boynamerand = 29:Set $boy = 'Oleg'
  98. if boynamerand = 30:Set $boy = 'Paul'
  99. if boynamerand = 31:Set $boy = 'Peter'
  100. if boynamerand = 32:Set $boy = 'Semen'
  101. if boynamerand = 33:Set $boy = 'Sergey'
  102. if boynamerand = 34:Set $boy = 'Stepan'
  103. if boynamerand = 35:Set $boy = 'Fedor'
  104. if boynamerand = 36:Set $boy = 'Edward'
  105. if boynamerand = 37:Set $boy = 'Yuri'
  106. if boynamerand = 38:Set $boy = 'Jacob'
  107. $namev=$boy
  108. !appearance
  109. Set boybodyrand = RAND (1,3)
  110. if boybodyrand = 1:Set $boybody = 'high'
  111. if boybodyrand = 2:Set $boybody = 'average height'
  112. if boybodyrand = 3:Set $boybody = 'small'
  113. Set boybodrand = RAND (1,4)
  114. if boybodrand = 1:Set $boybod = 'thin'
  115. if boybodrand = 2:Set $boybod = 'Athletic'
  116. if boybodrand = 3:Set $boybod = 'chunky'
  117. if boybodrand = 4:Set $boybod = 'full'
  118. Set boyfacerand = RAND (1,3)
  119. if boyfacerand = 1:Set $boyface = 'brunet'
  120. if boyfacerand = 2:Set $boyface = 'brown-haired_person'
  121. if boyfacerand = 3:Set $boyface = 'blond'
  122. !size eldy
  123. set grdikrand = RAND (0,100)
  124. if grdikrand < 80:
  125. set dick = RAND (12,18)
  126. >>>>>>> 416_boy
  127. end
  128. if grdikrand >= 80 and grdikrand < 90:
  129. <<<<<<< 416_boy
  130. set dick = RAND(8,12)
  131. =======
  132. set dick = RAND (8,12)
  133. >>>>>>> 416_boy
  134. end
  135. if grdikrand >= 90:
  136. <<<<<<< 416_boy
  137. set dick = RAND(18,25)
  138. end
  139. ! половая сила
  140. set silaVag = RAND(0,2)
  141. !переменная отвечающая за guy
  142. =======
  143. set dick = RAND (18,25)
  144. end
  145. ! sexual force
  146. set silaVag = RAND (0,2)
  147. !variable is responsible for guy
  148. >>>>>>> 416_boy
  149. set boyonce = 0
  150. <<<<<<< 416_boy
  151. set harakBoy = RAND(0,2)
  152. !Переменные отвечающие за то какие черты нравятся
  153. !Обеспеченность, отвечает за деньги и требования
  154. set finance = RAND(0,2)
  155. if finance = 0:
  156. !нищий гопник или работяга
  157. !проверка по внешности Первичная
  158. if harakBoy = 0: set vneshBoy = RAND(0,2)
  159. if harakBoy = 1: set vneshBoy = RAND(0,4)
  160. if harakBoy = 2: set vneshBoy = RAND(0,8)
  161. set $boyClo = 'wearing a tracksuit.'
  162. end
  163. if finance = 1:
  164. !середняк
  165. !проверка по внешности
  166. if harakBoy = 0: set vneshBoy = RAND(0,4)
  167. if harakBoy = 1: set vneshBoy = RAND(0,6)
  168. if harakBoy = 2: set vneshBoy = RAND(0,8)
  169. set $boyClo = 'wearing jeans and a sweater.'
  170. end
  171. if finance = 2:
  172. !середняк
  173. !проверка по внешности
  174. if harakBoy = 0: set vneshBoy = RAND(4,8)
  175. if harakBoy = 1: set vneshBoy = RAND(6,8)
  176. if harakBoy = 2: set vneshBoy = RAND(8,10)
  177. set $boyClo = 'wearing an expensive suit.'
  178. end
  179. !требования по фигуре, размеру груди, цвет волос.
  180. !0 - зад меньше 80, 1 зад от 80 до 100, 2 зад свыше 100
  181. set figurBoy = RAND(0,2)
  182. !0 - грудь меньше 3, 1 грудь 3-4, 2 грудь больше 4
  183. set titBoy = RAND(0,2)
  184. !0 - брюнетка, 1 - шатенка, 2 - рыжая, 3 - блондинка
  185. set haerBoy = RAND(0,3)
  186. !характер 0 - мягкий, 1 -норма 2 - агрессор
  187. set randizvrat = RAND(0,100)
  188. if randizvrat < 80: set izvrat = 0
  189. if randizvrat >= 80: set izvrat = 1
  190. =======
  191. set harakBoy = RAND (0,2)
  192. !Variables responsible for any features like
  193. !security, is responsible for the money and requirements
  194. set finance = RAND (0,2)
  195. if finance = 0:
  196. !Gopnik beggar or a hard worker
  197. !check in appearance Primary
  198. if harakBoy = 0:set vneshBoy = RAND (0,2)
  199. if harakBoy = 1:set vneshBoy = RAND (0,4)
  200. if harakBoy = 2:set vneshBoy = RAND (0,8)
  201. set $boyClo = 'dressed in baggy tracksuit.'
  202. end
  203. if finance = 1:
  204. !middle_peasant
  205. !check in appearance
  206. if harakBoy = 0:set vneshBoy = RAND (0,4)
  207. if harakBoy = 1:set vneshBoy = RAND (0,6)
  208. if harakBoy = 2:set vneshBoy = RAND (0,8)
  209. set $boyClo = 'dressed in jeans and a sweater.'
  210. end
  211. if finance = 2:
  212. !middle_peasant
  213. !check in appearance
  214. if harakBoy = 0:set vneshBoy = RAND (4,8)
  215. if harakBoy = 1:set vneshBoy = RAND (6,8)
  216. if harakBoy = 2:set vneshBoy = RAND (8,10)
  217. set $boyClo = 'dressed in an expensive suit.'
  218. end
  219. !requirements of the figure, chest size, hair color.
  220. !0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
  221. set figurBoy = RAND (0,2)
  222. !0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
  223. set titBoy = RAND (0,2)
  224. !0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
  225. set haerBoy = RAND (0,3)
  226. !character 0 - soft, 1 -norm 2 - aggressor
  227. set randizvrat = RAND (0,100)
  228. if randizvrat < 80:set izvrat = 0
  229. if randizvrat >= 80:set izvrat = 1
  230. >>>>>>> 416_boy
  231. --- boy ---------------------------------