大彩医用级串口屏Lua应用-文件读写

卡米拉

http://video.gz-dc.com/%E6%96%87%E4%BB%B6%E8%AF%BB%E5%86%99%E6%BC%94%E7%A4%BA%E8%A7%86%E9%A2%91.mp4

[size=13.3333px]文件读写演示视频

[size=13.3333px]

一、适用范围

本文档适合大彩M系列医用级的串口屏产品使用。

二、开发环境版本

1.VisualTFT软件版本：V3.0.0.1111及以上的版本。

版本查看：

1)打开VisualTFT软件启动页面如图2-1软件版本，右上角会显示的软件版本号；

图2-1软件版本

2) 打开VisualTFT，在软件右下角可以查看软件版本图2-2软件版本，最新版本可登录http://www.gz-dc.com/进行下载。

图2-2软件版本

2.串口屏硬件版本：V6.3.249.0 及以上的版本。

版本查看：

1) 查看屏幕背面版本号贴纸；

2) VisualTFT与屏幕联机成功后，右下角显示的版本号。

三、概述

本例程中，介绍Lua系统函数中的文件API读写，其中F系列和M系列仅支持对SD卡读写，物联型系列支持对屏内及SD卡、U盘的读写。

四、参考资料

1、《LUA 脚本API V1.4》可通过以下链接下载物联型开发包获取: http:/www.gz-dc.com/index.php?s=/List/index/cid/19.html

2、《LUA基础学习》可通过以下链接下载物联型开发包获取: http:/www.gz-dc.com/index.php?s=/List/index/cid/19.html

3、LUA脚本初学者可以通过下面链接进行学习：http://www.runoob.com/lua/lua-arrays.html

4、AT指令，可以通过下面子连接了解：http://www.openluat.com/

五、教程实现

本文主要将以下2点进行说明：

1. 准备工程素材；

2. 配置串口屏工程；

5.1 准备工程素材

5.1.1 准备工程素材

在实现例程前需要作以下3个准备：

1. 硬件平台；

2. 软件平台；

3. UI素材；

该例程使用大彩M系列7寸串口屏DC80480M070_1111_0T为验证开发平台。如图5-1所示；

图5-1 M系列7寸串口屏

其他尺寸、系列的串口屏均可借鉴此教程。

5.1.2 软件平台

使用大彩自主研发的上位机软件VisualTFT配置工程，登录http://www.gz-dc.com/下载。如图5-2所示；

图5-2下载软件

5.2 配置串口屏工程

本文的文件主要介绍以下2点：

(1) 读文件

(2) 写文件

5.2.1 读文件

本例程中的读文件，是读取SD根目录下的‘1.txt’文件，并用数据记录控件显示出来，用户可滑动数据记录控件，查看‘1.txt’里面的内容。

1. 画面配置

在画面ID1中，添加1个数据记录控件（控件ID1）和一个按钮控件（控件ID2），其中控件ID1用于显示‘1.txt’文件的内容。控件ID2 用于触发读取‘1.txt’文件的按钮。画面配置如图5-3所示：

注意：其他非关键控件不在一一介绍，下文不在累述

图5-3 画面配置

2. LUA脚本编辑

本例程中，用户点击按钮控件ID2后，将读取SD目录下载的‘1.txt’文件，并添加到数据记录控件中显示；若文件不存在，则弹框提示。代码如程序清单1所示：

程序清单 1 读文件

1. <font size="2">--read file data
   
2. --@file:file path
   
3. function my_read_filedata(file)
   
4.     my_debug_print('---------- my_read_filedata ----------')
   
5.     my_debug_print('Lua_debug: file -> '..file)
   
6. 
   
7.     local count    = 0
   
8.     local read_cnt = 0
   
9.     local offset    = 0
   
10.     local all_byte = 0
    
11. 
    
12.     local read_byte_Tb = {}
    
13.     local read_char_Tb = {}
    
14. 
    
15.     local read_str     = ''
    
16.     local open_state = file_open(file, FA_READ)
    
17.     if open_state == true
    
18.     then
    
19.         --获取当前文件大小
    
20.         all_byte = file_size()
    
21.         if all_byte > 0
    
