Something

    msg $nick Dark background: $str($chr(160),15) Light Background:
    msg $nick $chr(160)

    %info = $ini(Data/config.db,User_Themes_Light,0)
    %info2 = $ini(Data/config.db,User_Themes_Dark,0)

    if ( %info < %info2 ) { %info = %info2 }

    %y = 1

    while (%y <= %info) {

      %light = $+([,$ini(Data/config.db,User_Themes_Light,%y),]:) $gettok($readini(Data\config.db,User_Themes_Light,L $+ %y),4,58)
      %dark = $+([,$ucol($nick,$ini(Data/config.db,User_Themes_Dark,%y)).2,]:) $gettok($readini(Data\config.db,User_Themes_Dark,D $+ %y),4,58)

      if ( $gettok($readini(Data\config.db,User_Themes_Light,L $+ %y),4,58) == $null ) { %light = $null }
      if ( $gettok($readini(Data\config.db,User_Themes_Dark,D $+ %y),4,58) == $null ) { %dark = $null }

      if ( %dark != $null ) { msg $nick $chr(160) %dark $str($chr(160),$calc(38 - $len(%dark))) %light }
      else { msg $nick $chr(160) %dark $str($chr(160),33) %light }

      inc %y
    }