vSkin Theme Engine

alias vskin dialog -md skinz skinz
alias loadskz {
  var %ln = 2
  var %fln = $1
  var %f = $findfile(core\themes,*.vskz,%fln)
  var %lines = $lines(%f)
  //echo -a $rext($nopath(%f)) Theme Loaded
  while (%ln <= %lines) {
    color $read(%f,%ln)
    inc %ln
  }
}
alias skzlist {
  var %fn = 1
  var %lns = $findfile(core\themes,*.vskz,0)
  while (%fn <= %lns) {
    did -a skinz 1 $rext($nopath($findfile(core\themes,*.vskz,%fn)))
    inc %fn
  }
}
alias rext {
  return $replace($1-,.vskz,)
}
dialog skinz {
  title "vIP Themes"
  size -1 -1 89 60
  option dbu
  list 1, 0 0 89 50, size
  button "Apply", 2, 3 50 27 9, flat
  button "Delete", 3, 31 50 27 9, flat
  button "Close", 4, 59 50 27 9, flat, Ok
}
on *:DIALOG:skinz:init:*: {
  skzlist
}
on *:DIALOG:skinz:sclick:2: {
  loadskz $did(skinz,1).sel
}
-------------------
Place This into core/themes/[vIP]vIPBlack.vskz
-------------------

vIPBlack
action 10
CTCP 11
highlight 11
info 11
info2 11
invite 11
join 10
kick 10
mode 11
nick 11
normal 00
notice 05
notify 08
other 00
own 00
part 10
quit 12
topic 00
wallops 04
whois 00
editbox 01
listbox 01
editbox text 00
listbox text 00
background 01
inactive 01
treebar 01
treebar text 00

-------------------
Place This into core/themes/[vIP]vIPIced.vskz
-------------------

vIPIced
action 10
CTCP 00
highlight 11
info 00
info2 00
invite 11
join 10
kick 10
mode 10
nick 10
normal 11
notice 11
notify 11
other 11
own 11
part 10
quit 10
topic 11
wallops 11
whois 10
editbox 01
listbox 01
editbox text 10
listbox text 11
background 01
inactive 01
treebar 01
treebar text 11
0 16777215
1 0
2 8323072
3 37632
4 255
5 127
6 10223772
7 32764
8 65535
9 64512
10 9671424
11 16776960
12 16515072
13 16711935
14 8355711
15 13816530