510_EndFight 4.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164
  1. # EndFight
  2. !'Here the conditions of the match
  3. !honors, punishment
  4. 'you have <<Ku>> Activism in the attacks retention, <<Kb>> Activism in the attacks throws, <<Kz>> successful defenses.'
  5. 'At rival <<KuE>> Activism in the attacks retention, <<KbE>> Activism in the attacks throws, <<KzE>> successful defenses.'
  6. if resultFight=0:
  7. wipo[1]+=2
  8. wipo[i]-=1
  9. rating[1]+=2
  10. rating[i]-=5
  11. !You won the surrender
  12. end
  13. if resultFight=1:
  14. wipo[1]+=1
  15. rating[1]+=1
  16. rating[i]-=3
  17. !you won
  18. end
  19. if resultFight=2:
  20. rating[1]-=1
  21. rating[i]-=1
  22. !draw
  23. end
  24. if resultFight=3:
  25. wipo[i]+=1
  26. rating[1]-=3
  27. rating[i]+=1
  28. !you lost
  29. end
  30. if resultFight=4:
  31. wipo[i]+=2
  32. wipo[1]-=1
  33. rating[1]-=5
  34. rating[i]+=2
  35. !you lost surrender
  36. end
  37. act '...':gt $loc
  38. if Ku>Kb:
  39. if Ku>Kz:
  40. Uteh[1]+=10
  41. end
  42. end
  43. if Kb>Ku:
  44. if Kb>Kz:
  45. Bteh[1]+=10
  46. end
  47. end
  48. if Kz>Kb:
  49. if Kz>Ku:
  50. Zteh[1]+=10
  51. end
  52. end
  53. '
  54. '<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>>'
  55. '<<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>>'
  56. '<<point>> points <<$nameA>> <<Ku>> Activism in the attacks retention, <<Kb>> Activism in the attacks throws, <<Kz>> successful defenses.'
  57. '<<pointE>> points <<$nameE>> <<KuE>> Activism in the attacks retention, <<KbE>> Activism in the attacks throws, <<KzE>> successful defenses.'
  58. if resultFight=0:
  59. wipo[a]+=2
  60. wipo[i]-=1
  61. rating[a]+=2
  62. rating[i]-=5
  63. strand=RAND(0,2)
  64. !if strand=0:musle[a]+=10
  65. !if strand=1:flex[a]+=10
  66. !if strand=2:stamina[a]+=10
  67. tehrand=RAND(0,2)
  68. if tehrand=0:Bteh[a]+=10
  69. if tehrand=1:Uteh[a]+=10
  70. if tehrand=2:Zteh[a]+=10
  71. '<b><<$nameA>> won surrender</b>'
  72. $spisok[a]+='<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=green>wins by submission</font>
  73. '
  74. $spisok[i]+='<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=red>defeat surrender</font>
  75. '
  76. win[a]+=1
  77. SubWin[a]+=1
  78. loss[i]+=1
  79. SubLoss[i]+=1
  80. end
  81. if resultFight=1:
  82. wipo[a]+=1
  83. rating[a]+=1
  84. rating[i]-=3
  85. strand=RAND(0,2)
  86. !if strand=0:musle[a]+=10
  87. !if strand=1:flex[a]+=10
  88. !if strand=2:stamina[a]+=10
  89. tehrand=RAND(0,2)
  90. if tehrand=0:Bteh[a]+=10
  91. if tehrand=1:Uteh[a]+=10
  92. if tehrand=2:Zteh[a]+=10
  93. '<b><<$nameA>> won</b>'
  94. $spisok[a]+='<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=green>victory</font>
  95. '
  96. $spisok[i]+='<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=red>defeat</font>
  97. '
  98. win[a]+=1
  99. loss[i]+=1
  100. end
  101. if resultFight=2:
  102. rating[a]-=1
  103. rating[i]-=1
  104. '<b>The result of the fight a draw</b>'
  105. $spisok[a]+='<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=black>draw</font>
  106. '
  107. $spisok[i]+='<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=black>draw</font>
  108. '
  109. draw[a]+=1
  110. draw[i]+=1
  111. end
  112. if resultFight=3:
  113. wipo[i]+=1
  114. rating[a]-=3
  115. rating[i]+=1
  116. strand=RAND(0,2)
  117. if strand=0:musle[i]+=10
  118. if strand=1:flex[i]+=10
  119. if strand=2:stamina[i]+=10
  120. tehrand=RAND(0,2)
  121. if tehrand=0:Bteh[i]+=10
  122. if tehrand=1:Uteh[i]+=10
  123. if tehrand=2:Zteh[i]+=10
  124. '<b><<$nameE>> won</b>'
  125. $spisok[a]+='<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=red>defeat</font>
  126. '
  127. $spisok[i]+='<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=green>victory</font>
  128. '
  129. win[i]+=1
  130. loss[a]+=1
  131. end
  132. if resultFight=4:
  133. wipo[i]+=2
  134. wipo[a]-=1
  135. rating[a]-=5
  136. rating[i]+=2
  137. strand=RAND(0,2)
  138. if strand=0:musle[i]+=10
  139. if strand=1:flex[i]+=10
  140. if strand=2:stamina[i]+=10
  141. tehrand=RAND(0,2)
  142. if tehrand=0:Bteh[i]+=10
  143. if tehrand=1:Uteh[i]+=10
  144. if tehrand=2:Zteh[i]+=10
  145. '<b><<$nameE>> won surrender</b>'
  146. $spisok[a]+='<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=red>defeat surrender</font>
  147. '
  148. $spisok[i]+='<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>> vs <<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>> <font color=green>wins by submission</font>
  149. '
  150. win[i]+=1
  151. SubWin[i]+=1
  152. loss[a]+=1
  153. SubLoss[a]+=1
  154. end
  155. act '...':gt $loc
  156. --- EndFight ---------------------------------