064_initKik 2.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115
  1. # initKik
  2. set init = speed + reakt
  3. <<<<<<< 064_initKik
  4. set initKoef = init * 20/100
  5. set initi = RAND(initi - initKoef, initi + initKoef)
  6. set initV = speedV + reaktV
  7. set initKoefV = initV * 20/100
  8. set initiV = RAND(initiV - initKoefV, initiV + initKoefV)
  9. =======
  10. set initKoef = init*20/100
  11. set initi = RAND (initi - initKoef,initi + initKoef)
  12. set initV = speedV + reaktV
  13. set initKoefV = initV*20/100
  14. set initiV = RAND (initiV - initKoefV,initiV + initKoefV)
  15. >>>>>>> 064_initKik
  16. if initi > initiV and hodtime < 3 and ionce = 0 or hodtimeV >= 3 and ionce = 0:
  17. set hod = 0
  18. <<<<<<< 064_initKik
  19. set hodtime += 1
  20. if hodtimeV >= 3: set hodtimeV = 0
  21. '<font color = green>You took the initiative</font>'
  22. =======
  23. set hodtime = hodtime + 1
  24. if hodtimeV >= 3:set hodtimeV = 0
  25. '<font color=green>You took the initiative</font>'
  26. >>>>>>> 064_initKik
  27. set ionce = 1
  28. end
  29. if initi < initiV and hodtimeV < 3 and ionce = 0 or hodtime >= 3 and ionce = 0:
  30. set hod = 1
  31. <<<<<<< 064_initKik
  32. set hodtimeV += 1
  33. if hodtime >= 3: set hodtime = 0
  34. '<font color = red><<$nameV>> took the initiative</font>'
  35. set ionce = 1
  36. end
  37. if initi = initiV and hodtime < 3 and hodtimeV < 3 and ionce = 0:
  38. set inrand = RAND(0,1)
  39. set ionce = 1
  40. if inrand = 0:
  41. set hod = 0
  42. set hodtime += 1
  43. '<font color = green>You took the lead</font>'
  44. end
  45. if inrand = 1:
  46. set hod = 1
  47. set hodtimeV += 1
  48. '<font color = red><<$nameV>> took the initiative</font>'
  49. end
  50. end
  51. =======
  52. set hodtimeV = hodtimeV + 1
  53. if hodtime >= 3:set hodtime = 0
  54. '<font color=red><<$nameV>> seized the initiative</font>'
  55. set ionce = 1
  56. end
  57. if initi = initiV and hodtime < 3 and hodtimeV < 3 and ionce = 0:
  58. set inrand = RAND (0,1)
  59. set ionce = 1
  60. if inrand = 0:
  61. set hod = 0
  62. set hodtime = hodtime + 1
  63. '<font color=green>You took the initiative</font>'
  64. end
  65. if inrand = 1:
  66. set hod = 1
  67. set hodtimeV = hodtimeV + 1
  68. '<font color=red><<$nameV>> seize the initiative</font>'
  69. end
  70. end
  71. >>>>>>> 064_initKik
  72. if initi = initiV and hodtime >= 3 and ionce = 0 or initi = initiV and hodtimeV >= 3 and ionce = 0:
  73. set hodtime = 0
  74. set hodtimeV = 0
  75. <<<<<<< 064_initKik
  76. set inrand = RAND(0,1)
  77. set ionce = 1
  78. if inrand = 0:
  79. set hod = 0
  80. set hodtime += 1
  81. '<font color = green>You took the lead</font>'
  82. end
  83. if inrand = 1:
  84. set hod = 1
  85. set hodtimeV += 1
  86. '<font color = red><<$nameV>> took the initiative</font>'
  87. end
  88. end
  89. =======
  90. set inrand = RAND (0,1)
  91. set ionce = 1
  92. if inrand = 0:
  93. set hod = 0
  94. set hodtime = hodtime + 1
  95. '<font color=green>You took the initiative</font>'
  96. end
  97. if inrand = 1:
  98. set hod = 1
  99. set hodtimeV = hodtimeV + 1
  100. '<font color=red><<$nameV>> seize the initiative</font>'
  101. end
  102. end
  103. >>>>>>> 064_initKik
  104. --- initKik ---------------------------------