Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- dialog Leagueaaa {
- title "League Rankings Dialog"
- size -1 -1 229 172
- option dbu
- box "Stage 1", 1, 1 1 81 114
- edit "Team 1", 2, 3 10 40 10
- edit "Team 2", 3, 3 21 40 10
- edit "Team 3", 4, 3 34 40 10
- edit "Team 4", 5, 3 45 40 10
- edit "Team 5", 6, 3 58 40 10
- edit "Team 6", 7, 3 69 40 10
- edit "Team 7", 8, 3 82 40 10
- edit "Team 8", 9, 3 93 40 10
- edit "Winners 1/2", 10, 84 15 40 10
- edit "Winners 3/4", 11, 84 39 40 10
- edit "Winners 5/6", 12, 84 63 40 10
- edit "Winners 7/8", 13, 84 87 40 10
- edit "Winners S.F", 14, 144 75 40 10
- edit "Winners S.F", 15, 144 27 40 10
- edit "Final Winners", 16, 187 50 40 10
- button "won", 17, 43 11 16 8
- button "won", 18, 43 22 16 8
- button "won", 19, 43 35 16 8
- button "won", 20, 43 46 16 8
- button "won", 21, 43 59 16 8
- button "won", 22, 43 70 16 8
- button "won", 23, 43 83 16 8
- button "won", 24, 43 94 16 8
- button "won", 25, 124 16 16 8
- button "won", 26, 124 40 16 8
- button "won", 27, 124 64 16 8
- button "won", 28, 124 88 16 8
- button "won", 29, 145 37 16 8
- button "won", 30, 145 85 16 8
- edit "", 31, 205 39 22 10
- text "vNum:", 32, 188 40 16 8
- text "Score:", 33, 62 13 17 8
- edit "", 34, 60 21 21 10
- text "Score:", 35, 62 37 17 8
- text "Score:", 36, 62 61 17 8
- text "Score:", 37, 62 85 17 8
- edit "", 38, 60 45 21 10
- edit "", 39, 60 69 21 10
- edit "", 40, 60 93 21 10
- button "Start Stage 1!", 41, 2 103 79 11
- box "Semi Finals", 42, 82 1 60 114
- text "Score:", 43, 86 28 17 8
- text "Score:", 44, 86 76 17 8
- edit "", 45, 103 27 21 10
- edit "", 46, 103 75 21 10
- button "Start Semi Finals", 47, 83 103 58 11
- box "Final", 48, 142 1 44 114
- text "Score:", 49, 145 51 17 8
- edit "", 50, 163 50 21 10
- button "Close", 51, 191 159 37 12, ok cancel
- button "Start Final", 52, 143 103 42 11
- button "Set Channel", 53, 78 159 37 12
- button "Start New", 54, 2 159 37 12
- button "End League", 55, 40 159 37 12
- box "Clans Add/Remove/Change Rost", 56, 1 116 226 42
- text "Clan name:", 57, 3 125 28 8
- edit "", 58, 33 124 76 10
- text "Roster:", 59, 12 136 20 8
- edit "", 60, 33 135 192 10
- button "Add Clan", 61, 111 123 37 10
- button "Remove Clan", 62, 149 123 37 10
- button "Change Rost", 63, 187 123 37 10
- text "Subs:", 64, 16 147 16 8
- edit "", 65, 33 146 50 10
- }
- menu * {
- Rankings: dialog -m Leagueaaa Leagueaaa
- }
- on *:dialog:Leagueaaa:*:*: {
- if ($devent == sclick) {
- 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) }
- 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) }
- 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) }
- 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) }
- 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) }
- 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) }
- 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) }
- 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) }
- if ($did == 61) && (%League.on) && (%Clans.num == 8) { echo -a 4,1League is Full! }
- 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) $+ .) }
- 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) $+ .) }
- 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) $+ .) }
- 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) $+ .) }
- 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) $+ .) }
- 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) $+ .) }
- 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) $+ .) }
- 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) $+ .) }
- 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) $+ .) }
- 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) $+ .) }
- 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) $+ .) }
- 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) $+ .) }
- 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) }
- 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) }
- 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 }
- 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 }
- 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 }
- if ($did == 53) { set %League.Channel $??="New League Channel:" }
- 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!! }
- 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 }
- }
- if ($devent == init) {
- if (%CLANT0) { did -ra $dname 2 %CLANT0 }
- if (%CLANT1) { did -ra $dname 3 %CLANT1 }
- if (%CLANT2) { did -ra $dname 4 %CLANT2 }
- if (%CLANT3) { did -ra $dname 5 %CLANT3 }
- if (%CLANT4) { did -ra $dname 6 %CLANT4 }
- if (%CLANT5) { did -ra $dname 7 %CLANT5 }
- if (%CLANT6) { did -ra $dname 8 %CLANT6 }
- if (%CLANT7) { did -ra $dname 9 %CLANT7 }
- if (%S1.12.S) { did -ra $dname 34 %S1.12.S }
- if (%S1.34.S) { did -ra $dname 38 %S1.34.S }
- if (%S1.56.S) { did -ra $dname 39 %S1.56.S }
- if (%S1.78.S) { did -ra $dname 40 %S1.78.S }
- if (%S2.12.S) { did -ra $dname 45 %S2.12.S }
- if (%S2.34.S) { did -ra $dname 46 %S2.34.S }
- if (%S3.12.S) { did -ra $dname 50 %S3.12.S }
- if (%win.11) { did -ra $dname 10 %win.11 }
- if (%win.12) { did -ra $dname 11 %win.12 }
- if (%win.13) { did -ra $dname 12 %win.13 }
- if (%win.14) { did -ra $dname 13 %win.14 }
- if (%win.21) { did -ra $dname 15 %win.21 }
- if (%win.22) { did -ra $dname 14 %win.22 }
- if (%win.31) { did -ra $dname 16 %win.31 }
- did -b $dname 2,3,4,5,6,7,8,9,10,11,12,13,14,15,16
- }
- }
- on *:text:*:%League.Channel: {
- if ($1 == !commands) || ($1 == !cmds) || ($1 == !Help) { msg %League.channel Commands Are: !Status, !Roster [Clan], !Clans/!Teams }
- if ($1 == !Roster) && ($2) && ($readini(League.ini,Clans,$2)) { msg %League.channel $readini(League.ini,Clans,$2) }
- if ($1 == !clans) || ($1 == !Teams) { msg %League.channel Clans Are: %League.Clans }
- if ($1 == !Status) && (%League.on) { msg %League.Channel %League.on $+ , Remaining Teams: %League.Clans }
- elseif ($1 == !status) && (!%League.on) { msg %League.Channel NightCup is OFFLINE Wait For NEW ONE! Last NightCup Winners: %NC.Win }
- }
Add Comment
Please, Sign In to add comment