22.         then
    
23.             read_cnt =  math.modf(all_byte/WriteOnceSize)
    
24.             if all_byte % WriteOnceSize > 0
    
25.             then
    
26.                 read_cnt = read_cnt + 1
    
27.             end
    
28.             my_debug_print('Lua_debug: need read allcnt -> '..read_cnt)
    
29. 
    
30.             for i = 1, read_cnt
    
31.             do
    
32.                 --复位读字节数组
    
33.                 read_byte_Tb = {}
    
34.                 read_char_Tb = {}
    
35. 
    
36.                 --计算读取的偏移位置
    
37.                 offset = (i - 1) * WriteOnceSize
    
38.                 local offst_result = file_seek(offset)
    
39.                 --文件偏移失败
    
40.                 if offst_result == false then
    
41.                     set_text(sc_prompt, 1, ' When reading the file, an offset error occurred. please try again! ! !')
    
42.                     set_text_roll(sc_prompt, 1, 50)
    
43.                     change_child_screen(sc_prompt)
    
44.                     braek;
    
45.                 end
    
46.                 my_debug_print('Lua_debug: cur offset  -> '.. offset)
    
47. 
    
48.                 --计算本次读的个数
    
49.                 count = WriteOnceSize
    
50.                 if i == read_cnt
    
51.                 then
    
52.                     if all_byte % WriteOnceSize > 0
    
53.                     then
    
54.                         count = all_byte % WriteOnceSize
    
55.                     end
    
56.                 end
    
57.                 my_debug_print('Lua_debug: cur read  -> '..i..'th / wrire count '..count)
    
58. 
    
59.                 --读取字节转换为字符并拼接成字符串
    
60.                 read_byte_Tb = file_read(count)
    
61.                 if #(read_byte_Tb) > 0
    
62.                 then
    
63.                     for j = 0, #(read_byte_Tb)
    
64.                     do
    
65.                         read_char_Tb[j + 1] = string.char(read_byte_Tb[j])
    
66.                     end
    
67.                     read_str = read_str..table.concat(read_char_Tb)
    
68.                 elseif read_byte_Tb ==nil
    
69.                 then
    
70.                     set_text(sc_prompt, 1, ' File read error. please try again! ! !')
    
71.                     set_text_roll(sc_prompt, 1, 50)
    
72.                     change_child_screen(sc_prompt)
    
73.                     braek;
    
74.                 end
    
75.             end
    
76.             my_ShowRecord_FromFile(read_str)
    
77.         end
    
78.    else
    
79.         set_text(sc_prompt, 1, 'The file don`t exist,
    
80.                 please check the contents of the SD car! ! !')
    
81.         set_text_roll(sc_prompt, 1, 50)
    
82.         change_child_screen(sc_prompt)
    
83.     end
    
84. 
    
85.     --关闭文件
    
86.     file_close()
    
87. end
    
88. 
    
89. --用户通过触摸修改控件后，</font>执行此回调函数。
    
90. --点击按钮控件，修改文本控件、修改滑动条都会触发此事件。
    
91. function on_control_notify(screen,control,value)
    
92. 
    
93.     if screen == sc_ReadFlile and control == 2 and value == 0
    
94.     then
    
95.         sc_ShowRecord = sc_ReadFlile
    
96. 
    
97.         --SD卡是否存在
    
98.         if IsinsertSD == 1
    
99.         then
    
100.             record_clear(sc_ReadFlile, 1)
     
101.             my_read_filedata(sd_dir..'/'..'1.txt')
     
102.         else
     
103.             set_text(sc_prompt, 1, 'Please insert the SD card,
     
104.                     or check if the SD is compatible! ! !')
     
105.             set_text_roll(sc_prompt, 1, 50)
     
106.             change_child_screen(sc_prompt)
     
107.         end
     
108. 
     
109.     ......
     
110.     end
     
111. end

复制代码

核心API函数

1) file_open(path,mode)

打开文件，成功返回true，失败false

• path-文件路径
• mode-打开模式，如下组合方式：
  
  

打开模式	值
FA_OPEN_EXISTING	0x00
FA_READ	0x01
FA_WRITE	0x02
FA_CREATE_NEW	0x04
FA_CREATE_ALWAYS	0x08
FA_OPEN_ALWAYS	0x10

例如：

打开文件用于读取file_open(path, 0x01)

创建文件用于写入file_open(path, 0x02|0x08)

2) file_size()

获取当前文件大小，返回字节数

例如：all_byte = file_size()

3) file_seek(offset)

定位文件读取位置，成功返回true，失败false

• offset-文件偏移位置
  
  

例如：定位到第2048个字节，file_seek(2048)

4) file_read(count)

读取文件内容，成功返回table数组，失败返回nil

• count-读取字节数，最大读取2048个字节
  
  

例如：读取2048个字节，read_byte_Tb = file_read(2048)

5) file_close()

关闭文件，成功返回true，失败false

基本思路：当按钮控件ID2按下的时候，触发触摸控件回调函数on_control_notify()，在调用自定义函数my_read_filedata()。

1) 打开文件：以只读的方式FA_READ（0x01）打开指定文件。2) 获取文件大小:文件打开成功后，调用file_size() Api函数获取该文件的大小。
3) 计算读取次数：根据文件大小，得出读取的次数。本例程采取一次读取2048个字节（注意：屏幕一次读取最大字节 <= 2048）
4) 计算读取偏移量：每次读取需要调用file_seek(offset)定位读取位置，offset相当于已读取的字节数
5) 读出数据：本文读取的数据，转换成字符拼接字符串显示出来，详细应用根据实际情况出来。

6) 关闭文件：文件读取完毕，将该文件关闭。

5.2.2 写文件

常用的写文件操作主要有以下两种：

1) 追加写：写在文件末尾。本例程是写在SD根目录下的‘1.txt’文件末尾，并用数据记录控件显示出来。

2) 覆盖写：清空在写入数据。本例程在SD卡目录下，每次写入创建一个新的NewFile.txt，并写入数据。

追加写和覆盖写的功能实现区别：

1) 打开方式：file_open(path,mode)。

• 追加写：mode = FA_WRITE|FA_READ；
• 覆盖写：mode = FA_CREATE_ALWAYS|FA_WRITE；
  
  

2) 写入位置：file_seek(offset)。

• 追加写：offset = file_size() + (i - 1) * WriteOnceSize；其中WriteOnceSize为一次写入数据的大小，i为循环写入的次数。
• 覆盖写：offset = 0；
  
  

1. 画面配置

在画面ID2中，添加1个数据记录控件、2个文本控件（控件ID2、控件ID4）和2个按钮控件（控件ID3、控件ID5），其中数据记录控件仅做显示文件内容效果。按钮控件3用于体现追加写功能，按钮控件5用于覆盖写功能。画面配置如图5-4所示：

图5-4 画面配置

2. LUA脚本编辑

按钮控件ID3按下时候，将文本控件ID2的内容写在SD根目录下的‘1.txt’文件末尾（追加写）；按钮控件ID5按下时候，将文本控件ID4的内容写在SD根目录下的‘NewFile.txt’文件（覆盖写）代码如程序清单 2所示。

程序清单 2 写文件

1. <font size="2">--get the type and length of the variable
   
2. --@data: 'string' or 'table'
   
3. --@return: len and type of data
   
4. function my_getdataLen_Type(data)
   
5. 
   
6.     my_debug_print('---------- my_getdataLen_Type ----------')
   
7.     local datalen = -1
   
8.     --获取数据类型
   
9.     local data_type = type(data)
   
10. 
    
11.     --计算数据长度
    
12.     if data_type == 'string'
    
13.     then
    
14.         datalen = string.len(data)
    
15.     elseif data_type == 'table'
    
16.     then
    
17.         datalen = #(data)
    
18.     end
    
19.     my_debug_print('Lua_debug data Type and Len: '..data_type..' /'..datalen)
    
20. 
    
21.     return datalen,data_type
    
22. end
    
23. 
    
24. --Write data to the end of the file
    
25. --@file:file path
    
26. --@data:The type of '@data' only be [string] or [byte array]
    
27. --@open_mode:open file mode
    
