1
0

traits.qsrc 7.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189
  1. # traits
  2. if $ARGS[0] = 'menu':
  3. *clr & cla
  4. gs 'obj_din', 'chartabs'
  5. '<center><h1>Traits</h1></center>'
  6. '<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
  7. '<td>'
  8. '<center><b>Bimbo</b></center>'
  9. if bimbolevel = 0:
  10. 'You do not have this trait.'
  11. 'To gain this trait you must wear bimbo clothing / shoes for a few days.'
  12. 'You have <<bimbo>> out of 10 points towards level 1.'
  13. elseif bimbolevel = 1:
  14. 'You have this trait at level 1.'
  15. 'To maintain this trait you must wear bimbo clothing / shoes and/or have regular sex.'
  16. 'Due to this trait you gain a very small bonus to appearance and a very small penalty to intelligence.'
  17. 'You have <<bimbo>> out of 20 points towards level 2.'
  18. if bimbowithdrawal = 0:
  19. 'You are not in withdrawal.'
  20. else
  21. 'You have <<bimbowithdrawal>> out of 30 points towards losing this trait.'
  22. end
  23. elseif bimbolevel = 2:
  24. 'You have this trait at level 2.'
  25. 'To maintain this trait you must wear bimbo clothing / shoes and/or have regular sex.'
  26. 'Due to this trait you gain a small bonus to appearance and a small penalty to intelligence.'
  27. 'You have <<bimbo>> out of 30 points towards level 3.'
  28. if bimbowithdrawal = 0:
  29. 'You are not in withdrawal.'
  30. else
  31. 'You have <<bimbowithdrawal>> out of 30 points towards losing this trait.'
  32. end
  33. else
  34. 'You have this trait at level 3.'
  35. 'To maintain this trait you must wear bimbo clothing / shoes and/or have regular sex.'
  36. 'Due to this trait you gain a moderate bonus to appearance and a moderate penalty to intelligence.'
  37. if bimbowithdrawal = 0:
  38. 'You are not in withdrawal.'
  39. else
  40. 'You have <<bimbowithdrawal>> out of 30 points towards losing this trait.'
  41. end
  42. end
  43. *nl
  44. '<center><b>Exhibitionist</b></center>'
  45. if Exhibitionist_lvl = 0 and exhib_cheat = 0:
  46. 'You do not have this trait.'
  47. 'To gain this trait you must have low enough inhibition and choose to expose your breasts in public.'
  48. 'You have <<pcs_exhib>> out of 10 points towards level 1. This will slowly decrease each day unless you expose yourself.'
  49. elseif Exhibitionist_lvl = 1:
  50. 'You have this trait at level 1.'
  51. 'To increase this trait you must choose to expose your breasts and/or bare bottom in public.'
  52. 'This trait grants you a small amount of excitement from exposing yourself.'
  53. 'You have <<pcs_exhib>> out of 50 points towards level 2.'
  54. elseif Exhibitionist_lvl = 2:
  55. 'You have this trait at level 2.'
  56. 'To increase this trait you must choose to expose your breasts, bare bottom and/or pussy in public.'
  57. 'This trait grants you a moderate amount of excitement from exposing yourself.'
  58. if pcs_exhib < 100:
  59. 'You have <<pcs_exhib>> out of 100 points towards level 3.'
  60. elseif pcs_exhib >= 100 and exhibitionQW < 3:
  61. 'You must trigger an event in the park to gain level 3.'
  62. elseif pcs_exhib >= 100 and exhibitionQW > 2:
  63. 'You will have to wait until the end of the day for the trait level to update.'
  64. end
  65. else
  66. 'You have this trait at level 3.'
  67. 'This is the highest level of this trait.'
  68. 'This trait grants you a large amount of excitement from exposing yourself.'
  69. end
  70. *nl
  71. '<center><b>Addictive Personality</b></center>'
  72. if addictive_trait_lvl = 0 and addictive_cheat = 0:
  73. 'You do not have this trait.'
  74. 'To gain this trait you have to use 2 different types of drugs several times. At the moment you have <<addictive_exp>> out of 2 points towards level 1.'
  75. elseif addictive_trait_lvl = 1:
  76. 'You have this trait at level 1.'
  77. 'You have some experience with taking drugs and it becomes harder for you to refuse to take them.'
  78. 'To increase this trait you have to use 3 different types of drugs several times. At the moment you have <<addictive_exp>> out of 3 points towards level 2.'
  79. elseif addictive_trait_lvl = 2:
  80. 'You have this trait at level 2.'
  81. 'Taking drugs has become something normal and that makes it even harder for you to refuse to take them.'
  82. 'To increase this trait you have to use 4 different types of drugs several times. At the moment you have <<addictive_exp>> out of 4 points towards level 3.'
  83. elseif addictive_trait_lvl = 3:
  84. 'You have this trait at level 3.'
  85. 'Taking drugs is a normal part of your life which makes it difficult for you to refuse to take them.'
  86. 'This is the highest level of this trait.'
  87. end
  88. *nl
  89. '<center><b>Cumeater</b></center>'
  90. if trt_cumeater = 0 and cumeater_cheat = 0:
  91. 'You do not have this trait.'
  92. 'To gain this trait you must swallow cum 10 times.'
  93. 'You have swallowed cum <<swallow>> times.'
  94. elseif trt_cumeater = 0 and cumeater_cheat = 1:
  95. 'You do not have this trait.'
  96. else
  97. 'You have this trait.'
  98. 'It allows you to remove cum from certain locations and eat it'
  99. 'This trait cannot be lost.'
  100. end
  101. *nl
  102. if alko_trait = -1:
  103. '<center><b>Lightweight</b></center>'
  104. 'It doesn''t take much for you to get drunk. You don''t have to drink as much to feel the affects of alcohol.'
  105. elseif alko_trait = 1:
  106. '<center><b>Heavyweight</b></center>'
  107. 'You''ve built up a tolerance, making it harder for you to feel the affects of alcohol.'
  108. end
  109. act 'Exit the menu': gt $loc, $metka
  110. '</td></tr></table></center>'
  111. end
  112. if $ARGS[0] = 'hourly':
  113. if swallow >= 10 and trt_cumeater = 0 and cumeater_cheat = 0:
  114. trt_cumeater = 1
  115. msg 'You have gained the trait "Cumeater"'
  116. end
  117. end
  118. if $ARGS[0] = 'overnight':
  119. !!alko_trait: light weight (-1), normal (0), heavy weight (+1)
  120. !!alko_trait_counter: between -100 and 100, tracks if sveta is a light or heavy wight
  121. !!alko_trait_day: amount of alko sveta has drunk today
  122. !!Gains/Decay
  123. if alko_trait_day > 0:
  124. if alko_trait_day > 9:
  125. alko_trait_counter += 9
  126. else
  127. alko_trait_counter += alko_trait_day
  128. end
  129. elseif alko_trait_day = 0:
  130. alko_trait_counter -= 2
  131. end
  132. !!Trait selection
  133. if alko_trait_counter > 50 and alko_trait < 1:
  134. alko_trait = 1
  135. msg 'You have gained the trait ''Heavyweight''.'
  136. elseif alko_trait_counter < -50 and alko_trait > -1:
  137. alko_trait = -1
  138. msg 'You have gained the trait ''Lightweight''.'
  139. elseif alko_trait = -1 and alko_trait_counter > 0:
  140. alko_trait = 0
  141. msg 'You have lost the trait ''Lightweight''.'
  142. elseif alko_trait = 1 and alko_trait_counter < 0:
  143. alko_trait = 0
  144. msg 'You have lost the trait ''Heavyweight''.'
  145. end
  146. !!Cleanup
  147. alko_trait_day = 0
  148. if alko_trait_counter > 100:
  149. alko_trait_counter = 100
  150. elseif alko_trait_counter < -100:
  151. alko_trait_counter = -100
  152. end
  153. end
  154. if $ARGS[0] = 'addictive_personality':
  155. !!Addictive Personality Trait
  156. if addictive_cheat = 0:
  157. addictive_exp = smoke_exp + joint_exp + heroin_exp + cocaine_exp + alcohol_exp + amphetamine_exp
  158. if addictive_exp = 2 and addictive_trait_lvl < 1:
  159. addictive_trait_lvl = 1
  160. if add_trait_msg_1 = 0: add_trait_msg_1 = 1 & msg 'You have gained the trait ''Addictive Personality''.'
  161. elseif addictive_exp = 3 and addictive_trait_lvl < 2:
  162. addictive_trait_lvl = 2
  163. if add_trait_msg_2 = 0: add_trait_msg_2 = 1 & msg 'You have increased the level of your ''Addictive Personality'' trait to 2.'
  164. elseif addictive_exp >= 4 or (heroin_exp = 1 and cocaine_exp = 1) and addictive_trait_lvl < 3:
  165. addictive_trait_lvl = 3
  166. if add_trait_msg_3 = 0: add_trait_msg_3 = 1 & msg 'You have increased the level of your ''Addictive Personality'' trait to 3.'
  167. end
  168. end
  169. end
  170. --- traits ---------------------------------