Root Checker src ပါ simple root checker နဲ႔ phone information (ကိဳသဴရ sub ကိုသံုးၿပီး) ဆိုၿပီး post ႏွစ္​ခုကြၽန္​​ေတာ္​တင္​ ခဲ့ဖူးပါတယ္​ ႏွစ္​ခုလံုး Project code ပါပါၿပိးသားပါ ဘယ္​သူမွလိုက္​မလုပ္​လို႔​ေနပါလိမ္​့မယ္​ အခုsrc က​ေတာ့ lesson ႏွစ္​ခု​ေပါင္​းလိုက္​တာပါ

Root Checker src ပါ အထူးအဆနိး​ေတာ့မဟုတ္​ပါဘူး အရင္​ကလဲ simple root checker နဲ႔ phone information (ကိဳသဴရ sub ကိုသံုးၿပီး) ဆိုၿပီး post ႏွစ္​ခုကြၽန္​​ေတာ္​တင္​ ခဲ့ဖူးပါတယ္​ ႏွစ္​ခုလံုး Project code ပါပါၿပိးသားပါ ဘယ္​သူမွလိုက္​မလုပ္​လို႔​ေနပါလိမ္​့မယ္​ အခုsrc က​ေတာ့ lesson ႏွစ္​ခု​ေပါင္​းလိုက္​တာပါ
2နဲ႔ 2 +မွ 4 မဟုတ္​ပါဘူး
1+1+2 ​ေပါငး္​လဲ 4 ျဖစ္​ပါတယ္​

Main

##########

SetActivityColor(0,cWhite)
AddButton("a",25*x,1*y,50*x,30*y,"")
SetLiner("a",cWhite,cBlue,250)
SetTextColor("a",cRed)
SetTextSize("a",22)
AddLabel("l",76*x,25*y,25*x,10*y,"")

SetText("l","App Version=1.1")
SetTextColor("l",cGreen)
SetTextSize("l",14)

AddButton("b",0*x,35*y,100*x,10*y,"")

AddButton("g",0*x,45*y,100*x,10*y,"")

AddButton("c",0*x,55*y,100*x,10*y,"")

AddButton("d",0*x,65*y,100*x,10*y,"")

AddButton("e",0*x,75*y,100*x,10*y,"")
AddButton("f",0*x,85*y,100*x,10*y,"")

#####buildin cmd###

SetText("c","PhoneId="&GetPhoneId)
SetText("d","PhoneModel="&GetModel)
SetText("e","Sdk Version="&GetSdkVersion)

######Root ႐ွိမ႐ွိစစ္​######
GetRoot
If HaveRoot Then
SetText("a","Root ႐ွိပါသည္​")
SetTextColor("a",cPurple)
else
SetText("a","Root မ႐ွိ​ေသးပါ")
End if
end if

#######သီးသန္​႔sub#####
GetInfo

SetText("b","Brand="&GetBrand)
SetText("f","SerialNumber="&GetSerialnumber)

SetText("g","Version="&GetAndroidVersion)

###for about####
AddButton("ab",10*x,94*y,80*x,9*y,"")
SetText("ab","Created By Moe Tain Yan")

###Color##
SetTextColor("b",cPurple)
SetTextColor("c",cPurple)
SetTextColor("d",cPurple)
SetTextColor("e",cPurple)
SetTextColor("f",cPurple)
SetTextColor("g",cPurple)
SetTextColor("ab",cBlue)

##about##
AddMenuItem("About")
AddMenuItem("Visit My FaceBook Profile")

Sub Button_Click(Who)
End Sub
Sub Button_LongClick(Who)
End Sub

Sub SetLiner(b,c,c1,r)
l = GetLeft(b) - 1*x
w = GetWidth(b) + 2*x
t = GetTop(b) - 1*x
h = GetHeight(b) + 2*x
AddPanel(b&b,l,t,w,h,"")
BringToFront(b)
SetColor(b,r,c)
SetColor(b&b,r,c1)
End Sub
Sub Panel_Click(Who)
End Sub

