1
0

kikbox 5.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194
  1. # kikbox
  2. if $ARGS[0] = 'start':
  3. '<center><b>Round 1</b></center>'
  4. *nl
  5. '<center><img src="images/community/ring1.jpg"></center>'
  6. act 'Start Fight':
  7. gt 'kikbox', 'fight'
  8. end
  9. end
  10. if $ARGS[0] = 'fight':
  11. gs 'befKik'
  12. '<b>======================== (ROUND <<round>>) ===========================</b>'
  13. if minround = 1:'<b>the fight 0:30</b>'
  14. if minround = 2:'<b>the fight 1:00</b>'
  15. if minround = 3:'<b>the fight 1:30</b>'
  16. if minround = 4:'<b>the fight 2:00</b>'
  17. if minround = 5:'<b>the fight 2:30</b>'
  18. '<b><<$nameV>></b> Life <b><font color="red"><<healthV>></font></b>, Endurance <b><font color="green"><<staminaV>></font></b>'
  19. 'Your life <b><font color="red"><<health>></font></b>, Endurance <b><font color="green"><<stamina>></font></b>'
  20. '<b>==========================================================</b>'
  21. 'Your points <<pointKik>>Points opponent <<pointKikV>>'
  22. '<b>==========================================================</b>'
  23. gs 'initKik'
  24. if hod = 0:
  25. !!Player attacks
  26. '<font color="green">You can attack</font>'
  27. act 'Apply fast Jeb':
  28. cla
  29. set damage = rand(stren/12, stren/8)
  30. if damage <= 0:set damage = 1
  31. set koefatak = (speed + reakt + jab) * 2
  32. set koefpop = koefatak * 20 / 100
  33. set popad = rand(koefatak - koefpop, koefatak + koefpop)
  34. '<font color="green">You deal with a quick jab step forward.</font>'
  35. gs 'Kikatak', 'player'
  36. xgt 'kikbox', 'sta'
  37. end
  38. act 'Apply power punch':
  39. cla
  40. set damkoef = stren * 20 / 100
  41. set damage = rand(stren - damkoef, stren + damkoef)
  42. if damage <= 0:set damage = 1
  43. set koefatak = (speed + reakt + punch)
  44. set koefpop = koefatak * 20 / 100
  45. set popad = rand(koefatak - koefpop, koefatak + koefpop)
  46. '<font color="green">You apply a powerful punch.</font>'
  47. gs 'Kikatak', 'player'
  48. xgt 'kikbox', 'sta'
  49. end
  50. act 'Footed strike':
  51. cla
  52. set damkoef = stren * 20 / 100
  53. set damage = rand((stren - damkoef) * 3, (stren + damkoef) * 3)
  54. if damage <= 0:set damage = 1
  55. set koefatak = (speed + reakt + kik) / 2
  56. set koefpop = koefatak * 20 / 100
  57. set popad = rand(koefatak - koefpop, koefatak + koefpop)
  58. '<font color="green">You apply a kick powerful.</font>'
  59. gs 'Kikatak', 'player'
  60. xgt 'kikbox', 'sta'
  61. end
  62. end
  63. if hod = 1:
  64. !!Enemy attacks
  65. '<font color="red"><<$nameV>> attacks</font>'
  66. set tiprand = rand(0, 2)
  67. if tiprand = 0:
  68. set damage = rand(strenV / 12, strenV / 8)
  69. if damage <= 0:set damage = 1
  70. set koefatak = (speedV + reaktV + JabV) * 2
  71. set koefpop = koefatak * 20 / 100
  72. set popad = rand(koefatak - koefpop, koefatak + koefpop)
  73. '<font color="red"><<$nameV>> deals with quick jab step forward.</font>'
  74. gs 'Kikatak', 'enemy'
  75. xgt 'kikbox', 'sta'
  76. end
  77. if tiprand = 1:
  78. set damkoef = strenV * 20/100
  79. set damage = rand(strenV - damkoef, strenV + damkoef)
  80. if damage <= 0:set damage = 1
  81. set koefatak = (speedV + reaktV + punchV)
  82. set koefpop = koefatak * 20 / 100
  83. set popad = rand(koefatak - koefpop, koefatak + koefpop)
  84. '<font color="red"><<$nameV>> applies the power punch.</font>'
  85. gs 'Kikatak', 'enemy'
  86. xgt 'kikbox', 'sta'
  87. end
  88. if tiprand = 2:
  89. set damkoef = strenV * 20 / 100
  90. set damage = rand((strenV - damkoef) * 3, (strenV + damkoef) * 3)
  91. if damage <= 0:set damage = 1
  92. set koefatak = (speedV + reaktV + kikV) / 2
  93. set koefpop = koefatak * 20 / 100
  94. set popad = rand(koefatak - koefpop, koefatak + koefpop)
  95. '<font color="red"><<$nameV>> tries for a kick.</font>'
  96. gs 'Kikatak', 'enemy'
  97. xgt 'kikbox', 'sta'
  98. end
  99. end
  100. end
  101. if $ARGS[0] = 'sta':
  102. cla
  103. set ionce = 0
  104. '<b>==========================================================</b>'
  105. if minround = 1:'<b>the fight 1:00</b>'
  106. if minround = 2:'<b>the fight 1:30</b>'
  107. if minround = 3:'<b>the fight 2:00</b>'
  108. if minround = 4:'<b>the fight 2:30</b>'
  109. if minround = 5:'<b>the fight 3:00</b>'
  110. '<b>==========================================================</b>'
  111. '<b><<$nameV>></b> Life <b><font color="red"><<healthV>></font></b>, Endurance <b><font color="green"><<staminaV>></font></b>'
  112. 'Your life <b><font color="red"><<health>></font></b>, Endurance <b><font color="green"><<stamina>></font></b>'
  113. '<b>==========================================================</b>'
  114. if health <= 0:
  115. '<b><font color="red">You lost by TKO</font></b>'
  116. gt 'enderKik', 'lossKO'
  117. exit
  118. end
  119. if healthV <= 0:
  120. '<b><font color="green"><<$nameV>> lost by TKO</font></b>'
  121. gt 'enderKik', 'winKO'
  122. exit
  123. end
  124. act 'Further':gt 'kikbox', 'fight'
  125. if minround = 5:
  126. cla
  127. *clr
  128. 'Rang the gong indicating the end of the round <<round>>.'
  129. set minround = 0
  130. set round += 1
  131. act 'Back to the corner':
  132. cla
  133. *clr
  134. '<center><img src="images/community/kickboxing_corner.jpg"></center>'
  135. 'You try to rest as best as you can.'
  136. act 'Prepare':
  137. if round <= formula:
  138. cla
  139. *clr
  140. '<center><b>Round <<round>></b></center>'
  141. *nl
  142. '<center><img src="images/community/ring<<round>>.jpg"></center>'
  143. act 'In the ring':gt 'kikbox', 'fight'
  144. else
  145. if pointKik > pointKikV:
  146. gt 'enderKik', 'win'
  147. end
  148. if pointKik < pointKikV:
  149. gt 'enderKik', 'loss'
  150. end
  151. if pointKik = pointKikV:
  152. gt 'enderKik', 'draw'
  153. end
  154. end
  155. end
  156. end
  157. end
  158. end
  159. --- kikbox ---------------------------------