1
0

_body_image.qsrc 5.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144
  1. # $body_image
  2. !This function will return url of image, and set additonal texts to $body_image_msg
  3. !for example, you can VIEW FUNC('$body_image', 'body') to view body image in popup window, and
  4. !pl $body_image_msg to display extra texts
  5. $body_image_msg = ''
  6. if $ARGS[0] = 'body':
  7. !! This displays the body image; $bodimgsets[x9] is the folder name
  8. if salocatnow >= 1 and salocatnow <= 5:
  9. $RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10) + 9)]>>/<<salocatnow>>.jpg'
  10. elseif salocatnow <= 0:
  11. $RESULT = 'images/pc/body/shape/0.jpg'
  12. elseif salocatnow = 6:
  13. if imgset6ovr[bodset] = 1:
  14. $RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10) + 9)]>>/6.jpg'
  15. else
  16. $RESULT = 'images/pc/body/shape/6.jpg'
  17. end
  18. else
  19. if imgset7ovr[bodset] = 1:
  20. $RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10) + 9)]>>/7.jpg'
  21. else
  22. $RESULT = 'images/pc/body/shape/7.jpg'
  23. end
  24. end
  25. $body_image_msg += 'You are <<pcs_hgt>>cm tall and <<$body>>'
  26. end
  27. if $ARGS[0] = 'coat':
  28. if defaultcoat = 0:
  29. $RESULT = ''
  30. $body_image_msg += 'You have no default coat set.'
  31. $body_image_msg += '<br>Your health will suffer if you don''t wear a coat in the winter.'
  32. else
  33. $RESULT = 'images/pc/clothing/11coat/<<defaultcoat>>.jpg'
  34. $body_image_msg += 'Your current default coat is Coat<<defaultcoat>>.<br>'
  35. !make sure to sync these with [outdoors]~364
  36. if defaultcoat_warmth = 1:
  37. $body_image_msg += 'It''ll keep you fairly warm down to -10C.'
  38. elseif defaultcoat_warmth = 2:
  39. $body_image_msg += 'It will handle temperatures down to -20C.'
  40. elseif defaultcoat_warmth = 3:
  41. $body_image_msg += 'You will be nice and warm even in the depths of winter.'
  42. else
  43. $body_image_msg += 'Your health will suffer if you don''t wear a coat in the winter.'
  44. end
  45. end
  46. end
  47. if $ARGS[0] = 'clothes':
  48. if $clothingworntype = 'nude' and towel = 1 and $pantyworntype = 'none':
  49. $RESULT = 'images/pc/clothing/towel.jpg'
  50. $body_image_msg += 'You are only wearing a towel'
  51. elseif $clothingworntype = 'nude' and $pantyworntype ! 'none':
  52. $RESULT = 'images/pc/clothing/nude.jpg'
  53. $body_image_msg += 'You are only wearing panties'
  54. elseif $clothingworntype = 'nude' and $pantyworntype = 'none':
  55. $RESULT = 'images/pc/clothing/nude1.jpg'
  56. $body_image_msg += 'You are completely naked.'
  57. elseif $clothingworntype = 'cheap' and clothingwornnumber = 414:
  58. $RESULT = FUNC('$clothing_image', $clothingworntype, clothingwornnumber)
  59. $body_image_msg += 'You are wearing a hessian sack the hunters gave you.'
  60. else
  61. $RESULT = FUNC('$clothing_image', $clothingworntype, clothingwornnumber)
  62. $body_image_msg += 'You are wearing ' + FUNC('$short_description', $clothingworntype, PCloStyle2) + '<<clothingwornnumber>>.'
  63. if PClobimbo = 1:$body_image_msg += '<br>You are dressed like a bimbo.'
  64. if $clothingworntype ! 'coat' and $clothingworntype ! 'swimwear':
  65. gs 'clothing_attributes', $clothingworntype, clothingwornnumber
  66. gs 'clothing_descriptions'
  67. $body_image_msg += '<br><<$description>>'
  68. else
  69. $body_image_msg += FUNC('$clothing_name', $clothingworntype, clothingwornnumber)
  70. end
  71. *nl
  72. if $clothingworntype = 'uniform':
  73. if PCloStyle2 = 1:
  74. $body_image_msg += '<br>This outfit is considered to be a maid uniform.'
  75. elseif PCloStyle2 = 3:
  76. $body_image_msg += '<br>This is a stripper outfit.'
  77. else
  78. $body_image_msg += '<br>This outfit is a server uniform, suitable for jobs that require one.'
  79. end
  80. end
  81. end
  82. end
  83. if $ARGS[0] = 'panties':
  84. if $pantyworntype = 'none':
  85. if pcs_pubes <= 3:
  86. $RESULT = 'images/pc/body/pussy/pussy.jpg'
  87. elseif pcs_pubes > 3 and pcs_pubes <= 10:
  88. $RESULT = 'images/pc/body/pussy/stpussy.jpg'
  89. elseif pcs_pubes > 10 and pcs_pubes <= 15:
  90. if pubestyle >= 2 and pubestyle <= 7:
  91. $RESULT = $pubeimage
  92. else
  93. $RESULT = 'images/pc/body/pussy/3.jpg'
  94. end
  95. elseif pcs_pubes > 15 and pcs_pubes <= 20:
  96. if pubestyle = 8: $RESULT = $pubeimage
  97. if pubestyle ! 8: $RESULT = 'images/pc/body/pussy/spussy.jpg'
  98. elseif pcs_pubes > 20 and pcs_pubes <= 25:
  99. $RESULT = 'images/pc/body/pussy/hpussy.jpg'
  100. elseif pcs_pubes > 25 and pcs_pubes <= 30:
  101. $RESULT = 'images/pc/body/pussy/shave/s_bush1.jpg'
  102. elseif pcs_pubes >= 31:
  103. $RESULT = 'images/pc/body/pussy/hrypussy.jpg'
  104. end
  105. $body_image_msg += 'You are not wearing any panties.'
  106. else
  107. $RESULT = FUNC('$panty_image', $pantyworntype, pantywornnumber)
  108. !Kevin, please edit this line. I can not find panties description
  109. !$body_image_msg += 'You are wearing ' + FUNC('$shoe_description', $shoeworntype) + '<<shoewornnumber>>.'
  110. $body_image_msg += 'You are wearing <<$pantyworntype>> panty <<pantywornnumber>>'
  111. end
  112. end
  113. if $ARGS[0] = 'bra':
  114. if $braworntype = 'none':
  115. $RESULT = 'images/pc/body/tits/t<<tits>>.jpg'
  116. $body_image_msg += 'You are not wearing a bra. Your breasts would be considered an EU <<$titsize>>'
  117. else
  118. $RESULT = FUNC('$bra_image', $braworntype, brawornnumber)
  119. !Kevin, please edit this line. I can not find bra description
  120. !$body_image_msg += 'You are wearing ' + FUNC('$shoe_description', $shoeworntype) + '<<shoewornnumber>>.'
  121. $body_image_msg += 'You are wearing <<$braworntype>> bra <<brawornnumber>>. Your breasts would be considered an EU <<$titsize>>'
  122. end
  123. end
  124. if $ARGS[0] = 'shoes':
  125. if $clothingworntype = 'nude' or $shoeworntype = 'none':
  126. $RESULT = 'images/pc/body/feet.jpg'
  127. else
  128. $RESULT = FUNC('$shoe_image', $shoeworntype, shoewornnumber)
  129. $body_image_msg += 'You are wearing ' + FUNC('$shoe_description', $shoeworntype) + '<<shoewornnumber>>.'
  130. end
  131. end
  132. --- $body_image ---------------------------------