indik.qsrc 6.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227
  1. # indik
  2. if Enable_scalepic = 1:
  3. !0=reverse, 1=100%, 2=value. copy from 1.2.5, modify by illume
  4. if ARGS[1] < 1: ARGS[1] = 1
  5. if ARGS[1] > 100: ARGS[1] = 100
  6. ! scalewidth default = 120px
  7. if Enable_scalewidth > 1:
  8. max_width = Enable_scalewidth-1
  9. else
  10. max_width = 120
  11. end
  12. if Enable_scaleheight > 1:
  13. _height = Enable_scaleheight-1
  14. else
  15. _height = 15
  16. end
  17. _width = ARGS[1] * max_width / 100
  18. if ARGS[1] < 30: $_color = iif(ARGS[0] > 0,'green','red')
  19. if ARGS[1] >= 30 and ARGS[1] < 70 and ARGS[0] = 0: $_color = 'blue'
  20. ! reverse colors
  21. if ARGS[1] >= 30 and ARGS[1] < 50 and ARGS[0] > 0: $_color = 'yellow'
  22. if ARGS[1] >= 50 and ARGS[1] < 70 and ARGS[0] > 0: $_color = 'orange'
  23. ! ---
  24. if ARGS[1] >= 70: $_color = iif(ARGS[0]> 0,'red','green')
  25. $result = ' <img src="images/system/icon/'+$_color+'.png" height='+_height+' width=' + _width + '><img src="images/system/icon/blank.png" height='+_height+' width=' + (max_width-_width) + '> <font color='+$_color+'>'+ARGS[2]+'</font> '
  26. $ind = $result
  27. killvar 'max_width'
  28. killvar '_width'
  29. killvar '_height'
  30. killvar '$_color'
  31. else
  32. if cheatStatusBars = 1:
  33. i = 2
  34. else
  35. i = 3
  36. end
  37. if Enable_statfsize > 0 and Enable_statfsize < i:i = Enable_statfsize
  38. a = ARGS[1]
  39. a1 = ARGS[2]
  40. if a > 100:a = 100
  41. if a < 0:a = 0
  42. if ARGS[3] > 0: indik_damage = ARGS[3]
  43. if $ARGS[0] = '1':
  44. if Enable_Android = 1:
  45. if a >= 65:
  46. $ind = '<font color="green"><<a1>></font>'
  47. elseif a >= 35:
  48. $ind = '<font color="blue"><<a1>></font>'
  49. else
  50. $ind = '<font color="red"><<a1>></font>'
  51. end
  52. else
  53. j = a/5
  54. $ind = '<font face="courier new" size = <<i>>> </font>'
  55. indik_counter = 0
  56. :indik
  57. if indik_counter < j:
  58. $ind += '<font face="courier new" size = <<i>>>█</font>'
  59. indik_counter += 1
  60. jump 'indik'
  61. elseif indik_counter < 20:
  62. $ind += '<font face="courier new" size = <<i>>>_</font>'
  63. indik_counter += 1
  64. jump 'indik'
  65. end
  66. killvar 'indik_counter'
  67. killvar 'j'
  68. $ind += '<font face="courier new" size = <<i>>> </font>'
  69. if a >= 85:
  70. $ind = '<font color="green">' + $ind + '<<a1>></font>'
  71. elseif a >= 70:
  72. $ind = '<font color=#b3b300>' + $ind + '<<a1>></font>'
  73. elseif a >= 50:
  74. $ind = '<font color=#00CED1>' + $ind + '<<a1>></font>'
  75. elseif a >= 20:
  76. $ind = '<font color="blue">' + $ind + '<<a1>></font>'
  77. elseif a >= 10:
  78. $ind = '<font color=#ff6600>' + $ind + '<<a1>></font>'
  79. else
  80. $ind = '<font color="red">' + $ind + '<<a1>></font>'
  81. end
  82. end
  83. end
  84. if $ARGS[0] = '2':
  85. if Enable_Android = 1:
  86. if a >= 85:
  87. $ind = '<font color="red"><<a1>></font>'
  88. elseif a >= 65:
  89. $ind = '<font color="orange"><<a1>></font>'
  90. elseif a >= 45:
  91. $ind = '<font color="yellow"><<a1>></font>'
  92. elseif a >= 25:
  93. $ind = '<font color="green"><<a1>></font>'
  94. else
  95. $ind = '<font color="blue"><<a1>></font>'
  96. end
  97. else
  98. j = a/5
  99. indik_damage = indik_damage/5
  100. $ind = '<font face="courier new" size = <<i>>> </font>'
  101. indik_counter = 0
  102. :indik2
  103. if indik_counter < j:
  104. $ind += '<font face="courier new" size = <<i>>>█</font>'
  105. indik_counter += 1
  106. jump 'indik2'
  107. elseif indik_counter < indik_damage:
  108. $ind += '<font face="courier new" size = <<i>>>░</font>'
  109. indik_counter += 1
  110. jump 'indik2'
  111. elseif indik_counter < 20:
  112. $ind += '<font face="courier new" size = <<i>>>_</font>'
  113. indik_counter += 1
  114. jump 'indik2'
  115. end
  116. killvar 'indik_counter'
  117. killvar 'j'
  118. killvar 'indik_damage'
  119. $ind += '<font face="courier new" size = <<i>>> </font>'
  120. if a >= 90:
  121. $ind = '<font color=#ff0000>' + $ind + '</font>'
  122. elseif a >= 80:
  123. $ind = '<font color=#ff1a1a>' + $ind + '</font>'
  124. elseif a >= 70:
  125. $ind = '<font color=#ff3333>' + $ind + '</font>'
  126. elseif a >= 60:
  127. $ind = '<font color=#ff4d4d>' + $ind + '</font>'
  128. elseif a >= 50:
  129. $ind = '<font color=#ff6666>' + $ind + '</font>'
  130. elseif a >= 40:
  131. $ind = '<font color=#ff8080>' + $ind + '</font>'
  132. elseif a >= 30:
  133. $ind = '<font color=#e68080>' + $ind + '</font>'
  134. elseif a >= 20:
  135. $ind = '<font color=#cc8080>' + $ind + '</font>'
  136. elseif a >= 10:
  137. $ind = '<font color=#b38080>' + $ind + '</font>'
  138. else
  139. $ind = '<font color=#998080>' + $ind + '</font>'
  140. end
  141. end
  142. end
  143. if $ARGS[0] = '3':
  144. if Enable_Android = 1:
  145. if a >= 65:
  146. $ind = '<font color="green"><<a1>></font>'
  147. elseif a >= 35:
  148. $ind = '<font color="blue"><<a1>></font>'
  149. else
  150. $ind = '<font color="red"><<a1>></font>'
  151. end
  152. else
  153. j = a/5
  154. $ind = '<font face="courier new" size = <<i>>> </font>'
  155. indik_counter = 0
  156. :indik3
  157. if j < 10:
  158. if indik_counter < j:
  159. $ind += '<font face="courier new" size = <<i>>>_</font>'
  160. indik_counter += 1
  161. jump 'indik3'
  162. elseif indik_counter < 10:
  163. $ind += '<font face="courier new" size = <<i>>>█</font>'
  164. indik_counter += 1
  165. jump 'indik3'
  166. elseif indik_counter < 20:
  167. $ind += '<font face="courier new" size = <<i>>>_</font>'
  168. indik_counter += 1
  169. jump 'indik3'
  170. end
  171. elseif j > 10:
  172. if indik_counter < 10:
  173. $ind += '<font face="courier new" size = <<i>>>_</font>'
  174. indik_counter += 1
  175. jump 'indik3'
  176. elseif indik_counter < j:
  177. $ind += '<font face="courier new" size = <<i>>>█</font>'
  178. indik_counter += 1
  179. jump 'indik3'
  180. elseif indik_counter < 20:
  181. $ind += '<font face="courier new" size = <<i>>>_</font>'
  182. indik_counter += 1
  183. jump 'indik3'
  184. end
  185. else
  186. if indik_counter < 9:
  187. $ind += '<font face="courier new" size = <<i>>>_</font>'
  188. indik_counter += 1
  189. jump 'indik3'
  190. elseif indik_counter = 9 or indik_counter = 10:
  191. $ind += '<font face="courier new" size = <<i>>>▓</font>'
  192. indik_counter += 1
  193. jump 'indik3'
  194. elseif indik_counter < 20:
  195. $ind += '<font face="courier new" size = <<i>>>_</font>'
  196. indik_counter += 1
  197. jump 'indik3'
  198. end
  199. end
  200. killvar 'indik_counter'
  201. killvar 'j'
  202. $ind += '<font face="courier new" size = <<i>>> </font>'
  203. a1 = pcs_dom-sub
  204. if a < 10:
  205. $ind = '<font color=#b3b300>' + $ind + '<<a1>></font>'
  206. elseif a < 30:
  207. $ind = '<font color=#00CED1>' + $ind + '<<a1>></font>'
  208. elseif a <= 70:
  209. $ind = '<font color="blue">' + $ind + '<<a1>></font>'
  210. elseif a <= 90:
  211. $ind = '<font color=#00CED1>' + $ind + '<<a1>></font>'
  212. else
  213. $ind = '<font color=#b3b300>' + $ind + '<<a1>></font>'
  214. end
  215. end
  216. end
  217. end
  218. --- indik ---------------------------------