1
0

_body_image 4.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131
  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. clr
  29. if defaultcoat = 0:
  30. $RESULT = ''
  31. $body_image_msg += 'You have no default coat set.'
  32. $body_image_msg += '<br>Your health will suffer if you don''t wear a coat in the winter.'
  33. else
  34. $RESULT = 'images/pc/clothing/11coat/<<defaultcoat>>.jpg'
  35. $body_image_msg += 'Your current default coat is Coat<<defaultcoat>>.<br>'
  36. !make sure to sync these with [outdoors]~364
  37. if defaultcoat < 4:
  38. $body_image_msg += 'It''ll keep you fairly warm down to -10C.'
  39. elseif defaultcoat = 4 or defaultcoat = 5 or defaultcoat = 8 or defaultcoat = 10 or defaultcoat = 12:
  40. $body_image_msg += 'It will handle temperatures down to -20C.'
  41. elseif defaultcoat = 6 or defaultcoat = 7 or defaultcoat = 9 or defaultcoat = 11:
  42. $body_image_msg += 'You will be nice and warm even in the depths of winter.'
  43. else
  44. $body_image_msg += 'Your health will suffer if you don''t wear a coat in the winter.'
  45. end
  46. end
  47. end
  48. if $ARGS[0] = 'clothes':
  49. if $clothingworntype = 'nude' and towel = 1 and $pantyworntype = 'none':
  50. $RESULT = 'images/pc/clothing/towel.jpg'
  51. $body_image_msg += 'You are only wearing a towel'
  52. elseif $clothingworntype = 'nude' and $pantyworntype ! 'none':
  53. $RESULT = 'images/pc/clothing/nude.jpg'
  54. $body_image_msg += 'You are only wearing panties'
  55. elseif $clothingworntype = 'nude' and $pantyworntype = 'none':
  56. $RESULT = 'images/pc/clothing/nude1.jpg'
  57. $body_image_msg += 'You are completely naked.'
  58. else
  59. $RESULT = FUNC('$clothing_image', $clothingworntype, clothingwornnumber)
  60. $body_image_msg += 'You are wearing ' + FUNC('$short_description', $clothingworntype, PCloStyle2) + '<<clothingwornnumber>>.'
  61. if PClobimbo = 1:$body_image_msg += '<br>You are dressed like a bimbo.'
  62. if $clothingworntype ! 'coat' and $clothingworntype ! 'swimwear':
  63. gs 'clothing_attributes', $clothingworntype, clothingwornnumber
  64. gs 'clothing_descriptions'
  65. $body_image_msg += '<br><<$description>>'
  66. else
  67. $body_image_msg += FUNC('$clothing_name', $clothingworntype, clothingwornnumber)
  68. end
  69. nl
  70. if $clothingworntype = 'uniform':
  71. if PCloStyle2 = 1:
  72. $body_image_msg += '<br>This outfit is considered to be a maid uniform.'
  73. elseif PCloStyle2 = 3:
  74. $body_image_msg += '<br>This is a stripper outfit.'
  75. else
  76. $body_image_msg += '<br>This outfit is a server uniform, suitable for jobs that require one.'
  77. end
  78. end
  79. end
  80. end
  81. if $ARGS[0] = 'panties':
  82. if $pantyworntype = 'none':
  83. if pcs_pubes <= 3:
  84. $RESULT = 'images/pc/body/pussy/pussy.jpg'
  85. elseif pcs_pubes <= 10:
  86. $RESULT = 'images/pc/body/pussy/stpussy.jpg'
  87. elseif pcs_pubes <= 20:
  88. $RESULT = 'images/pc/body/pussy/spussy.jpg'
  89. else
  90. $RESULT = 'images/pc/body/pussy/hpussy.jpg'
  91. end
  92. $body_image_msg += 'You are not wearing any panties.'
  93. else
  94. $RESULT = FUNC('$panty_image', $pantyworntype, pantywornnumber)
  95. !Kevin, please edit this line. I can not find panties description
  96. !$body_image_msg += 'You are wearing ' + FUNC('$shoe_description', $shoeworntype) + '<<shoewornnumber>>.'
  97. $body_image_msg += 'You are wearing <<$pantyworntype>> panty <<pantywornnumber>>'
  98. end
  99. end
  100. if $ARGS[0] = 'bra':
  101. if $braworntype = 'none':
  102. $RESULT = 'images/pc/body/tits/t<<tits>>.jpg'
  103. $body_image_msg += 'You are not wearing a bra. Your breasts would be considered an EU <<$titsize>>'
  104. else
  105. $RESULT = FUNC('$bra_image', $braworntype, brawornnumber)
  106. !Kevin, please edit this line. I can not find bra description
  107. !$body_image_msg += 'You are wearing ' + FUNC('$shoe_description', $shoeworntype) + '<<shoewornnumber>>.'
  108. $body_image_msg += 'You are wearing <<$braworntype>> bra <<brawornnumber>>. Your breasts would be considered an EU <<$titsize>>'
  109. end
  110. end
  111. if $ARGS[0] = 'shoes':
  112. if $clothingworntype = 'nude' or $shoeworntype = 'none':
  113. $RESULT = 'images/pc/body/feet.jpg'
  114. else
  115. $RESULT = FUNC('$shoe_image', $shoeworntype, shoewornnumber)
  116. $body_image_msg += 'You are wearing ' + FUNC('$shoe_description', $shoeworntype) + '<<shoewornnumber>>.'
  117. end
  118. end
  119. --- $body_image ---------------------------------