####EVENT####

Sub GetInfo
getandroidversion=rootcmd("getprop ro.build.version.release")
getmanufacture=rootcmd("getprop ro.product.manufacture")
getbrand=rootcmd("getprop ro.product.brand")
getname=rootcmd("getprop ro.product.name")
getdevice=rootcmd("getprop ro.product.device")
getboard=rootcmd("getprop ro.product.board")
getchipname=rootcmd("getprop ro.chipname")
getlocaleregion=rootcmd("getprop ro.product.locale.region")
getlocalelanguage=rootcmd("getprop ro.product.locale.language")
getbaseband=rootcmd("getprop gsm.version.baseband")
getbaseband2=rootcmd("getprop gsm.version.baseband2")
getstype=rootcmd("getprop net.bt.name")
gethtype=rootcmd("getprop ro.hardware")
getrotation=rootcmd("getprop persist.sys.screen.rotation.Off")
getusbcong=rootcmd("getprop persist.sys.usb.config")
getsyslanguage=rootcmd("getprop persist.sys.language")
gettimezone=rootcmd("getprop persist.sys.timezone")
gettimezoneid=rootcmd("getprop ril.timezoneID")
getofficialcsv=rootcmd("getprop ril.official_cscver")
getproductcode=rootcmd("getprop ril.product_code")
getserialnumber=rootcmd("getprop ril.serialnumber")
getbuilddate=rootcmd("getprop ro.build.date")
getbuildnumber=rootcmd("getprop ro.build.display.id")
getbuildHost=rootcmd("getprop ro.build.Host")
getbuildid=rootcmd("getprop ro.build.id")
getdateformat=rootcmd("getprop ro.com.android.dateformat")
getsimslots=rootcmd("getprop ro.multisim.simslotcount")
getsimoperator=rootcmd("getprop gsm.operator.alpha")
getsimoperator2=rootcmd("getprop gsm.operator.alpha2")
getsimtype=rootcmd("getprop gsm.network.type")
getsimtype2=rootcmd("getprop gsm.network.type2")
getsimnum=rootcmd("getprop gsm.operator.numeric")
getsimnum2=rootcmd("getprop gsm.operator.numeric2")
getsimstate=rootcmd("getprop gsm.sim.state")
getsimstate2=rootcmd("getprop gsm.sim.state2")
getsimcountry=rootcmd("getprop gsm.operator.iso-country")
getsimcountry2=rootcmd("getprop gsm.operator.iso-country2")
End Sub
Sub #Type it and use many command #Example:
End Sub
Sub #GetAndroidVersion Use it to get the android version of your phone!
End sub
Sub #GetManufacture Use it to get the manufacture of your phone!
end sub
 Sub #Test under command #GetBrand #GetName #GetDevice #Getboard#GetChipName #GetLocaleRegion #GetLocaleLanguage #GetBaseband#GetBaseband2 #GetSType #GetHType #GetRotation #GetUSBcong#GetSysLanguage #GetTimeZone #GetTimeZoneID #GetOfficialCsv#GetProductCode #GetSerialNumber #GetBuildNumber #GetBuildDate #GetBuildHost #GetBuildID #GetDateFormat #GetSimSlots #GetSimOperator #GetSimOperator2 #GetSimType #GetSimType2 #GetSimNum #GetSimNum2 #GetSimState #GetSimState2 #GetSimCountry #GetSimCountry2
End Sub
Sub Menu_Click(Which)

Select Which
Case"About"

MsgBox("App version:1.1& Developed By Moe Tain Yan","Special Thank")

Case"Visit My FaceBook Profile"

Intent_View("fb://profile/yuko.org")

End select
End Sub

Sub Label_Click(Who)
End Sub

Sub Activity_KeyPress(key)
if key=4 then
q=messageBox("Are You Sure?","Exit","Yes","No","")
if q=-1 Then
ActivityFinish
else
if key= 82 then
OpenMenu
end if
end if
end if
End Sub

#မလိုအပ္​တဲ့code​ေတြဖယ္​လိုက္​ပါ