B4A Library StartApp ads service

Hello everyone, also posted here.

Tappx

Tappx ads service

1. Register with Tappx and get an app key: https://www.tappx.com 2. Download their AAR library and copy it to the additional libraries folder: https://repo1.maven.org/maven2/com/tappx/sdk/android/tappx-sdk/3.1.3/ 3. Add dependencies: #AdditionalJar: tappx-sdk-3.0.9.aar #AdditionalJar...
www.b4x.com www.b4x.com
Displayio

display.io ads service

1. Register with http://www.display.io/en/, create a new app and an interstitial ad unit. 2. Download their sdk and copy it to the additional libraries folder. 3. Add to manifest editor: AddPermission(android.permission.INTERNET) AddPermission(android.permission.ACCESS_NETWORK_STATE)...
www.b4x.com www.b4x.com

Here is an example of how to use StartApp, banner and interstitial with lasted SDK version.
www.startapp.com

Start.io | Mobile Marketing & Audience Platform for Marketers

We are a mobile data platform that enables organizations to uncover AI-driven insights and make data-driven decisions that enhance strategies and drive growth
www.startapp.com www.startapp.com
Download the 4.6.1 jar file.
sdk.png

B4X: 
#AdditionalJar: StartAppInApp-4.6.1
Manifest (the code generated in the startApp goes here in the manifest)
XML: 
'STARTAPP
AddPermission(android.permission.INTERNET)
AddPermission(android.permission.ACCESS_WIFI_STATE)
AddPermission(android.permission.ACCESS_NETWORK_STATE)
AddPermission(android.permission.ACCESS_COARSE_LOCATION)
AddPermission(android.permission.ACCESS_FINE_LOCATION)
AddPermission(android.permission.RECEIVE_BOOT_COMPLETED)
AddPermission(android.permission.BLUETOOTH)
AddApplicationText(
<provider
 android:name="com.startapp.sdk.adsbase.StartAppInitProvider"
 android:authorities="${applicationId}.startappinitprovider"
 android:exported="false" />
<activity
 android:name="com.startapp.sdk.adsbase.consent.ConsentActivity"
 android:configChanges="orientation|screenSize|screenLayout|keyboardHidden"
 android:theme="@android:style/Theme.Translucent"/>
<activity
 android:name="com.startapp.sdk.ads.list3d.List3DActivity"
 android:theme="@android:style/Theme"/>
<activity
 android:name="com.startapp.sdk.adsbase.activities.OverlayActivity"
 android:configChanges="orientation|screenSize|screenLayout|keyboardHidden"
 android:theme="@android:style/Theme.Translucent"/>
<activity
 android:name="com.startapp.sdk.adsbase.activities.FullScreenActivity"
 android:configChanges="orientation|screenSize|screenLayout|keyboardHidden"
 android:theme="@android:style/Theme"/>
<service android:name="com.startapp.sdk.adsbase.InfoEventService" />
<service
 android:name="com.startapp.sdk.adsbase.PeriodicJobService"
 android:permission="android.permission.BIND_JOB_SERVICE" />
<receiver android:name="com.startapp.sdk.adsbase.remoteconfig.BootCompleteListener">
 <intent-filter>
 <action android:name="android.intent.action.BOOT_COMPLETED"/>
 </intent-filter>
</receiver>
 <meta-data
 android:name="com.startapp.sdk.APPLICATION_ID"
 android:value="xxxxxxxxYOUR APP CODE HERExxxxxxxxxxxx" />
)
Service
B4X: 
#Region  Service Attributes
    #StartAtBoot: False
#End Region

Sub Process_Globals
    
    'GENERAL
    Private StartAppSDK As JavaObject
    Private ctxt As JavaObject
    Private appKey As String
    Private testMode As Boolean = True
    Private retryTime As Int = 30000
    
    'INTER
    Private StartAppAd As JavaObject
    Public isInterstitialReady As Boolean = False
    Private AdListenerInterstitial As Object
    Private AdDisplayListener As Object
    
    
    'BANNER
    Private BannerAdListener As Object
    Public isBannerReady As Boolean = False
    Private bannerAd As JavaObject
    Public bannerHeight As Int = 51dip
    Public bannerView As JavaObject
    
End Sub

Sub Service_Create
    
    'INITIALIZE CONTEXT
    ctxt.InitializeContext
    
    'GET APP KEY ID
    appKey = Get_Key("com.startapp.sdk.APPLICATION_ID")
    
    'INITIALIZE SDK
    StartAppSDK.InitializeStatic("com.startapp.sdk.adsbase.StartAppSDK")
    StartAppSDK.RunMethod("init", Array(ctxt,appKey,True))
    StartAppSDK.RunMethod("setTestAdsEnabled", Array(testMode)) 'TEST MODE ON

    'INTER
    StartAppAd.InitializeNewInstance("com.startapp.sdk.adsbase.StartAppAd", Array(ctxt))
    AdListenerInterstitial = StartAppAd.CreateEventFromUI("com.startapp.sdk.adsbase.adlisteners.AdEventListener", "AdListenerInterstitial", Null)
    AdDisplayListener = StartAppAd.CreateEventFromUI("com.startapp.sdk.adsbase.adlisteners.AdDisplayListener", "AdDisplayListener", Null)
    Load_Inter

    'BANNER
    bannerAd.InitializeNewInstance("com.startapp.sdk.ads.banner.Banner", Array(ctxt))
    BannerAdListener = bannerAd.CreateEventFromUI("com.startapp.sdk.ads.banner.BannerListener", "BannerAdListener", Null)
    bannerAd.RunMethod("setBannerListener", Array(BannerAdListener))
    Load_Banner
    

End Sub

