Skinner mIRC ( Make It For Yourself! )

on *:LOAD: {
echo -a 11>>>
echo -a 11>>> 4 Background Changer v1.2 ( By Ordinary )
echo -a 11>>> 4 For Help and Suggestions - #Pahang ;-)
echo -a 11>>>
.mkdir Images
echo -a 11>>> 4 Images folder is created in your mIRC directory, for fast access of your image files. Enjoy!
echo -a 11>>>
}

dialog SkinnEr {
title SkinnEr
size -1 -1 380 166
box "Other images", 1, 3 3 194 158,
text "Toolbar", 2, 12 22 45 15,
text "Buttons", 3, 12 65 45 15,
text "Switchbar", 4, 12 107 45 15,
edit %dir.toolbar , 5, 11 40 94 19, Read
edit %dir.buttons , 6, 11 83 94 19, Read
edit %dir.switchbar , 7, 12 127 94 19, Read
button "Browse", 8, 113 40 42 19,
button "Browse", 9, 113 83 42 19,
button "Browse", 10, 113 127 42 19,
button "OK", 11, 162 40 25 19,
button "OK", 12, 162 83 25 19,
button "OK", 13, 162 127 25 19,
box "Main images", 14, 203 3 174 158,
button "Main Window", 15, 212 24 75 21,
button "Status", 16, 212 54 75 21,
button "Nickname", 17, 212 84 75 21,
button "Channel", 18, 212 114 75 21,
button "OK", 19, 303 24 63 33, OK
button "Cancel", 20, 303 65 63 33, Cancel
button "Remove", 22, 137 20 50 16,
button "Remove", 23, 137 63 50 16,
button "Remove", 24, 137 107 50 16,
text "SkinnEr By Ordinary", 21, 261 143 110 16, disable
}

on *:dialog:SkinnEr:sclick:*: {
if $did == 8 {
.unset %dir.toolbar
.set %dir.toolbar $shortfn($$sfile($mircdir*.bmp,Browse Image File,OK))
did -a SkinnEr 1 %dir.toolbar
}
if $did == 9 {
.unset %dir.buttons
.set %dir.buttons $shortfn($$sfile($mircdir*.bmp,Browse Image File,OK))
did -a SkinnEr 1 %dir.buttons
}
if $did == 10 {
.unset %dir.switchbar
.set %dir.switchbar $shortfn($$sfile($mircdir*.bmp,Browse Image File,OK))
did -a SkinnEr 1 %dir.switchbar
}
if $did == 11 { /background -l %dir.toolbar }
if $did == 12 { /background -u %dir.buttons }
if $did == 13 { /background -h %dir.switchbar }
if $did == 17 { /dialog -m NickBCH NickBCH }
if $did == 18 { /dialog -m ChanBCH ChanBCH }
if $did == 15 { /dialog -m Main Main }
if $did == 16 { /dialog -m Status Status }
if $did == 22 { /background -lx }
if $did == 23 { /background -ux }
if $did == 24 { /background -hx }

}

dialog NickBCH {
title Query Background
size -1 -1 198 148
edit %dir.nick.image , 1, 3 5 103 20, Read Return Hsbar
button "Browse", 2, 116 5 75 22,
edit "Nickname", 3, 3 30 103 20, Limit 15
radio "Center", 4, 3 62 54 15,
radio "Fill", 5, 62 62 51 15,
radio "Normal", 6, 3 80 51 15,
radio "Stretch", 7, 3 99 54 15,
radio "Tile", 8, 62 80 37 15,
radio "Photo", 9, 62 97 45 15,
button "OK", 11, 116 90 75 22, OK
button "Cancel", 12, 116 118 75 22, Cancel
button "Remove", 13, 116 61 75 22,
}

on *:dialog:NickBCH:sclick:*: {
if $did == 2 {
.unset %dir.nick.image
.set %dir.nick.image $shortfn($$sfile($mircdir*.bmp,Browse Image File,OK))
did -a NickBCH 1 %dir.nick.image
}
if $did(3) == $null { /dialog -m ErrorBCH ErrorBCH }
if $did == 4 { /background -c $did(3) %dir.nick.image }
if $did == 5 { /background -f $did(3) %dir.nick.image }
if $did == 6 { /background -n $did(3) %dir.nick.image }
if $did == 7 { /background -r $did(3) %dir.nick.image }
if $did == 8 { /background -t $did(3) %dir.nick.image }
if $did == 9 { /background -p $did(3) %dir.nick.image }
if $did == 11 { /echo Background for $did(3) Changed Successfully! }
if $did == 12 { /echo No Query Background Changed! }
if $did == 13 { /background -x $did(3) | /echo Background for $did(3) Removed Successfully! }
}

