--[[
--使用PC虛擬串口屏調試4G模塊時使用
--屏幕需要升級工程 UART3_TO_UART1
--使用虛擬屏與實體屏聯調時，設置air_debug_mode = 1
--使用實體屏允許時，設置air_debug_mode = 0
--]]
local air_debug_mode = 1
uart_free_protocol = air_debug_mode      --自由串口協議
--[[***************************************************************************
** Function name : on_uart_recv_data
** Descriptions  :  接收串口1的數據的回調函數。串口1是普通串口。
**               虛擬屏調試時, air_debug_mode = 1，處理串口1的數據。
** @packet       :接收的數據包
** @return       : nil,無返回值
***************************************************************************--]]
function on_uart_recv_data(packet)
    --4G模塊直接PC串口
    if air_debug_mode == 1 
       then
        on_air_recv_data(packet)
    end
end

--[[***************************************************************************
** Function name:  on_air_send_cb
** Descriptions:   4G模塊-發送數據
***************************************************************************--]]
function on_air_send_cb(msg)
    if air_debug_mode==1  then
        uart_send_string(msg)      -- air_debug_mode==1 ，使用虛擬屏調試，通過串口1發送數據
    else
        uart_send_string3(msg)     -- air_debug_mode==0 ，使用實體屏調試，通過串口3發送數據
    end
end

--[[*********************************************************************
** Function name:  on_init
** Descriptions :  系統初始化時，執行此回調函數。
*********************************************************************--]]
function on_init()

    dofile(‘'Air724at.lua') --加載 4G庫文件
    uart_set_baudrate3(115200) --設置與4G模塊通訊的串口3的波特率為115200

    --設置4G庫函數的命令發送函數，命令回調函數、調試信息打印函數
    air_set_callback(on_air_send_cb,on_air_resp_callback,on_air_log_cb)
    air_hw_int()     --4G模塊初始化設置
    air_get_iccid()  –- 獲取卡號
    --開啟自動獲取型號強度、時間、天氣功能
    start_timer(timerId_Sig_Weather, 1000 , 0, 0)
end

--[[*********************************************************************
** Function name:  on_timer
** Descriptions :  定時器超時回到調函數。
** @ timer_id    :  定時器ID
*********************************************************************--]]
function on_timer(timer_id)
    on_air_timer(timer_id) --4G庫函數的定時處理

    --自動獲取型號強度
    if timer_id == timerId_Sig_Weather
    then
        --定時器計數，timer0_notify_cnt 每秒+1。計時長度30min
        timer0_notify_cnt = timer0_notify_cnt + 1 
        if timer0_notify_cnt%15 == 0
        then
            --每15s調用一次，更新信號值
            at_cops_csq() 
        elseif timer0_notify_cnt > 1800                     
        then                                                
            --標志位清空，重新開始30min計時
            timer0_notify_cnt = 0 
        end
    end
end
--[[*********************************************************************
** Function name : at_cops_csq
** Descriptions  : 獲取運營商信息、信號強度
** @return       : nil,無返回值
*********************************************************************--]]
function at_cops_csq()
    air_cmd_add('AT+COPS?','OK',1000) –獲取運營商
    air_cmd_add('AT+CSQ'  ,'OK',1000) –獲取信號
end

--[[*********************************************************************
** Function name:  on_air_resp_callback
** Descriptions :  4G模塊-數據回調接口
** @key         :  屏幕->4G模塊的發送請求
** @value       :  4G模塊->返回的數據
*********************************************************************--]]
function on_air_resp_callback(key, value)  
    if value == nil
    then 
        return              --value為空時退出
    end

    --********************************************************************
    --功能：    判斷 key
    --          如果 key 為空，則退出函數。
    --          因為 key 為空時，下方 string.find( key , ) 是不正確的使用。
    --          以下key的處理必須不為空，
    --********************************************************************
    if key == nil 
    then
        return
    end

    --********************************************************************
    --條件：    4G初始化完成
    --功能：    使用使用AT指令獲取信號強度和運營商。
    --調用函數：at_cops_csq()
    --函數功能：獲取信號強度和運營商
    --********************************************************************
    if string.find(key,'+SAPBR=1,1') ~= nil and string.find(value,'OK') ~= nil 
    then
        set_text(screen_main, 16, '')
        at_cops_csq()
    end

    --********************************************************************
    --條件：    4G模塊返回運營商信息
    --功能：    設置串口波特率為 115200 
    --********************************************************************
    if string.find(key,'+COPS')~=nil and string.find(value,'+COPS')~=nil
    then
        --****************************************************************
        --value：            +COPS: 0,2,"46000",7
        --要提取的值：       46000
        --正則表達式：       '+COPS:.*,.*,"(%d*)"' 
        --****************************************************************
        local regular_e = '+COPS:.*,.*,"(%d*)"' --正則表達式
        --獲取的值賦給 my_mobile_MCCMNC
        local my_mobile_MCCMNC = string.match( value, regular_e ) 
        set_text( screen_main, 2, mobile_MCCMNC[my_mobile_MCCMNC] )
        my_print( mobile_MCCMNC[my_mobile_MCCMNC] )
    end

    --*******************************************************************
    --條件：    4G模塊返回信號強度信息
    --功能：    設置串口波特率為 115200 
    --*******************************************************************
    if string.find(key,'+CSQ')~=nil and string.find(value,'+CSQ')~=nil
    then
        --***************************************************************
        --value：            +CSQ: 15,99
        --要提取的值：       15
        --正則表達式：       '+CSQ: (.*),.*' 
        --***************************************************************
        local regular_e = '+CSQ: (.*),.*' --正則表達式
        --獲取的值賦給 my_csq 
        local my_csq = tonumber(string.match(value,regular_e))
        if my_csq<=11
        then
            set_value( screen_main, 1, 1) --設置信號圖標顯示第1幀
            set_text( screen_main, 5, "弱")     --設置文本，顯示“弱”
        elseif my_csq>=12 and my_csq<=13 
        then
            set_value( screen_main, 1, 2) --設置信號圖標顯示第2幀
             set_text( screen_main, 5, "良")    --設置文本，顯示“良”
        elseif my_csq>=14 and my_csq<=15 
        then
            set_value( screen_main, 1, 3) --設置信號圖標顯示第3幀
             set_text( screen_main, 5, "良")    --設置文本，顯示“良”
        elseif my_csq>=16 
        then
            set_value( screen_main, 1, 4) --設置信號圖標顯示第4幀
             set_text( screen_main, 5, "強")    --設置文本，顯示“強”
        end
        my_print(my_csq)
    end

    ......
end

--[[**********************************************************************
** Function name: on_uart_recv_data3
** Descriptions : 接收串口3數據回調函數，連接4G模塊。
**********************************************************************--]]
function on_uart_recv_data3(packet)
    --4G AT指令庫API
    on_air_recv_data(packet)
end