Code Library

function panel() {
         VAR_HLINE_SINGLE=$'\u2500' # '─'
# Vertical line
         VAR_VLINE_SINGLE=$'\u2502' # '│'
# Corners
         VAR_CORNER_TL_SINGLE=$'\u250C' # '┌' (Top-Left)
         VAR_CORNER_TR_SINGLE=$'\u2510' # '┐' (Top-Right)
         VAR_CORNER_BL_SINGLE=$'\u2514' # '└' (Bottom-Left)
         VAR_CORNER_BR_SINGLE=$'\u2518' # '┘' (Bottom-Right)
         local SIDE="|"
         SIDE=VAR_HLINE_SINGLE=$'\u2500' # '─'
         local TOP="-"
         local BOTTOM="-"
         local R=$1;C=$2;L=$3;W=$4;M=$5      # Bash-Function-Args
         local RPLUS=$((R+1))
         local CPLUS=$((C+1))
         local RPLUS2=$((R+2))
         local CPLUS2=$((C+2))
         local RPLUS3=$((R+3))
         local CPLUS3=$((C+3))
         local REND=$((R+L+1))
         local CEND=$((C+W+1))
         local TR=$(TROWS)
         local FROW=$((R+1))
         local LROW=$((R+L))
         local FCOL=$((C+1))
         local LCOL=$((C+1))
         local TRE=$((TR-1))
         local TC=$(TCOLS)
         local E=0
         printInfo "PANEL: $R $C $L $W FROW=$FROW LROW=$LROW FCOL=$FCOL LCOL=$LCOL TROWS=$TR TCOLS=$TC TRE=$TRE CEND=$CEND REND=$REND"
    if [ $REND -ge $TRE ]; then
        printCritical "PANEL FAIL:  $R $C $L $W (REND=$REND exceeds TRE=$TRE)"
        return
    fi
    if [ $CEND -gt $(TCOLS) ]; then
        printCritical "PANEL FAIL:  $R $C $L $W (CEND=$CEND exceeds TCOLS=$TC)"
        return
    fi
    if [ $R -lt 2 ]; then
        R=2
    fi
    if [ $C -lt 3 ]; then
        C=4
    fi
    if [ $W -lt 3 ]; then
        W=4
    fi
    if [ $L -lt 3 ]; then
        L=4
    fi
        
    ((WH = W/2))
    ((HH = L/2))

    util.pprint $R $C     "$CORNER" 1;
    util.pprint $R $CPLUS "$TOP" $((W));
    util.pprint $R $CEND  "$CORNER" 1

    local ct=1;
    local ROW=$((R+i))
    ((E=L+1))
    while [ $ct -lt $E ]; do
      ROW=$((R+ct))
      util.pprint $ROW $C     "$SIDE" 1;
      util.pprint $ROW $CPLUS " " $((W));
      util.pprint $ROW $CEND  "$SIDE" 1
      ((ct=ct+1))
      #echo $ct
    done

    util.pprint $REND $C "$CORNER" 1;util.pprint $REND $CPLUS "$BOTTOM" $((W));util.pprint $REND $CEND "$CORNER" 1
#     util.pprint $RPLUS $CPLUS "$L/$W" 1
#     util.pprint $RPLUS2 $CPLUS "$(TROWS)" 1
#     util.pprint $RPLUS3 $CPLUS "$(TCOLS)" 1




#     util.pprint $((R+HH)) $((C+WH)) "$W" 1
#     echo "PANEL OK  :  $R $C $L $W" >> /tmp/err
    ansi.gutteractual

}