B4A Library ICOSWorldForecast 3.50

lonleystar · Oct 1, 2012

View attachment 14755 View attachment 14754 View attachment 16846 Hi guys, ICOSWorldForecast is here.

It's a pleasure to introduce the new library of weather forecast.

The zip include:

The library, and the demo

INSTALLATION:

Copy the Library in your Basic For Android Library.

Copy the folder weathericon is located in files in the demo. In your one.

RENAME:
ICOSWorldForecast2.71.part1.zip and ICOSWorldForecast2.71.part2.zip

TO:
ICOSWorldForecast2.71.part1.rar and ICOSWorldForecast2.71.part1.rar

In this version I add WeatherUrl and 2 more days forecast.

You can use your own icons, instead of my icons.

For this new version 2.71 you need the new key.

You must register to obtain the new key, otherwise you will get error.

Use the address below to register.

World Weather Online - Welcome to the World Weather Online Developer Network!

don't forget to replace the ApiKey="XXXXXXXXXXXXXX" with your private key

This demos, I made with my galaxy tab 7 600x1024

any question or bugs please report to me.

big Thx to warwound for is fantastic auto-generated reference.

ICOSWorldForecast
Author: Giuseppe Salvi
Version: 2.81

ICOSWorldForecast
Methods:
- FCDate (index As Int) As String
  Return Date for which the weather is forecasted
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCDate(0)
- FCIcon (index As Int) As Bitmap
  Return Weather symbol image
  example:
  Dim a As ICOSWorldForecast
  Image1.SetBackgroundImage=a.FCWeatherIcon(0)
- FCIconUrl (index As Int) As String
  Return URLIcon For Forecast Condition
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCIconUrl(0)
- FCPrecipitationMM (index As Int) As String
  Return Precipitation amount in millimeter
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCPrecipitationMM(0)
- FCTempMaxCelsius (index As Int) As String
  Return Day and night max temperature in Celcius
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCTempMaxCelsius(0)
- FCTempMaxFahrenheit (index As Int) As String
  Return Day and night max temperature in Fahrenheit
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCTempMaxFahrenheit(0)
- FCTempMinCelsius (index As Int) As String
  Return Day and night min temperature in Celcius
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCTempMinCelsius(0)
- FCTempMinFahrenheit (index As Int) As String
  Return Day and night max temperature in Fahrenheit
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCTempMinFahrenheit(0)
- FCWeatherCode (index As Int) As String
  Return Weather Code
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCWeatherCode(0)
- FCWeatherDesc (index As Int) As String
  Return Weather description
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCWeatherDesc(0)
- FCWinddir16Point (index As Int) As String
  Return 16-Point compass wind direction
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCWinddir16Point(0)
- FCWinddirDegree (index As Int) As String
  Return Wind direction in degree
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCWinddirDegree(0)
- FCWinddirection (index As Int) As String
  Return Compass Wind direction
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCWinddirection(0)
- FCWindspeedKmph (index As Int) As String
  Return Wind speed in kilometer per hour
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCWindspeedKmph(0)
- FCWindspeedMiles (index As Int) As String
  Return Wind speed in Miles per hour
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.FCWindspeedMiles(0)
- FindLatAndLong As String
  Retrieve accurate latitude and longitude from GPS or network services
- FindLocation As String
  Retrieve accurate location from GPS or network services
- Full7DayName (day As Int) As String
  Return Full name of the day ( Monday )
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.Full7DayName(0) ' 0 = today - 1 = tomorrow etc etc
- GetList (mCity As String) As ArrayList
  Set the City Name you wish to get the weather
  example:
  Dim a As ICOSWorldForecast
  Dim l As List
  Dim lv1 As ListView
  l = a.GetList("Los Angeles")
  For n = 0 To l.Size-1
  lv1.AddSingleLine(l.Get(n))
  Next
  Sub lv1_ItemClick (Position As Int, Value As Object)ics.CityName = lv1.GetItem(Position)
  lv1.Clear
  End Sub
- Initialize (EventName As String)
  Initilize the object
- Short7DayName (day As Int) As String
  Return Short name of the day ( Mon )
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.Short7DayName(0) ' 0 = today - 1 = tomorrow etc etc
- StringFormat (format As String, object As Object, object1 As Object) As String
  Return Formatted String
  example:
  Label1.Text=StringFormat("Lat: %1$s - Long: %2$s ",Latitude,Longitude)
- isWiFiConnected As Boolean
  Check if WiFi is Connected
