boy.qsrc 8.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283
  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. randizvrat = rand(0, 100)
  69. if randizvrat < 80:izvrat = 0
  70. if randizvrat >= 80:izvrat = 1
  71. hairBoy = npc_haircol[$npclastgenerated]
  72. titBoy = npc_bust[$npclastgenerated]
  73. vneshBoy = npc_apprnc[$npclastgenerated]
  74. !! trying to make the preference section
  75. !! Variables here are clotTypePrefTmp, clotQualPrefTmp, clotTopPrefTmp, bottShorPrefTmp, clotThinPrefTmp, bimbPrefTmp, pierPrefTmp, tattPrefTmp, lipsPrefTmp, bodyPrefTmp, makePrefTmp, IQPrefTmp.
  76. !!This is for clothing type preference
  77. !! If you notice how rare it is to get a preference that is intentional
  78. !!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
  79. clotTypePrefTmp = 0
  80. if rand(0, 4) = 4:
  81. if finance = 0:
  82. clotTypePrefTmp = rand(1,2)
  83. if rand(0, 1) = 1 and izvrat = 1:clotTypePrefTmp = 4
  84. elseif finance = 1:
  85. clotTypePrefTmp = rand(1,3)
  86. if rand(0, 2) = 2 and izvrat = 1:clotTypePrefTmp = 4
  87. elseif finance = 2:
  88. clotTypePrefTmp = rand(2,3)
  89. if rand(0, 1) = 1 and izvrat = 1:clotTypePrefTmp = 4
  90. end
  91. end
  92. !!This is for the quality of clothing
  93. !! 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)
  94. clotQualPrefTmp = 0
  95. if rand(0, 5) = 5:
  96. if finance = 0:
  97. clotQualPrefTmp = 1
  98. elseif finance = 1:
  99. clotQualPrefTmp = rand(1, 2)
  100. randchan = rand(0, 1)
  101. if randchan = 0 and clotTypePrefTmp ! 3:
  102. clotQualPrefTmp = 1
  103. elseif randchan = 1 and clotTypePrefTmp ! 1:
  104. clotQualPrefTmp = 2
  105. end
  106. elseif finance = 2:
  107. randchan = rand(0, 2)
  108. if randchan = 2 and clotTypePrefTmp ! 1:
  109. clotQualPrefTmp = 2
  110. end
  111. end
  112. end
  113. !!This is for the clothing top cut for the clothing
  114. !!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.
  115. !! 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
  116. !! 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
  117. !!0 - no preference, 1 - 1 neckline , 2 - 2 or moderate, 3 - 3 to 4 or heavy to severe
  118. !! It doesn''t matter if your poor or rich, everyone loves tits.
  119. slutConstant = 0
  120. if rand(0, 1) = 1 and izvrat = 1:slutConstant = 1
  121. clotTopPrefTmp = 0
  122. if rand(0, 2) = 2:
  123. randchan = rand(0, 2)
  124. if randchan = 0 and clotTypePrefTmp ! 4:
  125. clotTopPrefTmp = 1 + slutConstant
  126. elseif randchan = 1 and clotTypePrefTmp ! 4:
  127. clotTopPrefTmp = 2 + slutConstant
  128. elseif randchan = 2 and clotTypePrefTmp ! 3:
  129. clotTopPrefTmp = 3
  130. end
  131. if clotTopPrefTmp ! 0 and titBoy = 2:
  132. if clotPref ! 3:
  133. clotTopPrefTmp += 1
  134. end
  135. end
  136. end
  137. !! This is for pants and skirt shortness and will be grouped together as such.
  138. !! 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.
  139. bottShorPrefTmp = 0
  140. if rand(0, 2) = 2:
  141. randchan = rand(0, 2)
  142. if randchan = 0 and clotTypePrefTmp ! 4:
  143. bottShorPrefTmp = 1
  144. elseif randchan = 1:
  145. bottShorPrefTmp = 2
  146. elseif randchan = 2:
  147. bottShorPrefTmp = 3
  148. end
  149. randchan = rand(0, 1)
  150. if slutConstant = 1 and randchan = 1 and clotTypePrefTmp = 4:
  151. bottShorPrefTmp = 3
  152. end
  153. end
  154. !! This is for clothes thinness.
  155. !! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
  156. !! I see the moderate to really thin overlapping. Its intentional.
  157. clotThinPrefTmp = 0
  158. if rand(0, 2) = 2:
  159. randchan = rand(0, 2)
  160. if randchan = 0:
  161. clotThinPrefTmp = 1 + slutConstant
  162. elseif randchan = 1:
  163. clotThinPrefTmp = 2 + slutConstant
  164. elseif randchan = 2 and clotTypePrefTmp ! 3:
  165. clotThinPrefTmp = 3
  166. end
  167. end
  168. !!This is to find out if they want you to wear bimbo clothing
  169. !! 0 - no preference, 1 - Prefers bimbo clothing.
  170. bimbPrefTmp = 0
  171. if rand(0, 2) = 2 and clotTypePrefTmp ! 3:bimbPrefTmp = 1
  172. !!This is to find out if they want you to wear piercings.
  173. !! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.
  174. pierPrefTmp = 0
  175. if rand(0, 3) = 3:
  176. randchan = rand(0, 2)
  177. if randchan = 0:
  178. pierPrefTmp = 1 + slutConstant
  179. elseif randchan = 1:
  180. pierPrefTmp = 2 + slutConstant
  181. elseif randchan = 2:
  182. pierPrefTmp = 3
  183. end
  184. end
  185. !!This is to find out if they want you to have tattoos.
  186. !! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
  187. tattPrefTmp = 0
  188. if rand(0, 3) = 3:tattPrefTmp = rand(1, 3)
  189. !!This is to find out how big they want your lips.
  190. !! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
  191. lipsPrefTmp = 0
  192. if rand(0, 2) = 2:
  193. randchan = rand(0, 2)
  194. if randchan = 0:
  195. lipsPrefTmp = 1 + slutConstant
  196. elseif randchan = 2:
  197. lipsPrefTmp = 2
  198. end
  199. end
  200. !!This is to find out how big they want YOU.
  201. !! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
  202. !! Notice how this one overlaps. I believe that it should because changing ones weight is very hard.
  203. bodyPrefTmp = 0
  204. if rand(0, 3) = 3:bodyPrefTmp = rand(1, 3)
  205. !!This is to find out how much makeup they want you to wear.
  206. !! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
  207. !! 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.
  208. makePrefTmp = 0
  209. if rand(0, 1) = 1:
  210. randchan = rand(0, 2)
  211. if randchan = 0:
  212. makePrefTmp = 1 + slutConstant
  213. elseif randchan = 1:
  214. makePrefTmp = 2 + slutConstant
  215. elseif randchan = 2 and clotTypePrefTmp ! 3:
  216. makePrefTmp = 3
  217. end
  218. end
  219. !! This is to see if they like a ditz, average, or a smartypants
  220. !!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence.
  221. IQPrefTmp = 0
  222. if rand(0, 4) = 4:IQPrefTmp = rand(1, 3)
  223. end
  224. --- boy ---------------------------------