# boy
!'<<$boy>> <<$boybody>> <<$boybod>> <<$boyface>>. <<$boy>> <<$boyClo>>'

!Рандомные мужские имена
Set boynamerand = RAND(1,38)
!Русские имена
if boynamerand = 1:  Set $boy = 'Alexander'
if boynamerand = 2:  Set $boy = 'Alexey'
if boynamerand = 3:  Set $boy = 'Albert'
if boynamerand = 4:  Set $boy = 'Anatoly'
if boynamerand = 5:  Set $boy = 'Anton'
if boynamerand = 6:  Set $boy = 'Arkady'
if boynamerand = 7:  Set $boy = 'Andrew'
if boynamerand = 8:  Set $boy = 'Boris'
if boynamerand = 9:  Set $boy = 'Vadim'
if boynamerand = 10: Set $boy = 'Valentine'
if boynamerand = 11: Set $boy = 'Valery'
if boynamerand = 12: Set $boy = 'Basil'
if boynamerand = 13: Set $boy = 'Victor'
if boynamerand = 14: Set $boy = 'Vitaly'
if boynamerand = 15: Set $boy = 'Vladimir'
if boynamerand = 16: Set $boy = 'Vyacheslav'
if boynamerand = 17: Set $boy = 'Gennady'
if boynamerand = 18: Set $boy = 'George'
if boynamerand = 19: Set $boy = 'Gregory'
if boynamerand = 20: Set $boy = 'Denis'
if boynamerand = 21: Set $boy = 'Eugene'
if boynamerand = 22: Set $boy = 'Yegor'
if boynamerand = 23: Set $boy = 'Ivan'
if boynamerand = 24: Set $boy = 'Igor'
if boynamerand = 25: Set $boy = 'Kirill'
if boynamerand = 26: Set $boy = 'Leonid'
if boynamerand = 27: Set $boy = 'Maxim'
if boynamerand = 28: Set $boy = 'Michael'
if boynamerand = 29: Set $boy = 'Oleg'
if boynamerand = 30: Set $boy = 'Paul'
if boynamerand = 31: Set $boy = 'Peter'
if boynamerand = 32: Set $boy = 'Semen'
if boynamerand = 33: Set $boy = 'Sergey'
if boynamerand = 34: Set $boy = 'Stepan'
if boynamerand = 35: Set $boy = 'Fedor'
if boynamerand = 36: Set $boy = 'Edward'
if boynamerand = 37: Set $boy = 'Yuri'
if boynamerand = 38: Set $boy = 'Jacob'
$namev = $boy

!Внешность
Set boybodyrand = RAND(1,3)
if boybodyrand = 1:  Set $boybody = 'high'
if boybodyrand = 2:  Set $boybody = 'average growth'
if boybodyrand = 3:  Set $boybody = 'small'

Set boybodrand = RAND(1,4)
if boybodrand = 1:   Set $boybod = 'thin'
if boybodrand = 2:   Set $boybod = 'athletic'
if boybodrand = 3:   Set $boybod = 'chunky'
if boybodrand = 4:   Set $boybod = 'full'

Set boyfacerand = RAND(1,3)
if boyfacerand = 1:  Set $boyface = 'brunet'
if boyfacerand = 2:  Set $boyface = 'brown-haired person'
if boyfacerand = 3:  Set $boyface = 'blond'
!размер елды
set grdikrand = RAND(0,100)
if grdikrand < 80:
set dick = RAND(12,18)
end
if grdikrand >= 80 and grdikrand < 90:
set dick = RAND(8,12)
end
if grdikrand >= 90:
set dick = RAND(18,25)
end
! половая сила
set silaVag = RAND(0,2)

!переменная отвечающая за guy
set boyonce = 0

set harakBoy = RAND(0,2)

!Переменные отвечающие за то какие черты нравятся
!Обеспеченность, отвечает за деньги и требования
set finance = RAND(0,2)
	if finance = 0:
	!нищий гопник или работяга
	!проверка по внешности Первичная
		if harakBoy = 0: set vneshBoy = RAND(0,2)
		if harakBoy = 1: set vneshBoy = RAND(0,4)
		if harakBoy = 2: set vneshBoy = RAND(0,8)
	set $boyClo = 'wearing a tracksuit.'
	end
	if finance = 1:
	!середняк
	!проверка по внешности
		if harakBoy = 0: set vneshBoy = RAND(0,4)
		if harakBoy = 1: set vneshBoy = RAND(0,6)
		if harakBoy = 2: set vneshBoy = RAND(0,8)
	set $boyClo = 'wearing jeans and a sweater.'
	end
	if finance = 2:
	!середняк
	!проверка по внешности
		if harakBoy = 0: set vneshBoy = RAND(4,8)
		if harakBoy = 1: set vneshBoy = RAND(6,8)
		if harakBoy = 2: set vneshBoy = RAND(8,10)
	set $boyClo = 'wearing an expensive suit.'
	end

!требования по фигуре, размеру груди, цвет волос.
!0 - зад меньше 80, 1 зад от 80 до 100, 2 зад свыше 100
set figurBoy = RAND(0,2)
!0 - грудь меньше 3, 1 грудь 3-4, 2 грудь больше 4
set titBoy = RAND(0,2)
!0 - брюнетка, 1 - шатенка, 2 - рыжая, 3 - блондинка
set haerBoy = RAND(0,3)
!характер  0 - мягкий, 1 -норма 2 - агрессор

set randizvrat = RAND(0,100)
if randizvrat < 80: set izvrat = 0
if randizvrat >= 80: set izvrat = 1
--- boy ---------------------------------