Permissions:
- android.permission.ACCESS_ASSISTED_GPS
- android.permission.ACCESS_COARSE_LOCATION
- android.permission.ACCESS_FINE_LOCATION
- android.permission.ACCESS_GPS
- android.permission.ACCESS_LOCATION_EXTRA_COMMANDS
- android.permission.ACCESS_NETWORK_STATE
- android.permission.ACCESS_WIFI_STATE
- android.permission.CONTROL_LOCATION_UPDATES
- android.permission.INTERNET
Properties:
- ApiKey As String [write only]
  Set your personal ApiKey
  example:
  Dim a As ICOSWorldForecast
  a.ApiKey="XXXXXXXXXXXXXXXXXXXXXXXXXXXX"
- AreaName As String [read only]
  Return Name of the city
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.AreaName
- CCCloudCover As String [read only]
  Return Cloud Cover in %
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCCloudCover
- CCHumidity As String [read only]
  Return Humidity in %
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCHumidity
- CCIcon As Bitmap [read only]
  Return Weather symbol image
  example:
  Dim a As ICOSWorldForecast
  Image1.SetBackgroundImage=a.CCWeatherIcon
- CCIconUrl As String [read only]
  Return URLIcon For Current Condition
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCIconUrl
- CCLocalObsDateTime As String [read only]
  Return Local Observation date and time
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCLocalObsDateTime
- CCObservationTime As String [read only]
  Return Observation time (UTC)
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCObservationTime
- CCPrecipitationMM As String [read only]
  Return Precipitation Amount in Millimeter
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.PrecipitationMM
- CCPressure As String [read only]
  Return Atmospheric pressure in Milibars
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCPressure
- CCTempCelsius As String [read only]
  Return Temperature in Celsius
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCTempCelsius
- CCTempFahrenheit As String [read only]
  Return Temperature in Fahrenheit
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCTempFahrenheit
- CCVisibility As String [read only]
  Return Visibility kilometers per hour
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCVisibility
- CCWeatherCode As String [read only]
  Return Weather Code
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCWeatherCode
- CCWeatherDescription As String [read only]
  Return Weather Description
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCWeatherDescription
- CCWinddir16Point As String [read only]
  Return 16-Point wind direction compass
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCWinddir16Point
- CCWinddirDegree As String [read only]
  Return Wind direction in degree
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCWinddirDegree
- CCWindspeedKmph As String [read only]
  Return Wind speed in kilometer per hour
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCWindspeedKmph
- CCWindspeedMiles As String [read only]
  Return Wind speed in Miles per hour
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CCWindspeedMiles
- CityName As String [write only]
  Set City you wish to get the weather
  example:
  Dim a As ICOSWorldForecast
  a.CityName="New York"
- Country As String [read only]
  Return Name of the Country
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.Country
- CurrentDate As String [read only]
  Return Current Day,Month,Year ( Friday, 28 September, 2012 )
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CurrentDate
- CurrentTime As String [read only]
  Return Current time ( 02.09 PM )
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.CurrentTime
- DstOffset As String [read only]
  Return DstOffset = ( GMT +2 )
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.DstOffset
- GmtOffset As String [read only]
  Return GmtOffset = ( GMT +1 )
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.GmtOffset
- LatAndLong As String [write only]
  Set Lat and Long you wish to get the weather
  example:
  Dim a As ICOSWorldForecast
  a.LatAndLong="40.714,-74.006"
- Latitude As Object [read only]
  Return Latitude of the city
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.Latitude
- Longitude As Object [read only]
  Return Longitude of the city
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.Longitude
- Population As String [read only]
  Return Population of the city
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.Population
- Region As String [read only]
  Return Name of the Region
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.Region
- Sunrise As String [read only]
  Return Sunrise = 06:04
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.Sunrise
- Sunset As String [read only]
  Return Sunset = 19:36
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.Sunset
- TimeZoneID As String [read only]
  Return TimeZoneID = Europe/Rome
  example:
  Dim a As ICOSWorldForecast
  Label1.Text=a.TimeZoneID
- Version As Double [read only]
  Return the version of this library
- WeatherUrl As String [read only]
  Return url of the city [ http://www.worldweatheronline.com/London-weather/City-of-London-Greater-London/GB.aspx ]
  example:
  Dim Webview1 As Webview
  Webview1.LoadUrl(a.WeatherUrl)

GMan · Apr 10, 2013

Thx a lot - now i understood the "system" and the whole Enchilada works fine

lonleystar · Apr 10, 2013

GMan said:
Thx a lot - now i understood the "system" and the whole Enchilada works fine

Hi GMan, Tanks to you.

GMan · Apr 15, 2013

I made a little code snippet for translating the english weather conditions into german.

Depending on a defined variable AppLanguage (as int) - english language is 0, german is 1 - it shows the german translation in the definded label lb4

Feel free to use and made some additional languages, too.

B4X:

   If AppLanguage = "1" Then
   Select True
       Case a.CCWeatherDescription = "Sunny"
      lb4.Text = "Sonnig"
      Case a.CCWeatherDescription = "Clear"
      lb4.Text = "Klar"
       Case a.CCWeatherDescription = "Cloudy"
           lb4.Text = "Bewölkt"
      Case a.CCWeatherDescription = "Partly Cloudy"
           lb4.Text = "teilweise Bewölkt"
      Case a.CCWeatherDescription = "Snowy"
           lb4.Text = "Schnee"
      Case a.CCWeatherDescription = "Stormy"
           lb4.Text = "Sturm"
      Case a.CCWeatherDescription = "Mist"
           lb4.Text = "Dunst"
      Case a.CCWeatherDescription = "Moderate rain"
           lb4.Text = "Regen"   
      Case a.CCWeatherDescription = "Light rain"
           lb4.Text = "leichter Regen"
      Case a.CCWeatherDescription = "Moderate rain at times"
           lb4.Text = "zeitweise Schauer"
      Case a.CCWeatherDescription = "Heavy rain at times"
           lb4.Text = "zeitweise starke Schauer"
      Case a.CCWeatherDescription = "Heavy rain"
           lb4.Text = "starker Regen"
      Case a.CCWeatherDescription = "Light freezing rain"
           lb4.Text = "leichter gefrierender Regen"
      Case a.CCWeatherDescription = "Moderate OR Heavy freezing rain"
           lb4.Text = "mittlerer bis starker gefrierender Regen"
      Case a.CCWeatherDescription = "Light drizzle"
           lb4.Text = "leichter Nieselregen"
      Case a.CCWeatherDescription = "Fog"
           lb4.Text = "Nebel"
      Case a.CCWeatherDescription = "Overcast"
           lb4.Text = "Bewölkt"
      Case a.CCWeatherDescription = "Light rain shower"
           lb4.Text = "leichte Regenschauer"
      Case a.CCWeatherDescription = "Moderate OR heavy rain shower"
           lb4.Text = "mittlere bis starke Regenschauer"
      Case a.CCWeatherDescription = "Torrential rain shower"
           lb4.Text = "Sintflutartige Regenfälle !" 
      Case a.CCWeatherDescription = "Light sleet showers"
           lb4.Text = "leichte Graupelschauer"
      Case a.CCWeatherDescription = "Moderate OR heavy sleet showers"
           lb4.Text = "mittlere bis starke Graupelschauer"
      Case a.CCWeatherDescription = "Moderate OR heavy snow showers"
           lb4.Text = "mittlere bis starke Schneeschauer"
      Case a.CCWeatherDescription = "Light showers of ice pellets"
           lb4.Text = "leichte Hagelschauer"
      Case a.CCWeatherDescription = "Light snow showers"
           lb4.Text = "leichte Schneeschauer"
      Case a.CCWeatherDescription = "Moderate OR heavy showers of ice pellets"
           lb4.Text = "mittlere bis starke Hagelschauer"
      Case a.CCWeatherDescription = "Patchy light rain In area with thunder"
           lb4.Text = "leichter örtlicher Regen mit Donner"
      Case a.CCWeatherDescription = "Moderate OR heavy rain In area with thunder"
           lb4.Text = "mittlere bis starker örtlicher Regen mit Donner"
      Case a.CCWeatherDescription = "Patchy light snow In area with thunder"
           lb4.Text = "leichter örtlicher Schnee mit Donner"
      Case a.CCWeatherDescription = "Moderate OR heavy snow In area with thunder"
           lb4.Text = "mittlere bis starker örtlicher Schnee mit Donner"
      Case a.CCWeatherDescription = "Ice pellets"
           lb4.Text = "Hagel"
      Case a.CCWeatherDescription = "Heavy snow"
           lb4.Text = "starker Schnee"
      Case a.CCWeatherDescription = "Patchy heavy snow"
           lb4.Text = "teilweise starker Schnee"
      Case a.CCWeatherDescription = "Moderate snow"
           lb4.Text = "mittlerer Schnee"
      Case a.CCWeatherDescription = "Patchy moderate snow"
           lb4.Text = "teilweise mittlerer Schnee"
      Case a.CCWeatherDescription = "Light snow"
           lb4.Text = "leichter Schnee"
      Case a.CCWeatherDescription = "Patchy light snow"
           lb4.Text = "teilweise leichter Schnee"
      Case a.CCWeatherDescription = "Moderate OR heavy sleet"
           lb4.Text = "mittlerer bis starker Schnee"
      Case a.CCWeatherDescription = "Light sleet"
           lb4.Text = "leichter Schneeregen"
      Case a.CCWeatherDescription = "Patchy light rain"
           lb4.Text = "teilweise leichter Regen"
      Case a.CCWeatherDescription = "Heavy freezing drizzle"
           lb4.Text = "starker gefrierender Nieselregen"
      Case a.CCWeatherDescription = "Freezing drizzle"
           lb4.Text = "gefrierender Nieselregen"
      Case a.CCWeatherDescription = "Patchy light drizzle"
           lb4.Text = "teilweise leichter Nieselregen"
      Case a.CCWeatherDescription = "Freezing fog"
           lb4.Text = "gefrierender Nebel"
      Case a.CCWeatherDescription = "Blizzard"
           lb4.Text = "Schneesturm"
      Case a.CCWeatherDescription = "Blowing snow"
           lb4.Text = "Schneetreiben"
      Case a.CCWeatherDescription = "Thundery outbreaks In nearby"
           lb4.Text = "Gewitter in der Nähe"
      Case a.CCWeatherDescription = "Patchy freezing drizzle nearby"
           lb4.Text = "teilweise gefrierender Nieselregen in der Nähe"
      Case a.CCWeatherDescription = "Patchy sleet nearby"
           lb4.Text = "leichter Schneeregen in der Nähe"
      Case a.CCWeatherDescription = "Patchy snow nearby"
           lb4.Text = "leichter Schneefall in der Nähe"
      Case a.CCWeatherDescription = "Patchy rain nearby"
           lb4.Text = "leichter Regen in der Nähe"
   End Select
   End If

I placed this code AFTER the call of the weather sub and it works fine.

lonleystar · Apr 16, 2013

GMan said:

I made a little code snippet for translating the english weather conditions into german.

Depending on a defined variable AppLanguage (as int) - english language is 0, german is 1 - it shows the german translation in the definded label lb4

Feel free to use and made some additional languages, too.

B4X:

   If AppLanguage = "1" Then
   Select True
       Case a.CCWeatherDescription = "Sunny"
      lb4.Text = "Sonnig"
      Case a.CCWeatherDescription = "Clear"
      lb4.Text = "Klar"
       Case a.CCWeatherDescription = "Cloudy"
           lb4.Text = "Bewölkt"
      Case a.CCWeatherDescription = "Partly Cloudy"
           lb4.Text = "teilweise Bewölkt"
      Case a.CCWeatherDescription = "Snowy"
           lb4.Text = "Schnee"
      Case a.CCWeatherDescription = "Stormy"
           lb4.Text = "Sturm"
      Case a.CCWeatherDescription = "Mist"
           lb4.Text = "Dunst"
      Case a.CCWeatherDescription = "Moderate rain"
           lb4.Text = "Regen"   
      Case a.CCWeatherDescription = "Light rain"
           lb4.Text = "leichter Regen"
      Case a.CCWeatherDescription = "Moderate rain at times"
           lb4.Text = "zeitweise Schauer"
      Case a.CCWeatherDescription = "Heavy rain at times"
           lb4.Text = "zeitweise starke Schauer"
      Case a.CCWeatherDescription = "Heavy rain"
           lb4.Text = "starker Regen"
      Case a.CCWeatherDescription = "Light freezing rain"
           lb4.Text = "leichter gefrierender Regen"
      Case a.CCWeatherDescription = "Moderate OR Heavy freezing rain"
           lb4.Text = "mittlerer bis starker gefrierender Regen"
      Case a.CCWeatherDescription = "Light drizzle"
           lb4.Text = "leichter Nieselregen"
      Case a.CCWeatherDescription = "Fog"
           lb4.Text = "Nebel"
      Case a.CCWeatherDescription = "Overcast"
           lb4.Text = "Bewölkt"
      Case a.CCWeatherDescription = "Light rain shower"
           lb4.Text = "leichte Regenschauer"
      Case a.CCWeatherDescription = "Moderate OR heavy rain shower"
           lb4.Text = "mittlere bis starke Regenschauer"
      Case a.CCWeatherDescription = "Torrential rain shower"
           lb4.Text = "Sintflutartige Regenfälle !" 
      Case a.CCWeatherDescription = "Light sleet showers"
           lb4.Text = "leichte Graupelschauer"
      Case a.CCWeatherDescription = "Moderate OR heavy sleet showers"
           lb4.Text = "mittlere bis starke Graupelschauer"
      Case a.CCWeatherDescription = "Moderate OR heavy snow showers"
           lb4.Text = "mittlere bis starke Schneeschauer"
      Case a.CCWeatherDescription = "Light showers of ice pellets"
           lb4.Text = "leichte Hagelschauer"
      Case a.CCWeatherDescription = "Light snow showers"
           lb4.Text = "leichte Schneeschauer"
      Case a.CCWeatherDescription = "Moderate OR heavy showers of ice pellets"
           lb4.Text = "mittlere bis starke Hagelschauer"
      Case a.CCWeatherDescription = "Patchy light rain In area with thunder"
           lb4.Text = "leichter örtlicher Regen mit Donner"
      Case a.CCWeatherDescription = "Moderate OR heavy rain In area with thunder"
           lb4.Text = "mittlere bis starker örtlicher Regen mit Donner"
      Case a.CCWeatherDescription = "Patchy light snow In area with thunder"
           lb4.Text = "leichter örtlicher Schnee mit Donner"
      Case a.CCWeatherDescription = "Moderate OR heavy snow In area with thunder"
           lb4.Text = "mittlere bis starker örtlicher Schnee mit Donner"
      Case a.CCWeatherDescription = "Ice pellets"
           lb4.Text = "Hagel"
      Case a.CCWeatherDescription = "Heavy snow"
           lb4.Text = "starker Schnee"
      Case a.CCWeatherDescription = "Patchy heavy snow"
           lb4.Text = "teilweise starker Schnee"
      Case a.CCWeatherDescription = "Moderate snow"
           lb4.Text = "mittlerer Schnee"
      Case a.CCWeatherDescription = "Patchy moderate snow"
           lb4.Text = "teilweise mittlerer Schnee"
      Case a.CCWeatherDescription = "Light snow"
           lb4.Text = "leichter Schnee"
      Case a.CCWeatherDescription = "Patchy light snow"
           lb4.Text = "teilweise leichter Schnee"
      Case a.CCWeatherDescription = "Moderate OR heavy sleet"
           lb4.Text = "mittlerer bis starker Schnee"
      Case a.CCWeatherDescription = "Light sleet"
           lb4.Text = "leichter Schneeregen"
      Case a.CCWeatherDescription = "Patchy light rain"
           lb4.Text = "teilweise leichter Regen"
      Case a.CCWeatherDescription = "Heavy freezing drizzle"
           lb4.Text = "starker gefrierender Nieselregen"
      Case a.CCWeatherDescription = "Freezing drizzle"
           lb4.Text = "gefrierender Nieselregen"
      Case a.CCWeatherDescription = "Patchy light drizzle"
           lb4.Text = "teilweise leichter Nieselregen"
      Case a.CCWeatherDescription = "Freezing fog"
           lb4.Text = "gefrierender Nebel"
      Case a.CCWeatherDescription = "Blizzard"
           lb4.Text = "Schneesturm"
      Case a.CCWeatherDescription = "Blowing snow"
           lb4.Text = "Schneetreiben"
      Case a.CCWeatherDescription = "Thundery outbreaks In nearby"
           lb4.Text = "Gewitter in der Nähe"
      Case a.CCWeatherDescription = "Patchy freezing drizzle nearby"
           lb4.Text = "teilweise gefrierender Nieselregen in der Nähe"
      Case a.CCWeatherDescription = "Patchy sleet nearby"
           lb4.Text = "leichter Schneeregen in der Nähe"
      Case a.CCWeatherDescription = "Patchy snow nearby"
           lb4.Text = "leichter Schneefall in der Nähe"
      Case a.CCWeatherDescription = "Patchy rain nearby"
           lb4.Text = "leichter Regen in der Nähe"
   End Select
   End If

I placed this code AFTER the call of the weather sub and it works fine.

Hi GMan thank you for the translation.

Ich spreche auch Deutsch, nicht perfekt, aber ich jetzt studiere.
I speak also German, not perfect, but I am now studying.

Manchmal mache ich Fehler. meine Grammatik ist nicht so gut.
Sometimes I make mistakes. my grammar is not so good.

Vielen Dank für deine Idee, ich hoffe, dass jemand anderes übersetzen es in andere Sprachen.
Thanks for your idea I hope someone else translate it into other languages.

I´ll do that.

GMan · Apr 16, 2013

Hi lonleystar,

german is my native language and so i know: the worst is the grammatic

Therefor english is the main language of the world :sign0089:

lonleystar · Apr 16, 2013

GMan said:
Hi lonleystar,

german is my native language and so i know: the worst is the grammatic

Therefor english is the main language of the world :sign0089:

Hi GMan, you're right,
Die Deutsch sprache ist schwierig.

In which part of Germany do you live?

GMan · Apr 16, 2013

Hi loneleystar,

in the moment near Dortmund, between the "Ruhrgebiet" and the "Sauerland" area, but i also lived in the Netherlands and on Mallorca Island in Spain (but years ago)

lonleystar · Apr 16, 2013

GMan said:
Hi loneleystar,

in the moment near Dortmund, between the "Ruhrgebiet" and the "Sauerland" area, but i also lived in the Netherlands and on Mallorca Island in Spain (but years ago)

Hi GMan,

now i living near Stuttgard, but from 1996 to 1999 i bin in Ijmuiden 20 km fro Amsterdam.

GMan · Apr 16, 2013

Hi,

now i living near Stuttgard,

i am very sad about that :sign0089:

About the "Schwaben" (the extra species of people who live there ) we say:
"Swabians are Scots, expelled for stinginess" :sign0089:

touchsquid · Apr 19, 2013

The library works almost perfectly, except the day of week functions. Your demo app shows today as Monday, and tomorrow Tuesday etc. Unfortunately today is Thursday!

Can you help? If I use the library I'll definitely make a donation.

By the way, thanks for your great contributions to this forum.

javiers · Apr 19, 2013

marine weather?

Hello
think expanding the library for marine weather ?

a greeting.

lonleystar · Apr 19, 2013

javiers said:
Hello
think expanding the library for marine weather ?

a greeting.

Hi Javiers, yes i´ll in May when I finish, the Deutsch course

javiers · Apr 19, 2013

We'll be waiting ... Thanks

lonleystar · Apr 20, 2013

Fixed isWiFiConnected

Hi guys,

I fixed isWiFiConnected now work well

the ICOSWorldForecast-Library v2.73.zip contains only the library

GMan · Apr 20, 2013

Tested - works well

Is there the possibilty to get moon phases from that service ?
weatherunderground also offers an api, which i use with coding windows software.
Depending on your answer i will have a look at it - should also be possible to implement in B4A :sign0060::icon_clap:

Aha, you changed

Full5DayName(0)

to

Full7DayName(0)

lonleystar · Apr 20, 2013

GMan said:
Tested - works well

Is there the possibilty to get moon phases from that service ?
weatherunderground also offers an api, which i use with coding windows software.
Depending on your answer i will have a look at it - should also be possible to implement in B4A :sign0060::icon_clap:

Aha, you changed

to

Hi GMan,

it is possible only in premium.

I already start building the premium weather.

GMan · Apr 20, 2013

OK, then I will have a look to the Free Wunderground weather API :sign0087:

lonleystar · Apr 21, 2013

Now TimeZoneID,GmtOffset,DstOffset,Sunrise,Sunset

Hi Guys,

I just upload the new update that now include:

TimeZoneID
GmtOffset
DstOffset
Sunrise
Sunset

B4X:

lb1.Text="TimeZoneID: "&a.TimeZoneID
lb2.text="GMT: "&a.GmtOffset&" - DstOffset: "&a.DstOffset
lb3.text="SunRise: "&a.Sunrise
lb4.text="SunSet: "&a.Sunset

GMan · Apr 21, 2013

TOP Job - Thx a lot :icon_clap:

lonleystar · Apr 21, 2013

GMan said:
TOP Job - Thx a lot :icon_clap:

Hi GMain,

Thank you, now i´m building a Marine Weather will be soon.

B4A Library ICOSWorldForecast 3.50

Attachments

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Active Member

Active Member

Well-Known Member

Active Member

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Well-Known Member

Attachments

Well-Known Member

Well-Known Member

Privacy & Transparency

Privacy & Transparency