bf_silver_prod.go 4.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122
  1. // package bf_silver_prod -- бизнес-функция производить серебро
  2. package bf_silver_prod
  3. import (
  4. "strconv"
  5. "strings"
  6. . "gitp78su.ipnodns.ru/svi/kern/kc/helpers"
  7. . "gitp78su.ipnodns.ru/svi/kern/krn/ktypes"
  8. . "wartank/app/lev0/alias"
  9. "wartank/app/lev0/cons"
  10. . "wartank/app/lev0/types"
  11. )
  12. // СереброПроизводить -- заставляет банк производить серебро
  13. func СереброПроизводить(конт ILocalCtx) {
  14. банк_ := конт.Get("арена_банк")
  15. if банк_ == nil { // Возможно ещё не построен
  16. return
  17. }
  18. банк := банк_.Val().(ИАренаБанк)
  19. еслиРабота := банк.АренаСостояние().Получ() == cons.РежимРабота
  20. еслиОжидание := банк.АренаСостояние().Получ() == cons.РежимОжидание
  21. if !(еслиРабота || еслиОжидание) {
  22. return
  23. }
  24. получитьВсеРежимы(конт)
  25. сделатьСеребро(конт)
  26. }
  27. // Получает все режимы банка
  28. func получитьВсеРежимы(конт ILocalCtx) {
  29. банк := конт.Get("арена_банк").Val().(ИАренаБанк)
  30. var (
  31. lstBank = банк.СписПолучить()
  32. ind int
  33. strMode string
  34. strMode1 string
  35. strMode2 string
  36. )
  37. if len(lstBank) == 0 {
  38. банк.Обновить()
  39. lstBank = банк.СписПолучить()
  40. }
  41. { // Получить первый режим
  42. for ind, strMode = range lstBank {
  43. if strings.Contains(strMode, `Кол-во: <span class="green2">`) {
  44. strMode1 = strMode
  45. break
  46. }
  47. }
  48. lstMode := strings.Split(strMode1, `Кол-во: <span class="green2">`)
  49. strMode1 = lstMode[1]
  50. lstMode = strings.Split(strMode1, `</span><br/>`)
  51. strMode1 = lstMode[0]
  52. iNum1, err := strconv.Atoi(strMode1)
  53. Hassert(err == nil, "получитьВсеРежимы(): ошибка в режиме-1 банка, ош=\n\t%v", err)
  54. банк.РежимРаботы1().Серебро().Уст(iNum1)
  55. // Установить время производства
  56. strTime1 := lstBank[ind+2]
  57. банк.РежимРаботы1().ВремяСделатьУст(strTime1)
  58. if iNum1 <= 2 { // Если банк слишком слабый
  59. return
  60. }
  61. }
  62. { // Получить второй режим
  63. for _ind := ind + 2; _ind < len(lstBank); _ind++ {
  64. strMode := lstBank[_ind]
  65. if strings.Contains(strMode, `Кол-во: <span class="green2">`) {
  66. strMode2 = strMode
  67. ind = _ind
  68. break
  69. }
  70. }
  71. lstMode := strings.Split(strMode2, `Кол-во: <span class="green2">`)
  72. strMode2 = lstMode[1]
  73. lstMode = strings.Split(strMode2, `</span><br/>`)
  74. strMode2 = lstMode[0]
  75. iNum2, err := strconv.Atoi(strMode2)
  76. Hassert(err == nil, "получитьВсеРежимы(): ошибка в режиме-2 банка, ош=\n\t%v", err)
  77. банк.РежимРаботы2().Серебро().Уст(iNum2)
  78. // Установить время производства
  79. strTime2 := lstBank[ind+2]
  80. банк.РежимРаботы2().ВремяСделатьУст(strTime2)
  81. }
  82. }
  83. // Запускает в производство серебро
  84. func сделатьСеребро(конт ILocalCtx) {
  85. банк := конт.Get("арена_банк").Val().(ИАренаБанк)
  86. var (
  87. lstBank = банк.СписПолучить()
  88. ind int
  89. strOut string
  90. strLink string
  91. еслиНайдено bool
  92. )
  93. time1 := банк.РежимРаботы1().ВремяСделать()
  94. time2 := банк.РежимРаботы2().ВремяСделать()
  95. if time1 > time2 {
  96. time1 = time2
  97. }
  98. for ind, strOut = range lstBank {
  99. if strings.Contains(strOut, time1) {
  100. ind += 7
  101. strLink = lstBank[ind]
  102. еслиНайдено = true
  103. break
  104. }
  105. }
  106. if еслиНайдено && strings.Contains(strLink, `>Начать производство</span>`) {
  107. lstLink := strings.Split(strLink, `<a class="simple-but border" href="`)
  108. strLink = lstLink[1]
  109. lstLink = strings.Split(strLink, `"><span><span>Начать производство</span></span></a>`)
  110. strLink = "https://wartank.ru/production/" + lstLink[0]
  111. _, err := банк.Сеть().Get(strLink)
  112. Hassert(err == nil, "сделатьСеребро(): при выполнении GET-запроса, ош=\n\t%v", err)
  113. банк.ОбратВремяУст(АВремя(time1))
  114. }
  115. }