Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- menu channel {
- Greet Manager: {
- dialog -dm greet greet
- }
- }
- dialog Greet {
- title "Greet Manager v1.0"
- size -1 -1 359 222
- option dbu
- box "Nick Greet Msg", 7, 64 8 46 10
- button "Set Nick #1 Greet Msg", 1, 16 24 62 14
- button "Set Nick #2 Greet Msg", 2, 95 24 62 14
- button "Set Nick #3 Greet Msg", 3, 16 56 62 14
- button "Set Nick #4 Greet Msg", 4, 96 56 62 14
- button "Set Nick #5 Greet Msg", 5, 16 88 62 14
- button "Set Nick #6 Greet Msg", 6, 96 88 62 14
- box "Chan Greet Msg", 8, 248 8 47 10
- button "Set Chan #1 Greet Msg", 9, 200 24 62 14
- button "Set Chan #2 Greet Msg", 10, 280 24 62 14
- button "Set Chan #3 Greet Msg", 11, 200 56 62 14
- button "Set Chan #4 Greet Msg", 12, 280 56 62 14
- button "Set Chan #5 Greet Msg", 19, 200 88 62 14
- button "Set Chan #6 greet Msg", 18, 280 88 62 14
- button "Enable Nick Greet", 17, 16 120 53 12
- button "Disable Nick Greet", 13, 104 120 53 12
- button "Enable Chan Greet", 14, 200 120 53 12
- button "Disable Chan Greet ", 15, 288 120 53 12
- button "Msg ", 21, 8 168 100 15
- button "Notice", 23, 129 168 100 15
- button "Describe", 24, 250 168 100 15
- button "Ok", 16, 150 200 62 14
- }
- alias greetmanager {
- dialog -dm greet greet
- }
- on *:DIALOG:greet:sclick:16: {
- dialog -x greet greet
- }
- on *:DIALOG:greet:sclick:17: {
- set %nickgreet on
- msg $active %c1 $+ {?{?{ %c2 $+ N $+ %c3 $+ ick %c2 $+ G $+ %c3 $+ reet %c2 $+ E $+ %c3 $+ nabled %c1 $+ }?}?}
- }
- on *:DIALOG:greet:sclick:14: {
- set %changreet on
- msg $active %c1 $+ {?{?{ %c2 $+ C $+ %c3 $+ han %c2 $+ G $+ %c3 $+ reet %c2 $+ E $+ %c3 $+ nabled %c1 $+ }?}?}
- }
- on *:DIALOG:greet:sclick:13: {
- set %nickgreet off
- msg $active %c1 $+ {?{?{ %c2 $+ N $+ %c3 $+ ick %c2 $+ G $+ %c3 $+ reet %c2 $+ D $+ %c3 $+ isabled %c1 $+ }?}?}
- }
- on *:DIALOG:greet:sclick:15: {
- set %changreet off
- msg $active %c1 $+ {?{?{ %c2 $+ C $+ %c3 $+ han %c2 $+ G $+ %c3 $+ reet %c2 $+ D $+ %c3 $+ isabled %c1 $+ }?}?}
- }
- on *:DIALOG:greet:sclick:1: {
- set %nick#1 $input(Enter Nick #1 You Wish To Greet.,e)
- set %nick#1msg $input(What Would You Like The Greet Msg To Be?,e)
- echo -a Greet Msg For %nick#1 set as: %nick#1msg
- }
- on *:DIALOG:greet:sclick:2: {
- set %nick#2 $input(Enter Nick #2 You Wish To Greet.,e)
- set %nick#2msg $input(What Would You Like The Greet Msg To Be?,e)
- echo -a Greet Msg For %nick#2 set as: %nick#2msg
- }
- on *:DIALOG:greet:sclick:3: {
- set %nick#3 $input(Enter Nick #3 You Wish To Greet.,e)
- set %nick#3msg $input(What Would You Like The Greet Msg To Be?,e)
- echo -a Greet Msg For %nick#3 set as: %nick#3msg
- }
- on *:DIALOG:greet:sclick:4: {
- set %nick#4 $input(Enter Nick #4 You Wish To Greet.,e)
- set %nick#4msg $input(What Would You Like The Greet Msg To Be?,e)
- echo -a Greet Msg For %nick#4 set as: %nick#4msg
- }
- on *:DIALOG:greet:sclick:5: {
- set %nick#5 $input(Enter Nick #5 You Wish To Greet.,e)
- set %nick#5msg $input(What Would You Like The Greet Msg To Be?,e)
- echo -a Greet Msg For %nick#5 set as: %nick#5msg
- }
- on *:DIALOG:greet:sclick:6: {
- set %nick#6 $input(Enter Nick #6 You Wish To Greet.,e)
- set %nick#6msg $input(What Would You Like The Greet Msg To Be?,e)
- echo -a Greet Msg For %nick#6 set as: %nick#6msg
- }
- on *:DIALOG:greet:sclick:9: {
- set %chan#1 $input(Enter Chan #1 You Wish To Greet.,e)
- 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)
- echo -a Greet Msg For %chan#1 set as: %chan#1msg
- }
- on *:DIALOG:greet:sclick:10: {
- set %chan#2 $input(Enter Chan #2 You Wish To Greet.,e)
- 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)
- echo -a Greet Msg For %chan#2 set as: %chan#2msg
- }
- on *:DIALOG:greet:sclick:11: {
- set %chan#3 $input(Enter Chan #3 You Wish To Greet.,e)
- 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)
- echo -a Greet Msg For %chan#3 set as: %chan#3msg
- }
- on *:DIALOG:greet:sclick:12: {
- set %chan#4 $input(Enter Chan #4 You Wish To Greet.,e)
- 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)
- echo -a Greet Msg For %chan#4 set as: %chan#4msg
- }
- on *:DIALOG:greet:sclick:19: {
- 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)
- echo -a Greet Msg For %chan#5 set as: %chan#5msg
- }
- on *:DIALOG:greet:sclick:18: {
- set %chan#6 $input(Enter Chan #6 You Wish To Greet.,e)
- 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)
- echo -a Greet Msg For %chan#6 set as: %chan#6msg
- }
- on *:DIALOG:greet:sclick:21: {
- set %Method msg
- echo -a Method Changed To Msg
- }
- on *:DIALOG:greet:sclick:23: {
- set %Method notice
- echo -a Method Changed To Notice
- }
- on *:DIALOG:greet:sclick:24: {
- set %Method describe
- echo -a Method Changed To Descibe
- }
- on *:JOIN:*: {
- if (%nickgreet == on) && ($nick == %nick#1) {
- timer 1 2 msg $chan %nick#1msg
- }
- if (%nickgreet == on) && ($nick == %nick#2) {
- timer 1 2 msg $chan %nick#2msg
- }
- if (%nickgreet == on) && ($nick == %nick#3) {
- timer 1 2 msg $chan %nick#3msg
- }
- if (%nickgreet == on) && ($nick == %nick#4) {
- timer 1 2 msg $chan %nick#4msg
- }
- if (%nickgreet == on) && ($nick == %nick#5) {
- timer 1 2 msg $chan %nick#5msg
- }
- if (%nickgreet == on) && ($nick == %nick#6) {
- timer 1 2 msg $chan %nick#6msg
- }
- if (%changreet == on) && ($chan == %chan#1) {
- inc %chan1
- timer 1 2 %method $chan %chan#1msg
- }
- if (%changreet == on) && ($chan == %chan#2) {
- inc %chan2
- timer 1 2 %method $chan %chan#2msg
- }
- if (%changreet == on) && ($chan == %chan#3) {
- inc %chan3
- timer 1 2 %method $chan %chan#3msg
- }
- if (%changreet == on) && ($chan == %chan#4) {
- inc %chan4
- timer 1 2 %method $chan %chan#4msg
- }
- if (%changreet == on) && ($chan == %chan#5) {
- inc %chan5
- timer 1 2 %method $chan %chan#5msg
- }
- if (%changreet == on) && ($chan == %chan#6) {
- inc %chan6
- timer 1 2 %method $chan %chan#6msg
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement