⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 peoplemessageoption.luac.lua

📁 htc manila 2 sourcecode
💻 LUA
字号:
-- Decompiled using luadec 0.6 by sztupy (http://winmo.sztupy.hu)
-- Command line was: -l ;;0,38;;;0,0,0,4;;; 60d9cb1e_manila.luac 

require("common")
require("transitions")
main = function()
   if _application.Store:GetStringValue(Lifetime_Permanent, "EnableLandscape") == "true" then
      trace("[peopleMessageOption] : EnableLandscape")
      require("people\\peopleMessageOption_Landscape")
      PeopleMessageOption_ScreenRotation = PeopleMessageOption_ScreenRotation(nil)
   end
   options = OptionObject()
end

OptionObject = class()
OptionObject.__init = function(l_2_0)
   objs3D = {}
   objs3D[1] = Camera3D
   _request.NavigateOutTo:connect(l_2_0.OnNavigateOut, l_2_0)
   _request.NavigateInFrom:connect(l_2_0.OnNavigateIn, l_2_0)
   _application:SetLeftSoftkey(Softkey(Locale:GetString("IDS_DONE"), LSKFunction_Callback))
   _application:SetRightSoftkey(Softkey(Locale:GetString("IDS_CANCEL"), RSKFunction_Callback))
   local l_2_1 = OptionCheckbox
   Detector.onPress:connect(l_2_0.Handle_OnPressDetector, l_2_0)
   trace("Shell_GetSMSDeliveryNotify = " .. Shell_GetSMSDeliveryNotify())
   if Shell_GetSMSDeliveryNotify() == 0 then
      l_2_1.Tag = false
      l_2_1:SetTextureRef("Check-box-empty")
   else
      l_2_1.Tag = true
      l_2_1:SetTextureRef("Check-box")
   end
end

OptionObject.OnNavigateIn = function(l_3_0, l_3_1)
   _request.NavigateInFrom:disconnect(l_3_0.OnNavigateIn, l_3_0)
   Transition(l_3_1, "In")
   _application:EnableVelocityEngine(false)
end

OptionObject.OnNavigateOut = function(l_4_0, l_4_1)
   _request.NavigateOutTo:disconnect(l_4_0.OnNavigateOut, l_4_0)
   Transition(l_4_1, "Out")
   _application:EnableVelocityEngine(true)
end

OptionObject.Handle_OnPressDetector = function(l_5_0, l_5_1, l_5_2)
   local l_5_3 = l_5_1.Namespace:FindName("OptionCheckbox")
   if l_5_3.Tag then
      l_5_3:SetTextureRef("Check-box-empty")
      l_5_3.Tag = false
   else
      l_5_3:SetTextureRef("Check-box")
      l_5_3.Tag = true
   end
end

LSKFunction_Callback = function()
   if OptionCheckbox.Tag then
      Shell_SetSMSDeliveryNotify(1)
   else
      Shell_SetSMSDeliveryNotify(0)
   end
   trace("Shell_GetSMSDeliveryNotify = " .. Shell_GetSMSDeliveryNotify())
   _application.Navigation:NavigateBack()
end

RSKFunction_Callback = function()
   _application.Navigation:NavigateBack()
end

main()

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -