_menu_clothes 833 B

1234567891011121314151617181920212223242526
  1. # $menu_clothes
  2. clr
  3. if $clothingworntype = 'nude':
  4. view 'images/clothes/nude.jpg'
  5. pl 'You´re not dressed.'
  6. elseif cloth_vid = 1:
  7. view 'images/etogame/bimboView.jpg'
  8. pl 'You are dressed like a bimbo.'
  9. else
  10. view FUNC('$clothing_image', $clothingworntype, clothingwornnumber)
  11. pl 'You are wearing ' + FUNC('$clothing_name', $clothingworntype, clothingwornnumber) + '.'
  12. if $clothingworntype ! 'vatnik' and $clothingworntype ! 'sforma' and $clothingworntype ! 'ero':
  13. $RESULT = '(strength '
  14. dynamic '$RESULT += <<$clothingworntype>>H[<<clothingwornnumber>>]'
  15. if $clothingworntype ! 'yoga' and $clothingworntype ! 'sarafan':
  16. $RESULT += ', hip size '
  17. dynamic '$RESULT += <<$clothingworntype>>B[<<clothingwornnumber>>]'
  18. end
  19. $RESULT += ')'
  20. '<<$RESULT>>'
  21. end
  22. end
  23. --- $menu_clothes ---------------------------------