Advertisement
Guest User

Untitled

a guest
Jun 28th, 2017
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 6.94 KB | None | 0 0
  1. menu channel {
  2.   Greet Manager: {
  3.     dialog -dm greet greet
  4.   }
  5. }
  6. dialog Greet {
  7.   title "Greet Manager v1.0"
  8.   size -1 -1 359 222
  9.   option dbu
  10.   box "Nick Greet Msg", 7, 64 8 46 10
  11.   button "Set Nick #1 Greet Msg", 1, 16 24 62 14
  12.   button "Set Nick #2 Greet Msg", 2, 95 24 62 14
  13.   button "Set Nick #3 Greet Msg", 3, 16 56 62 14
  14.   button "Set Nick #4 Greet Msg", 4, 96 56 62 14
  15.   button "Set Nick #5 Greet Msg", 5, 16 88 62 14
  16.   button "Set Nick #6 Greet Msg", 6, 96 88 62 14
  17.   box "Chan Greet Msg", 8, 248 8 47 10
  18.   button "Set Chan #1 Greet Msg", 9, 200 24 62 14
  19.   button "Set Chan #2 Greet Msg", 10, 280 24 62 14
  20.   button "Set Chan #3 Greet Msg", 11, 200 56 62 14
  21.   button "Set Chan #4 Greet Msg", 12, 280 56 62 14
  22.   button "Set Chan #5 Greet Msg", 19, 200 88 62 14
  23.   button "Set Chan #6 greet Msg", 18, 280 88 62 14
  24.   button "Enable Nick Greet", 17, 16 120 53 12
  25.   button "Disable Nick Greet", 13, 104 120 53 12
  26.   button "Enable Chan Greet", 14, 200 120 53 12
  27.   button "Disable Chan Greet ", 15, 288 120 53 12  
  28.   button "Msg ", 21, 8 168 100 15
  29.   button "Notice", 23, 129 168 100 15
  30.   button "Describe", 24, 250 168 100 15
  31.   button "Ok", 16, 150 200 62 14
  32. }
  33. alias greetmanager {
  34.   dialog -dm greet greet
  35. }
  36. on *:DIALOG:greet:sclick:16: {
  37.   dialog -x greet greet
  38. }
  39. on *:DIALOG:greet:sclick:17: {
  40.   set %nickgreet on
  41.   msg $active %c1 $+ {?{?{  %c2 $+ N $+ %c3 $+ ick  %c2 $+ G $+ %c3 $+ reet  %c2 $+ E $+ %c3 $+ nabled %c1 $+ }?}?}
  42. }
  43. on *:DIALOG:greet:sclick:14: {
  44.   set %changreet on
  45.   msg $active %c1 $+ {?{?{  %c2 $+ C $+ %c3 $+ han  %c2 $+ G $+ %c3 $+ reet  %c2 $+ E $+ %c3 $+ nabled %c1 $+ }?}?}
  46. }
  47. on *:DIALOG:greet:sclick:13: {
  48.   set %nickgreet off
  49.   msg $active %c1 $+ {?{?{  %c2 $+ N $+ %c3 $+ ick  %c2 $+ G $+ %c3 $+ reet  %c2 $+ D $+ %c3 $+ isabled %c1 $+ }?}?}
  50. }
  51. on *:DIALOG:greet:sclick:15: {
  52.   set %changreet off
  53.   msg $active %c1 $+ {?{?{  %c2 $+ C $+ %c3 $+ han  %c2 $+ G $+ %c3 $+ reet  %c2 $+ D $+ %c3 $+ isabled %c1 $+ }?}?}
  54. }
  55. on *:DIALOG:greet:sclick:1: {
  56.   set %nick#1 $input(Enter Nick #1 You Wish To Greet.,e)
  57.   set %nick#1msg $input(What Would You Like The Greet Msg To Be?,e)
  58.   echo -a Greet Msg For %nick#1 set as: %nick#1msg
  59. }
  60. on *:DIALOG:greet:sclick:2: {
  61.   set %nick#2 $input(Enter Nick #2 You Wish To Greet.,e)
  62.   set %nick#2msg $input(What Would You Like The Greet Msg To Be?,e)
  63.   echo -a Greet Msg For %nick#2 set as: %nick#2msg
  64. }
  65. on *:DIALOG:greet:sclick:3: {
  66.   set %nick#3 $input(Enter Nick #3 You Wish To Greet.,e)
  67.   set %nick#3msg $input(What Would You Like The Greet Msg To Be?,e)
  68.   echo -a Greet Msg For %nick#3 set as: %nick#3msg
  69. }
  70. on *:DIALOG:greet:sclick:4: {
  71.   set %nick#4 $input(Enter Nick #4 You Wish To Greet.,e)
  72.   set %nick#4msg $input(What Would You Like The Greet Msg To Be?,e)
  73.   echo -a Greet Msg For %nick#4 set as: %nick#4msg
  74. }
  75. on *:DIALOG:greet:sclick:5: {
  76.   set %nick#5 $input(Enter Nick #5 You Wish To Greet.,e)
  77.   set %nick#5msg $input(What Would You Like The Greet Msg To Be?,e)
  78.   echo -a Greet Msg For %nick#5 set as: %nick#5msg
  79. }
  80. on *:DIALOG:greet:sclick:6: {
  81.   set %nick#6 $input(Enter Nick #6 You Wish To Greet.,e)
  82.   set %nick#6msg $input(What Would You Like The Greet Msg To Be?,e)
  83.   echo -a Greet Msg For %nick#6 set as: %nick#6msg
  84. }
  85. on *:DIALOG:greet:sclick:9: {
  86.   set %chan#1 $input(Enter Chan #1 You Wish To Greet.,e)
  87.   set %chan#1msg $input(What Would You Like The Greet Msg To Be? You can use $chr(91) $chr(91) $chr(37) $+ chan1 chan2 chan3 chan4 chan5 or chan6 $chr(93) $chr(93) to count the ppl who join depending on what # chan your seting.,e)
  88.   echo -a Greet Msg For %chan#1 set as: %chan#1msg
  89. }
  90. on *:DIALOG:greet:sclick:10: {
  91.   set %chan#2 $input(Enter Chan #2 You Wish To Greet.,e)
  92.   set %chan#2msg $input(What Would You Like The Greet Msg To Be? You can use $chr(91) $chr(91) $chr(37) $+ chan1 chan2 chan3 chan4 chan5 or chan6 $chr(93) $chr(93) to count the ppl who join depending on what # chan your seting.,e)
  93.   echo -a Greet Msg For %chan#2 set as: %chan#2msg
  94. }
  95. on *:DIALOG:greet:sclick:11: {
  96.   set %chan#3 $input(Enter Chan #3 You Wish To Greet.,e)
  97.   set %chan#3msg $input(What Would You Like The Greet Msg To Be? You can use $chr(91) $chr(91) $chr(37) $+ chan1 chan2 chan3 chan4 chan5 or chan6 $chr(93) $chr(93) to count the ppl who join depending on what # chan your seting.,e)
  98.   echo -a Greet Msg For %chan#3 set as: %chan#3msg
  99. }
  100. on *:DIALOG:greet:sclick:12: {
  101.   set %chan#4 $input(Enter Chan #4 You Wish To Greet.,e)
  102.   set %chan#4msg $input(What Would You Like The Greet Msg To Be? You can use $chr(91) $chr(91) $chr(37) $+ chan1 chan2 chan3 chan4 chan5 or chan6 $chr(93) $chr(93) to count the ppl who join depending on what # chan your seting.,e)
  103.   echo -a Greet Msg For %chan#4 set as: %chan#4msg
  104. }
  105. on *:DIALOG:greet:sclick:19: {
  106.   set %chan#5 $input(Enter Chan #5 You Wish To Greet.,e) set %chan#5msg $input(What Would You Like The Greet Msg To Be? You can use $chr(91) $chr(91) $chr(37) $+ chan1 chan2 chan3 chan4 chan5 or chan6 $chr(93) $chr(93) to count the ppl who join depending on what # chan your seting.,e)
  107.   echo -a Greet Msg For %chan#5 set as: %chan#5msg
  108. }
  109. on *:DIALOG:greet:sclick:18: {
  110.   set %chan#6 $input(Enter Chan #6 You Wish To Greet.,e)
  111.   set %chan#6msg $input(What Would You Like The Greet Msg To Be? You can use $chr(91) $chr(91) $chr(37) $+ chan1 chan2 chan3 chan4 chan5 or chan6 $chr(93) $chr(93) to count the ppl who join depending on what # chan your seting.,e)
  112.   echo -a Greet Msg For %chan#6 set as: %chan#6msg
  113. }
  114. on *:DIALOG:greet:sclick:21: {
  115.   set %Method msg
  116.   echo -a Method Changed To Msg
  117. }
  118. on *:DIALOG:greet:sclick:23: {
  119.   set %Method notice
  120.   echo -a Method Changed To Notice
  121. }
  122. on *:DIALOG:greet:sclick:24: {
  123.   set %Method describe
  124.   echo -a Method Changed To Descibe
  125. }
  126. on *:JOIN:*: {
  127.   if (%nickgreet == on) && ($nick == %nick#1) {
  128.     timer 1 2 msg $chan %nick#1msg
  129.   }
  130.   if (%nickgreet == on) && ($nick == %nick#2) {
  131.     timer 1 2 msg $chan %nick#2msg
  132.   }
  133.   if (%nickgreet == on) && ($nick == %nick#3) {
  134.     timer 1 2 msg $chan %nick#3msg
  135.   }
  136.   if (%nickgreet == on) && ($nick == %nick#4) {
  137.     timer 1 2 msg $chan %nick#4msg
  138.   }
  139.   if (%nickgreet == on) && ($nick == %nick#5) {
  140.     timer 1 2 msg $chan %nick#5msg
  141.   }
  142.   if (%nickgreet == on) && ($nick == %nick#6) {
  143.     timer 1 2 msg $chan %nick#6msg
  144.   }
  145.   if (%changreet == on) && ($chan == %chan#1) {
  146.     inc %chan1  
  147.     timer 1 2 %method $chan %chan#1msg
  148.   }
  149.   if (%changreet == on) && ($chan == %chan#2) {
  150.     inc %chan2  
  151.     timer 1 2 %method $chan %chan#2msg
  152.   }
  153.   if (%changreet == on) && ($chan == %chan#3) {
  154.     inc %chan3    
  155.     timer 1 2 %method $chan %chan#3msg
  156.   }
  157.   if (%changreet == on) && ($chan == %chan#4) {
  158.     inc %chan4    
  159.     timer 1 2 %method $chan %chan#4msg
  160.   }
  161.   if (%changreet == on) && ($chan == %chan#5) {
  162.     inc %chan5    
  163.     timer 1 2 %method $chan %chan#5msg
  164.   }
  165.   if (%changreet == on) && ($chan == %chan#6) {    
  166.     inc %chan6    
  167.     timer 1 2 %method $chan %chan#6msg
  168.   }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement