xTrivia — File Browser
xTriviav1.0 / xTriviav1.0 / xTriviaByRibellina / xtrivia / bot / Addons / Addons.mrc
Addons.mrc — 22.09 KB — Download this file
alias mdx { var %dll $mircdirAddons\dll\mdx\mdx.dll } | return $dll(%dll,$1,$2-)
alias dialogx { return $mircAddons\dll\mdx\dialog.mdx }
alias mdxbegin { mdx SetMircVersion $version | mdx MarkDialog $dname }
;---------------------------------------------------Auto-Id------------------------------------------;
dialog autoid-pink {
size -1 -1 250 275
icon $mircdirImmagini\1.ico, 0
title "AuTo-IdEnTiFy"
tab "Nick" 35, 3 3 245 274
tab "Chan",36, 4 3 245 274
button OK,33,130 241 100 23,ok
;tab Nick
text "Nick:",2,9 32 30 18, tab 35
text "Password:",3,135 32 52 18, tab 35
check "",4,10 53 15 15, tab 35
edit %name1 ,5,30 50 95 20,autohs, tab 35
edit %passw1 ,6,135 50 95 20,autohs, pass, tab 35
check "",7,10 73 15 15, tab 35
edit %name2 ,8,30 70 95 20,autohs, tab 35
edit %passw2 ,9,135 70 95 20,autohs, pass, tab 35
check "",10,10 93 15 15, tab 35
edit %name3 ,11,30 90 95 20,autohs, tab 35
edit %passw3 ,12,135 90 95 20,autohs, pass, tab 35
check "",13,10 113 15 15, tab 35
edit %name4 ,14,30 110 95 20,autohs, tab 35
edit %passw4 ,15,135 110 95 20,autohs, pass, tab 35
check "",16,10 133 15 15, tab 35
edit %name5 ,17,30 130 95 20,autohs, tab 35
edit %passw5 ,18,135 130 95 20,autohs, pass, tab 35
check "",19,10 153 15 15, tab 35
edit %name6 ,20,30 150 95 20,autohs, tab 35
edit %passw6 ,21,135 150 95 20,autohs, pass, tab 35
check "",22,10 173 15 15, tab 35
edit %name7 ,23,30 170 95 20,autohs, tab 35
edit %passw7 ,24,135 170 95 20,autohs, pass, tab 35
check "",25,10 193 15 15, tab 35
edit %name8 ,26,30 190 95 20,autohs, tab 35
edit %passw8 ,27,135 190 95 20,autohs, pass, tab 35
check "",28,10 213 15 15, tab 35
edit %name9 ,29,30 210 95 20,autohs, tab 35
edit %passw9 ,30,135 210 95 20,autohs, pass, tab 35
check "",31,10 244 15 17,autohs, tab 35
text "Attiva/Disattiva", 300, 30 244 100 16
;tab chan
text "Chan:",37,9 32 95 18, tab 36
text "Password:",38,135 32 95 18, tab 36
check "",39,10 53 15 15, tab 36
edit %chan1 ,40,30 50 95 20,autohs, tab 36
edit %pass1 ,41,135 50 95 20,autohs, pass, tab 36
check "",42,10 73 15 15, tab 36
edit %chan2 ,43,30 70 95 20,autohs, tab 36
edit %pass2 ,44,135 70 95 20,autohs, pass, tab 36
check "",45,10 93 15 15, tab 36
edit %chan3 ,46,30 90 95 20,autohs, tab 36
edit %pass3 ,47,135 90 95 20,autohs, pass, tab 36
check "",48,10 113 15 15, tab 36
edit %chan4 ,49,30 110 95 20,autohs, tab 36
edit %pass4 ,50,135 110 95 20,autohs, pass, tab 36
check "",51,10 133 15 15, tab 36
edit %chan5 ,52,30 130 95 20,autohs, tab 36
edit %pass5 ,53,135 130 95 20,autohs, pass, tab 36
check "",54,10 153 15 15, tab 36
edit %chan6 ,55,30 150 95 20,autohs, tab 36
edit %pass6 ,56,135 150 95 20,autohs, pass, tab 36
check "",57,10 173 15 15, tab 36
edit %chan7 ,58,30 170 95 20,autohs, tab 36
edit %pass7 ,59,135 170 95 20,autohs, pass, tab 36
check "",60,10 193 15 15, tab 36
edit %chan8 ,61,30 190 95 20,autohs, tab 36
edit %pass8 ,62,135 190 95 20,autohs, pass, tab 36
check "",63,10 213 15 15, tab 36
edit %chan9 ,64,30 210 95 20,autohs, tab 36
edit %pass9 ,65,135 210 95 20,autohs, pass, tab 36
check "",66,10 244 15 17,autohs, tab 36
}
on *:dialog:autoid-pink:init:*: {
if %autonick = ON { did -c autoid-pink 31 }
if %chk1 = ON { did -c autoid-pink 4 }
if %chk2 = ON { did -c autoid-pink 7 }
if %chk3 = ON { did -c autoid-pink 10 }
if %chk4 = ON { did -c autoid-pink 13 }
if %chk5 = ON { did -c autoid-pink 16 }
if %chk6 = ON { did -c autoid-pink 19 }
if %chk7 = ON { did -c autoid-pink 22 }
if %chk8 = ON { did -c autoid-pink 25 }
if %chk9 = ON { did -c autoid-pink 28 }
;chan
if %autochan = ON { did -c autoid-pink 66 }
if %chk10 = ON { did -c autoid-pink 39 }
if %chk11 = ON { did -c autoid-pink 42 }
if %chk12 = ON { did -c autoid-pink 45 }
if %chk13 = ON { did -c autoid-pink 48 }
if %chk14 = ON { did -c autoid-pink 51 }
if %chk15 = ON { did -c autoid-pink 54 }
if %chk16 = ON { did -c autoid-pink 57 }
if %chk17 = ON { did -c autoid-pink 60 }
if %chk18 = ON { did -c autoid-pink 63 }
;mdx
mdxbegin
mdx SetDialog $dname bgcolor $rgb(0,0,0)
mdx SetBorderStyle $dname 33,34 staticedge clientedge
mdx SetFont $dname 2,3,5,6,8,9,11,12,14,15,17,18,20,21,23,24,26,27,29,30,31,33,37,38,40,41,43,44,46,47,49,50,52,53,55,56,58,59,61,62,64,65,66,300 16 660 comic sans ms
mdx SetColor $dname 4,7,10,13,16,19,22,25,28,31,37,38,39,42,45,48,51,54,57,60,63,66 background $rgb(0,0,0)
mdx SetColor $dname 2,3,5,6,8,9,11,12,14,15,17,18,20,21,23,24,26,27,29,30,37,38,40,41,43,44,46,47,49,50,52,53,55,56,58,59,61,62,64,65,300 background $rgb(0,0,0)
mdx SetColor $dname 2,3,5,6,8,9,11,12,14,15,17,18,20,21,23,24,26,27,29,30,37,38,40,41,43,44,46,47,49,50,52,53,55,56,58,59,61,62,64,65,300 textbg $rgb(0,0,0)
mdx SetColor $dname 2,3,5,6,8,9,11,12,14,15,17,18,20,21,23,24,26,27,29,30,31,37,38,40,41,43,44,46,47,49,50,52,53,55,56,58,59,61,62,64,65,66,300 text $rgb(0,173,255)
mdx SetColor $dname 33 background $rgb(0,173,255)
}
on *:dialog:autoid-pink:sclick:33: {
if ($did(autoid-pink,4).state = 1) { %chk1 = on } | else { %chk1 = off }
if ($did(autoid-pink,7).state = 1) { %chk2 = on } | else { %chk2 = off }
if ($did(autoid-pink,10).state = 1) { %chk3 = on } | else { %chk3 = off }
if ($did(autoid-pink,13).state = 1) { %chk4 = on } | else { %chk4 = off }
if ($did(autoid-pink,16).state = 1) { %chk5 = on } | else { %chk5 = off }
if ($did(autoid-pink,19).state = 1) { %chk6 = on } | else { %chk6 = off }
if ($did(autoid-pink,22).state = 1) { %chk7 = on } | else { %chk7 = off }
if ($did(autoid-pink,25).state = 1) { %chk8 = on } | else { %chk8 = off }
if ($did(autoid-pink,28).state = 1) { %chk9 = on } | else { %chk9 = off }
if ($did(autoid-pink,31).state = 1) { %autonick = on } | else { %autonick = off }
%name1 = $did(5) | %name2 = $did(8) | %name3 = $did(11) | %name4 = $did(14) | %name5 = $did(17) | %name6 = $did(20) | %name7 = $did(23) | %name8 = $did(26) | %name9 = $did(29)
%passw1 = $did(6) | %passw2 = $did(9) | %passw3 = $did(12) | %passw4 = $did(15) | %passw5 = $did(18) | %passw6 = $did(21) | %passw7 = $did(24) | %passw8 = $did(27) | %passw9 = $did(30)
if ($did(autoid-pink,39).state = 1) { %chk10 = on } | else { %chk10 = off }
if ($did(autoid-pink,42).state = 1) { %chk11 = on } | else { %chk11 = off }
if ($did(autoid-pink,45).state = 1) { %chk12 = on } | else { %chk12 = off }
if ($did(autoid-pink,48).state = 1) { %chk13 = on } | else { %chk13 = off }
if ($did(autoid-pink,51).state = 1) { %chk14 = on } | else { %chk14 = off }
if ($did(autoid-pink,54).state = 1) { %chk15 = on } | else { %chk15 = off }
if ($did(autoid-pink,57).state = 1) { %chk16 = on } | else { %chk16 = off }
if ($did(autoid-pink,60).state = 1) { %chk17 = on } | else { %chk17 = off }
if ($did(autoid-pink,63).state = 1) { %chk18 = on } | else { %chk18 = off }
if ($did(autoid-pink,66).state = 1) { %autochan = on } | else { %autochan = off }
%chan1 = $did(40) | %chan2 = $did(43) | %chan3 = $did(46) | %chan4 = $did(49) | %chan5 = $did(52) | %chan6 = $did(55) | %chan7 = $did(58) | %chan8 = $did(61) | %chan9 = $did(64)
%pass1 = $did(41) | %pass2 = $did(44) | %pass3 = $did(47) | %pass4 = $did(50) | %pass5 = $did(53) | %pass6 = $did(56) | %pass7 = $did(59) | %pass8 = $did(62) | %pass9 = $did(65)
}
;------------------------------------Protezioni-------------------------------------;
alias ban1 {
if (MindForge.org isincs $address($nick,1)) { /except | /mode # -ee $nick $mask($ial($nick,1),3),2) | /mode # -aohv $nick $nick $nick $nick | /mode # +bb $nick $address($nick,3) }
else { /except | /mode # -ee $nick $mask($ial($nick,1),3),2) | /mode # -aohv $nick $nick $nick $nick | /mode # +bb $nick $address($nick,2) }
}
dialog proper {
Title "PrOtEzIoNi"
size -1 -1 138 113
icon $mircdirImmagini\1.ico, 0
option dbu
tab "Deop" 1, 2 3 134 90
tab "Kick" 2, 2 3 134 90
tab "Ban" 3, 2 3 134 90
text "Seleziona le azioni da compiere on Deop" 4, 5 20 128 14, tab 1
text "Seleziona le azioni da compiere on Kick " 5, 5 20 128 14, tab 2
text "Seleziona le azioni da compiere on Ban " 6, 5 20 128 14, tab 3
button "Okey" 7, 2 97 133 13, ok
;--- dialog deop, tab 1
check "" 9, 10 30 9 10, tab 1
text "Deop",200, 20 30 50 16
check "" 10, 50 30 9 10, tab 1
text "Kick",201, 60 30 50 16
check "" 11, 93 30 9 10, tab 1
text "Ban",202, 103 30 30 16
text " Setta Messaggio al kick" 12, 8 47 100 14
edit "", 13, 10 58 118 10, tab 1 autohs
radio "" 14, 18 75 9 10, tab 1
text "Attiva", 203, 28 75 50 16
radio "" 15, 85 75 9 10, tab 1
text "Disattiva", 204, 95 75 24 16
;--- dialog kick, tab 2
check "" 16, 10 30 9 10, tab 2
check "" 17, 50 30 9 10, tab 2
check "" 18, 93 30 9 10, tab 2
edit "", 20, 10 58 118 10, tab 2 autohs
radio "" 21, 18 75 9 10, tab 2
radio "" 22, 85 75 9 10, tab 2
;--- dialog ban, tab 2
check "" 23, 10 30 9 10, tab 3
check "" 24, 50 30 9 10, tab 3
check "" 25, 93 30 9 10, tab 3
check "" 26, 93 43 9 10, tab 3
text "Unban", 205, 103 43 30 16, tab 3
edit "", 28, 10 58 118 10, tab 3 autohs
radio "" 29, 18 75 9 10, tab 3
radio "" 30, 85 75 9 10, tab 3
}
;------------------------;
on *:dialog:proper:init:0: {
;mdx
mdxbegin
mdx SetDialog $dname bgcolor $rgb(0,0,0)
mdx SetBorderStyle $dname 7 staticedge clientedge
mdx SetColor $dname 13,20,28 background $rgb(0,0,0)
mdx SetColor $dname 4,5,6,9,10,11,12,14,15,16,17,18,21,22,23,24,25,26,29,30,200,201,202,203,204,205 background $rgb(0,0,0)
mdx SetColor $dname 4,5,6,12,13,20,28,200,201,202,203,204,205 textbg $rgb(0,0,0)
mdx SetColor $dname 4,5,6,12,13,20,28,200,201,202,203,204,205 text $rgb(0,173,255)
mdx SetFont $dname 4,5,6,7,9,10,11,12,13,14,15,16,17,18,20,21,22,23,24,25,26,28,29,30,200,201,202,203,204,205 16 660 comic sans ms
mdx SetColor $dname 7 background $rgb(0,173,255)
;deop
if (%Deop_stato == on) { did -c proper 14 }
if (%Deop_stato == off) { did -c proper 15 | did -b proper 9 | did -b proper 10 | did -b proper 11 | did -b proper 13 }
if (%Deop_deop == off) { did -u proper 9 }
if (%Deop_deop == on) { did -c proper 9 }
if (%Deop_kick == off) { did -u proper 10 | did -b proper 13 }
if (%Deop_kick == on) { did -c proper 10 }
if (%Deop_ban == off) { did -u proper 11 }
if (%Deop_Ban == on) { did -c proper 11 }
{ did -a proper 13 %Deop_mess_kick }
;kick
if (%Kick_stato == on) { did -c proper 21 }
if (%Kick_stato == off) { did -c proper 22 | did -b proper 16 | did -b proper 17 | did -b proper 18 | did -b proper 20 }
if (%Kick_deop == off) { did -u proper 16 }
if (%Kick_deop == on) { did -c proper 16 }
if (%Kick_kick == off) { did -u proper 17 | did -b proper 20 }
if (%Kick_kick == on) { did -c proper 17 }
if (%Kick_ban == off) { did -u proper 18 }
if (%Kick_ban == on) { did -c proper 18 }
{ did -a proper 20 %Kick_mess_kick }
;ban
if (%Ban_stato == on) { did -c proper 29 }
if (%Ban_stato == off) { did -c proper 30 | did -b proper 23 | did -b proper 24 | did -b proper 25 | did -b proper 26 | did -b proper 28 }
if (%Ban_deop == off) { did -u proper 23 }
if (%Ban_deop == on) { did -c proper 23 }
if (%Ban_kick == off) { did -u proper 24 | did -b proper 28 }
if (%Ban_kick == on) { did -c proper 24 }
if (%Ban_ban == off) { did -u proper 25 }
if (%Ban_ban == on) { did -c proper 25 }
if (%Ban_ban == off) { did -u proper 25 }
if (%Ban_ban == on) { did -c proper 25 }
if (%Unban_me == on) { did -c proper 26 }
if (%Unban_me == off) { did -u proper 26 }
{ did -a proper 28 %Ban_mess_kick }
}
on *:dialog:proper:sclick:9: {
if ($did(9).state == 1) { set %Deop_deop on }
else { set %Deop_deop off }
}
on *:dialog:proper:sclick:10: {
if ($did(10).state == 1) { set %Deop_kick on | did -e proper 13 }
else { set %Deop_kick off | did -b proper 13 }
}
on *:dialog:proper:sclick:11: {
if ($did(11).state == 1) { set %Deop_ban on }
else { set %Deop_ban off }
}
on *:dialog:proper:edit:13: { set %Deop_mess_kick $did(proper,13) }
on *:dialog:proper:sclick:14: { set %Deop_stato on | did -e proper 9 | did -e proper 10 | did -e proper 11 | if ($did(10).state = 1) did -e proper 13 }
on *:dialog:proper:sclick:15: { set %Deop_stato off | did -b proper 9 | did -b proper 10 | did -b proper 11 | did -b proper 13 }
;------------------------;
on *:dialog:proper:sclick:16: {
if ($did(16).state = 1) { set %Kick_deop on }
else { set %Kick_deop off }
}
on *:dialog:proper:sclick:17: {
if ($did(17).state = 1) { set %Kick_kick on | did -e proper 20 }
else { set %Kick_kick off | did -b proper 20 }
}
on *:dialog:proper:sclick:18: {
if ($did(18).state = 1) { set %Kick_ban on }
else { set %Kick_ban off }
}
on *:dialog:proper:edit:20: { set %Kick_mess_kick $did(proper,20) }
on *:dialog:proper:sclick:21: { set %Kick_stato on | did -e proper 16 | did -e proper 17 | did -e proper 18 | if ($did(17).state = 1) did -e proper 20 }
on *:dialog:proper:sclick:22: { set %Kick_stato off | did -b proper 16 | did -b proper 17 | did -b proper 18 | did -b proper 20 }
;------------------------;
on *:dialog:proper:sclick:23: {
if ($did(23).state = 1) { set %Ban_deop on }
else { set %Ban_deop off }
}
on *:dialog:proper:sclick:24: {
if ($did(24).state = 1) { set %Ban_kick on | did -e proper 28 }
else { set %Ban_kick off | did -b proper 28 }
}
on *:dialog:proper:sclick:25: {
if ($did(25).state = 1) { set %Ban_ban on }
else { set %Ban_ban off }
}
on *:dialog:proper:sclick:26: {
if ($did(26).state = 1) { set %Unban_me on }
else { set %Unban_me off }
}
on *:dialog:proper:edit:28: { set %Ban_mess_kick $did(proper,28) }
on *:dialog:proper:sclick:29: { set %Ban_stato on | did -e proper 23 | did -e proper 24 | did -e proper 25 | did -e proper 26 | if ($did(24).state = 1) did -e proper 28 }
on *:dialog:proper:sclick:30: { set %Ban_stato off | did -b proper 23 | did -b proper 24 | did -b proper 25 | did -b proper 26 | did -b proper 28 }
;---------------------------------;
on *:ban:#: {
if (%Ban_stato == on) {
if ($banmask isin $address($me,0)) || ($banmask isin $address($me,1)) || ($banmask isin $address($me,2)) || ($banmask isin $address($me,3)) || ($banmask isin $address($me,4)) || ($banmask isin $address($me,5)) || ($banmask isin $address($me,6)) || ($banmask isin $address($me,7)) || ($banmask isin $address($me,8)) || ($banmask isin $address($me,9)) || ($banmask isin $address($me,10)) {
if ($me isop $chan) {
if (%Unban_me = on) { cs unban $chan $me | haltdef }
if (%Ban_deop = on) && (%Ban_ban = off) && (%Ban_kick = off) { /mode $chan -ohv $nick $nick $nick | halt }
if (%Ban_ban = on) && (%Ban_kick = off) { ban1 | halt }
if (%Ban_kick = on) && (%Ban_ban = off) { /mode $chan -ohv $nick $nick $nick | kick # $nick %Ban_mess_kick | /mode # -Q | kick # $nick %Ban_mess_kick | halt }
if (%Ban_kick = on) && (%Ban_ban = on) { ban1 | kick # $nick %Ban_mess_kick | /mode # -Q | kick # $nick %Ban_mess_kick }
}
}
}
elseif (%Ban_stato == off) { return }
}
on *:deop:#: {
if ($nick == $me) { halt | return }
if ($opnick == $me) && ($nick != Chanserv) && ($address($nick,2) != *!*@Services.MindForge.org) {
if (%Deop_stato == on) {
/cs op # $me | /cs protect # $me {
if (%Deop_deop == on) && (%Deop_ban == off) && (%Deop_kick == off) { /mode $chan -ohv $nick $nick $nick $nick | halt }
if (%Deop_ban == on) && (%Deop_kick == off) { /mode $chan -ohv+bb $nick $nick $nick $nick $address($nick,3) | halt }
if (%Deop_kick == on) && (%Deop_ban == off) { /mode $chan -ohv $nick $nick $nick | kick # $nick %Deop_mess_kick | /mode # -Q | kick # $nick %Deop_mess_kick | halt }
if (%Deop_kick == on) && (%Deop_ban == on) { /mode $chan -ohv+bb $nick $nick $nick $nick $address($nick,3) | kick # $nick %Deop_mess_kick | /mode # -Q | kick # $nick %Deop_mess_kick | halt }
}
}
elseif (%Deop_stato == off ) { return }
}
}
on *:Kick:#: {
if ($nick == $me) { halt | return }
if ($knick == $me) && ($nick != Chanserv) {
if (%Kick_stato == on) {
/hop # {
if (%Kick_deop = on) && (%Kick_ban = off) && (%Kick_kick = off) { /mode $chan -aohv $nick $nick $nick $nick | halt }
if (%Kick_ban = on) && (%Kick_kick = off) { /mode $chan -ohv+bb $nick $nick $nick $nick $address($nick,3) | halt }
if (%Kick_kick = on) && (%Kick_ban = off) { /mode $chan -ohv $nick $nick $nick | kick # $nick %Kick_mess_kick | /mode # -Q | kick # $nick %Kick_mess_kick | halt }
if (%Kick_kick = on) && (%Kick_ban = on) { /mode $chan -ohv+bb $nick $nick $nick $nick $address($nick,3) | kick # $nick %Kick_mess_kick | /mode # -Q | kick # %Kick_mess_kick | halt }
}
}
elseif (%Kick_stato == off) {return }
}
dialog suoni.pink {
title "SuOnI"
size -1 -1 99 75
icon $mircdirImmagini\1.ico, 0
option dbu
text "Attiva/Disattiva i suoni", 3, 4 3 65 16
check "", 6, 5 15 8 10
text "Query",20, 15 15 30 16
check "", 1, 5 25 8 10
text "Cambio Nick", 21, 15 25 30 16
check "", 2, 5 35 8 10
text "Ban/Kick",22, 15 35 30 16
check "", 4, 5 45 8 10
text "Notice", 23, 15 45 30 16
check "", 7, 56 15 8 10
text "Unban", 24, 66 15 30 16
check "", 8, 56 25 8 10
text "CTCP", 25, 66 25 30 16
check "", 9, 56 35 8 10
text "Ti Cercano", 26, 66 35 30 16
check "",10, 56 45 8 10
text "Inviti", 27, 66 45 30 16
button "OkaY", 5, 2 59 94 12, ok
}
on *:DIALOG:suoni.pink:sclick:1: { set %cc1 $did(1) }
on *:DIALOG:suoni.pink:sclick:2: { set %cc2 $did(2) }
on *:DIALOG:suoni.pink:sclick:4: { set %cc4 $did(4) }
on *:DIALOG:suoni.pink:sclick:7: { set %cc3 $did(7) }
on *:DIALOG:suoni.pink:sclick:6: { set %cc5 $did(6) }
on *:DIALOG:suoni.pink:sclick:8: { set %cc10 $did(8) }
on *:DIALOG:suoni.pink:sclick:9: { set %cc19 $did(9) }
on *:DIALOG:suoni.pink:sclick:10: { set %cc11 $did(10) }
on *:dialog:suoni.pink:init:*: {
if %cc1 = ON { did -c suoni.pink 1 }
if %cc2 = ON { did -c suoni.pink 2 }
if %cc3 = ON { did -c suoni.pink 7 }
if %cc4 = ON { did -c suoni.pink 4 }
if %cc5 = ON { did -c suoni.pink 6 }
if %cc10 = ON { did -c suoni.pink 8 }
if %cc19 = ON { did -c suoni.pink 9 }
if %cc11 = ON { did -c suoni.pink 10 }
;mdx
mdxbegin
mdx SetDialog $dname bgcolor $rgb(0,0,0)
mdx SetBorderStyle $dname 5 staticedge clientedge
mdx SetFont $dname 3,5,20,21,22,23,24,25,26,27 16 660 comic sans ms
mdx SetColor $dname 1,2,3,4,6,7,8,9,10,20,21,22,23,24,25,26,27 background $rgb(0,0,0)
mdx SetColor $dname 3,20,21,22,23,24,25,26,27 text $rgb(0,173,255)
mdx SetColor $dname 3,20,21,22,23,24,25,26,27 textbg $rgb(0,0,0)
mdx SetColor $dname 5 background $rgb(0,173,255)
}
on *:dialog:suoni.pink:sclick:5: {
if ($did(suoni.pink,1).state = 1) { %cc1 = on } | else { %cc1 = off }
if ($did(suoni.pink,2).state = 1) { %cc2 = on } | else { %cc2 = off }
if ($did(suoni.pink,4).state = 1) { %cc4 = on } | else { %cc4 = off }
if ($did(suoni.pink,7).state = 1) { %cc3 = on } | else { %cc3 = off }
if ($did(suoni.pink,6).state = 1) { %cc5 = on } | else { %cc5 = off }
if ($did(suoni.pink,8).state = 1) { %cc10 = on } | else { %cc10 = off }
if ($did(suoni.pink,9).state = 1) { %cc19 = on } | else { %cc19 = off }
if ($did(suoni.pink,10).state = 1) { %cc11 = on } | else { %cc11 = off }
}
on 1^:invite:*: {
if (%cc11 == on) { splay -m sounds\invite.wav }
}
on ^1:KICK:*: {
if (%cc2 == on) {
If ( $knick == $me ) { splay -m sounds\kick.wav }
If ( $nick == $me ) { splay -m sounds\kick.wav }
}
}
on ^1:NICK: {
if (%cc1 == on) {
If ($nick == $me ) { splay -m sounds\changenick.wav }
}
}
on ^1:BAN:*: {
if (%cc2 == on) {
If ( $bnick == $me ) { splay -m sounds\ban.wav }
If ( $nick == $me ) { splay -m sounds\ban.wav }
}
}
on ^1:UNBAN:*: {
if (%cc7 == on) {
If ( $bnick == $me ) { splay -m sounds\unban.wav }
If ( $nick == $me ) { splay -m sounds\unban.wav }
}
}
on ^1:notice:*:*: {
if (%cc4 == on) { splay sounds\notice.wav }
}
on 1:OPEN:?:{
If (%cc5 == on) { splay -m sounds\query.wav }
}
on *:TEXT:*:*: {
if (%cc19 == on) && ($me isin $1-) { splay -m sounds\me.wav }
}
ctcp 1:*:{
if ( %cc10 == on ) { splay sounds\ctcp.wav }
}
;----------------------------------------------------------------------------------------------COMANDI-START-------------------------------------------------------------------------------------------;
dialog com.pink {
title "On CoNNeCt"
size -1 -1 285 240
icon $mircdirImmagini\1.ico, 0
text "1",1, 5 25 25 18
edit "",2, 20 25 250 20, autohs
text "2",3, 5 50 25 18
edit "",4, 20 50 250 20, autohs
text "3",5, 5 75 25 18
edit "",6, 20 75 250 20, autohs
text "4",7, 5 100 25 18
edit "",8, 20 100 250 20, autohs
text "5",9, 5 125 25 18
edit "",10, 20 125 250 20, autohs
text "6",11, 5 150 25 18
edit "",12, 20 150 250 20, autohs
text "7",13, 5 175 25 18
edit "",14, 20 175 250 20, autohs
text "Comandi da eseguire alla connessione",21, 5 5 300 18
button "Okay",32, 8 205 266 28,ok default
}
on *:dialog:com.pink:init:0:{
did -a com.pink 2 %cmd1
did -a com.pink 4 %cmd2
did -a com.pink 6 %cmd3
did -a com.pink 8 %cmd4
did -a com.pink 10 %cmd5
did -a com.pink 12 %cmd6
did -a com.pink 14 %cmd7
;mdx
mdxbegin
mdx SetDialog $dname bgcolor $rgb(0,0,0)
mdx SetBorderStyle $dname 32 staticedge clientedge
mdx SetFont $dname 2,4,6,8,10,12,14,1,3,5,7,9,11,13,21,32 16 660 comic sans ms
mdx SetColor $dname 1,3,5,7,9,11,13,21 background $rgb(0,0,0)
mdx SetColor $dname 2,4,6,8,10,12,14 background $rgb(0,0,0)
mdx SetColor $dname 1,3,5,7,9,11,13,21,2,4,6,8,10,12,14 textbg $rgb(0,0,0)
mdx SetColor $dname 1,3,5,7,9,11,13,21,2,4,6,8,10,12,14 text $rgb(0,173,255)
mdx SetColor $dname 32 background $rgb(0,173,255)
}
on *:dialog:com.pink:sclick:32:{
set %cmd1 $did(com.pink,2)
set %cmd2 $did(com.pink,4)
set %cmd3 $did(com.pink,6)
set %cmd4 $did(com.pink,8)
set %cmd5 $did(com.pink,10)
set %cmd6 $did(com.pink,12)
set %cmd7 $did(com.pink,14)
}