on *:DIALOG:TextDec:*:*:{
  if (($devent == init) || (($devent == sclick) && ($did == 107))) {
    if (%textdec.type == 0) {
      dialog-change TextDec 14 11,12,13,15,16,17,18,19,20,25,26,27,28,29,30,31,32,35,36,37,38,39,40,41,42
      did -ra TextDec 14 There are no advanced settings for this style.
    }
    elseif (%textdec.type == 1) {
      dialog-change TextDec 14 15,16,17,18,19,20,25,26,27,28,29,30,31,32,35,36,37,38,39,40,41,42
      did -ra TextDec 14 There are no colour settings for this style.
    }
    elseif (%textdec.type == 2) {
      dialog-change TextDec 15,16,17,18,19,20 14,25,26,27,28,29,30,31,32,35,36,37,38,39,40,41,42
    }
    elseif (%textdec.type == 3) {
      dialog-change TextDec 25,26,27,28,29,30,31,32 14,15,16,17,18,19,20,35,36,37,38,39,40,41,42
    }
    elseif (%textdec.type == 4) {
      dialog-change TextDec 35,36,37,38,39,40,41,42 14,15,16,17,18,19,20,25,26,27,28,29,30,31,32
    }
    did -u TextDec 2,3,4,5,6
    did -fc TextDec $calc(%textdec.type + 2)
    did $iif($gettok(%textdec.set, 1, 32), -c, -u) TextDec 11
    did $iif($gettok(%textdec.set, 2, 32), -c, -u) TextDec 12
    did $iif($gettok(%textdec.set, 3, 32), -c, -u) TextDec 13
    dialog-clist TextDec 16 $calc(%textdec2.0 + 1)
    dialog-clist TextDec 18 $calc(%textdec2.1 + 1)
    dialog-clist TextDec 20 $calc(%textdec2.2 + 1)
    dialog-clist TextDec 26 $calc(%textdec3.0 + 1)
    dialog-clist TextDec 28 $calc(%textdec3.1 + 1)
    dialog-clist TextDec 30 $calc(%textdec3.2 + 1)
    dialog-clist TextDec 32 $calc(%textdec3.3 + 1)
    dialog-clist TextDec 36 $calc(%textdec4.0 + 1)
    dialog-clist TextDec 38 $calc(%textdec4.1 + 1)
    dialog-clist TextDec 40 $calc(%textdec4.2 + 1)
    dialog-clist TextDec 42 $calc(%textdec4.3 + 1)
    did -r TextDec 102
    var %tmp = 1
    while ($gettok(%textdec.chan, %tmp, 32)) {
      did -a TextDec 102 $gettok(%textdec.chan, %tmp, 32)
      inc %tmp
    }
  }
  elseif ($devent == sclick) {
    if ($did == 2) {
      did -u TextDec 2,3,4,5,6
      did -fc TextDec $did
      dialog-change TextDec 14 11,12,13,15,16,17,18,19,20,25,26,27,28,29,30,31,32,35,36,37,38,39,40,41,42
      did -ra TextDec 14 There are no advanced settings for this style.
    }
    elseif ($did == 3) {
      did -u TextDec 2,3,4,5,6
      did -fc TextDec $did
      dialog-change TextDec 11,12,13,14 15,16,17,18,19,20,25,26,27,28,29,30,31,32,35,36,37,38,39,40,41,42
      did -ra TextDec 14 There are no colour settings for this style.
    }
    elseif ($did == 4) {
      dialog-change TextDec 11,12,13,15,16,17,18,19,20 14,25,26,27,28,29,30,31,32,35,36,37,38,39,40,41,42
    }
    elseif ($did == 5) {
      dialog-change TextDec 11,12,13,25,26,27,28,29,30,31,32 14,15,16,17,18,19,20,35,36,37,38,39,40,41,42
    }
    elseif ($did == 6) {
      dialog-change TextDec 11,12,13,35,36,37,38,39,40,41,42 14,15,16,17,18,19,20,25,26,27,28,29,30,31,32
    }
    elseif ($did == 102) {
      did -ra TextDec 101 $did(102).seltext
    }
    elseif (($did == 103) && ($didwm(102, $did(101)) == 0) && ($did(101) != $null)) {
      did -a TextDec 102 $did(101)
      did -r TextDec 101
    }
    elseif (($did == 104) && ($did(102).sel != $null)) {
      did -d TextDec 102 $did(102).sel
    }
    elseif ($did == 105) {
      did -r TextDec 102
    }
    elseif (($did == 106) || ($did == 108)) {
      if ($did(2).state) {
        set %textdec.type 0
      }
      elseif ($did(3).state) {
        set %textdec.type 1
      }
      elseif ($did(4).state) {
        set %textdec.type 2
      }
      elseif ($did(5).state) {
        set %textdec.type 3
      }
      elseif ($did(6).state) {
        set %textdec.type 4
      }
      set %textdec2.0 $gettok($did(16), 1, 32)
      set %textdec2.1 $gettok($did(18), 1, 32)
      set %textdec2.2 $gettok($did(20), 1, 32)
      set %textdec3.0 $gettok($did(26), 1, 32)
      set %textdec3.1 $gettok($did(28), 1, 32)
      set %textdec3.2 $gettok($did(30), 1, 32)
      set %textdec3.3 $gettok($did(32), 1, 32)
      set %textdec4.0 $gettok($did(36), 1, 32)
      set %textdec4.1 $gettok($did(38), 1, 32)
      set %textdec4.2 $gettok($did(40), 1, 32)
      set %textdec4.3 $gettok($did(42), 1, 32)
      set %textdec.set $did(11).state $did(12).state $did(13).state
      set %textdec.chan
      var %tmp = 1
      while (%tmp <= $did(102).lines) {
        set %textdec.chan $addtok(%textdec.chan, $did(102, %tmp), 32)
        inc %tmp
      }
    }
  }
}