starenie 1.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112
  1. # starenie
  2. i = 1
  3. :loopcheap
  4. if cheapW[i] = 1:
  5. dynamic 'cheapH[<<i>>] -= 1'
  6. i += 1
  7. if i <= 85:jump 'loopcheap'
  8. killvar 'cheapW'
  9. end
  10. i = 1
  11. :loopaverage
  12. if averageW[i]:
  13. dynamic 'averageH[<<i>>] -= 1'
  14. i += 1
  15. if i <= 125:jump 'loopaverage'
  16. killvar 'averageW'
  17. end
  18. i = 1
  19. :loopexpensive
  20. if expensiveW[i] = 1:
  21. dynamic 'expensiveH[<<i>>] -= 1'
  22. i += 1
  23. if i <= 147:jump 'loopexpensive'
  24. killvar 'expensiveW'
  25. end
  26. i = 1
  27. :loopformal
  28. if formalW[i] = 1:
  29. dynamic 'formalH[<<i>>] -= 1'
  30. i += 1
  31. if i <= 14:jump 'loopformal'
  32. killvar 'formalW'
  33. end
  34. i = 1
  35. :loopoffice
  36. if officeW[i] = 1:
  37. dynamic 'officeH[<<i>>] -= 1'
  38. i += 1
  39. if i <= 30:jump 'loopoffice'
  40. killvar 'officeW'
  41. end
  42. i = 1
  43. :loopschool
  44. if schoolW[i] = 1:
  45. dynamic 'schoolH[<<i>>] -= 1'
  46. i += 1
  47. if i <= 14:jump 'loopschool'
  48. killvar 'schoolW'
  49. end
  50. i = 1
  51. :loopexercise
  52. if exerciseW[i] = 1:
  53. dynamic 'exerciseH[<<i>>] -= 1'
  54. i += 1
  55. if i <= 26:jump 'loopexercise'
  56. killvar 'exerciseW'
  57. end
  58. i = 1
  59. :loopnaughty
  60. if naughtyW[i] = 1:
  61. dynamic 'naughtyH[<<i>>] -= 1'
  62. i += 1
  63. if i <= 67:jump 'loopnaughty'
  64. killvar 'naughtyW'
  65. end
  66. i = 1
  67. :loopexhibit
  68. if exhibitW[i] = 1:
  69. dynamic 'exhibitH[<<i>>] -= 1'
  70. i += 1
  71. if i <= 30:jump 'loopexhibit'
  72. killvar 'exhibitW'
  73. end
  74. i = 1
  75. :loopuniform
  76. if uniformW[i] = 1:
  77. dynamic 'uniformH[<<i>>] -= 1'
  78. i += 1
  79. if i <= 24:jump 'loopuniform'
  80. killvar 'uniformW'
  81. end
  82. i = 1
  83. :loopcoat
  84. if coatW[i] = 1:
  85. dynamic 'coatH[<<i>>] -= 1'
  86. i += 1
  87. if i <= 12:jump 'loopcoat'
  88. killvar 'coatW'
  89. end
  90. i = 1
  91. :loopswimwear
  92. if swimwearW[i] = 1:
  93. dynamic 'swimwearH[<<i>>] -= 1'
  94. i += 1
  95. if i <= 30:jump 'loopswimwear'
  96. killvar 'swimwearW'
  97. end
  98. --- starenie ---------------------------------