Sub Service_Start (StartingIntent As Intent)
    Service.StopAutomaticForeground
End Sub

Sub Service_Destroy

End Sub



#Region INTER

Private Sub AdListenerInterstitial_Event (MethodName As String, Args() As Object) As Object 'INTER EVENTS
    Select MethodName
        
        Case "onReceiveAd"
            LogColor("onReceiveAd Inter StartApp", Colors.Green)
            isInterstitialReady = True
            
        Case "onFailedToReceiveAd"
            LogColor("onFailedToReceiveAd Inter StartApp", Colors.Green)
            isInterstitialReady = False
            Retry_Inter
                        
    End Select
    Return Null
End Sub


Private Sub AdDisplayListener_Event (MethodName As String, Args() As Object) As Object
    Select MethodName

        Case "adHidden"
            isInterstitialReady = False
            LogColor("adHidden Inter StartApp", Colors.Green)

        Case "adDisplayed"
            isInterstitialReady = False
            LogColor("adDisplayed Inter StartApp", Colors.Green)

        Case "adClicked"
            isInterstitialReady = False
            LogColor("adClicked Inter StartApp", Colors.Green)
            
        Case "adNotDisplayed"
            LogColor("adNotDisplayed Inter StartApp", Colors.Green)
            isInterstitialReady = False
            Retry_Inter
            
    End Select
    Return Null
End Sub


Sub Load_Inter
    Try
        StartAppAd.RunMethod("loadAd", Array(AdListenerInterstitial))
    Catch
        If LastException.IsInitialized Then Log(LastException)
        Retry_Inter
    End Try
End Sub

Sub Retry_Inter
    isInterstitialReady = False
    Sleep(retryTime)
    Load_Inter
End Sub


Sub Show_Inter
    StartAppAd.RunMethod("showAd", Array(AdDisplayListener))
End Sub

#End Region





#Region BANNER

Private Sub BannerAdListener_Event (MethodName As String, Args() As Object) As Object
    Select MethodName

        Case "onReceiveAd"
            LogColor("onReceiveAd Banner StartApp", Colors.Green)
            isBannerReady = True
            bannerView = Args(0)

        Case "onFailedToReceiveAd"
            LogColor("onFailedToReceiveAd Banner StartApp", Colors.Green)
            isBannerReady = False
            Retry_Banner
            
        Case "onClick"
            LogColor("onClick Banner StartApp", Colors.Green)
                
    End Select
    Return Null
End Sub


Sub Load_Banner
    Try
        bannerAd.RunMethod("loadAd", Array(320,50))
    Catch
        If LastException.IsInitialized Then Log(LastException)
        Retry_Banner
    End Try
End Sub

Sub Retry_Banner
    isBannerReady = False
    Sleep(retryTime)
    Load_Banner
End Sub

#End Region


Private Sub Get_Key(key As String) As String
    Dim ApplicationInfo As JavaObject = ctxt.RunMethodJO("getPackageManager", Null).RunMethod("getApplicationInfo", Array(Application.PackageName, 0x00000080))
    Dim bundle As JavaObject = ApplicationInfo.GetField("metaData")
    Return bundle.RunMethod("getInt", Array(key))
End Sub
I use it in a service (where all events work correctly), but you can compile it as a library or use it as a class.

Interstitial
B4X: 
If Not(IsPaused(StartApp)) And StartApp.isInterstitialReady Then CallSub(StartApp, "Show_Inter")
Banner
B4X: 
If Not(IsPaused(StartApp)) And StartApp.isBannerReady Then
    Private bannerView As View
    bannerView = StartApp.bannerView
    Activity.AddView(bannerView,0%x, 100%y - 51dip, 100%x, 51dip)
End if


Thx
 
Click to expand...
Douglas Farias

Douglas Farias

Expert
Licensed User
Longtime User
hl88 said:
I created 3 service module (start.io, display.io, tappx), download the lastest jar/aar files, create 3 account, add each ad units to manifest, All into one sample. @Douglas Farias It's not working
View attachment 108923
Click to expand...
Hi.
the days when I created these tutorials were other versions of sdk (jar) 4.6.1 in this case.
I believe that to work the new versions of the companies would have to make some changes.

this tutorial: 4.6.1
today: 4.8.2

I will test the changes and get back to you soon.
 
mcqueccu

mcqueccu

Well-Known Member
Licensed User
Longtime User
Douglas Farias said:
Hi.
the days when I created these tutorials were other versions of sdk (jar) 4.6.1 in this case.
I believe that to work the new versions of the companies would have to make some changes.

this tutorial: 4.6.1
today: 4.8.2

I will test the changes and get back to you soon.
Click to expand...

Hi, any changes - I currently have SDK v. 4.8.9 and the interstitial ads are loaded, but always giving me adsNotDisplayed
 
Last edited:
You must log in or register to reply here.

Similar Threads

Mashiane
Mashy Teaches WebApp/Website Development with BANanoVuetifyAD3 - The New Series
7 8 9
Replies
163
Views
50K
Mashiane
Mashiane
Erel
  • Locked
  • Article
B4A Library AdsHelper extends FirebaseAdMob2 / Google Mobile Ads v20.0+
2 3
Replies
45
Views
18K
Erel
Erel
Erel
  • Locked
  • Article
B4A Library FirebaseAdMob v1.6
2 3
Replies
42
Views
26K
Erel
Erel
Erel
  • Locked
  • Article
B4A Library FirebaseAdMob - Admob ads integrated with Firebase backend
4 5 6
Replies
115
Views
80K
Erel
Erel
Erel
  • Locked
  • Article
Android Tutorial Integrating Firebase Services
Replies
1
Views
92K
Erel
Erel
Top