1
0

boy.qsrc 8.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285
  1. # boy
  2. !!'<<$boydesc>> <<$boybody>> <<$boybod>> <<$boyface>>. <<$boydesc>> <<$boyClo>>'
  3. if $ARGS[0] = '':
  4. !randomly age
  5. boyage = rand(18,35)
  6. !! {The NPC generator is now the primary system of creating new characters.}
  7. gs 'npcgeneratec', 0, 'A Male', boyage
  8. gs 'boyStat', $npclastgenerated
  9. gs 'boy', 'details'
  10. end
  11. if $ARGS[0] = 'details':
  12. !Select Photos
  13. :boydetailsloop
  14. lover_picrand = RAND(1,30)
  15. if lover_picrand = lover_picture[0] or lover_picrand = lover_picture[1] or lover_picrand = lover_picture[2]: jump 'boydetailsloop'
  16. loverGenderTmp = 0
  17. silaVag = npc_sexskill[$npclastgenerated]
  18. $npc_usedname[$npclastgenerated] = $npc_firstname[$npclastgenerated]
  19. $boydesc = $npc_usedname[$npclastgenerated]
  20. !!appearance
  21. boybodyrand = rand(1, 3)
  22. if boybodyrand = 1: $boybody = 'tall'
  23. if boybodyrand = 2: $boybody = 'average'
  24. if boybodyrand = 3: $boybody = 'short'
  25. boybodrand = rand(1, 4)
  26. if boybodrand = 1: $boybod = 'thin'
  27. if boybodrand = 2: $boybod = 'athletic'
  28. if boybodrand = 3: $boybod = 'chunky'
  29. if boybodrand = 4: $boybod = 'fat'
  30. boyfacerand = rand(1, 3)
  31. if boyfacerand = 1: $boyface = 'black'
  32. if boyfacerand = 2: $boyface = 'brunet'
  33. if boyfacerand = 3: $boyface = 'blond'
  34. !!Variables responsible for any features like
  35. !!security, is responsible for the money and requirements
  36. harakBoy = rand(0, 2)
  37. finance = rand(0, 2)
  38. if finance = 0:
  39. !!Gopnik beggar or a hard worker
  40. !!check in appearance Primary
  41. if harakBoy = 0: npc_apprnc[$npclastgenerated] = rand(0, 8)
  42. if harakBoy = 1: npc_apprnc[$npclastgenerated] = rand(0, 16)
  43. if harakBoy = 2: npc_apprnc[$npclastgenerated] = rand(0, 32)
  44. $boyClo = 'wearing a tracksuit.'
  45. elseif finance = 1:
  46. !!middle_peasant
  47. !!check in appearance
  48. if harakBoy = 0: npc_apprnc[$npclastgenerated] = rand(0, 16)
  49. if harakBoy = 1: npc_apprnc[$npclastgenerated] = rand(0, 24)
  50. if harakBoy = 2: npc_apprnc[$npclastgenerated] = rand(0, 32)
  51. $boyClo = 'wearing jeans and a sweater.'
  52. elseif finance = 2:
  53. !!middle_peasant
  54. !!check in appearance
  55. if harakBoy = 0: npc_apprnc[$npclastgenerated] = rand(16, 32)
  56. if harakBoy = 1: npc_apprnc[$npclastgenerated] = rand(24, 32)
  57. if harakBoy = 2: npc_apprnc[$npclastgenerated] = rand(32, 40)
  58. $boyClo = 'wearing an expensive suit.'
  59. end
  60. !!requirements of the figure, chest size, hair color.
  61. !!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
  62. figurBoy = rand(0, 2)
  63. !!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
  64. npc_bust[$npclastgenerated] = rand(0, 2)
  65. !!0 - black, 1 - brown, 2 - Redhead, 3 - blonde
  66. npc_haircol[$npclastgenerated] = rand(0, 3)
  67. !!character 0 - soft, 1 -norm 2 - aggressor
  68. if rand(0, 100) < 80:
  69. izvrat = 0
  70. else
  71. izvrat = 1
  72. end
  73. hairBoy = npc_haircol[$npclastgenerated]
  74. titBoy = npc_bust[$npclastgenerated]
  75. vneshBoy = npc_apprnc[$npclastgenerated]
  76. !! trying to make the preference section
  77. !! Variables here are clotTypePrefTmp, clotQualPrefTmp, clotTopPrefTmp, bottShorPrefTmp, clotThinPrefTmp, bimbPrefTmp, pierPrefTmp, tattPrefTmp, lipsPrefTmp, bodyPrefTmp, makePrefTmp, IQPrefTmp.
  78. !!This is for clothing type preference
  79. !! If you notice how rare it is to get a preference that is intentional
  80. !!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
  81. clotTypePrefTmp = 0
  82. if rand(0, 4) = 4:
  83. if finance = 0:
  84. clotTypePrefTmp = rand(1,2)
  85. if rand(0, 1) = 1 and izvrat = 1:clotTypePrefTmp = 4
  86. elseif finance = 1:
  87. clotTypePrefTmp = rand(1,3)
  88. if rand(0, 2) = 2 and izvrat = 1:clotTypePrefTmp = 4
  89. elseif finance = 2:
  90. clotTypePrefTmp = rand(2,3)
  91. if rand(0, 1) = 1 and izvrat = 1:clotTypePrefTmp = 4
  92. end
  93. end
  94. !!This is for the quality of clothing
  95. !! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
  96. clotQualPrefTmp = 0
  97. if rand(0, 5) = 5:
  98. if finance = 0:
  99. clotQualPrefTmp = 1
  100. elseif finance = 1:
  101. clotQualPrefTmp = rand(1, 2)
  102. randchan = rand(0, 1)
  103. if randchan = 0 and clotTypePrefTmp ! 3:
  104. clotQualPrefTmp = 1
  105. elseif randchan = 1 and clotTypePrefTmp ! 1:
  106. clotQualPrefTmp = 2
  107. end
  108. elseif finance = 2:
  109. randchan = rand(0, 2)
  110. if randchan = 2 and clotTypePrefTmp ! 1:
  111. clotQualPrefTmp = 2
  112. end
  113. end
  114. end
  115. !!This is for the clothing top cut for the clothing
  116. !!Need to add modifiers based on breast size, where larger breasts end up forcing the player to show more cleavage than those with smaller breasts.
  117. !! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring
  118. !! The breast size must be adjusted either when the action is being calculeted or we can base it on their ideal breast size :titBoy + 0/3 depending on the players breast size
  119. !!0 - no preference, 1 - 1 neckline , 2 - 2 or moderate, 3 - 3 to 4 or heavy to severe
  120. !! It doesn''t matter if your poor or rich, everyone loves tits.
  121. slutConstant = 0
  122. if rand(0, 1) = 1 and izvrat = 1:slutConstant = 1
  123. clotTopPrefTmp = 0
  124. if rand(0, 2) = 2:
  125. randchan = rand(0, 2)
  126. if randchan = 0 and clotTypePrefTmp ! 4:
  127. clotTopPrefTmp = 1 + slutConstant
  128. elseif randchan = 1 and clotTypePrefTmp ! 4:
  129. clotTopPrefTmp = 2 + slutConstant
  130. elseif randchan = 2 and clotTypePrefTmp ! 3:
  131. clotTopPrefTmp = 3
  132. end
  133. if clotTopPrefTmp ! 0 and titBoy = 2:
  134. if clotPref ! 3:
  135. clotTopPrefTmp += 1
  136. end
  137. end
  138. end
  139. !! This is for pants and skirt shortness and will be grouped together as such.
  140. !! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 4 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
  141. bottShorPrefTmp = 0
  142. if rand(0, 2) = 2:
  143. randchan = rand(0, 2)
  144. if randchan = 0 and clotTypePrefTmp ! 4:
  145. bottShorPrefTmp = 1
  146. elseif randchan = 1:
  147. bottShorPrefTmp = 2
  148. elseif randchan = 2:
  149. bottShorPrefTmp = 3
  150. end
  151. randchan = rand(0, 1)
  152. if slutConstant = 1 and randchan = 1 and clotTypePrefTmp = 4:
  153. bottShorPrefTmp = 3
  154. end
  155. end
  156. !! This is for clothes thinness.
  157. !! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
  158. !! I see the moderate to really thin overlapping. Its intentional.
  159. clotThinPrefTmp = 0
  160. if rand(0, 2) = 2:
  161. randchan = rand(0, 2)
  162. if randchan = 0:
  163. clotThinPrefTmp = 1 + slutConstant
  164. elseif randchan = 1:
  165. clotThinPrefTmp = 2 + slutConstant
  166. elseif randchan = 2 and clotTypePrefTmp ! 3:
  167. clotThinPrefTmp = 3
  168. end
  169. end
  170. !!This is to find out if they want you to wear bimbo clothing
  171. !! 0 - no preference, 1 - Prefers bimbo clothing.
  172. bimbPrefTmp = 0
  173. if rand(0, 2) = 2 and clotTypePrefTmp ! 3:bimbPrefTmp = 1
  174. !!This is to find out if they want you to wear piercings.
  175. !! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.
  176. pierPrefTmp = 0
  177. if rand(0, 3) = 3:
  178. randchan = rand(0, 2)
  179. if randchan = 0:
  180. pierPrefTmp = 1 + slutConstant
  181. elseif randchan = 1:
  182. pierPrefTmp = 2 + slutConstant
  183. elseif randchan = 2:
  184. pierPrefTmp = 3
  185. end
  186. end
  187. !!This is to find out if they want you to have tattoos.
  188. !! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
  189. tattPrefTmp = 0
  190. if rand(0, 3) = 3:tattPrefTmp = rand(1, 3)
  191. !!This is to find out how big they want your lips.
  192. !! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
  193. lipsPrefTmp = 0
  194. if rand(0, 2) = 2:
  195. randchan = rand(0, 2)
  196. if randchan = 0:
  197. lipsPrefTmp = 1 + slutConstant
  198. elseif randchan = 2:
  199. lipsPrefTmp = 2
  200. end
  201. end
  202. !!This is to find out how big they want YOU.
  203. !! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
  204. !! Notice how this one overlaps. I believe that it should because changing ones weight is very hard.
  205. bodyPrefTmp = 0
  206. if rand(0, 3) = 3:bodyPrefTmp = rand(1, 3)
  207. !!This is to find out how much makeup they want you to wear.
  208. !! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
  209. !! Plan to make a way for you to set what you makeup you want to wear at your bedside and giving into his wishes would automatically change the automated setting.
  210. makePrefTmp = 0
  211. if rand(0, 1) = 1:
  212. randchan = rand(0, 2)
  213. if randchan = 0:
  214. makePrefTmp = 1 + slutConstant
  215. elseif randchan = 1:
  216. makePrefTmp = 2 + slutConstant
  217. elseif randchan = 2 and clotTypePrefTmp ! 3:
  218. makePrefTmp = 3
  219. end
  220. end
  221. !! This is to see if they like a ditz, average, or a smartypants
  222. !!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence.
  223. IQPrefTmp = 0
  224. if rand(0, 4) = 4:IQPrefTmp = rand(1, 3)
  225. killvar 'randchan'
  226. end
  227. --- boy ---------------------------------