dialog ChanBCH {
title Channel Background
size -1 -1 198 148
edit %dir.chan.image , 1, 3 5 103 20, Read Return Hsbar
button "Browse", 2, 116 5 75 22,
edit "#Channel", 3, 3 30 103 20,
radio "Center", 4, 3 62 54 15,
radio "Fill", 5, 62 62 51 15,
radio "Normal", 6, 3 80 51 15,
radio "Stretch", 7, 3 99 54 15,
radio "Tile", 8, 62 80 37 15,
radio "Photo", 9, 62 97 45 15,
button "OK", 11, 116 90 75 22, OK
button "Cancel", 12, 116 118 75 22, Cancel
button "Remove", 13, 116 61 75 22,
}

on *:dialog:ChanBCH:sclick:*: {
if $did == 2 {
.unset %dir.chan.image
.set %dir.chan.image $shortfn($$sfile($mircdir*.bmp,Browse Image File,OK))
did -a ChanBCH 1 %dir.chan.image
}
if $did(3) == $null { /dialog -m ErrorBCH ErrorBCH }
if $did == 4 { /background -c $did(3) %dir.chan.image }
if $did == 5 { /background -f $did(3) %dir.chan.image }
if $did == 6 { /background -n $did(3) %dir.chan.image }
if $did == 7 { /background -r $did(3) %dir.chan.image }
if $did == 8 { /background -t $did(3) %dir.chan.image }
if $did == 9 { /background -p $did(3) %dir.chan.image }
if $did == 11 { /echo Background for $did(3) Changed Successfully! }
if $did == 12 { /echo No Channel Background Changed! }
if $did == 13 { /background -x $did(3) | /echo Background for $did(3) Removed Successfully! }
}

dialog Main {
title Main Window Background
size -1 -1 198 148
edit %dir.main , 1, 3 5 103 20, Read Return Hsbar
button "Browse", 2, 116 5 75 22,
radio "Center", 4, 3 62 54 15,
radio "Fill", 5, 62 62 51 15,
radio "Normal", 6, 3 80 51 15,
radio "Stretch", 7, 3 99 54 15,
radio "Tile", 8, 62 80 37 15,
radio "Photo", 9, 62 97 45 15,
button "OK", 11, 116 90 75 22, OK
button "Cancel", 12, 116 118 75 22, Cancel
button "Remove", 13, 116 61 75 22,
}

on *:dialog:Main:sclick:*: {
if $did == 2 {
.unset %dir.main
.set %dir.main $shortfn($$sfile($mircdir*.bmp,Browse Image File,OK))
did -a Main 1 %dir.main
}
if $did == 4 { /background -mc %dir.main }
if $did == 5 { /background -mf %dir.main }
if $did == 6 { /background -mn %dir.main }
if $did == 7 { /background -mr %dir.main }
if $did == 8 { /background -mt %dir.main }
if $did == 9 { /background -mp %dir.main }
if $did == 11 { /echo Background for Main Window Changed Successfully! }
if $did == 12 { /echo No Main Window Background Changed! }
if $did == 13 { /background -mx | /echo Background for Main Window Removed Successfully! }
}

dialog Status {
title Status Background
size -1 -1 198 148
edit %dir.status , 1, 3 5 103 20, Read Return Hsbar
button "Browse", 2, 116 5 75 22,
radio "Center", 4, 3 62 54 15,
radio "Fill", 5, 62 62 51 15,
radio "Normal", 6, 3 80 51 15,
radio "Stretch", 7, 3 99 54 15,
radio "Tile", 8, 62 80 37 15,
radio "Photo", 9, 62 97 45 15,
button "OK", 11, 116 90 75 22, OK
button "Cancel", 12, 116 118 75 22, Cancel
button "Remove", 13, 116 61 75 22,
}

on *:dialog:Status:sclick:*: {
if $did == 2 {
.unset %dir.status
.set %dir.status $shortfn($$sfile($mircdir*.bmp,Browse Image File,OK))
did -a Status 1 %dir.status
}
if $did == 4 { /background -sc %dir.status }
if $did == 5 { /background -sf %dir.status }
if $did == 6 { /background -sn %dir.status }
if $did == 7 { /background -sr %dir.status }
if $did == 8 { /background -st %dir.status }
if $did == 9 { /background -sp %dir.status }
if $did == 11 { /echo Background for Status Window Changed Successfully! }
if $did == 12 { /echo No Status Window Background Changed! }
if $did == 13 { /background -sx | /echo Background for Status Window Removed Successfully! }
}

dialog ErrorBCH {
title Error!
size -1 -1 205 70
text "ERROR! Please choose correct file format, fill the nickname/channel field, then select picture position and click OK!", 1, 7 5 193 50, NoWrap Center
button "OK", 2, 72 50 60 17, OK
}

on *:UNLOAD:{
echo -a 4 Thanks for using this addon!
.unset %dir.toolbar | .unset %dir.buttons | .unset %dir.switchbar | .unset %dir.nick.image | .unset %dir.chan.image | .unset %dir.main | .unset %dir.status
}

menu menubar,channel,query,status {
.SkinnEr : /dialog -m SkinnEr SkinnEr
}

wow...
Thanks Cute Abg Otai..
~

byk la otai ~
hek~