boy 3.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128
  1. # boy
  2. !!'<<$boy>> <<$boybody>> <<$boybod>> <<$boyface>>. <<$boy>> <<$boyClo>>'
  3. !!Randomly male names
  4. Set boynamerand = rand(1, 38)
  5. !!Russian names
  6. if boynamerand = 1: Set $boy = 'Alexander'
  7. if boynamerand = 2: Set $boy = 'Alexey'
  8. if boynamerand = 3: Set $boy = 'Albert'
  9. if boynamerand = 4: Set $boy = 'Anatoly'
  10. if boynamerand = 5: Set $boy = 'Anton'
  11. if boynamerand = 6: Set $boy = 'Arkady'
  12. if boynamerand = 7: Set $boy = 'Andrew'
  13. if boynamerand = 8: Set $boy = 'Boris'
  14. if boynamerand = 9: Set $boy = 'Vadim'
  15. if boynamerand = 10:Set $boy = 'Valentine'
  16. if boynamerand = 11:Set $boy = 'Valery'
  17. if boynamerand = 12:Set $boy = 'Basil'
  18. if boynamerand = 13:Set $boy = 'Victor'
  19. if boynamerand = 14:Set $boy = 'Vitaly'
  20. if boynamerand = 15:Set $boy = 'Vladimir'
  21. if boynamerand = 16:Set $boy = 'Vyacheslav'
  22. if boynamerand = 17:Set $boy = 'Gennady'
  23. if boynamerand = 18:Set $boy = 'George'
  24. if boynamerand = 19:Set $boy = 'Gregory'
  25. if boynamerand = 20:Set $boy = 'Denis'
  26. if boynamerand = 21:Set $boy = 'Eugene'
  27. if boynamerand = 22:Set $boy = 'Yegor'
  28. if boynamerand = 23:Set $boy = 'Ivan'
  29. if boynamerand = 24:Set $boy = 'Igor'
  30. if boynamerand = 25:Set $boy = 'Kirill'
  31. if boynamerand = 26:Set $boy = 'Leonid'
  32. if boynamerand = 27:Set $boy = 'Maxim'
  33. if boynamerand = 28:Set $boy = 'Michael'
  34. if boynamerand = 29:Set $boy = 'Oleg'
  35. if boynamerand = 30:Set $boy = 'Paul'
  36. if boynamerand = 31:Set $boy = 'Peter'
  37. if boynamerand = 32:Set $boy = 'Semen'
  38. if boynamerand = 33:Set $boy = 'Sergey'
  39. if boynamerand = 34:Set $boy = 'Stepan'
  40. if boynamerand = 35:Set $boy = 'Fedor'
  41. if boynamerand = 36:Set $boy = 'Edward'
  42. if boynamerand = 37:Set $boy = 'Yuri'
  43. if boynamerand = 38:Set $boy = 'Jacob'
  44. $namev = $boy
  45. !!appearance
  46. set boybodyrand = rand(1, 3)
  47. if boybodyrand = 1: Set $boybody = 'tall'
  48. if boybodyrand = 2: Set $boybody = 'average'
  49. if boybodyrand = 3: Set $boybody = 'short'
  50. set boybodrand = rand(1, 4)
  51. if boybodrand = 1: Set $boybod = 'thin'
  52. if boybodrand = 2: Set $boybod = 'athletic'
  53. if boybodrand = 3: Set $boybod = 'chunky'
  54. if boybodrand = 4: Set $boybod = 'fat'
  55. set boyfacerand = rand(1, 3)
  56. if boyfacerand = 1: Set $boyface = 'black'
  57. if boyfacerand = 2: Set $boyface = 'brunet'
  58. if boyfacerand = 3: Set $boyface = 'blond'
  59. !!size eldy
  60. set grdikrand = rand(0, 100)
  61. if grdikrand < 80:set dick = rand(12, 18)
  62. if grdikrand >= 80 and grdikrand < 90:set dick = rand(8, 12)
  63. if grdikrand >= 90:set dick = rand(18, 25)
  64. !! sexual force
  65. set silaVag = rand(0, 2)
  66. !!variable is responsible for guy
  67. set boyonce = 0
  68. set harakBoy = rand(0, 2)
  69. !!Variables responsible for any features like
  70. !!security, is responsible for the money and requirements
  71. set finance = rand(0, 2)
  72. if finance = 0:
  73. !!Gopnik beggar or a hard worker
  74. !!check in appearance Primary
  75. if harakBoy = 0:set vneshBoy = rand(0, 2)
  76. if harakBoy = 1:set vneshBoy = rand(0, 4)
  77. if harakBoy = 2:set vneshBoy = rand(0, 8)
  78. set $boyClo = 'wearing a tracksuit.'
  79. end
  80. if finance = 1:
  81. !!middle_peasant
  82. !!check in appearance
  83. if harakBoy = 0:set vneshBoy = rand(0, 4)
  84. if harakBoy = 1:set vneshBoy = rand(0, 6)
  85. if harakBoy = 2:set vneshBoy = rand(0, 8)
  86. set $boyClo = 'wearing jeans and a sweater.'
  87. end
  88. if finance = 2:
  89. !!middle_peasant
  90. !!check in appearance
  91. if harakBoy = 0:set vneshBoy = rand(4, 8)
  92. if harakBoy = 1:set vneshBoy = rand(6, 8)
  93. if harakBoy = 2:set vneshBoy = rand(8, 10)
  94. set $boyClo = 'wearing an expensive suit.'
  95. end
  96. !!requirements of the figure, chest size, hair color.
  97. !!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
  98. set figurBoy = rand(0, 2)
  99. !!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
  100. set titBoy = rand(0, 2)
  101. !!0 - brunette, 1 - haired, 2 - Redhead, 3 - blonde
  102. set haerBoy = rand(0, 3)
  103. !!character 0 - soft, 1 -norm 2 - aggressor
  104. set randizvrat = rand(0, 100)
  105. if randizvrat < 80:set izvrat = 0
  106. if randizvrat >= 80:set izvrat = 1
  107. --- boy ---------------------------------