1
0

Autofight 13 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741
  1. # Autofight
  2. if Formula = 0:Formula = 3
  3. $endurdin = {
  4. Ken = (musle[a] / 100) * Kus / 100
  5. if ken <= 0:ken = 1
  6. Kene = (musle[i] / 100) * Kuse / 100
  7. if kene <= 0:kene = 1
  8. KoefUder = rand(Uder * 20 / 100, Uder)
  9. KoefUderE = rand(Udere * 20 / 100, Udere)
  10. KoefBros = rand(Brosok * 20 / 100, Brosok)
  11. KoefBrosE = rand(Brosoke * 20 / 100, Brosoke)
  12. KoefProt = rand(Zash * 20 / 100, Zash)
  13. KoefProtE = rand(Zashe * 20 / 100, Zashe)
  14. }
  15. $uderdin = {
  16. Kus = 5
  17. Kuse = 10
  18. dynamic $endurdin
  19. endur -= ken
  20. endurE -= kene
  21. Aktiv = (strenw / 2) + agilw + rand(0, lustw) + KoefUder
  22. Aktiv = Aktiv * endur / endurMax
  23. Passiv = (((strenwE + (agilwE / 2)) * koefE) / 100) + rand (0, lustwE) + KoefProtE
  24. Passiv = Passiv * endurE / endurMaxE
  25. }
  26. $uderdinE = {
  27. Kus = 10
  28. Kuse = 5
  29. dynamic $endurdin
  30. endur -= ken
  31. endurE -= kene
  32. Aktiv = (strenwE / 2) + agilwE + rand(0, lustwE) + KoefUdere
  33. Aktiv = Aktiv * endurE / endurMaxE
  34. Passiv = (((strenw + (agilw / 2)) * koef) / 100) + rand(0, lustw) + KoefProt
  35. Passiv = Passiv * endur / endurMaxE
  36. }
  37. $brosdin = {
  38. Kus = 10
  39. Kuse = 10
  40. dynamic $endurdin
  41. endur -= ken
  42. endurE -= kene
  43. Aktiv = strenw + (agilw / 2) + rand(0, lustw) + KoefBros
  44. Aktiv = Aktiv * endur / endurMax
  45. Passiv = (((strenwE / 2) + agilwE) * koefE / 100) + rand(0, lustwE) + KoefProtE
  46. Passiv = Passiv * endurE / endurMaxE
  47. }
  48. $brosdinE = {
  49. Kus = 10
  50. Kuse = 10
  51. dynamic $endurdin
  52. endur -= ken
  53. endurE -= kene
  54. Aktiv = strenwE + (agilwE / 2) + rand(0, lustwE) + KoefBrosE
  55. Aktiv = Aktiv * endurE / endurMaxE
  56. Passiv = (((strenw / 2) + agilw) * koef / 100) + rand(0, lustw) + KoefProt
  57. Passiv = Passiv * endur / endurMax
  58. }
  59. point = 0
  60. pointE = 0
  61. $nameE = $nikname[i]
  62. $nameA = $nikname[a]
  63. strenw = musle[a] / 10
  64. strenwE = musle[i] / 10
  65. agilw = flex[a] / 10
  66. agilwE = flex[i] / 10
  67. lustMax = wipo[a]
  68. lustMaxE = wipo[i]
  69. lustw = lustMax
  70. lustwe = lustMaxe
  71. Brosok = Bteh[a] / 10
  72. BrosokE = Bteh[i] / 10
  73. Uder = Uteh[a] / 10
  74. Udere = Uteh[i] / 10
  75. Zash = Zteh[a] / 10
  76. Zashe = Zteh[i] / 10
  77. resultFight = 0
  78. endurMax = stamina[a] / 10
  79. endurMaxE = stamina[i] / 10
  80. endur = endurMax
  81. endurE = endurMaxE
  82. croonce = 0
  83. round = 1
  84. rMin = 8
  85. stoper = 0
  86. Ku = 0
  87. Kb = 0
  88. Kz = 0
  89. KuE =0
  90. KbE= 0
  91. KzE = 0
  92. if strenw > strenwE:
  93. point += 1
  94. lustw += 1
  95. crouch = 1
  96. end
  97. if strenw < strenwE:
  98. pointE += 1
  99. lustwE += 1
  100. crouch = 0
  101. end
  102. if strenw = strenwE:
  103. varrand = rand(0, 1)
  104. if varrand = 0:crouch = 1
  105. if varrand=1:crouch=0
  106. end
  107. :markFightCrouch
  108. stoper = 0
  109. if crouch = 1:
  110. enrand = rand(0, 1)
  111. arand = rand(0, 1)
  112. if arand = 0:
  113. endur -= 2
  114. if enrand = 0:
  115. pointE += 1
  116. jump 'markfight'
  117. end
  118. if enrand = 1:
  119. point += 2
  120. endurE -= 1
  121. jump 'markfight1'
  122. end
  123. end
  124. if arand = 1:
  125. endur -= 1
  126. if enrand = 0:
  127. point += 1
  128. jump 'markfight2'
  129. end
  130. if enrand = 1:
  131. pointE += 1
  132. endurE -= 1
  133. jump 'markfight3'
  134. end
  135. end
  136. else
  137. enrand = rand(0, 1)
  138. arand = rand(0, 1)
  139. if arand = 0:
  140. if enrand = 0:
  141. point += 1
  142. endurE -= 2
  143. jump 'markfightE'
  144. end
  145. if enrand = 1:
  146. pointE += 1
  147. endurE -= 1
  148. jump 'markfightE1'
  149. end
  150. end
  151. if arand = 1:
  152. endur -= 1
  153. if enrand = 0:
  154. pointE += 2
  155. endurE -= 2
  156. jump 'markfightE2'
  157. end
  158. if enrand = 1:
  159. point += 1
  160. endurE -= 1
  161. jump 'markfightE3'
  162. end
  163. end
  164. end
  165. :markfight
  166. koef = 100
  167. koefE = 90
  168. rMin -= 1
  169. stoper += 1
  170. if endur <= 0 or lustw <= 0:jump 'markSubLoss'
  171. if endurE <= 0 or lustwE <= 0:jump 'markSubWin'
  172. if stoper < 3:
  173. if rMin > 0:
  174. arand = rand(0, 1)
  175. if arand = 0:
  176. dynamic $uderdin
  177. if Aktiv > Passiv:
  178. point += 1
  179. Ku += 1
  180. stoper = 0
  181. jump 'markfight2'
  182. end
  183. if Aktiv < Passiv:
  184. pointE += 1
  185. KzE += 1
  186. stoper = 0
  187. jump 'markfight3'
  188. end
  189. if Aktiv = Passiv:jump 'markfight'
  190. end
  191. if arand = 1:
  192. dynamic $brosdin
  193. if Aktiv > Passiv:
  194. point += 2
  195. lustw += 1
  196. Kb += 1
  197. stoper = 0
  198. jump 'markfight1'
  199. end
  200. if Aktiv < Passiv:
  201. pointE += 1
  202. KzE += 1
  203. stoper = 0
  204. jump 'markfight3'
  205. end
  206. if Aktiv = Passiv:jump 'markfight'
  207. end
  208. else
  209. jump 'markRoundEnd'
  210. end
  211. end
  212. if stoper >= 3:
  213. pointE += 1
  214. jump 'markRoundStop'
  215. end
  216. :markfight1
  217. koef = 100
  218. koefE = 85
  219. rMin -= 1
  220. stoper += 1
  221. if endur <= 0 or lustw <= 0:jump 'markSubLoss'
  222. if endurE <= 0 or lustwE <= 0:jump 'markSubWin'
  223. if stoper < 3:
  224. if rMin > 0:
  225. dynamic $uderdin
  226. if Aktiv > Passiv:
  227. point += 1
  228. Ku += 1
  229. stoper = 0
  230. jump 'markfight2'
  231. end
  232. if Aktiv < Passiv:
  233. pointE += 1
  234. KzE += 1
  235. stoper = 0
  236. jump 'markfight3'
  237. end
  238. if Aktiv = Passiv:jump 'markfight1'
  239. else
  240. jump 'markRoundEnd'
  241. end
  242. end
  243. if stoper >= 3:
  244. pointE += 1
  245. jump 'markRoundStop'
  246. end
  247. :markfight2
  248. koef = 100
  249. koefE = 80
  250. lustE -= 1
  251. rMin -= 1
  252. stoper += 1
  253. if endur <= 0 or lustw <= 0:jump 'markSubLoss'
  254. if endurE <= 0 or lustwE <= 0:jump 'markSubWin'
  255. if stoper < 3:
  256. if rMin > 0:
  257. dynamic $uderdin
  258. endurE -= 2
  259. if Aktiv >= Passiv:
  260. point += 1
  261. lustwE -= 1
  262. Ku += 1
  263. jump 'markfight2'
  264. end
  265. if Aktiv < Passiv:
  266. pointE += 1
  267. KzE += 1
  268. stoper = 0
  269. jump 'markfight3'
  270. end
  271. else
  272. jump 'markRoundEnd'
  273. end
  274. end
  275. if stoper >= 3:
  276. point += 3
  277. jump 'markRoundStop'
  278. end
  279. :markfight3
  280. koef = 100
  281. koefE = 100
  282. rMin -= 1
  283. stoper += 1
  284. if endur <= 0 or lustw <= 0:jump 'markSubLoss'
  285. if endurE <= 0 or lustwE <= 0:jump 'markSubWin'
  286. if stoper < 3:
  287. if rMin > 0:
  288. arand = rand(0, 1)
  289. if arand = 0:
  290. dynamic $uderdin
  291. if Aktiv > Passiv:
  292. point += 1
  293. Ku += 1
  294. stoper = 0
  295. jump 'markfight2'
  296. end
  297. if Aktiv <= Passiv:
  298. pointE += 1
  299. KzE += 1
  300. jump 'markRoundStop'
  301. end
  302. end
  303. if arand = 1:
  304. dynamic $brosdin
  305. if Aktiv > Passiv:
  306. point += 2
  307. lustw += 1
  308. Kb += 1
  309. stoper = 0
  310. jump 'markfight1'
  311. end
  312. if Aktiv <= Passiv:
  313. pointE += 1
  314. KzE += 1
  315. jump 'markRoundStop'
  316. end
  317. end
  318. else
  319. jump 'markRoundEnd'
  320. end
  321. end
  322. if stoper >= 3:
  323. pointE += 1
  324. jump 'markRoundStop'
  325. end
  326. :markfightE
  327. koef = 90
  328. koefE = 100
  329. rMin -= 1
  330. stoper += 1
  331. if endur <= 0 or lustw <= 0:jump 'markSubLoss'
  332. if endurE <= 0 or lustwE <= 0:jump 'markSubWin'
  333. if stoper < 3:
  334. if rMin > 0:
  335. deystrand = rand(0, 1)
  336. if deystrand = 0:
  337. dynamic $uderdinE
  338. if Aktiv > Passiv:
  339. pointE += 1
  340. KuE += 1
  341. stoper = 0
  342. jump 'markfightE1'
  343. end
  344. if Aktiv < Passiv:
  345. point += 1
  346. Kz += 1
  347. stoper = 0
  348. jump 'markfightE3'
  349. end
  350. if Aktiv = Passiv:jump 'markfightE'
  351. end
  352. if deystrand = 1:
  353. dynamic $brosdinE
  354. if Aktiv > Passiv:
  355. pointE += 2
  356. lustwE += 1
  357. KbE += 1
  358. stoper = 0
  359. jump 'markfightE2'
  360. end
  361. if Aktiv < Passiv:
  362. point += 1
  363. Kz += 1
  364. stoper = 0
  365. jump 'markfightE3'
  366. end
  367. if Aktiv = Passiv:jump 'markfightE'
  368. end
  369. else
  370. jump 'markRoundEnd'
  371. end
  372. end
  373. if stoper >= 3:
  374. point += 1
  375. jump 'markRoundStop'
  376. end
  377. :markfightE1
  378. koef = 80
  379. koefE = 100
  380. lust -= 1
  381. rMin -= 1
  382. stoper += 1
  383. if endur <= 0 or lustw <= 0:jump 'markSubLoss'
  384. if endurE <= 0 or lustwE <= 0:jump 'markSubWin'
  385. if stoper < 3:
  386. if rMin > 0:
  387. dynamic $uderdinE
  388. endur -= 2
  389. if Aktiv >= Passiv:
  390. pointE += 1
  391. lustw -= 1
  392. KuE += 1
  393. jump 'markfightE1'
  394. end
  395. if Aktiv < Passiv:
  396. point += 1
  397. Kz += 1
  398. stoper = 0
  399. jump 'markfightE3'
  400. end
  401. else
  402. jump 'markRoundEnd'
  403. end
  404. end
  405. if stoper >= 3:
  406. pointE += 3
  407. jump 'markRoundStop'
  408. end
  409. :markfightE2
  410. koef = 85
  411. koefE = 100
  412. rMin -= 1
  413. stoper += 1
  414. if endur <= 0 or lustw <= 0:jump 'markSubLoss'
  415. if endurE <= 0 or lustwE <= 0:jump 'markSubWin'
  416. if stoper < 3:
  417. if rMin > 0:
  418. dynamic $uderdinE
  419. if Aktiv > Passiv:
  420. pointE += 1
  421. KuE += 1
  422. stoper = 0
  423. jump 'markfightE1'
  424. end
  425. if Aktiv < Passiv:
  426. point += 1
  427. Kz += 1
  428. stoper = 0
  429. jump 'markfightE3'
  430. end
  431. if Aktiv = Passiv:jump 'markfightE2'
  432. else
  433. jump 'markRoundEnd'
  434. end
  435. end
  436. if stoper >= 3:
  437. point += 1
  438. jump 'markRoundStop'
  439. end
  440. :markfightE3
  441. koef = 100
  442. koefE = 100
  443. rMin -= 1
  444. stoper += 1
  445. if endur <= 0 or lustw <= 0:jump 'markSubLoss'
  446. if endurE <= 0 or lustwE <= 0:jump 'markSubWin'
  447. if stoper < 3:
  448. if rMin > 0:
  449. deystrand = rand(0 ,1)
  450. if deystrand = 0:
  451. dynamic $uderdinE
  452. if Aktiv > Passiv:
  453. pointE += 1
  454. KuE += 1
  455. stoper = 0
  456. jump 'markfightE1'
  457. end
  458. if Aktiv <= Passiv:
  459. point += 1
  460. Kz += 1
  461. jump 'markRoundStop'
  462. end
  463. end
  464. if deystrand = 1:
  465. dynamic $brosdinE
  466. if Aktiv > Passiv:
  467. pointE += 2
  468. lustwE += 1
  469. KbE += 1
  470. stoper = 0
  471. jump 'markfightE2'
  472. end
  473. if Aktiv <= Passiv:
  474. point += 1
  475. Kz += 1
  476. jump 'markRoundStop'
  477. end
  478. end
  479. else
  480. jump 'markRoundEnd'
  481. end
  482. end
  483. if stoper >= 3:
  484. point += 1
  485. jump 'markRoundStop'
  486. end
  487. :markRoundStop
  488. stoper = 0
  489. if crouch = 1 and croonce = 0:crouch = 0 & croonce = 1
  490. if crouch = 0 and croonce = 0:crouch = 1 & croonce = 1
  491. croonce = 0
  492. jump 'markFightCrouch'
  493. :markSubWin
  494. resultFight = 0
  495. jump 'markEndFight'
  496. :markSubLoss
  497. resultFight = 4
  498. jump ' markEndFight'
  499. :markRoundEnd
  500. round += 1
  501. rMin = 8
  502. stoper = 0
  503. if round = Formula + 1:
  504. if point > pointE:resultFight = 1
  505. if point<pointE:resultFight=3
  506. if point=pointE:resultFight=2
  507. jump 'markEndFight'
  508. end
  509. if round < Formula + 1:
  510. endur += lustw * 25 / 100
  511. endurE += lustwe *25 / 100
  512. if crouch = 1 and croonce = 0:crouch = 0 & croonce = 1
  513. if crouch = 0 and croonce = 0:crouch = 1 & croonce = 1
  514. croonce = 0
  515. jump 'markFightCrouch'
  516. end
  517. :markEndFight
  518. if NoView = 0:'<<$nameA>> <<win[a]>>-<<loss[a]>>-<<draw[a]>> <<SubWin[a]>>/<<SubLoss[a]>>'
  519. if NoView = 0:'<<$nameE>> <<win[i]>>-<<loss[i]>>-<<draw[i]>> <<SubWin[i]>>/<<SubLoss[i]>>'
  520. if NoView = 0:'<<point>> points <<$nameA>> <<Ku>> Activism in the attacks retention, <<Kb>> Activism in the attacks throws, <<Kz>> successful defenses.'
  521. if NoView = 0:'<<pointE>> points <<$nameE>> <<KuE>> Activism in the attacks retention, <<KbE>> Activism in the attacks throws, <<KzE>> successful defenses.'
  522. if resultFight = 0:
  523. wipo[a] += 2
  524. wipo[i] -= 1
  525. rating[a] += 2
  526. rating[i] -= 5
  527. strand = rand(0, 2)
  528. if strand = 0:musle[a] += 10
  529. if strand = 1:flex[a] += 10
  530. if strand = 2:stamina[a] += 10
  531. tehrand = rand(0, 2)
  532. if tehrand = 0:Bteh[a] += 10
  533. if tehrand = 1:Uteh[a] += 10
  534. if tehrand = 2:Zteh[a] += 10
  535. if NoView = 0:'<b><<$nameA>> won surrender</b>'
  536. $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>'
  537. $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>'
  538. win[a] += 1
  539. SubWin[a] += 1
  540. loss[i] += 1
  541. SubLoss[i] += 1
  542. end
  543. if resultFight = 1:
  544. wipo[a] += 1
  545. rating[a] += 1
  546. rating[i] -= 3
  547. strand = rand(0, 2)
  548. if strand = 0:musle[a] += 10
  549. if strand = 1:flex[a] += 10
  550. if strand = 2:stamina[a] += 10
  551. tehrand = rand(0, 2)
  552. if tehrand = 0:Bteh[a] += 10
  553. if tehrand = 1:Uteh[a] += 10
  554. if tehrand = 2:Zteh[a] += 10
  555. if NoView = 0:'<b><<$nameA>> won</b>'
  556. $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>'
  557. $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>'
  558. win[a] += 1
  559. loss[i] += 1
  560. end
  561. if resultFight = 2:
  562. rating[a] -= 1
  563. rating[i] -= 1
  564. if NoView = 0:'<b>The result of the fight a draw</b>'
  565. $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>'
  566. $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>'
  567. draw[a] += 1
  568. draw[i] += 1
  569. end
  570. if resultFight = 3:
  571. wipo[i] += 1
  572. rating[a] -= 3
  573. rating[i] += 1
  574. strand = rand(0, 2)
  575. if strand = 0:musle[i] += 10
  576. if strand = 1:flex[i] += 10
  577. if strand = 2:stamina[i] += 10
  578. tehrand = rand(0, 2)
  579. if tehrand = 0:Bteh[i] += 10
  580. if tehrand = 1:Uteh[i] += 10
  581. if tehrand = 2:Zteh[i] += 10
  582. if NoView = 0:'<b><<$nameE>> won</b>'
  583. $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>'
  584. $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>'
  585. win[i] += 1
  586. loss[a] += 1
  587. end
  588. if resultFight = 4:
  589. wipo[i] += 2
  590. wipo[a] -= 1
  591. rating[a] -= 5
  592. rating[i] += 2
  593. strand = rand(0, 2)
  594. if strand = 0:musle[i] += 10
  595. if strand = 1:flex[i] += 10
  596. if strand = 2:stamina[i] += 10
  597. tehrand = rand(0, 2)
  598. if tehrand = 0:Bteh[i] += 10
  599. if tehrand = 1:Uteh[i] += 10
  600. if tehrand = 2:Zteh[i] += 10
  601. if NoView = 0:'<b><<$nameE>> won surrender</b>'
  602. $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>'
  603. $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>'
  604. win[i] += 1
  605. SubWin[i] += 1
  606. loss[a] += 1
  607. SubLoss[a] += 1
  608. end
  609. --- Autofight ---------------