Guest User

Untitled

a guest
Jan 22nd, 2018
89
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.96 KB | None | 0 0
  1. dialog Leagueaaa {
  2. title "League Rankings Dialog"
  3. size -1 -1 229 172
  4. option dbu
  5. box "Stage 1", 1, 1 1 81 114
  6. edit "Team 1", 2, 3 10 40 10
  7. edit "Team 2", 3, 3 21 40 10
  8. edit "Team 3", 4, 3 34 40 10
  9. edit "Team 4", 5, 3 45 40 10
  10. edit "Team 5", 6, 3 58 40 10
  11. edit "Team 6", 7, 3 69 40 10
  12. edit "Team 7", 8, 3 82 40 10
  13. edit "Team 8", 9, 3 93 40 10
  14. edit "Winners 1/2", 10, 84 15 40 10
  15. edit "Winners 3/4", 11, 84 39 40 10
  16. edit "Winners 5/6", 12, 84 63 40 10
  17. edit "Winners 7/8", 13, 84 87 40 10
  18. edit "Winners S.F", 14, 144 75 40 10
  19. edit "Winners S.F", 15, 144 27 40 10
  20. edit "Final Winners", 16, 187 50 40 10
  21. button "won", 17, 43 11 16 8
  22. button "won", 18, 43 22 16 8
  23. button "won", 19, 43 35 16 8
  24. button "won", 20, 43 46 16 8
  25. button "won", 21, 43 59 16 8
  26. button "won", 22, 43 70 16 8
  27. button "won", 23, 43 83 16 8
  28. button "won", 24, 43 94 16 8
  29. button "won", 25, 124 16 16 8
  30. button "won", 26, 124 40 16 8
  31. button "won", 27, 124 64 16 8
  32. button "won", 28, 124 88 16 8
  33. button "won", 29, 145 37 16 8
  34. button "won", 30, 145 85 16 8
  35. edit "", 31, 205 39 22 10
  36. text "vNum:", 32, 188 40 16 8
  37. text "Score:", 33, 62 13 17 8
  38. edit "", 34, 60 21 21 10
  39. text "Score:", 35, 62 37 17 8
  40. text "Score:", 36, 62 61 17 8
  41. text "Score:", 37, 62 85 17 8
  42. edit "", 38, 60 45 21 10
  43. edit "", 39, 60 69 21 10
  44. edit "", 40, 60 93 21 10
  45. button "Start Stage 1!", 41, 2 103 79 11
  46. box "Semi Finals", 42, 82 1 60 114
  47. text "Score:", 43, 86 28 17 8
  48. text "Score:", 44, 86 76 17 8
  49. edit "", 45, 103 27 21 10
  50. edit "", 46, 103 75 21 10
  51. button "Start Semi Finals", 47, 83 103 58 11
  52. box "Final", 48, 142 1 44 114
  53. text "Score:", 49, 145 51 17 8
  54. edit "", 50, 163 50 21 10
  55. button "Close", 51, 191 159 37 12, ok cancel
  56. button "Start Final", 52, 143 103 42 11
  57. button "Set Channel", 53, 78 159 37 12
  58. button "Start New", 54, 2 159 37 12
  59. button "End League", 55, 40 159 37 12
  60. box "Clans Add/Remove/Change Rost", 56, 1 116 226 42
  61. text "Clan name:", 57, 3 125 28 8
  62. edit "", 58, 33 124 76 10
  63. text "Roster:", 59, 12 136 20 8
  64. edit "", 60, 33 135 192 10
  65. button "Add Clan", 61, 111 123 37 10
  66. button "Remove Clan", 62, 149 123 37 10
  67. button "Change Rost", 63, 187 123 37 10
  68. text "Subs:", 64, 16 147 16 8
  69. edit "", 65, 33 146 50 10
  70. }
  71.  
  72. menu * {
  73. Rankings: dialog -m Leagueaaa Leagueaaa
  74. }
  75. on *:dialog:Leagueaaa:*:*: {
  76. if ($devent == sclick) {
  77. if ($did == 61) && (%League.on) && (%Clans.num == 0) { writeini League.ini Clans $did(58) $did(58) Roster is $did(60) . Subs Are $did(65) | set %league.clans %League.Clans $did(58) $+ . | msg %League.channel 1st Team: $did(58) - Added To The League. Rost: $did(60) $+ . Subs: $did(65) | timer 1 1 inc %Clans.num | did -ra $dname 2 $did(58) | set %CLANT $+ %Clans.num $did(58) }
  78. if ($did == 61) && (%League.on) && (%Clans.num == 1) { writeini League.ini Clans $did(58) $did(58) Roster is $did(60) . Subs Are $did(65) | set %league.clans %League.Clans $did(58) $+ . | msg %League.channel 2nd Team: $did(58) - Added To The League. Rost: $did(60) $+ . Subs: $did(65) | timer 1 1 inc %Clans.num | did -ra $dname 3 $did(58) | set %CLANT $+ %Clans.num $did(58) }
  79. if ($did == 61) && (%League.on) && (%Clans.num == 2) { writeini League.ini Clans $did(58) $did(58) Roster is $did(60) . Subs Are $did(65) | set %league.clans %League.Clans $did(58) $+ . | msg %League.channel 3rd Team: $did(58) - Added To The League. Rost: $did(60) $+ . Subs: $did(65) | timer 1 1 inc %Clans.num | did -ra $dname 4 $did(58) | set %CLANT $+ %Clans.num $did(58) }
  80. if ($did == 61) && (%League.on) && (%Clans.num == 3) { writeini League.ini Clans $did(58) $did(58) Roster is $did(60) . Subs Are $did(65) | set %league.clans %League.Clans $did(58) $+ . | msg %League.channel 4th Team: $did(58) - Added To The League. Rost: $did(60) $+ . Subs: $did(65) | timer 1 1 inc %Clans.num | did -ra $dname 5 $did(58) | set %CLANT $+ %Clans.num $did(58) }
  81. if ($did == 61) && (%League.on) && (%Clans.num == 4) { writeini League.ini Clans $did(58) $did(58) Roster is $did(60) . Subs Are $did(65) | set %league.clans %League.Clans $did(58) $+ . | msg %League.channel 5th Team: $did(58) - Added To The League. Rost: $did(60) $+ . Subs: $did(65) | timer 1 1 inc %Clans.num | did -ra $dname 6 $did(58) | set %CLANT $+ %Clans.num $did(58) }
  82. if ($did == 61) && (%League.on) && (%Clans.num == 5) { writeini League.ini Clans $did(58) $did(58) Roster is $did(60) . Subs Are $did(65) | set %league.clans %League.Clans $did(58) $+ . | msg %League.channel 6th Team: $did(58) - Added To The League. Rost: $did(60) $+ . Subs: $did(65) | timer 1 1 inc %Clans.num | did -ra $dname 7 $did(58) | set %CLANT $+ %Clans.num $did(58) }
  83. if ($did == 61) && (%League.on) && (%Clans.num == 6) { writeini League.ini Clans $did(58) $did(58) Roster is $did(60) . Subs Are $did(65) | set %league.clans %League.Clans $did(58) $+ . | msg %League.channel 7th Team: $did(58) - Added To The League. Rost: $did(60) $+ . Subs: $did(65) | timer 1 1 inc %Clans.num | did -ra $dname 8 $did(58) | set %CLANT $+ %Clans.num $did(58) }
  84. if ($did == 61) && (%League.on) && (%Clans.num == 7) { writeini League.ini Clans $did(58) $did(58) Roster is $did(60) . Subs Are $did(65) | set %league.clans %League.Clans $did(58) $+ . | msg %League.channel 8th Team: $did(58) - Added To The League. Rost: $did(60) $+ . Subs: $did(65) WAIT FOR MORE INFORMATION!!! | timer 1 1 inc %Clans.num | did -ra $dname 9 $did(58) | set %CLANT $+ %Clans.num $did(58) }
  85. if ($did == 61) && (%League.on) && (%Clans.num == 8) { echo -a 4,1League is Full! }
  86. if ($did == 17) && (%League.on) && ($did(34)) { set %win.11 $did(2) | msg %League.Channel 3 $did(2) won 1 $did(34) 4 $did(3) 1 $+ Good Game Teams! | set %S1.12 $did(2) | set %S1.12.S $did(34) | did -ra $dname 10 $did(2) | set %League.Clans $remove(%League.Clans,$did(3) $+ .) }
  87. if ($did == 18) && (%League.on) && ($did(34)) { set %win.11 $did(2) | msg %League.Channel 3 $did(3) won 1 $did(34) 4 $did(2) 1 $+ Good Game Teams! | set %S1.12 $did(3) | set %S1.12.S $did(34) | did -ra $dname 10 $did(3) | set %League.Clans $remove(%League.Clans,$did(2) $+ .) }
  88. if ($did == 19) && (%League.on) && ($did(38)) { set %win.12 $did(2) | msg %League.Channel 3 $did(4) won 1 $did(38) 4 $did(5) 1 $+ Good Game Teams! | set %S1.34 $did(4) | set %S1.34.S $did(38) | did -ra $dname 11 $did(4) | set %League.Clans $remove(%League.Clans,$did(5) $+ .) }
  89. if ($did == 20) && (%League.on) && ($did(38)) { set %win.12 $did(2) | msg %League.Channel 3 $did(5) won 1 $did(38) 4 $did(4) 1 $+ Good Game Teams! | set %S1.34 $did(5) | set %S1.34.S $did(38) | did -ra $dname 11 $did(5) | set %League.Clans $remove(%League.Clans,$did(4) $+ .) }
  90. if ($did == 21) && (%League.on) && ($did(39)) { set %win.13 $did(2) | msg %League.Channel 3 $did(6) won 1 $did(39) 4 $did(7) 1 $+ Good Game Teams! | set %S1.56 $did(6) | set %S1.56.S $did(39) | did -ra $dname 12 $did(6) | set %League.Clans $remove(%League.Clans,$did(7) $+ .) }
  91. if ($did == 22) && (%League.on) && ($did(39)) { set %win.13 $did(2) | msg %League.Channel 3 $did(7) won 1 $did(39) 4 $did(6) 1 $+ Good Game Teams! | set %S1.56 $did(7) | set %S1.56.S $did(39) | did -ra $dname 12 $did(7) | set %League.Clans $remove(%League.Clans,$did(6) $+ .) }
  92. if ($did == 23) && (%League.on) && ($did(40)) { set %win.14 $did(2) | msg %League.Channel 3 $did(8) won 1 $did(40) 4 $did(9) 1 $+ Good Game Teams! | set %S1.78 $did(8) | set %S1.78.S $did(40) | did -ra $dname 13 $did(8) | set %League.Clans $remove(%League.Clans,$did(9) $+ .) }
  93. if ($did == 24) && (%League.on) && ($did(40)) { set %win.14 $did(2) | msg %League.Channel 3 $did(9) won 1 $did(40) 4 $did(8) 1 $+ Good Game Teams! | set %S1.78 $did(9) | set %S1.78.S $did(40) | did -ra $dname 13 $did(9) | set %League.Clans $remove(%League.Clans,$did(8) $+ .) }
  94. if ($did == 25) && (%League.on) && ($did(45)) { set %win.21 $did(2) | msg %League.Channel 3 $did(10) won 1 $did(45) 4 $did(11) 1 $+ Good Game Teams! | set %S2.12 $did(10) | set %S2.12.S $did(45) | did -ra $dname 15 $did(10) | set %League.Clans $remove(%League.Clans,$did(11) $+ .) }
  95. if ($did == 26) && (%League.on) && ($did(45)) { set %win.21 $did(2) | msg %League.Channel 3 $did(11) won 1 $did(45) 4 $did(10) 1 $+ Good Game Teams! | set %S2.12 $did(11) | set %S2.12.S $did(45) | did -ra $dname 15 $did(11) | set %League.Clans $remove(%League.Clans,$did(10) $+ .) }
  96. if ($did == 27) && (%League.on) && ($did(46)) { set %win.22 $did(2) | msg %League.Channel 3 $did(12) won 1 $did(46) 4 $did(13) 1 $+ Good Game Teams! | set %S2.34 $did(12) | set %S2.34.S $did(46) | did -ra $dname 14 $did(12) | set %League.Clans $remove(%League.Clans,$did(13) $+ .) }
  97. if ($did == 28) && (%League.on) && ($did(46)) { set %win.22 $did(2) | msg %League.Channel 3 $did(13) won 1 $did(46) 4 $did(12) 1 $+ Good Game Teams! | set %S2.34 $did(13) | set %S2.34.S $did(46) | did -ra $dname 14 $did(13) | set %League.Clans $remove(%League.Clans,$did(12) $+ .) }
  98. if ($did == 29) && (%League.on) && ($did(50)) { set %win.31 $did(2) | msg %League.Channel 3 $did(15) won 1 $did(50) 4 $did(14) 1 $+ And won the NightCup! Good Game Teams! | set %S3.12.S $did(50) | msg %League.Channel 3 $+ $did(15) won 1 $did(50) 4 $did(14) 1 $+ And won the NightCup! Good Game Teams! | msg %League.Channel 3 $+ $did(15) won 1 $did(50) 4 $did(14) 1 $+ And won the NightCup! Good Game Teams! | set %S3.12 $did(15) | did -ra $dname 16 $did(15) | unset %League.on | set %NC.Win $did(15) }
  99. if ($did == 30) && (%League.on) && ($did(50)) { set %win.31 $did(2) | msg %League.Channel 3 $did(14) won 1 $did(50) 4 $did(15) 1 $+ And won the NightCup! Good Game Teams! | set %S3.12.S $did(50) | msg %League.Channel 3 $+ $did(14) won 1 $did(50) 4 $did(15) 1 $+ And won the NightCup! Good Game Teams! | msg %League.Channel 3 $+ $did(14) won 1 $did(50) 4 $did(15) 1 $+ And won the NightCup! Good Game Teams! | set %S3.12 $did(14) | did -ra $dname 16 $did(14) | unset %League.on | set %NC.Win $did(14) }
  100. if ($did == 41) && (%League.on) { msg %League.Channel Stage 1 Has Been Started! Teams pme with Team Name For IPASS!!! | set %League.on League is 3ON1 $+ ! Stage: 1. To See the teams use !Teams/!Clans }
  101. if ($did == 47) && (%League.on) { msg %League.Channel The Semi final Games Has Been Started! Teams pme with Team Name For IPASS!!! | set %League.on League is 3ON1 $+ ! Stage: Semi Finals. To See the teams use !Teams/!Clans }
  102. if ($did == 52) && (%League.on) { msg %League.Channel Final Game Has Been Started! Teams pme with Team Name For IPASS!!! | set %League.on League is 3ON1 $+ ! Stage: Finals. To See the teams use !Teams/!Clans }
  103. if ($did == 53) { set %League.Channel $??="New League Channel:" }
  104. if ($did == 54) { unset %League.clans | unset %CLANT* | unset %win* | set %Clans.num 0 | did -r $dname 2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,34,38,39,40,45,46,50 | msg %League.channel NightCup  $+ $did(31) Started! waiting for teams! | unset %S1.* | unset %S2.* | unset %S3.* | set %League.on League is Looking For Teams!! }
  105. if ($did == 62) && ($did(58) isin %League.Clans) { remini League.ini Clans $did(58) | msg %league.channel $did(58) Has Removed From The League. | set %league.Clans $remove(%league.Clans,$did(58) $+ .) | dec %Clans.num }
  106. }
  107. if ($devent == init) {
  108. if (%CLANT0) { did -ra $dname 2 %CLANT0 }
  109. if (%CLANT1) { did -ra $dname 3 %CLANT1 }
  110. if (%CLANT2) { did -ra $dname 4 %CLANT2 }
  111. if (%CLANT3) { did -ra $dname 5 %CLANT3 }
  112. if (%CLANT4) { did -ra $dname 6 %CLANT4 }
  113. if (%CLANT5) { did -ra $dname 7 %CLANT5 }
  114. if (%CLANT6) { did -ra $dname 8 %CLANT6 }
  115. if (%CLANT7) { did -ra $dname 9 %CLANT7 }
  116. if (%S1.12.S) { did -ra $dname 34 %S1.12.S }
  117. if (%S1.34.S) { did -ra $dname 38 %S1.34.S }
  118. if (%S1.56.S) { did -ra $dname 39 %S1.56.S }
  119. if (%S1.78.S) { did -ra $dname 40 %S1.78.S }
  120. if (%S2.12.S) { did -ra $dname 45 %S2.12.S }
  121. if (%S2.34.S) { did -ra $dname 46 %S2.34.S }
  122. if (%S3.12.S) { did -ra $dname 50 %S3.12.S }
  123. if (%win.11) { did -ra $dname 10 %win.11 }
  124. if (%win.12) { did -ra $dname 11 %win.12 }
  125. if (%win.13) { did -ra $dname 12 %win.13 }
  126. if (%win.14) { did -ra $dname 13 %win.14 }
  127. if (%win.21) { did -ra $dname 15 %win.21 }
  128. if (%win.22) { did -ra $dname 14 %win.22 }
  129. if (%win.31) { did -ra $dname 16 %win.31 }
  130. did -b $dname 2,3,4,5,6,7,8,9,10,11,12,13,14,15,16
  131. }
  132. }
  133. on *:text:*:%League.Channel: {
  134. if ($1 == !commands) || ($1 == !cmds) || ($1 == !Help) { msg %League.channel Commands Are: !Status, !Roster [Clan], !Clans/!Teams }
  135. if ($1 == !Roster) && ($2) && ($readini(League.ini,Clans,$2)) { msg %League.channel $readini(League.ini,Clans,$2) }
  136. if ($1 == !clans) || ($1 == !Teams) { msg %League.channel Clans Are: %League.Clans }
  137. if ($1 == !Status) && (%League.on) { msg %League.Channel %League.on $+ , Remaining Teams: %League.Clans }
  138. elseif ($1 == !status) && (!%League.on) { msg %League.Channel NightCup is OFFLINE Wait For NEW ONE! Last NightCup Winners: %NC.Win }
  139. }
Add Comment
Please, Sign In to add comment