1
1

KGDparty 4.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153
  1. # KGDparty
  2. 'In part 2 of the line, front, protects a back. Each maximum of 3 fighter.'
  3. ''
  4. if KGDrazm = 0:
  5. 'Hero. Level <<KGDlvl>>Life <<KGDHP>>damage <<KGDdam>>. <a href="exec:KGDrazm = 1 & KGDsubsp = 1 & dynamic $kgddin">Post</a>'
  6. else
  7. 'Hero. Level <<KGDlvl>>Life <<KGDHP>>Done <<KGDdam>>'
  8. end
  9. if KGDsput2 > 0:
  10. if KGDrazm2 = 0:
  11. '<<$KGDname2>>. Level <<KGDlvl2>>Life <<KGDHP2>>, damage <<KGDdam2>>. <a href="exec:KGDrazm2 = 1 & KGDsubsp = 2 & dynamic $kgddin">Place</a>'
  12. else
  13. '<<$KGDname2>>. Level <<KGDlvl2>>Life <<KGDHP2>>Done <<KGDdam2>>'
  14. end
  15. end
  16. if KGDsput3 > 0:
  17. if KGDrazm3 = 0:
  18. '<<$KGDname3>>. Level <<KGDlvl3>>Life <<KGDHP3>>, damage <<KGDdam3>>. <a href="exec:KGDrazm3 = 1 & KGDsubsp = 3 & dynamic $kgddin">Place</a>'
  19. else
  20. '<<$KGDname3>>. Level <<KGDlvl3>>Life <<KGDHP3>>Done <<KGDdam3>>'
  21. end
  22. end
  23. if KGDsput4 > 0:
  24. if KGDrazm4 = 0:
  25. '<<$KGDname4>>. Level <<KGDlvl4>>Life <<KGDHP4>>, damage <<KGDdam4>>. <a href="exec:KGDrazm4 = 1 & KGDsubsp = 4 & dynamic $kgddin">Place</a>'
  26. else
  27. '<<$KGDname4>>. Level <<KGDlvl4>>Life <<KGDHP4>>Done <<KGDdam4>>'
  28. end
  29. end
  30. if KGDsput5 > 0:
  31. if KGDrazm5 = 0:
  32. '<<$KGDname5>>. Level <<KGDlvl5>>Life <<KGDHP5>>, damage <<KGDdam5>>. <a href="exec:KGDrazm5 = 1 & KGDsubsp = 5 & dynamic $kgddin">Place</a>'
  33. else
  34. '<<$KGDname5>>. Level <<KGDlvl5>>Life <<KGDHP5>>Done <<KGDdam5>>'
  35. end
  36. end
  37. if KGDsput6 > 0:
  38. if KGDrazm6 = 0:
  39. '<<$KGDname6>>. Level <<KGDlvl6>>Life <<KGDHP6>>, damage <<KGDdam6>>. <a href="exec:KGDrazm6 = 1 & KGDsubsp = 6 & dynamic $kgddin">Place</a>'
  40. else
  41. '<<$KGDname6>>. Level <<KGDlvl6>>Life <<KGDHP6>>Done <<KGDdam6>>'
  42. end
  43. end
  44. 'First line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
  45. 'Second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'
  46. $kgddin = {
  47. cls
  48. 'First line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
  49. 'Second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'
  50. if kgdplace = 0:
  51. act '1st place':
  52. kgdplace = 1
  53. if KGDsubsp = 1:$kgdplace = 'Hero' & KGDsput = 1
  54. if KGDsubsp = 2:$kgdplace = $KGDname2 & KGDsput2 = 1
  55. if KGDsubsp = 3:$kgdplace = $KGDname3 & KGDsput3 = 1
  56. if KGDsubsp = 4:$kgdplace = $KGDname4 & KGDsput4 = 1
  57. if KGDsubsp = 5:$kgdplace = $KGDname5 & KGDsput5 = 1
  58. if KGDsubsp = 6:$kgdplace = $KGDname6 & KGDsput6 = 1
  59. gt $curloc
  60. end
  61. end
  62. if kgdplace2 = 0:
  63. act '2nd place':
  64. kgdplace2 = 1
  65. if KGDsubsp = 1:$kgdplace2 = 'Hero' & KGDsput = 2
  66. if KGDsubsp = 2:$kgdplace2 = $KGDname2 & KGDsput2 = 2
  67. if KGDsubsp = 3:$kgdplace2 = $KGDname3 & KGDsput3 = 2
  68. if KGDsubsp = 4:$kgdplace2 = $KGDname4 & KGDsput4 = 2
  69. if KGDsubsp = 5:$kgdplace2 = $KGDname5 & KGDsput5 = 2
  70. if KGDsubsp = 6:$kgdplace2 = $KGDname6 & KGDsput6 = 2
  71. gt $curloc
  72. end
  73. end
  74. if kgdplace3 = 0:
  75. act '3rd place':
  76. kgdplace3 = 1
  77. if KGDsubsp = 1:$kgdplace3 = 'Hero' & KGDsput = 3
  78. if KGDsubsp = 2:$kgdplace3 = $KGDname2 & KGDsput2 = 3
  79. if KGDsubsp = 3:$kgdplace3 = $KGDname3 & KGDsput3 = 3
  80. if KGDsubsp = 4:$kgdplace3 = $KGDname4 & KGDsput4 = 3
  81. if KGDsubsp = 5:$kgdplace3 = $KGDname5 & KGDsput5 = 3
  82. if KGDsubsp = 6:$kgdplace3 = $KGDname6 & KGDsput6 = 3
  83. gt $curloc
  84. end
  85. end
  86. if kgdplace4 = 0:
  87. act '4th place':
  88. kgdplace4 = 1
  89. if KGDsubsp = 1:$kgdplace4 = 'Hero' & KGDsput = 4
  90. if KGDsubsp = 2:$kgdplace4 = $KGDname2 & KGDsput2 = 4
  91. if KGDsubsp = 3:$kgdplace4 = $KGDname3 & KGDsput3 = 4
  92. if KGDsubsp = 4:$kgdplace4 = $KGDname4 & KGDsput4 = 4
  93. if KGDsubsp = 5:$kgdplace4 = $KGDname5 & KGDsput5 = 4
  94. if KGDsubsp = 6:$kgdplace4 = $KGDname6 & KGDsput6 = 4
  95. gt $curloc
  96. end
  97. end
  98. if kgdplace5 = 0:
  99. act '5th place':
  100. kgdplace5 = 1
  101. if KGDsubsp = 1:$kgdplace5 = 'Hero' & KGDsput = 5
  102. if KGDsubsp = 2:$kgdplace5 = $KGDname2 & KGDsput2 = 5
  103. if KGDsubsp = 3:$kgdplace5 = $KGDname3 & KGDsput3 = 5
  104. if KGDsubsp = 4:$kgdplace5 = $KGDname4 & KGDsput4 = 5
  105. if KGDsubsp = 5:$kgdplace5 = $KGDname5 & KGDsput5 = 5
  106. if KGDsubsp = 6:$kgdplace5 = $KGDname6 & KGDsput6 = 5
  107. gt $curloc
  108. end
  109. end
  110. if kgdplace6 = 0:
  111. act '6th place':
  112. kgdplace6 = 1
  113. if KGDsubsp = 1:$kgdplace6 = 'Hero' & KGDsput = 6
  114. if KGDsubsp = 2:$kgdplace6 = $KGDname2 & KGDsput2 = 6
  115. if KGDsubsp = 3:$kgdplace6 = $KGDname3 & KGDsput3 = 6
  116. if KGDsubsp = 4:$kgdplace6 = $KGDname4 & KGDsput4 = 6
  117. if KGDsubsp = 5:$kgdplace6 = $KGDname5 & KGDsput5 = 6
  118. if KGDsubsp = 6:$kgdplace6 = $KGDname6 & KGDsput6 = 6
  119. gt $curloc
  120. end
  121. end
  122. }
  123. act 'Leave':gt 'KGDgame'
  124. --- KGDparty ---------------------------------