girl.qsrc 8.8 KB

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