xTrivia — File Browser
xTriviav1.0 / xTriviav1.0 / xTriviaByRibellina / xtrivia / bot / Addons / Devoice.mrc
Devoice.mrc — 3.46 KB — Download this file
on *:voice:%game_channel: {
if ($2 == %nickrc1) { mode # -v $2 }
if ($2 == %nickrc2) { mode # -v $2 }
if ($2 == %nickrc3) { mode # -v $2 }
if ($2 == %nickrc4) { mode # -v $2 }
if ($2 == %nickrc5) { mode # -v $2 }
if ($2 == %nickrc6) { mode # -v $2 }
if ($2 == %nickrc7) { mode # -v $2 }
if ($2 == %nickrc8) { mode # -v $2 }
if ($2 == %nickrc9) { mode # -v $2 }
if ($2 == %nickrc10) { mode # -v $2 }
if ($2 == %nickrc11) { mode # -v $2 }
if ($2 == %nickrc12) { mode # -v $2 }
if ($2 == %nickrc13) { mode # -v $2 }
if ($2 == %nickrc14) { mode # -v $2 }
if ($2 == %nickrc15) { mode # -v $2 }
if ($2 == %nickrc16) { mode # -v $2 }
}
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 }
alias drc { dialog -m devrc devrc }
dialog devRc {
title "Devoice RompiPalle"
icon $mircdirImmagini\1.ico, 0
size -1 -1 170 136
option dbu
text "Nick Da Devoicizzare",1, 23 3 130 10
text "1",2, 2 15 15 10
edit %nickrc1,3, 12 15 65 10,autohs
text "2",4, 2 27 15 10
edit %nickrc2,5, 12 27 65 10,autohs
text "3",6, 2 39 15 10
edit %nickrc3,7, 12 39 65 10,autohs
text "4",8, 2 51 15 10
edit %nickrc4,9, 12 51 65 10,autohs
text "5",10, 2 63 15 10
edit %nickrc5,11, 12 63 65 10,autohs
text "6",12, 2 75 15 10
edit %nickrc6,13, 12 75 65 10,autohs
text "7",14, 2 87 15 10
edit %nickrc7,15, 12 87 65 10,autohs
text "8",21, 2 99 15 10
edit %nickrc8,16, 12 99 65 10,autohs
text "15",17, 85 87 15 10
edit %nickrc9,18, 97 87 65 10,autohs
text "16",19, 85 99 15 10
edit %nickrc10,20, 97 99 65 10,autohs
text "9",22, 86 15 15 10
edit %nickrc11,23, 97 15 65 10,autohs
text "10",24, 85 27 15 10
edit %nickrc12,25, 97 27 65 10,autohs
text "11",26, 85 39 15 10
edit %nickrc13,27, 97 39 65 10,autohs
text "12",28, 85 51 15 10
edit %nickrc14,29, 97 51 65 10,autohs
text "13",30, 85 63 15 10
edit %nickrc15,31, 97 63 65 10,autohs
text "14",32, 85 75 15 10
edit %nickrc16,33, 97 75 65 10,autohs
button "Okay",34, 4 117 160 13,ok
}
on *:dialog:devRc:init:*: {
;mdx
mdxbegin
mdx SetBorderStyle $dname 34 staticedge clientedge
mdx SetDialog $dname bgcolor $rgb(0,0,0)
mdx SetFont $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34 16 660 comic sans ms
mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33 background $rgb(0,0,0)
mdx SetColor $dname 34 background $rgb(0,173,255)
mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33 textbg $rgb(0,0,0)
mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33 text $rgb(0,173,255)
}
on *:dialog:devRc:sclick:34: {
set %nickrc1 $did(devRc,3)
set %nickrc2 $did(devRc,5)
set %nickrc3 $did(devRc,7)
set %nickrc4 $did(devRc,9)
set %nickrc5 $did(devRc,11)
set %nickrc6 $did(devRc,13)
set %nickrc7 $did(devRc,15)
set %nickrc8 $did(devRc,16)
set %nickrc9 $did(devRc,18)
set %nickrc10 $did(devRc,20)
set %nickrc11 $did(devRc,23)
set %nickrc12 $did(devRc,25)
set %nickrc13 $did(devRc,27)
set %nickrc14 $did(devRc,29)
set %nickrc15 $did(devRc,31)
set %nickrc16 $did(devRc,33)
}
menu menubar {
Devoice:/drc
-
}