502_FightE 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103
  1. # FightE
  2. $resultUderDinE = {
  3. cls
  4. if Aktiv > Passiv:
  5. pointE += 1
  6. KuE += 1
  7. '<center><img src="images/pic/fight/fu.jpg"></center>'
  8. '<<$nameE>> successfully captures you'
  9. act '...':stoper = 0 & gt 'fightE1'
  10. end
  11. if Aktiv < Passiv:
  12. point += 1
  13. Kz += 1
  14. '<center><img src="images/pic/fight/fu1.jpg"></center>'
  15. '<<$nameE>> you can not do anything and you turn.'
  16. act '...':stoper = 0 & gt 'fightE3'
  17. end
  18. if Aktiv = Passiv:
  19. '<center><img src="images/pic/fight/f.jpg"></center>'
  20. 'You have two little turns and you are struggling without success.'
  21. act '...':gt $curloc
  22. end
  23. }
  24. $resultBrosDinE = {
  25. cls
  26. if Aktiv > Passiv:
  27. pointE += 2
  28. lustwE += 1
  29. KbE += 1
  30. '<center><img src="images/pic/fight/fb.jpg"></center>'
  31. '<<$nameE>> successfully throws you'
  32. act '...':stoper = 0 & gt 'fightE2'
  33. end
  34. if Aktiv < Passiv:
  35. point += 1
  36. Kz += 1
  37. '<center><img src="images/pic/fight/fu1.jpg"></center>'
  38. '<<$nameE>> you can not do anything and you turn.'
  39. act '...':stoper = 0 & gt 'fightE3'
  40. end
  41. if Aktiv = Passiv:
  42. '<center><img src="images/pic/fight/f.jpg"></center>'
  43. 'You have two little turns and you are struggling without success.'
  44. act '...':gt $curloc
  45. end
  46. }
  47. !!You are on the bottom of the abdomen -10%
  48. !!opponent top
  49. koef = 90
  50. koefE = 100
  51. rMin -= 1
  52. stoper += 1
  53. gs 'fightStat'
  54. '<center><img src="images/pic/fight/f.jpg"></center>'
  55. 'You lie on your stomach below, and <<$nameE>> sits on you.'
  56. if endur <= 0 or lustw <= 0:gt 'SubLoss'
  57. if endurE <= 0 or lustwE <= 0:gt 'SubWin'
  58. if stoper < 3:
  59. if rMin > 0:
  60. deystrand = rand(0, 1)
  61. if deystrand = 0:
  62. dynamic $uderdinE
  63. dynamic $resultUderDinE
  64. exit
  65. end
  66. if deystrand = 1:
  67. dynamic $brosdinE
  68. dynamic $resultBrosDinE
  69. exit
  70. end
  71. else
  72. 'Refferi blows a whistle and throws you. End of round.'
  73. act 'up':gt 'RoundEnd'
  74. end
  75. end
  76. if stoper >= 3:
  77. point += 1
  78. 'Refferi blows a whistle and throws you. Time rivals to attack happened. You get one point.'
  79. act 'up':gt 'RoundStop'
  80. end
  81. --- FightE ---------------------------------