432_KGDparty 8.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261
  1. # KGDparty
  2. <<<<<<< 432_KGDparty
  3. 'In part 2 of the line, front, protects a back. Each maximum of 3 fighter.'
  4. ''
  5. if KGDrazm = 0:
  6. 'Hero. Level <<KGDlvl>>Life <<KGDHP>>damage <<KGDdam>>. <a href="exec:KGDrazm = 1 & KGDsubsp = 1 & dynamic $kgddin ">Post</a>'
  7. else
  8. 'Hero. Level <<KGDlvl>>Life <<KGDHP>>Done <<KGDdam>>'
  9. end
  10. if KGDsput2 > 0:
  11. if KGDrazm2 = 0:
  12. '<<$KGDname2>>. Level <<KGDlvl2>>Life <<KGDHP2>>, damage <<KGDdam2>>. <a href="exec:KGDrazm2 = 1 & KGDsubsp = 2 & dynamic $kgddin ">Place</a>'
  13. else
  14. '<<$KGDname2>>. Level <<KGDlvl2>>Life <<KGDHP2>>Done <<KGDdam2>>'
  15. end
  16. end
  17. if KGDsput3 > 0:
  18. if KGDrazm3 = 0:
  19. '<<$KGDname3>>. Level <<KGDlvl3>>Life <<KGDHP3>>, damage <<KGDdam3>>. <a href="exec:KGDrazm3 = 1 & KGDsubsp = 3 & dynamic $kgddin ">Place</a>'
  20. else
  21. '<<$KGDname3>>. Level <<KGDlvl3>>Life <<KGDHP3>>Done <<KGDdam3>>'
  22. end
  23. end
  24. if KGDsput4 > 0:
  25. if KGDrazm4 = 0:
  26. '<<$KGDname4>>. Level <<KGDlvl4>>Life <<KGDHP4>>, damage <<KGDdam4>>. <a href="exec:KGDrazm4 = 1 & KGDsubsp = 4 & dynamic $kgddin ">Place</a>'
  27. else
  28. '<<$KGDname4>>. Level <<KGDlvl4>>Life <<KGDHP4>>Done <<KGDdam4>>'
  29. end
  30. end
  31. if KGDsput5 > 0:
  32. if KGDrazm5 = 0:
  33. '<<$KGDname5>>. Level <<KGDlvl5>>Life <<KGDHP5>>, damage <<KGDdam5>>. <a href="exec:KGDrazm5 = 1 & KGDsubsp = 5 & dynamic $kgddin ">Place</a>'
  34. else
  35. '<<$KGDname5>>. Level <<KGDlvl5>>Life <<KGDHP5>>Done <<KGDdam5>>'
  36. end
  37. end
  38. if KGDsput6 > 0:
  39. if KGDrazm6 = 0:
  40. '<<$KGDname6>>. Level <<KGDlvl6>>Life <<KGDHP6>>, damage <<KGDdam6>>. <a href="exec:KGDrazm6 = 1 & KGDsubsp = 6 & dynamic $kgddin ">Place</a>'
  41. else
  42. '<<$KGDname6>>. Level <<KGDlvl6>>Life <<KGDHP6>>Done <<KGDdam6>>'
  43. end
  44. =======
  45. 'The party 2 lines, lobby, protects a back. Each maximum 3 fighter.'
  46. ''
  47. if KGDrazm=0:
  48. 'hero. level <<KGDlvl>>, life <<KGDHP>>, damage <<KGDdam>>. <a href="exec:KGDrazm=1&KGDsubsp=1&dynamic $kgddin ">locate</a>'
  49. else
  50. 'hero. level <<KGDlvl>>, life <<KGDHP>>, damage <<KGDdam>>'
  51. end
  52. if KGDsput2>0:
  53. if KGDrazm2=0:
  54. '<<$KGDname2>>. level <<KGDlvl2>>, life <<KGDHP2>>, damage <<KGDdam2>>. <a href="exec:KGDrazm2=1&KGDsubsp=2&dynamic $kgddin ">locate</a>'
  55. else
  56. '<<$KGDname2>>. level <<KGDlvl2>>, life <<KGDHP2>>, damage <<KGDdam2>>'
  57. end
  58. end
  59. if KGDsput3>0:
  60. if KGDrazm3=0:
  61. '<<$KGDname3>>. level <<KGDlvl3>>, life <<KGDHP3>>, damage <<KGDdam3>>. <a href="exec:KGDrazm3=1&KGDsubsp=3&dynamic $kgddin ">locate</a>'
  62. else
  63. '<<$KGDname3>>. level <<KGDlvl3>>, life <<KGDHP3>>, damage <<KGDdam3>>'
  64. end
  65. end
  66. if KGDsput4>0:
  67. if KGDrazm4=0:
  68. '<<$KGDname4>>. level <<KGDlvl4>>, life <<KGDHP4>>, damage <<KGDdam4>>. <a href="exec:KGDrazm4=1&KGDsubsp=4&dynamic $kgddin ">locate</a>'
  69. else
  70. '<<$KGDname4>>. level <<KGDlvl4>>, life <<KGDHP4>>, damage <<KGDdam4>>'
  71. end
  72. end
  73. if KGDsput5>0:
  74. if KGDrazm5=0:
  75. '<<$KGDname5>>. level <<KGDlvl5>>, life <<KGDHP5>>, damage <<KGDdam5>>. <a href="exec:KGDrazm5=1&KGDsubsp=5&dynamic $kgddin ">locate</a>'
  76. else
  77. '<<$KGDname5>>. level <<KGDlvl5>>, life <<KGDHP5>>, damage <<KGDdam5>>'
  78. end
  79. end
  80. if KGDsput6>0:
  81. if KGDrazm6=0:
  82. '<<$KGDname6>>. level <<KGDlvl6>>, life <<KGDHP6>>, damage <<KGDdam6>>. <a href="exec:KGDrazm6=1&KGDsubsp=6&dynamic $kgddin ">locate</a>'
  83. else
  84. '<<$KGDname6>>. level <<KGDlvl6>>, life <<KGDHP6>>, damage <<KGDdam6>>'
  85. end
  86. >>>>>>> 432_KGDparty
  87. end
  88. <<<<<<< 432_KGDparty
  89. 'First line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
  90. 'Second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'
  91. $kgddin = {
  92. cls
  93. 'First line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
  94. 'Second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'
  95. if kgdplace = 0:
  96. act '1st place':
  97. kgdplace = 1
  98. if KGDsubsp = 1:$kgdplace = 'Hero'&KGDsput = 1
  99. if KGDsubsp = 2:$kgdplace = $KGDname2 & KGDsput2 = 1
  100. if KGDsubsp = 3:$kgdplace = $KGDname3 & KGDsput3 = 1
  101. if KGDsubsp = 4:$kgdplace = $KGDname4 & KGDsput4 = 1
  102. if KGDsubsp = 5:$kgdplace = $KGDname5 & KGDsput5 = 1
  103. if KGDsubsp = 6:$kgdplace = $KGDname6 & KGDsput6 = 1
  104. gt $curloc
  105. end
  106. end
  107. if kgdplace2 = 0:
  108. act '2nd place':
  109. kgdplace2 = 1
  110. if KGDsubsp = 1:$kgdplace2 = 'Hero'&KGDsput = 2
  111. if KGDsubsp = 2:$kgdplace2 = $KGDname2 & KGDsput2 = 2
  112. if KGDsubsp = 3:$kgdplace2 = $KGDname3 & KGDsput3 = 2
  113. if KGDsubsp = 4:$kgdplace2 = $KGDname4 & KGDsput4 = 2
  114. if KGDsubsp = 5:$kgdplace2 = $KGDname5 & KGDsput5 = 2
  115. if KGDsubsp = 6:$kgdplace2 = $KGDname6 & KGDsput6 = 2
  116. gt $curloc
  117. end
  118. end
  119. if kgdplace3 = 0:
  120. act '3rd place':
  121. kgdplace3 = 1
  122. if KGDsubsp = 1:$kgdplace3 = 'Hero'&KGDsput = 3
  123. if KGDsubsp = 2:$kgdplace3 = $KGDname2 & KGDsput2 = 3
  124. if KGDsubsp = 3:$kgdplace3 = $KGDname3 & KGDsput3 = 3
  125. if KGDsubsp = 4:$kgdplace3 = $KGDname4 & KGDsput4 = 3
  126. if KGDsubsp = 5:$kgdplace3 = $KGDname5 & KGDsput5 = 3
  127. if KGDsubsp = 6:$kgdplace3 = $KGDname6 & KGDsput6 = 3
  128. gt $curloc
  129. end
  130. end
  131. if kgdplace4 = 0:
  132. act '4th place':
  133. kgdplace4 = 1
  134. if KGDsubsp = 1:$kgdplace4 = 'Hero'&KGDsput = 4
  135. if KGDsubsp = 2:$kgdplace4 = $KGDname2 & KGDsput2 = 4
  136. if KGDsubsp = 3:$kgdplace4 = $KGDname3 & KGDsput3 = 4
  137. if KGDsubsp = 4:$kgdplace4 = $KGDname4 & KGDsput4 = 4
  138. if KGDsubsp = 5:$kgdplace4 = $KGDname5 & KGDsput5 = 4
  139. if KGDsubsp = 6:$kgdplace4 = $KGDname6 & KGDsput6 = 4
  140. gt $curloc
  141. end
  142. end
  143. if kgdplace5 = 0:
  144. act '5th place':
  145. kgdplace5 = 1
  146. if KGDsubsp = 1:$kgdplace5 = 'Hero'&KGDsput = 5
  147. if KGDsubsp = 2:$kgdplace5 = $KGDname2 & KGDsput2 = 5
  148. if KGDsubsp = 3:$kgdplace5 = $KGDname3 & KGDsput3 = 5
  149. if KGDsubsp = 4:$kgdplace5 = $KGDname4 & KGDsput4 = 5
  150. if KGDsubsp = 5:$kgdplace5 = $KGDname5 & KGDsput5 = 5
  151. if KGDsubsp = 6:$kgdplace5 = $KGDname6 & KGDsput6 = 5
  152. gt $curloc
  153. end
  154. end
  155. if kgdplace6 = 0:
  156. act '6th place':
  157. kgdplace6 = 1
  158. if KGDsubsp = 1:$kgdplace6 = 'Hero'&KGDsput = 6
  159. if KGDsubsp = 2:$kgdplace6 = $KGDname2 & KGDsput2 = 6
  160. if KGDsubsp = 3:$kgdplace6 = $KGDname3 & KGDsput3 = 6
  161. if KGDsubsp = 4:$kgdplace6 = $KGDname4 & KGDsput4 = 6
  162. if KGDsubsp = 5:$kgdplace6 = $KGDname5 & KGDsput5 = 6
  163. if KGDsubsp = 6:$kgdplace6 = $KGDname6 & KGDsput6 = 6
  164. gt $curloc
  165. end
  166. =======
  167. 'first Line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
  168. 'The second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'
  169. $kgddin={
  170. cls
  171. 'first Line. <<$kgdplace>> <<$kgdplace2>> <<$kgdplace3>>'
  172. 'The second line. <<$kgdplace4>> <<$kgdplace5>> <<$kgdplace6>>'
  173. if kgdplace=0:
  174. act '1place':
  175. kgdplace=1
  176. if KGDsubsp=1:$kgdplace='hero'&KGDsput=1
  177. if KGDsubsp=2:$kgdplace=$KGDname2&KGDsput2=1
  178. if KGDsubsp=3:$kgdplace=$KGDname3&KGDsput3=1
  179. if KGDsubsp=4:$kgdplace=$KGDname4&KGDsput4=1
  180. if KGDsubsp=5:$kgdplace=$KGDname5&KGDsput5=1
  181. if KGDsubsp=6:$kgdplace=$KGDname6&KGDsput6=1
  182. gt $curloc
  183. end
  184. end
  185. if kgdplace2=0:
  186. act '2place':
  187. kgdplace2=1
  188. if KGDsubsp=1:$kgdplace2='hero'&KGDsput=2
  189. if KGDsubsp=2:$kgdplace2=$KGDname2&KGDsput2=2
  190. if KGDsubsp=3:$kgdplace2=$KGDname3&KGDsput3=2
  191. if KGDsubsp=4:$kgdplace2=$KGDname4&KGDsput4=2
  192. if KGDsubsp=5:$kgdplace2=$KGDname5&KGDsput5=2
  193. if KGDsubsp=6:$kgdplace2=$KGDname6&KGDsput6=2
  194. gt $curloc
  195. end
  196. end
  197. if kgdplace3=0:
  198. act '3place':
  199. kgdplace3=1
  200. if KGDsubsp=1:$kgdplace3='hero'&KGDsput=3
  201. if KGDsubsp=2:$kgdplace3=$KGDname2&KGDsput2=3
  202. if KGDsubsp=3:$kgdplace3=$KGDname3&KGDsput3=3
  203. if KGDsubsp=4:$kgdplace3=$KGDname4&KGDsput4=3
  204. if KGDsubsp=5:$kgdplace3=$KGDname5&KGDsput5=3
  205. if KGDsubsp=6:$kgdplace3=$KGDname6&KGDsput6=3
  206. gt $curloc
  207. end
  208. end
  209. if kgdplace4=0:
  210. act '4place':
  211. kgdplace4=1
  212. if KGDsubsp=1:$kgdplace4='hero'&KGDsput=4
  213. if KGDsubsp=2:$kgdplace4=$KGDname2&KGDsput2=4
  214. if KGDsubsp=3:$kgdplace4=$KGDname3&KGDsput3=4
  215. if KGDsubsp=4:$kgdplace4=$KGDname4&KGDsput4=4
  216. if KGDsubsp=5:$kgdplace4=$KGDname5&KGDsput5=4
  217. if KGDsubsp=6:$kgdplace4=$KGDname6&KGDsput6=4
  218. gt $curloc
  219. end
  220. end
  221. if kgdplace5=0:
  222. act '5place':
  223. kgdplace5=1
  224. if KGDsubsp=1:$kgdplace5='hero'&KGDsput=5
  225. if KGDsubsp=2:$kgdplace5=$KGDname2&KGDsput2=5
  226. if KGDsubsp=3:$kgdplace5=$KGDname3&KGDsput3=5
  227. if KGDsubsp=4:$kgdplace5=$KGDname4&KGDsput4=5
  228. if KGDsubsp=5:$kgdplace5=$KGDname5&KGDsput5=5
  229. if KGDsubsp=6:$kgdplace5=$KGDname6&KGDsput6=5
  230. gt $curloc
  231. end
  232. end
  233. if kgdplace6=0:
  234. act '6place':
  235. kgdplace6=1
  236. if KGDsubsp=1:$kgdplace6='hero'&KGDsput=6
  237. if KGDsubsp=2:$kgdplace6=$KGDname2&KGDsput2=6
  238. if KGDsubsp=3:$kgdplace6=$KGDname3&KGDsput3=6
  239. if KGDsubsp=4:$kgdplace6=$KGDname4&KGDsput4=6
  240. if KGDsubsp=5:$kgdplace6=$KGDname5&KGDsput5=6
  241. if KGDsubsp=6:$kgdplace6=$KGDname6&KGDsput6=6
  242. gt $curloc
  243. end
  244. >>>>>>> 432_KGDparty
  245. end
  246. }
  247. <<<<<<< 432_KGDparty
  248. act 'Leave': gt 'KGDgame'
  249. =======
  250. act 'Get_Away':gt'KGDgame'
  251. >>>>>>> 432_KGDparty
  252. --- KGDparty ---------------------------------