add online mode flag to help message

wordle

@@ -6,9 +6,11 @@ declare -gr HEIGHT=6
 declare -gr LETTER=$'\e[97m'
 declare -gr GREY=$'\e[48;5;8m'
 declare -gr GREEN=$'\e[48;5;10m'
+declare -gr LETTER_GR=$'\e[32m'
 declare -gr YELLOW=$'\e[48;5;3m'
 declare -gr RESET=$'\e[0m'
 declare -gr BOLD=$'\e[1m'
+declare -gr UNBOLD=$'\e[22m'
 declare -gr CLEAR_UP1=$'\e[1F\e[K'
 declare -gr CLEAR_LINE=$'\e[K'
 declare -gr CLEAR_2END=$'\e[0K'
@@ -21,10 +23,13 @@ declare -gr UP1=$'\e[1F'
 declare -gr HIDE_CURSOR=$'\e[?25l'
 declare -gr SHOW_CURSOR=$'\e[?25h'
 declare -gr GOHOME=$'\e[H'
-declare -gr DOWN1=$'\e[1E'
 declare -gr INDENT=$'\e[1C'
 
 function main() {
+
+  declare -Ag BOARD
+  declare -g ROW=0
+  declare -g WIN=0
   declare -g ANSWER
   declare -g POOL='QWERTYUIOPASDFGHJKLZXCVBNM'
   declare -Ag YELLOWS
@@ -33,23 +38,39 @@ function main() {
   set_options "$@"
 
   echo -en "${CLEAR_SCREEN}"
+  echo -en "${GOHOME}"
 
-  init_board 
+  if [[ "${RESUME}" == 1 ]]; then
+    load_game
+    if [[ "${PLAYED}" == 1 ]] && [[ "${IN_PROGRESS}" != 1 ]]; then
+      ANSWER=$(select_random_word)
+      init_board
+    fi
+  else
+    init_board
+  fi
+
+  [[ "${ONLINE}" == 1 ]] && save_game "NO_EXIT"
 
   render_board
 
-  declare row
-  for (( row=0; row<HEIGHT; row++ )); do
+  for (( ROW; ROW<HEIGHT; ROW++ )); do
     declare GUESS
     [[ "${KEYBOARD}" == 1 ]] && render_keyboard
-    GUESS=$(retrive_guess)
-    check_guess "${GUESS}" "${row}" ; win=$?
+    GUESS=$(retrieve_guess)
+    check_guess "${GUESS}" "${ROW}" ; WIN=$?
 
-    reveal_row "${row}"
+    reveal_row "${ROW}"
 
-    if [[ $win == 5 ]]; then
-      [[ "${ONLINE}" == 1 ]] && save_game
+    if [[ $WIN == 5 ]]; then
+      save_result
       echo -e "${CLEAR_DOWN}YOU WIN"
+      if [[ "${ONLINE}" == 1 && "${DAILY_DONE}" != 1 ]]; then 
+        echo "Share/view your game with -> curl \"${URL_BASE}/${RESULT_FILE}\""
+        echo "Share/view your stats with -> curl \"${URL_BASE}/stats/${USER}\""
+        while read -r board_line; do echo "${board_line//[A-Z]/ }"; done < "${RESULT_FILE}"
+      fi
+      echo "Guess - $(( ROW+1 ))/6"
       exit 0
     fi 
   done
@@ -61,8 +82,12 @@ function main() {
   done
   echo -en "${NEWLINE}${RESET}"
 
-  [[ "${ONLINE}" == 1 ]] && save_game
-
+  save_result
+  if [[ "${ONLINE}" == 1 && "${DAILY_DONE}" != 1 ]]; then 
+    echo "Share/view your game with -> curl \"${URL_BASE}/${RESULT_FILE}\""
+    echo "Share/view your stats with -> curl \"${URL_BASE}/stats/${USER}\""
+    while read -r board_line; do echo "${board_line//[A-Z]/ }"; done < "${RESULT_FILE}"
+  fi
   exit 0
 }
 
@@ -73,12 +98,14 @@ function select_random_word() {
 }
 
 function set_options() {
+
   declare -g BORDER=1
   declare -g HARD_MODE=0
   declare -g STRICT_HARD_MODE=0
   declare -g DELAY=0.5
   declare -g KEYBOARD=1
   declare -g ONLINE=0
+  declare -g RESUME=0
 
   while getopts "bw:HSkodh" OPT; do
     case "${OPT}" in
@@ -105,39 +132,64 @@ function set_options() {
         ;;
       o)
         ONLINE=1
+        declare -gr URL_BASE="https://www.adbraun.lol/wordle"
 
         echo -en "${CLEAR_SCREEN}"
 
         declare -g USER
         read -r -p "Username: " USER
+        USER="${USER,,}"
 
+        declare -g DAY
+        DAY=$(( EPOCHSECONDS / 86400 ))
+        
+        declare -gr PROGRESS_FILE=".${USER}-${DAY}.progress"
 
+        declare -gr RESULT_FILE="${USER}-${DAY}.board"
 
-        declare HM
-        read -r -p "Do you want to enable hard mode [y/N]? " -n 1 HM
+        declare -gr CUR_RESULT_FILE="${USER}.board"
 
-        if [[ "${HM}" =~ ^[Yy]$ ]]; then
-          HARD_MODE=1
+        declare -gr STATS_SOURCE=".${USER}.stats"
 
-          declare SHM
-          echo -en "${NEWLINE}"
-          read -r -p "Do you want to enable strict hard mode [y/N]? " -n 1 HM
+        declare -gr STATS_FILE="${USER}.stats"
 
-          [[ "${HM}" =~ ^[Yy]$ ]] && STRICT_HARD_MODE=1
+        if [[ -f "${PROGRESS_FILE}" ]] && [[ -s "${PROGRESS_FILE}" ]]; then
+          load_game
+          RESUME=1
+          [[ "${PLAYED}" == 1 ]] && declare -g DAILY_DONE=1
         fi
+
+        if [[ -z "${IN_PROGRESS}" ]]; then
+          declare HM
+          read -r -p "Do you want to enable hard mode [y/N]? " -n 1 HM
+
+          if [[ "${HM}" =~ ^[Yy]$ ]]; then
+            HARD_MODE=1
+
+            echo -en "${NEWLINE}"
+            read -r -p "Do you want to enable strict hard mode [y/N]? " -n 1 HM
+
+            [[ "${HM}" =~ ^[Yy]$ ]] && STRICT_HARD_MODE=1
+          fi
+        fi
+
+        trap save_game SIGINT
         ;;
       d)
         DELAY=0
         ;;
       h)
-        echo -e "Usage: <program_name> [OPTIONS]
+        echo -e \
+"Usage: <program_name> [OPTIONS]
 Play a game for Wordle
+
 Options:
   -b        Toggle borderless mode
   -w        Set target word
   -H        Enable hard mode
   -S        Enable strict hard mode (Cannot reuse grey letters)
   -k        disable on screen keyboard
+  -o        Enable online mode
   -d        Enable debug mode (no delay during letter reveal)
   -h        Show this help message and exit"
 
@@ -152,7 +204,6 @@ Options:
 }
 
 function init_board() {
-  declare -Ag BOARD
   for (( row=0; row<HEIGHT; row++ )); do
     for (( char=0; char<WIDTH; char++ )); do
       BOARD[${row},${char}]="${GREY}   "
@@ -161,7 +212,6 @@ function init_board() {
 }
 
 function render_board() {
-  echo -en "${GOHOME}"
 
   declare row
   declare char
@@ -173,12 +223,12 @@ function render_board() {
       echo -n "${BOARD[${row},${char}]}${RESET}"
     done
     [[ "${BORDER}" == 1 ]] && echo -en " │"
-    echo -en "${DOWN1}"
+    echo -en "${NEWLINE}"
   done
   [[ "${BORDER}" == 1 ]] && echo -e "└─────────────────┘"
 }
 
-function retrive_guess() {
+function retrieve_guess() {
   if  [[ -n $1 ]]; then
     read -r -p "${CLEAR_UP1}$1: " GUESS
   else
@@ -191,12 +241,12 @@ function retrive_guess() {
   declare valid_guess
   validate_guess "${GUESS}" ; valid_guess=$?
 
-  [[ ${valid_guess} == 1 ]] && GUESS=$(retrive_guess "Not A Valid Word")
-  [[ ${valid_guess} == 2 ]] && GUESS=$(retrive_guess "Not A Valid Guess")
-  [[ ${valid_guess} == 3 ]] && GUESS=$(retrive_guess "GREEN Issue")
-  [[ ${valid_guess} == 4 ]] && GUESS=$(retrive_guess "YELLOW Issue")
-  [[ ${valid_guess} == 5 ]] && GUESS=$(retrive_guess "POOL Issue")
-  [[ ${valid_guess} == 6 ]] && GUESS=$(retrive_guess "NEW Issue")
+  [[ ${valid_guess} == 1 ]] && GUESS=$(retrieve_guess "Not A Valid Word")
+  [[ ${valid_guess} == 2 ]] && GUESS=$(retrieve_guess "Not A Valid Guess")
+  [[ ${valid_guess} == 3 ]] && GUESS=$(retrieve_guess "GREEN Issue")
+  [[ ${valid_guess} == 4 ]] && GUESS=$(retrieve_guess "YELLOW Issue")
+  [[ ${valid_guess} == 5 ]] && GUESS=$(retrieve_guess "POOL Issue")
+  [[ ${valid_guess} == 6 ]] && GUESS=$(retrieve_guess "NEW Issue")
 
   echo -n "${GUESS^^}"
 }
@@ -231,7 +281,7 @@ function validate_guess() {
 }
 
 function hard_mode_check() {
-  [[ -z "${row}" || "${row}" == 0 ]] && return 0
+  [[ -z "${ROW}" || "${ROW}" == 0 ]] && return 0
 
   declare GUESS=$1
 
@@ -248,7 +298,7 @@ function hard_mode_check() {
       [[ ! "${GUESS}" == *"${yellows[i]}"* ]] && return 4
     fi
 
-    for (( r=row-1; r>=0; r-- )); do
+    for (( r=ROW-1; r>=0; r-- )); do
       CHAR="${GUESS:i:1}"
       PREV_CHAR="${YELLOWS[$r,$i]}"
       [[ "${CHAR}" == "${PREV_CHAR}" ]] && return 4
@@ -275,13 +325,13 @@ function check_guess() {
   done
 
   for (( c=0; c<WIDTH; c++ )); do
-    BOARD[$_row,$c]="${BOLD}${LETTER}${GREY} ${_guess:$c:1} "
+    BOARD[$_row,$c]="${GREY}${BOLD}${LETTER} ${_guess:$c:1} ${UNBOLD}"
 
     declare _char=${_guess:$c:1}
 
     if [[ "${_char}" == "${_answer:$c:1}" ]]; then
       greens[c]="${_char}"
-      BOARD[$_row,$c]="${BOLD}${LETTER}${GREEN} ${_char} "
+      BOARD[$_row,$c]="${GREEN}${BOLD}${LETTER} ${_char} ${UNBOLD}"
       continue
     fi
 
@@ -289,10 +339,9 @@ function check_guess() {
       chars="${chars/${_char}/}"
       yellows[c]="${_char}"         # volatile - stores previous row yellows
       YELLOWS[$_row,$c]="${_char}"  # stores all yellow from all rounds
-      BOARD[$_row,$c]="${BOLD}${LETTER}${YELLOW} ${_char} "
-    else
-      POOL="${POOL/${_char}/_}"
+      BOARD[$_row,$c]="${YELLOW}${BOLD}${LETTER} ${_char} ${UNBOLD}"
     fi
+    [[ "${ANSWER}" =~ ${_char} ]] && continue
     [[ " ${yellows[*]} " =~ ${_char} ]] && continue
     [[ " ${greens[*]} " =~ ${_char} ]] && continue
     POOL="${POOL/${_char}/_}"
@@ -316,18 +365,168 @@ function reveal_row() {
   echo -en "${SHOW_CURSOR}${RESET}${RESTORE}"
 }
 
+function load_game() {
+  # shellcheck source=/dev/null
+  source "${PROGRESS_FILE}"
+}
+
+# shellcheck disable=SC2317  # Don't warn about unreachable commands in this function
 function save_game() {
-  DAY=$(( $EPOCHSECONDS / 86400 ))
-  USER="${USER,,}"
-  render_board > "${USER}-${DAY}"
-  if [[ $win != 5 ]]; then
-    [[ "${BORDER}" == 1 ]] && echo -en "${CLEAR_DOWN}${INDENT}${INDENT}" >> "${USER}-${DAY}"
-    echo -en "${CLEAR_LINE}${BOLD}" >> "${USER}-${DAY}"
-    for (( i=0; i<WIDTH; i++ )); do
-      echo -en " ${ANSWER:$i:1} " >> "${USER}-${DAY}"
-    done
-    echo -en "${NEWLINE}${RESET}" >> "${USER}-${DAY}"
+  : > "${PROGRESS_FILE}"
+
+  for key in "${!BOARD[@]}"; do
+      echo "BOARD[$key]='${BOARD[$key]}'" >> "${PROGRESS_FILE}"
+  done
+
+  for key in "${!BOARD[@]}"; do
+    echo "YELLOWS[$key]='${YELLOWS[$key]}'" >> "${PROGRESS_FILE}"
+  done
+
+  {
+    echo "ROW=${ROW}"
+    echo "POOL=${POOL}"
+    echo "HARD_MODE=${HARD_MODE}"
+    echo "STRICT_HARD_MODE=${STRICT_HARD_MODE}"
+    echo "WIN=${WIN}"
+    echo "ANSWER=${ANSWER}"
+    echo "IN_PROGRESS=1"
+    [[ "${PLAYED}" == 1 ]] && echo 'PLAYED=1' 
+  } >> "${PROGRESS_FILE}"
+
+  echo -en "${RESET}"
+  [[ -z $1 ]] && exit 0
+}
+
+function save_result() {
+  [[ "${ONLINE}" == 0 ]] && return 0
+  [[ "${ONLINE}" == 1 ]] && update_stats
+  if [[ "${ONLINE}" == 1 ]] && [[ "${DAILY_DONE}" != 1 ]]; then
+    render_board > "${RESULT_FILE}"
+    render_board > "${CUR_RESULT_FILE}"
+    if [[ $WIN != 5 ]]; then
+      [[ "${BORDER}" == 1 ]] && echo -en "${CLEAR_DOWN}${INDENT}${INDENT}" >> "${RESULT_FILE}"
+      echo -en "${CLEAR_LINE}${BOLD}" >> "${RESULT_FILE}"
+      for (( i=0; i<WIDTH; i++ )); do
+        echo -en " ${ANSWER:$i:1} " >> "${RESULT_FILE}"
+        echo -en " ${ANSWER:$i:1} " >> "${CUR_RESULT_FILE}"
+      done
+      echo -en "${NEWLINE}${RESET}" >> "${RESULT_FILE}"
+      echo -en "${NEWLINE}${RESET}" >> "${CUR_RESULT_FILE}"
+    fi
   fi
+  echo 'PLAYED=1' > "${PROGRESS_FILE}"
+}
+
+function update_stats() {
+  if [[ -f "${STATS_SOURCE}" ]]; then
+    # shellcheck source=/dev/null 
+    source "${STATS_SOURCE}"
+  else
+    create_stats
+    # shellcheck source=/dev/null 
+    source "${STATS_SOURCE}"
+  fi
+
+  GAMES_PLAYED=$(( GAMES_PLAYED+1 ))
+  [[ $WIN == 5 ]] && WINS=$(( WINS+1 ))
+  [[ $WIN != 5 ]] && LOSSES=$(( LOSSES+1 ))
+
+  [[ $WIN == 5 ]] && SCORE="${GAME_HIST[$ROW]}"
+  [[ $WIN == 5 ]] && SCORE=$(( SCORE+1 ))
+  [[ $WIN == 5 ]] && GAME_HIST[ROW]="${SCORE}"
+
+  [[ $WIN == 5 ]] && STREAK=$(( STREAK+1 ))
+  [[ $WIN != 5 ]] && STREAK=0
+  [[ $LONGEST_STREAK -lt $STREAK ]] && LONGEST_STREAK=$(( LONGEST_STREAK+1 ))
+
+  declare num=0
+  declare den=0
+  for (( i=0; i<${#GAME_HIST[@]}; i++)); do
+    (( den += ${GAME_HIST[$i]} ))
+    (( num += ${GAME_HIST[$i]}*(i+1) ))
+
+  done
+  if [[ "${den}" != 0 ]]; then
+    result=$(( (num * 100) / den ))
+    integer_part=$(( result / 100 ))
+    decimal_part=$(( result % 100 ))
+
+    AVERAGE="${integer_part}.${decimal_part}"
+  fi
+
+  : > "${STATS_SOURCE}"
+  {
+    echo "GAMES_PLAYED=${GAMES_PLAYED}"
+    echo "WINS=${WINS}"
+    echo "LOSSES=${LOSSES}"
+    echo "GAME_HIST=(${GAME_HIST[*]})"
+    echo "STREAK=${STREAK}"
+    echo "LONGEST_STREAK=${LONGEST_STREAK}"
+    echo "AVERAGE=${AVERAGE}"
+  } >> "${STATS_SOURCE}"
+
+  render_stats
+}
+
+function create_stats() {
+    { 
+      echo "GAMES_PLAYED=0"
+      echo "WINS=0"
+      echo "LOSSES=0"
+      echo "GAME_HIST=(0 0 0 0 0 0)"
+      echo "STREAK=0"
+      echo "LONGEST_STREAK=0"
+      echo "AVERAGE=0"
+    }  >> "${STATS_SOURCE}"
+}
+
+function render_stats() {
+  [[ -f "${STATS_SOURCE}" ]] || return
+  # shellcheck source=/dev/null 
+  # https://www.shellcheck.net/wiki/SC1091 https://www.shellcheck.net/wiki/SC1090
+  source "${STATS_SOURCE}"
+
+  declare highest=0
+  declare -r max_width=20
+  declare axis
+  for (( i=0; i<HEIGHT; i++ )); do
+    [[ "${GAME_HIST[$i]}" -gt "${highest}" ]] && highest="${GAME_HIST[$i]}"
+  done
+
+  for (( i=0; i<HEIGHT; i++ )); do
+    value="${GAME_HIST[$i]}"
+    if [[ "${highest}" == 0 ]]; then
+      bar_length=0
+    else
+      bar_length=$(( value * max_width / highest ))
+    fi
+    
+    bar='▇'
+
+    for (( j=0; j<bar_length; j++)); do
+        bar+='▇'
+    done
+
+    axis=$(( i+1 ))
+
+    if [[ "${ROW}" == "${i}" ]]; then 
+      echo "$axis│${LETTER_GR}$bar${RESET} $value"
+    else
+      echo "$axis│$bar $value"
+    fi
+  done > "${STATS_FILE}"
+
+
+
+  {
+    echo
+    echo "Played: ${GAMES_PLAYED}"
+    echo "Wins: ${WINS}"
+    echo "Losses: ${LOSSES}"
+    echo "Streak: ${STREAK}"
+    echo "Longest Streak: ${LONGEST_STREAK}"
+    echo "Average: ${AVERAGE}"
+  } >> "${STATS_FILE}"
 }
 
 declare -gr VALID_GUESSES="aahed aalii aapas aargh aarti abaca abaci aback abacs abaft abaht abaka abamp aband abase abash abask abate abaya abbas abbed abbes abbey abbot abcee abeam abear abeat abeer abele abeng abers abets abeys abhor abide abies abius abjad abjud abled abler ables ablet ablow abmho abnet abode abohm aboil aboma aboon abord abore aborn abort about above abram abray abrim abrin abris absey absit abuna abune abura aburn abuse abuts abuzz abyes abysm abyss acais acara acari accas accha accoy accra acedy acene acerb acers aceta achar ached acher aches achey achoo acids acidy acies acing acini ackee acker acmes acmic acned acnes acock acoel acold acone acorn acral acred acres acrid acron acros acryl actas acted actin acton actor actus acute acyls adage adapt adats adawn adaws adays adbot addas addax added adder addin addio addle addra adead adeem adept adhan adhoc adieu adios adits adlib adman admen admin admit admix adnex adobe adobo adoon adopt adorb adore adorn adown adoze adrad adraw adred adret adrip adsum aduki adult adunc adust advew advts adyta adyts adzed adzes aecia aedes aeger aegis aeons aerie aeros aesir aevum afald afanc afara afars afear affix affly afion afire afizz aflaj aflap aflow afoam afoot afore afoul afret afrit afros after aftos again agals agama agami agamy agape agars agasp agast agate agaty agave agaze agbas agene agent agers aggag agger aggie aggri aggro aggry aghas agidi agila agile aging agios agism agist agita aglee aglet agley agloo aglow aglus agmas agoge agogo agone agons agony agood agora agree agria agrin agros agrum agued agues aguey aguna agush aguti ahead aheap ahent ahigh ahind ahing ahint ahold ahole ahull ahuru aidas aided aider aides aidoi aidos aiery aigas aight ailed aimag aimak aimed aimer ainee ainga aioli aired airer airns airth airts aisle aitch aitus aiver aixes aiyah aiyee aiyoh aiyoo aizle ajies ajiva ajuga ajupa ajwan akara akees akela akene aking akita akkas akker akoia akoja akoya aksed akses alaap alack alala alamo aland alane alang alans alant alapa alaps alarm alary alata alate alays albas albee albid album alcea alces alcid alcos aldea alder aldol aleak aleck alecs aleem alefs aleft aleph alert alews aleye alfas algae algal algas algid algin algor algos algum alias alibi alick alien alifs align alike alims aline alios alist alive aliya alkie alkin alkos alkyd alkyl allan allay allee allel allen aller alley allin allis allod allot allow alloy allus allyl almah almas almeh almes almud almug alods aloed aloes aloft aloha aloin alone along aloof aloos alose aloud alowe alpha altar alter altho altos alula alums alumy alure alurk alvar alway amahs amain amari amaro amass amate amaut amaze amban amber ambit amble ambos ambry ameba ameer amend amene amens ament amias amice amici amide amido amids amies amiga amigo amine amino amins amirs amiss amity amlas amman ammas ammon ammos amnia amnic amnio amoks amole among amore amort amour amove amowt amped ample amply ampul amrit amuck amuse amyls anana anata ancho ancle ancon andic andro anear anele anent angas angel anger angle anglo angry angst anigh anile anils anima anime animi anion anise anker ankhs ankle ankus anlas annal annan annas annat annex annoy annul annum annus anoas anode anole anomy ansae ansas antae antar antas anted antes antic antis antra antre antsy anura anvil anyon aorta apace apage apaid apart apayd apays apeak apeek apers apert apery apgar aphid aphis apian aping apiol apish apism apnea apode apods apols apoop aport appal appam appay appel apple apply appro appts appui appuy apres apron apses apsis apsos apted apter aptly aquae aquas araba araks arame arars arbah arbas arbor arced archi arcos arcus ardeb ardor ardri aread areae areal arear areas areca aredd arede arefy areic arena arene arepa arere arete arets arett argal argan argil argle argol argon argot argue argus arhat arias ariel ariki arils ariot arise arish arith arked arled arles armed armer armet armil armor arnas arnis arnut aroba aroha aroid aroma arose arpas arpen arrah arras array arret arris arrow arroz arsed arses arsey arsis arson artal artel arter artic artis artly artsy aruhe arums arval arvee arvos aryls asada asana ascon ascot ascus asdic ashed ashen ashes ashet aside asity askar asked asker askew askoi askos aspen asper aspic aspie aspis aspro assai assam assay assed asses asset assez assot aster astir astun asura asway aswim asyla ataps ataxy atigi atilt atimy atlas atman atmas atmos atocs atoke atoks atoll atoms atomy atone atony atopy atria atrip attap attar attas atter attic atuas aucht audad audax audio audit augen auger auges aught augur aulas aulic auloi aulos aumil aunes aunts aunty aurae aural aurar auras aurei aures auric auris aurum autos auxin avail avale avant avast avels avens avers avert avgas avian avine avion avise aviso avize avoid avows avyze await awake award aware awari awarn awash awato awave aways awdls aweel aweto awful awing awkin awmry awned awner awoke awols awork axels axiaLine truncated