28. function my_write_filedata(file, data, open_mode)
    
29. 
    
30.     my_debug_print('---------- my_write_filedata ----------')
    
31.     my_debug_print('Lua_debug: file -> '..file..' / data -> '..type(data)..' / open_mode -> '..open_mode)
    
32.     local count     = 0
    
33.     local write_cnt = 0
    
34.     local offset    = 0
    
35.     local all_byte  = 0
    
36.     --获取待写入数据的数据类型和长度
    
37.     local wrire_len, data_type = my_getdataLen_Type(data)
    
38. 
    
39.     local write_byte_Tb = {}
    
40.     local open_state = file_open(file, open_mode)
    
41. 
    
42.     if open_state == true
    
43.     then
    
44.         --获取当前文件大小,仅在追加文件末尾写入执行
    
45.         if open_mode == add_write
    
46.         then
    
47.             all_byte = file_size()
    
48.         end
    
49. 
    
50.         if wrire_len > 0
    
51.         then
    
52.             --计算'@data'要写多少次
    
53.             write_cnt =  math.modf(wrire_len / WriteOnceSize)
    
54.             if wrire_len % WriteOnceSize > 0
    
55.             then
    
56.                 write_cnt = write_cnt + 1
    
57.             end
    
58.             my_debug_print('Lua_debug: need write allcnt -> '..write_cnt)
    
59. 
    
60.             for i = 1, write_cnt
    
61.             do
    
62.                 --复位写字节数组
    
63.                 write_byte_Tb = {}
    
64. 
    
65.                 --计算写的位置
    
66.                 offset = (i - 1) * WriteOnceSize +all_byte
    
67.                 local offst_result = file_seek(offset)
    
68.                 --文件偏移失败
    
69.                 if offst_result == false
    
70.                 then
    
71.                     set_text(sc_prompt, 1, 'When reading the file, an offset error occurred. please try again! ! !')
    
72.                     set_text_roll(sc_prompt, 1, 50)
    
73.                     change_child_screen(sc_prompt)
    
74.                     break
    
75.                 end
    
76.                 my_debug_print('Lua_debug: cur offset  -> '..offset)
    
77. 
    
78.                 --计算本次写的个数
    
79.                 count = WriteOnceSize
    
80.                 if i == write_cnt
    
81.                 then
    
82.                     if wrire_len % WriteOnceSize > 0
    
83.                     then
    
84.                         count = wrire_len % WriteOnceSize
    
85.                     end
    
86.                 end
    
87.                 my_debug_print('Lua_debug: cur write  -> '..write_cnt..'th /wrire count '..count)
    
88.                 --填充写入flash的字节数组
    
89.                 for j = 1, count
    
90.                 do
    
91.                     if data_type == 'string'
    
92.                     then
    
93.                     --字符串类型，将每个字符转换为字节数组
    
94.                     write_byte_Tb[j - 1] = tonumber(string.byte(data, ((i - 1) * WriteOnceSize + j), ((i - 1) * WriteOnceSize + j)))
    
95. 
    
96.                     elseif data_type == 'table'
    
97.                     then
    
98.                         --数组类型，字节赋值
    
99.                         write_byte_Tb[j - 1] =
    
100.                         data[((i - 1) * WriteOnceSize + j)]
     
101.                     end
     
102.                 end
     
103.                 local IswriteOK = file_write(write_byte_Tb)
     
104.                 if IswriteOK == false
     
105.                 then
     
106.                     i = i - 1
     
107.                 end   
     
108.             end
     
109.         end
     
110.     else
     
111.         set_text(sc_prompt, 1, 'The file don`t exist, please check the contents of the SD car! ! !')
     
112.         set_text_roll(sc_prompt, 1, 50)
     
113.         change_child_screen(sc_prompt)   
     
114.     end
     
115. 
     
116.     --关闭文件
     
117.     file_close()
     
118. end
     
119. 
     
120. --用户通过触摸修改控件后，执行此回调函数。
     
121. --点击按钮控件，修改文本控件、修改滑动条都会触发此事件。
     
122. function on_control_notify(screen,control,value)
     
123.     ......
     
124.     --追加写
     
