--[[*********************************************************************
** Function name:  on_init
** Descriptions :  系統初始化時，執行此回調函數。
*********************************************************************--]]
function on_init()
    
    dofile(‘Air724at.lua') --加載 http.lua 文件
    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()
            --如果天氣圖標沒有更新，則此處在調用一次
            if get_value(screen_main,10) == 0
            then
                get_wea_and_time() 
            end                                             
        elseif timer0_notify_cnt > 1800                     
        then                                                
            --每30min調用一次，更新天氣、時間、信號
            get_wea_and_time()
            --標志位清空，重新開始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指令獲取信號強度和運營商。
    --          使用 http get 請求天氣、北京時間。
    --調用函數：at_cops_csq()
    --函數功能：獲取信號強度和運營商
    --調用函數：get_wea_and_time()
    --函數功能：請求天氣、北京時間
    --********************************************************************
    if string.find(key,'+SAPBR=1,1') ~= nil and string.find(value,'OK') ~= nil 
    then
        set_text(screen_main, 16, '')
        at_cops_csq()
        get_wea_and_time()
    end
    
    --********************************************************************
    --條件：    4G模塊返回卡號
    --功能：    獲取卡號并顯示
    --********************************************************************
    if string.find(key,'+ICCID') ~= nil and string.find(value,'+ICCID') ~= nil 
    then
        --****************************************************************
        --value：            +ICCID: 89860117831003134201
        --要提取的值：       89860117831003134201
        --正則表達式：       '+ICCID: (%d*)' 
        --****************************************************************
        local regular_e = '+ICCID: (%d*)' --正則表達式
        local my_iccid = string.match( value, regular_e) --獲取的值賦給 my_iccid
        set_text( screen_main, 3, 'SIM卡號ICCID：'..my_iccid)
    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] )
    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幀
        elseif my_csq>=12 and my_csq<=13 
        then
            set_value( screen_main, 1, 2) --設置信號圖標顯示第2幀
        elseif my_csq>=14 and my_csq<=15 
        then
            set_value( screen_main, 1, 3) --設置信號圖標顯示第3幀
        elseif my_csq>=16 
        then
            set_value( screen_main, 1, 4) --設置信號圖標顯示第4幀
        end
    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