; ---------------------------------------------------------------------------
; dataflash_read.cmm
;
; This script is READING the complete dataflash contents and saving it to a FILE
;
; NOTE: this script must be executed from the CYT2B Master-GUI (CM0+ Core)
;
; ---------------------------------------------------------------------------
  PMACRO.EXPLICIT

  ; show path and name of this script (present practice file)
  ECHO ""
  ECHO %COLOR.BLUE "### " OS.PPF() " ###"

; ---------------------------------------------------------------------------

  PRIVATE &filename &extension

; ---------------------------------------------------------------------------
; dialog to select the filename
  DIALOG.File.SELECT "*.hex"
  ENTRY %LINE &filename

  IF OS.FILE.EXTENSION(&filename)==""
  (
    &filename="&filename.hex"
  )

  ECHO %COLOR.GREEN "DataFlash contents is saved to &filename"

  SYStem.Up

  FLASH.AUTO 2.

  Data.SAVE.S3record &filename &dataflash_range /SkipErrors

  FLASH.AUTO CANCEL

  ENDDO