1
0

fame.qsrc 7.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182
  1. # fame
  2. !!For adding to the PC fame, the call will look a bit like so:
  3. !!gs 'fame', 'pav', 'dance', 5
  4. !!$ARGS [0] is for the location: pav, city or village
  5. !!$ARGS [1] is for the act that is adding to fame, listed below:
  6. !!acting, dance, painting, music, ballet, modelling, porn, stripping, prostitute, sex, kickboxing, running, volleyball, chess, teaching
  7. !!ARGS[2] is the value of the increase and should be an integer, its hard to put a value on fame but lets go with:
  8. !! 1-5 for small regular stuff and 10-50 for things with big impact like modelling
  9. if $ARGS[0] ! 'deg':
  10. dynamic '<<$ARGS[0]>>_<<$ARGS[1]>> += <<ARGS[2]>>'
  11. fame_performer = 0
  12. fame_sexind = 0
  13. fame_slut = 0
  14. fame_sport = 0
  15. fame_int = 0
  16. fame_social = 0
  17. global_performer = 0
  18. global_sexind = 0
  19. global_slut = 0
  20. global_sport = 0
  21. global_int = 0
  22. global_social = 0
  23. $fametown = 'pav'
  24. :fametownloop
  25. dynamic '<<$fametown>>_performer = 0'
  26. if dyneval('RESULT = <<$fametown>>_acting') > 30: dynamic '<<$fametown>>_performer += (<<$fametown>>_acting)/3'
  27. if dyneval('RESULT = <<$fametown>>_dance') > 30: dynamic '<<$fametown>>_performer += (<<$fametown>>_dance)/3'
  28. if dyneval('RESULT = <<$fametown>>_painting') > 30: dynamic '<<$fametown>>_performer += (<<$fametown>>_painting)/3'
  29. if dyneval('RESULT = <<$fametown>>_music') > 30: dynamic '<<$fametown>>_performer += (<<$fametown>>_music)/3'
  30. if dyneval('RESULT = <<$fametown>>_ballet') > 30: dynamic '<<$fametown>>_performer += (<<$fametown>>_ballet)/3'
  31. if dyneval('RESULT = <<$fametown>>_modelling') > 30: dynamic '<<$fametown>>_performer += (<<$fametown>>_modelling)/3'
  32. dynamic '<<$fametown>>_sexind = 0'
  33. if dyneval('RESULT = <<$fametown>>_porn') > 30: dynamic '<<$fametown>>_sexind += (<<$fametown>>_porn)/2'
  34. if dyneval('RESULT = <<$fametown>>_stripping') > 30: dynamic '<<$fametown>>_sexind += (<<$fametown>>_stripping)/2'
  35. dynamic '<<$fametown>>_slut = 0'
  36. if dyneval('RESULT = <<$fametown>>_sex') > 30: dynamic '<<$fametown>>_slut += (<<$fametown>>_sex)/2'
  37. if dyneval('RESULT = <<$fametown>>_prostitute') > 30: dynamic '<<$fametown>>_slut += (<<$fametown>>_prostitute)/2'
  38. dynamic '<<$fametown>>_sport = 0'
  39. if dyneval('RESULT = <<$fametown>>_kickboxing') > 30: dynamic '<<$fametown>>_sport += (<<$fametown>>_kickboxing)/3'
  40. if dyneval('RESULT = <<$fametown>>_running') > 30: dynamic '<<$fametown>>_sport += (<<$fametown>>_running)/3'
  41. if dyneval('RESULT = <<$fametown>>_volleyball') > 30: dynamic '<<$fametown>>_sport += (<<$fametown>>_volleyball)/3'
  42. dynamic '<<$fametown>>_int = 0'
  43. if dyneval('RESULT = <<$fametown>>_chess') > 30: dynamic '<<$fametown>>_int += (<<$fametown>>_chess)/2'
  44. if dyneval('RESULT = <<$fametown>>_teaching') > 30: dynamic '<<$fametown>>_int += (<<$fametown>>_teaching)/3'
  45. dynamic '<<$fametown>>_social = 0'
  46. if dyneval('RESULT = <<$fametown>>_media') > 30: dynamic '<<$fametown>>_social += (<<$fametown>>_media)/2'
  47. dynamic '<<$fametown>>_fame = 0'
  48. if dyneval('RESULT = <<$fametown>>_performer') > 30:
  49. dynamic '<<$fametown>>_fame += (<<$fametown>>_performer - 30)/2'
  50. if dyneval('RESULT = <<$fametown>>_performer') > 30:
  51. dynamic 'global_performer += <<$fametown>>_performer - 30'
  52. end
  53. end
  54. if dyneval('RESULT = <<$fametown>>_sexind') > 30:
  55. dynamic '<<$fametown>>_fame += (<<$fametown>>_sexind - 30)/2'
  56. if dyneval('RESULT = <<$fametown>>_sexind') > 80:
  57. dynamic 'global_sexind += <<$fametown>>_sexind - 80'
  58. end
  59. end
  60. if dyneval('RESULT = <<$fametown>>_slut') > 30:
  61. dynamic '<<$fametown>>_fame += (<<$fametown>>_slut - 30)/2'
  62. if dyneval('RESULT = <<$fametown>>_slut') > 80:
  63. dynamic 'global_slut += <<$fametown>>_slut - 80'
  64. end
  65. end
  66. if dyneval('RESULT = <<$fametown>>_sport') > 30:
  67. dynamic '<<$fametown>>_fame += (<<$fametown>>_sport - 30)/2'
  68. if dyneval('RESULT = <<$fametown>>_sport') > 50:
  69. dynamic 'global_sport += <<$fametown>>_sport - 50'
  70. end
  71. end
  72. if dyneval('RESULT = <<$fametown>>_int') > 30:
  73. dynamic '<<$fametown>>_fame += (<<$fametown>>_int - 30)/2'
  74. if dyneval('RESULT = <<$fametown>>_int') > 80:
  75. dynamic 'global_int += <<$fametown>>_int - 80'
  76. end
  77. end
  78. if dyneval('RESULT = <<$fametown>>_social') > 30:
  79. dynamic '<<$fametown>>_fame += (<<$fametown>>_social - 30)/2'
  80. if dyneval('RESULT = <<$fametown>>_social') > 20:
  81. dynamic 'global_social += <<$fametown>>_social - 20'
  82. end
  83. end
  84. if $fametown = 'pav':
  85. $fametown = 'city'
  86. jump 'fametownloop'
  87. elseif $fametown = 'city':
  88. $fametown = 'village'
  89. jump 'fametownloop'
  90. end
  91. $fametown = 'pav'
  92. :fametownloop2
  93. if dyneval('RESULT = <<$fametown>>_performer') < global_performer/2: dynamic '<<$fametown>>_performer += global_performer/2'
  94. if dyneval('RESULT = <<$fametown>>_sexind') < global_sexind/2: dynamic '<<$fametown>>_sexind += global_sexind/4'
  95. if dyneval('RESULT = <<$fametown>>_slut') < global_slut/2: dynamic '<<$fametown>>_slut += global_slut/5'
  96. if dyneval('RESULT = <<$fametown>>_sport') < global_sport/2: dynamic '<<$fametown>>_sport += global_sport/4'
  97. if dyneval('RESULT = <<$fametown>>_int') < global_int/2: dynamic '<<$fametown>>_int += global_int/4'
  98. if dyneval('RESULT = <<$fametown>>_social') < global_social/2: dynamic '<<$fametown>>_social += global_social/2'
  99. if $fametown = 'pav':
  100. $fametown = 'city'
  101. jump 'fametownloop2'
  102. elseif $fametown = 'city':
  103. $fametown = 'village'
  104. jump 'fametownloop2'
  105. end
  106. pcs_fame = pav_fame + city_fame + village_fame
  107. $gnikname = ''
  108. if pav_slut > 25:
  109. if pav_slut < 50:
  110. $gnikname = 'flirt'
  111. elseif pav_slut < 75:
  112. $gnikname = 'cocksucker'
  113. elseif pav_slut < 100:
  114. $gnikname = 'boy toy'
  115. elseif pav_slut < 125:
  116. $gnikname = 'sex addict'
  117. elseif pav_slut < 150:
  118. $gnikname = 'slut'
  119. else
  120. $gnikname = 'whore'
  121. end
  122. end
  123. end
  124. if $ARGS[0] = 'deg':
  125. $fametown = 'pav'
  126. :famedegloop
  127. if dyneval('RESULT = <<$fametown>>_acting') > 2: dynamic '<<$fametown>>_acting -= rand(-1,3)'
  128. if dyneval('RESULT = <<$fametown>>_dance') > 2: dynamic '<<$fametown>>_dance -= rand(-1,3)'
  129. if dyneval('RESULT = <<$fametown>>_painting') > 2: dynamic '<<$fametown>>_painting -= rand(-1,3)'
  130. if dyneval('RESULT = <<$fametown>>_music') > 2: dynamic '<<$fametown>>_music -= rand(-1,3)'
  131. if dyneval('RESULT = <<$fametown>>_ballet') > 2: dynamic '<<$fametown>>_ballet -= rand(-1,3)'
  132. if dyneval('RESULT = <<$fametown>>_modelling') > 2: dynamic '<<$fametown>>_modelling -= rand(-1,3)'
  133. if dyneval('RESULT = <<$fametown>>_porn') > 2: dynamic '<<$fametown>>_porn -= rand(-1,3)'
  134. if dyneval('RESULT = <<$fametown>>_stripping') > 2: dynamic '<<$fametown>>_stripping -= rand(-1,3)'
  135. if dyneval('RESULT = <<$fametown>>_sex') > 2: dynamic '<<$fametown>>_sex -= rand(-1,3)'
  136. if dyneval('RESULT = <<$fametown>>_prostitute') > 2: dynamic '<<$fametown>>_prostitute -= rand(-1,3)'
  137. if dyneval('RESULT = <<$fametown>>_kickboxing') > 2: dynamic '<<$fametown>>_kickboxing -= rand(-1,3)'
  138. if dyneval('RESULT = <<$fametown>>_running') > 2: dynamic '<<$fametown>>_running -= rand(-1,3)'
  139. if dyneval('RESULT = <<$fametown>>_volleyball') > 2: dynamic '<<$fametown>>_volleyball -= rand(-1,3)'
  140. if dyneval('RESULT = <<$fametown>>_chess') > 2: dynamic '<<$fametown>>_chess -= rand(-1,3)'
  141. if dyneval('RESULT = <<$fametown>>_teaching') > 2: dynamic '<<$fametown>>_teaching -= rand(-1,3)'
  142. if dyneval('RESULT = <<$fametown>>_media') > 2: dynamic '<<$fametown>>_media -= rand(-1,3)'
  143. if $fametown = 'pav':
  144. $fametown = 'city'
  145. jump 'famedegloop'
  146. elseif $fametown = 'city':
  147. $fametown = 'village'
  148. jump 'famedegloop'
  149. end
  150. end
  151. --- fame ---------------------------------