125.     elseif screen == sc_WriteFile and control == 3 and value == 0
     
126. then
     
127.         sc_ShowRecord = sc_WriteFile
     
128.         --已插入SD卡
     
129.         if IsinsertSD == 1
     
130.         then
     
131.             record_clear(sc_WriteFile, 1)
     
132. 
     
133.             local str = '\n'..get_text(sc_WriteFile, 2)   
     
134.             my_write_filedata(sd_dir..'/'..'1.txt', str, add_write)
     
135. 
     
136.             my_read_filedata(sd_dir..'/'..'1.txt')
     
137.             local allrecordcnt = record_get_count(sc_WriteFile, 1)
     
138.             record_setoffset(sc_WriteFile, 1, allrecordcnt - 1)
     
139.             record_select(sc_WriteFile   , 1, allrecordcnt - 1)
     
140.         --未插入SD卡
     
141.         else
     
142.             set_text(sc_prompt, 1, 'Please insert the SD card, or check if the SD is compatible! ! !')
     
143.             set_text_roll(sc_prompt, 1, 50)
     
144.             change_child_screen(sc_prompt)
     
145.         end
     
146. 
     
147.     --覆盖写
     
148.     elseif screen == sc_WriteFile and control == 5 and value == 0
     
149.     then
     
150.         sc_ShowRecord = sc_WriteFile
     
151.         --已插入SD卡
     
152.         if IsinsertSD == 1
     
153.         then
     
154.             record_clear(sc_WriteFile, 1)
     
155. 
     
156.             cnt = cnt + 1
     
157.             local str = (cnt + 1)..'th write -> '..get_text(sc_WriteFile, 4)
     
158.             my_write_filedata(sd_dir..'/'..'NewTxtFile.txt',str,over_write)
     
159. 
     
160.             my_read_filedata(sd_dir..'/'..'NewTxtFile.txt')
     
161.         --未插入SD卡
     
162.         else
     
163.             set_text(sc_prompt, 1, 'Please insert the SD card, or check if the SD is compatible! ! !')
     
164.             set_text_roll(sc_prompt, 1, 50)
     
165.             change_child_screen(sc_prompt)
     
166.         end
     
167.     ......
     
168.     end
     
169. end</font>

复制代码

核心API函数

1) file_open(path,mode)

相关说明参考读文件章节，不在赘述

2) file_size()

相关说明参考读文件章节，不在赘述

3) file_seek(offset)

相关说明参考读文件章节，不在赘述

4) file_write(data)

写文件内容，成功返回true，失败返回false

• data-待写入的table数组，索引从0开始，最大一次性写2048个字节
  
  

5) file_close()

相关说明参考读文件章节，不在赘述

基本思路：当按钮控件ID3或按钮控件ID5按下的时候，触发触摸控件回调函数on_control_notify()，在调用自定义函数my_write_filedata()。

1) 打开文件：

• 追加写：以读写的方式（FA_READ|FA_WRITE：0x01|0x02）打开SD卡目录下的1.txt文件。
• 覆盖写：以新建写入的方式（FA_CREATE_ALWAYS|FA_WRITE：0x08|0x02）打开SD卡目录下的NewFile.txt文件
  
  

2) 获取文件大小:文件打开成功后，若追加写模式，则执行file_size() Api代码段。
3) 计算写入次数：根据写入数据的大小，得出读取的次数。本例程采取一次写入2048个字节（注意：屏幕一次读取最大字节 <= 2048）
4) 计算写入的偏移量：每次写入需要调用file_seek(offset)定位读取位置
5) 写入数据

6) 关闭文件：文件写完后完毕，将该文件关闭。

5.3 下载工程

工程编译成功后在输出窗口会提示编译成功，如图5-4所示。编译成功后点击菜单栏中【工具】→【量产向导】，如图5-5所示；

图5-4编译成功

图5-5量产向导

在弹窗中选中【SD卡下载】，然后把将文件夹中的private文件夹拷贝到SD卡中，如图5-6和图5-7所示；把SD卡接上串口屏后重新上电，等到提示烧录工程成功后，拔掉SD卡重新上电即可。

图5-6量产向导

图5-7拷贝到SD卡