Advertisement
Guest User

Untitled

a guest
Jul 21st, 2017
58
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 7.21 KB | None | 0 0
  1. alias thelounge {
  2.   /join #loungestaff
  3.   /join #thelounge
  4.   echo -a 3Loading the Staff Control Center
  5.   echo -a 3Created by Mark [1052508] for #TheLounge Staff
  6.   dialog -mt thelounge thelounge
  7. }
  8. menu channel {
  9.   Control Center:/thelounge
  10. }
  11.  
  12.  
  13. dialog thelounge {
  14.   title "Staff Control Center for #TheLounge"
  15.   size -1 -1 232 276
  16.   option dbu
  17.   text "This is the Staff Control Center coded by Mark [1052508] Mail him if there are bugs.", 2, 5 5 201 10,
  18.   button "Pickpocket", 201, 16 24 37 10,
  19.   edit "-Amount-", 202, 56 24 100 10, autohs
  20.   button "Lucky Game", 203, 16 36 37 10,
  21.   button "Lucky Prize Game", 209, 56 36 56 10, autohs
  22.   button "Random Prize", 210, 115 36 47 10, autohs
  23.   button "Number Game", 218, 62 60 40 10,
  24.   button "Giveaway", 223, 105 60 30 10,
  25.   button "Rand", 224, 137 60 20 10,
  26.   button "Family Fued", 219, 16 48 37 10,
  27.   edit "-Amount of Rounds-", 220, 56 48 100 10, autohs
  28.   button "Deal or No Deal", 222, 16 60 43 10,
  29.   box "Games", 3, 10 16 155 58,
  30.   box "Channel Modes", 4, 170 16 56 30,
  31.   text "Moderated", 5, 184 23 56 10,
  32.   button "+m", 6, 177 32 20 10,
  33.   button "-m", 7, 200 32 20 10,
  34.   box "Voting System", 8, 10 78 155 36,
  35.   button "Ask", 204, 16 88 37 10,
  36.   edit "-Question-", 205, 56 88 100 10, autohs
  37.   button "End Voting", 9, 16 101 37 10,
  38.   button "Current Number of Votes", 10, 56 101 90 10,
  39.   button "Cancel Giveaway", 208, 16 140 50 10,
  40.   button "Prizenum", 217, 16 244 30 10,
  41.   box "Giveaway System", 11, 10 118 155 37,
  42.   button "Give", 206, 16 127 37 10,
  43.   edit "-Prize-", 207, 56 127 100 10, autohs
  44.   button "Giveaway Info", 12, 68 140 50 10,
  45.   button "Draw", 211, 120 140 25 10,
  46.   box "Notices", 15, 10 159 155 48,
  47.   button "Staff Notice", 16, 16 168 36 10,
  48.   button "Notice", 17, 16 180 36 10,
  49.   button "Announce", 18, 16 192 36 10,
  50.   edit "-Staff Notice-", 19, 56 168 100 10, autohs
  51.   edit "-Notice-", 20, 56 180 100 10, autohs
  52.   edit "-Announcement-", 21, 56 192 100 10, autohs
  53.   box "Prizes", 22, 10 211 155 48,
  54.   text "Prize", 23, 16 220 20 10,
  55.   edit "-Prize Here-" 24, 56 220 100 10, autohs
  56.   text "Amount", 25, 16 232 20 10,
  57.   edit "-Amount of Prizes Here-" 26, 56 232 100 10, autohs
  58.   button "Add Prizes", 27, 56 244 100 10,
  59.   button "Close", 28, 100 263 36 10, cancel
  60.   box "Information", 29, 170 211 56 48,
  61.   text "Version 1.1", 30, 175 220 40 10,
  62.   text "Coded By Mark", 31, 175 228 50 10,
  63.   text "Control Panel Made Just For #TheLounge Staff", 32, 175 236 47 20, center
  64.   box "Other Commands", 13, 170 87 56 60,
  65.   button "Dupids", 14, 175 120 46 10,
  66.   button "Updates", 33, 175 133 46 10,
  67.   button "Stop", 221, 175 107 46 10,
  68.   button "Skip", 216, 175 95 46 10,
  69.   box "Giveaways", 50, 170 49 56 35,
  70.   button "Enabled", 51, 175 57 46 10,
  71.   button "Disabled", 52, 175 69 46 10,
  72. }
  73.  
  74. on *:DIALOG:thelounge:sclick:51:{ msg #loungestaff !lg on }
  75. on *:DIALOG:thelounge:sclick:52:{ msg #loungestaff !lg off }
  76.  
  77.  
  78. on *:dialog:thelounge:sclick:27:{
  79.   if (!$did(24).text) { /dialog -m prizeempty prizeempty }
  80.   elseif (!$did(26).text) { /dialog -m amountempty amountempty }
  81.   elseif ($did(26) !isnum) { /dialog -m wrong wrong }
  82.   else {
  83.     confirm1
  84.   }
  85. }
  86. alias confirm1 {
  87.   dialog -m confirm1 confirm1
  88.   did -ra confirm1 4 Are your sure you want to add $did(24) $did(26) times? You will not be able to delete them. Be sure that you do not have spaces in your prizes. Use the Underscore Key (_)
  89. }
  90.  
  91. Are your sure you want to add $did(24) $did(26) times? You will not be able to delete them. Be sure that you do not have spaces in your prizes. Use the Underscore Key (_)
  92. dialog confirm1 {
  93.   title "Are you sure?"
  94.   size -1 -1 124 100
  95.   option dbu
  96.   box "Confirm", 1, 3 4 118 90
  97.   button "Yes", 2, 9 76 48 12
  98.   button "No", 3, 67 76 48 12, cancel
  99.   text "Loading please wait...", 4, 9 17 106 50, center
  100. }
  101.  
  102. on *:dialog:confirm1:sclick:2:{
  103.   timeraddprize $did(thelounge,26) 0 msg #loungestaff !addprize $did(thelounge,24).text
  104.   dialog -x confirm1
  105.  
  106. }
  107.  
  108.  
  109. dialog amountempty {
  110.   title "ERROR!"
  111.   size -1 -1 124 57
  112.   option dbu
  113.   box "Error", 1, 3 4 118 50
  114.   button "OK", 3, 9 39 106 12, cancel
  115.   text "Please don't leave the amount field empty.", 2, 9 12 105 23,
  116. }
  117. dialog prizeempty {
  118.   title "ERROR!"
  119.   size -1 -1 124 57
  120.   option dbu
  121.   box "Error", 1, 3 4 118 50
  122.   button "OK", 3, 9 39 106 12, cancel
  123.   text "Please don't leave the prize field empty.", 2, 9 12 105 23,
  124. }
  125.  
  126. on *:DIALOG:thelounge:sclick:33:{ /dialog -m updates updates }
  127. dialog updates {
  128.   title "Updates"
  129.   size -1 -1 150 82
  130.   option dbu
  131.   box "Updates", 1, 3 4 143 74
  132.   button "OK", 3, 55 62 36 12, cancel
  133.   text "Added Giveaway disabled and enabled options.", 2, 9 12 115 23,
  134. }
  135.  
  136. on *:DIALOG:thelounge:sclick:17:{ msg #loungestaff !n $did(20) }
  137. on *:DIALOG:thelounge:sclick:18:{ msg #loungestaff !announce $did(21) }
  138. on *:DIALOG:thelounge:sclick:14:{ msg #thelounge !dupids }
  139. on *:DIALOG:thelounge:sclick:16:{ msg #loungestaff !sn $did(19) }
  140.  
  141. on *:DIALOG:thelounge:sclick:10:{ msg #thelounge !votes }
  142. on *:DIALOG:thelounge:sclick:9:{ msg #thelounge !endvoting }
  143. on *:DIALOG:thelounge:sclick:12:{ msg #thelounge !igive }
  144.  
  145.  
  146. on *:DIALOG:thelounge:sclick:201:{
  147.   if ($did(202) isnum) { msg #loungestaff !pp $did(202) }
  148.   else { /dialog -m Wrong Wrong }
  149. }
  150. on *:DIALOG:thelounge:sclick:6:{
  151.   if ($nick isop #thelounge) || ($nick ishop #thelounge) {
  152.     mode #thelounge +m
  153.   }
  154.   else { /dialog -m access access
  155.   }
  156. }
  157. on *:DIALOG:thelounge:sclick:7:{
  158.   if ($nick isop #thelounge) || ($nick ishop #thelounge) {
  159.     mode #thelounge -m
  160.   }
  161.   else { /dialog -m access access
  162.   }
  163. }
  164.  
  165. dialog access {
  166.   title "ERROR!"
  167.   size -1 -1 124 57
  168.   option dbu
  169.   box "Error", 1, 3 4 118 50
  170.   button "OK", 3, 9 39 106 12, cancel
  171.   text "You don't have high enough status to do that. Wait until you are HalfOp", 2, 9 12 105 23,
  172. }
  173.  
  174. on *:DIALOG:thelounge:sclick:219:{
  175.   if (!$did(220)) { /dialog -m fuederror fuederror }
  176.   elseif ($did(220) !isnum) { /dialog -m Wrong Wrong }
  177.   else msg #thelounge !fstart $did(220)
  178. }
  179.  
  180. dialog Wrong {
  181.   title "ERROR!"
  182.   size -1 -1 124 57
  183.   option dbu
  184.   box "Error", 1, 3 4 118 50
  185.   button "OK", 3, 9 39 106 12, cancel
  186.   text "That amount is not a number.", 2, 9 12 105 23,
  187. }
  188. dialog fuederror {
  189.   title "ERROR!"
  190.   size -1 -1 124 57
  191.   option dbu
  192.   box "Error", 1, 3 4 118 50
  193.   button "OK", 3, 9 39 106 12, cancel
  194.   text "Make sure to fill in the Amount of rounds for Family Fued.", 2, 9 12 105 23,
  195. }
  196. on *:DIALOG:thelounge:sclick:223:{ msg #thelounge !giveaway }
  197. on *:DIALOG:thelounge:sclick:224:{ msg #thelounge !rand }
  198. on *:DIALOG:thelounge:sclick:222:{ msg #thelounge !dond }
  199. on *:DIALOG:thelounge:sclick:221:{ msg #thelounge !stop }
  200. on *:DIALOG:thelounge:sclick:218:{ msg #thelounge !nstart }
  201. on *:DIALOG:thelounge:sclick:217:{ msg #thelounge !prizenum }
  202. on *:DIALOG:thelounge:sclick:216:{ msg #thelounge !skip }
  203. on *:DIALOG:thelounge:sclick:210:{ msg #thelounge !lrp }
  204. on *:DIALOG:thelounge:sclick:209:{ msg #thelounge !lrpg }
  205. on *:DIALOG:thelounge:sclick:211:{ msg #loungestaff !draw }
  206. on *:DIALOG:thelounge:sclick:208:{ msg #loungestaff !cgive }
  207. on *:DIALOG:thelounge:sclick:206:{ msg #loungestaff !give $did(207) }
  208. on *:DIALOG:thelounge:sclick:203:{ msg #thelounge !lucky }
  209. on *:DIALOG:thelounge:sclick:204:{ msg #loungestaff !ask $did(205) }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement