API tools faq
paste
Advertisement
Guest User

Untitled

a guest
May 8th, 2017
84
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.51 KB | None | 0 0
raw download clone embed print report
  1.  
  2.  
  3. dialog ACP {
  4. title "Administration Control Panel"
  5. size -1 -1 340 340
  6. option dbu
  7. text "Administration Control Panel", 1, 105 4 109 9
  8. tab "IRCop", 2, 11 11 310 310
  9. tab "Services", 3,
  10. tab "Channel", 4,
  11. button "Kill", 5, 16 30 30 12, tab 2
  12. edit "", 6, 63 30 60 12, tab 2
  13. edit "", 7, 150 30 60 12, tab 2
  14. text "Nick:", 8, 52 33 11 9, tab 2
  15. text "Reason:", 9, 130 33 19 9, tab 2
  16. button "K-line", 10, 16 45 30 12, tab 2
  17. text "Nick:", 11, 52 45 11 9, tab 2
  18. text "Reason:", 12, 130 45 19 9, tab 2
  19. edit "", 13, 63 45 60 12, tab 2
  20. edit "", 14, 150 45 60 12, tab 2
  21. button "G-line", 15, 16 60 30 12, tab 2
  22. text "Host:", 16, 52 60 11 9, tab 2
  23. text "Reason:", 17, 130 60 19 9, tab 2
  24. edit "", 18, 63 60 60 12, tab 2
  25. edit "", 19, 150 60 60 12, tab 2
  26. button "Help", 20, 16 325 30 12
  27. button "Z-line", 21, 16 75 30 12, tab 2
  28. text "Host:", 22, 52 75 11 9, tab 2
  29. text "Reason:", 23, 130 75 19 9, tab 2
  30. edit "", 24, 63 75 60 12, tab 2
  31. edit "", 25, 150 75 60 12, tab 2
  32.  
  33.  
  34. button "ChgIdent", 26, 16 99 30 12, tab 2
  35. text "Nick:", 27, 52 99 11 9, tab 2
  36. text "New Ident", 28, 130 99 19 18, tab 2
  37. edit "", 29, 63 99 60 12, tab 2
  38. edit "", 30, 150 99 60 12, tab 2
  39.  
  40. button "ChgHost", 31, 16 114 30 12, tab 2
  41. text "Nick:", 32, 52 114 11 9, tab 2
  42. text "New Host", 33, 130 114 19 18, tab 2
  43. edit "", 34, 63 114 60 12, tab 2
  44. edit "", 35, 150 114 60 12, tab 2
  45.  
  46. button "ChgName", 36, 16 129 30 12, tab 2
  47. text "Nick:", 37, 52 129 11 9, tab 2
  48. text "New Name", 38, 130 129 19 18, tab 2
  49. edit "", 39, 63 129 60 12, tab 2
  50. edit "", 40, 150 129 60 12, tab 2
  51.  
  52. text "Password:", 41, 51 150 25 9, tab 2
  53. button "Restart", 42, 16 150 30 12, tab 2
  54. edit "", 43, 76 150 60 12, tab 2
  55. text "Password:", 44, 51 165 25 9, tab 2
  56. button "Die", 45, 16 165 30 12, tab 2
  57. edit "", 46, 76 165 60 12, tab 2
  58. button "Rehash", 47, 16 180 30 12, tab 2
  59.  
  60. text "User:", 48, 50 195 25 9, tab 2
  61. text "Pass:", 49, 126 195 25 9, tab 2
  62. button "Oper", 50, 16 195 30 12, tab 2
  63. edit "", 51, 64 195 60 12, tab 2
  64. edit "", 52, 140 195 60 12, tab 2
  65. box "Server Status", 53, 16 210 200 90, tab 2
  66. edit "", 54, 23 217 150 9, tab 2
  67. edit "", 55, 23 227 150 9, tab 2
  68. edit "", 56, 23 237 150 9, tab 2
  69. edit "", 57, 23 247 150 9, tab 2
  70. edit "", 58, 23 257 150 9, tab 2
  71. edit "", 59, 23 267 150 9, tab 2
  72. edit "", 60, 23 277 150 9, tab 2
  73. edit "", 61, 23 287 150 9, tab 2
  74. text "Services And Channel Are Coming Soon!", 62, 112 99 120 18, tab 3,
  75. text "Services And Channel Are Coming Soon!", 63, 112 99 120 18, tab 4,
  76. }
  77. on 1:dialog:ACP:sclick:*: {
  78. if ( $did == 5 ) { /kill $did(6) $did(7) }
  79. if ( $did == 10 ) { /kline $did(13) $did(14) }
  80. if ( $did == 15 ) { /gline $did(18) $did(19) }
  81. if ( $did == 20 ) { /ACPhelp }
  82. if ( $did == 21 ) { /zline $did(24) $did(25) }
  83. if ( $did == 26 ) { /chgident $did(29) $did(30) }
  84. if ( $did == 31 ) { /chghost $did(34) $did(35) }
  85. if ( $did == 36 ) { /chgname $did(39) $did(40) }
  86. if ( $did == 42 ) { /restart $did(43) }
  87. if ( $did == 45 ) { /die $did(45) }
  88. if ( $did == 47 ) { /rehash) }
  89. if ( $did == 50 ) { /oper $did(51) $did(52) ) }
  90. }
  91. raw 250:*: set %lusers.250 $2- | halt
  92. raw 251:*: set %lusers.251 $2- | halt
  93. raw 252:*: set %lusers.252 $2- | halt
  94. raw 253:*: set %lusers.253 $2- | halt
  95. raw 254:*: set %lusers.254 $2- | halt
  96. raw 255:*: set %lusers.255 $2- | halt
  97. raw 265:*: set %lusers.265 $2- | halt
  98. raw 266:*: set %lusers.266 $2- | halt
  99.  
  100. on *:DIALOG:ACP:*:*: {
  101. if ( $devent == init ) {
  102. lusers
  103. did -a acp 54 %lusers.250
  104. did -a acp 55 %lusers.251
  105. did -a acp 56 %lusers.252
  106. did -a acp 57 %lusers.253
  107. did -a acp 58 %lusers.254
  108. did -a acp 59 %lusers.255
  109. did -a acp 60 %lusers.265
  110. did -a acp 61 %lusers.266
  111. lusers
  112. lusers
  113. }
  114. }
  115.  
  116.  
  117. alias ACP { dialog -m ACP ACP }
  118.  
  119. dialog ACPhelp {
  120. title "Help"
  121. size -1 -1 220 260
  122. option dbu
  123. text "Help Panel", 1, 75 4 109 9
  124. button "Kill", 2, 16 30 30 12, tab 2, disable
  125. edit "Mr-n00b", 3, 63 30 60 12, tab 2, disable
  126. edit "We Don't want Noobs Here!", 4, 150 30 60 12, tab 2 , disable
  127. text "Nick:", 5, 52 33 11 9, tab 2 , disable
  128. text "Reason:", 6, 130 33 19 9, tab 2 , disable
  129. button "K-line", 7, 16 45 30 12, tab 2, disable
  130. text "Nick:", 8, 52 45 11 9, tab 2 , disable
  131. text "Reason:", 9, 130 45 19 9, tab 2 , disable
  132. edit "*@Users.IP or Nickname", 10, 63 45 60 12, tab 2, disable
  133. edit "Reason Here", 11, 150 45 60 12, tab 2 , disable
  134. button "G-line", 12, 16 60 30 12, tab 2, disable
  135. text "Host:", 13, 52 60 11 9, tab 2 , disable
  136. text "Reason:", 14, 130 60 19 9, tab 2 , disable
  137. edit "*@Users.IP or Nickname", 15, 63 60 60 12, tab 2, disable
  138. edit "Reason Here", 16, 150 60 60 12, tab 2, disable
  139. button "Help", 17, 16 325 30 12 , disable
  140. button "Z-line", 18, 16 75 30 12, tab 2, disable
  141. text "Host:", 19, 52 75 11 9, tab 2 , disable
  142. text "Reason:", 20, 130 75 19 9, tab 2 , disable
  143. edit "*@Users.IP or Nickname", 21, 63 75 60 12, tab 2, disable
  144. edit "Reason Here", 22, 150 75 60 12, tab 2 , disable
  145. button "ChgIdent", 26, 16 99 30 12, tab 2, disable
  146. text "Nick:", 27, 52 99 11 9, tab 2 , disable
  147. text "New Ident", 28, 130 99 19 18, tab 2 , disable
  148. edit "Nickname", 29, 63 99 60 12, tab 2, disable
  149. edit "- MrAdmin -@fofofof.net", 30, 150 99 60 12, tab 2, disable
  150.  
  151. button "ChgHost", 31, 16 114 30 12, tab 2, disable
  152. text "Nick:", 32, 52 114 11 9, tab 2 , disable
  153. text "New Host", 33, 130 114 19 18, tab 2 , disable
  154. edit "Nickname", 34, 63 114 60 12, tab 2, disable
  155. edit "Type.new.host.net.org", 35, 150 114 60 12, tab 2, disable
  156.  
  157. button "ChgName", 36, 16 129 30 12, tab 2, disable
  158. text "Nick:", 37, 52 129 11 9, tab 2 , disable
  159. text "New Name", 38, 130 129 19 18, tab 2 , disable
  160. edit "Nickname", 39, 63 129 60 12, tab 2, disable
  161. edit "Change user's Real Name", 40, 150 129 60 12, tab 2, disable
  162.  
  163. text "Password:", 41, 51 150 25 9, tab 2, disable
  164. button "Restart", 42, 16 150 30 12, tab 2, disable
  165. edit "The-Password-in-Ircd", 43, 76 150 60 12, tab 2, disable
  166. text "Password:", 44, 51 165 25 9, tab 2, disable
  167. button "Die", 45, 16 165 30 12, tab 2, disable
  168. edit "The-Password-in-Ircd", 46, 76 165 60 12, tab 2, disable
  169. button "Rehash", 47, 16 180 30 12, tab 2, disable
  170.  
  171.  
  172. text "To Remove A K-line or Gline Type", 48, 75 200 109 9
  173. text "-*@IP.That.you.banned ", 49, 75 215 109 9
  174. text "in Text edit on G-line, And K-line ", 50, 75 230 109 9
  175.  
  176.  
  177.  
  178. }
  179.  
  180. alias ACPhelp { dialog -m ACPhelp ACPhelp }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!