My Pastes
Public Pastes
Layout Width
Share Pastebin
Guest
Public paste!

Untitled

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