De letters “it” zijn altijd leuk voor een woordspeling in deze sector. En de gambas-it site is er zeker één van.
Het is een zeer goed gestoffeerde site over Gambas, in de vorm van een wiki.
Helaas (voor mij) staat de “it” hier voor Italiaans…
De letters “it” zijn altijd leuk voor een woordspeling in deze sector. En de gambas-it site is er zeker één van.
Het is een zeer goed gestoffeerde site over Gambas, in de vorm van een wiki.
Helaas (voor mij) staat de “it” hier voor Italiaans…
[Gambas-user] I am now a company
Op de mailinglist van Gambas verscheen een opmerkelijk bericht, waarin Benoît Minisini, de auteur van Gambas, aankondigt dat hij ontslag genomen heeft op zijn werk.
Sinds 1 mei is hij zelfstandig consulent geworden, en in die hoedanigheid werkt hij wel verder voor zijn voormalige werkgever.
Alle werk dat hij voor die werkgever deed was gemaakt in Gambas.
De afspraak die hij maakte gaat nu in tot december, daarna ligt alles open.
Hijzelf heeft wel de bedoeling om verder te blijven werken aan Gambas.
Installeren van Gambas3 op Raspbian is gemakkelijk (zie vh/elders).
Een temperatuurvoeler aansluiten op een Raspberry Pi is ook gemakkelijk (zie bv hier)
Dan is een beetje code al genoeg, met een nieuw project dat alleen maar CLI hoeft te zijn (geen grafische interface nodig).
In MMain:
' Gambas module file
'
Private Const SENSORID As String = "10-0008032a0f9d"
Private Const DEVICELOCATION As String = "/sys/bus/w1/devices"
Private sFileContent As String
'
Public Sub Main()
'
Dim hTempFile As File
Dim sFilename As String = DEVICELOCATION &/ SENSORID &/ "w1_slave"
Dim iFoundTemp As Integer
Dim iCounter As Integer = 0
'
Debug "Filename is : " & sFilename
'
Repeat
hTempFile = Open sFilename For Read
'
sFileContent = hTempFile.Load(sFilename)
iFoundTemp = InStr(sFileContent, "t=")
'
hTempFile.Close
'
Print sFileContent
Print iFoundTemp
Print Val(Right(sFileContent, 6)) / 1000
Inc iCounter
Wait 10
Until iCounter > 10
'
End
Dit programma zal 10 keer na elkaar de temperatuur uitlezen en tonen.
Veel te weinig aandacht voor de Command Line Interface!
Je kan Gambas ook gebruiken om een terminal/console/konsole/commandolijn programma te maken, dat je zonder grafische interface kan starten (bv op een server zonder X/KDE/Gnome). Je start het als een commando, eventueel over een ssh sessie.
Of je kan een programma maken dat je start vanuit de cron jobs, m.a.w. je stelt je computer in om dat op bepaalde momenten uit te voeren, bv dagelijks om 01:00 u.
Start nieuw project, kies CLI, “testCLI”.
In Main kan je iets zetten als:
' Gambas module file ' Private bQuit As Boolean = False ' Public Sub Main() ' Dim sCommand As String ' While Not bQuit showShortMenu() Line Input sCommand Print " - - -" Debug "terminal got: " & sCommand If Len(Trim(sCommand)) = 1 ' short commands Select sCommand Case "Q", "q" Print "Closing down " & Application.Name & " now" bQuit = True Case "H", "h" showHelp() End Select Else Print Len(Trim(sCommand)) Endif Wend ' End ' Public Sub showShortMenu() ' Print "H = help, Q = quit" ' End ' Public Sub showHelp() ' Print " HELP!" ' End
Je kan het effect uitproberen vanuit de Gambas programmeeromgeving; die heeft onderaan een commandolijn die bij “Run” het programma uitvoert.
Bewaar het project en maak een “uitvoerbaar bestand” (testCLI.gambas) om het te kunnen starten buiten gambas om.
~/Gambas3/Gb3Run> ./testCLI.gambas
H = help , Q = quit
h
- - -
Main.Main.13: terminal got: h
HELP!
H = help , Q = quit
q
- - -
Main.Main.13: terminal got: q
Closing down empttrack now
(zie ook Library of Component)
Het gebruiken, maar ook het maken van een eigen Library is voorzien in de Gambas IDE. En je kan ook manueel een gewoon project als Library gebruiken.
1. Library gebruiken
IDE
Kies in de IDE bij het maken van het project (of ga in een bestaand project naar) menu Project/Eigenschappen/Bibliotheken
.
Onderaan dit venster (waar eventueel al gekozen Libraries staan) zie je een knop Toevoegen
. Daarmee krijg je een venster met een lijst van beschikbare bibliotheken.
Vendor
Die zijn georganiseerd volgens Vendor/Library, m.a.w. de vendor staat voor wie de Libraries levert. Als je een bestaande Library gebruikt is dat bepaald door wie ze gemaakt heeft. Als je de Library zelf maakt, kan dat in jouw geval gewoon je eigen naam zijn, de naam van de organisatie (bedrijf) waarvoor je werkt, of de naam van een project waar de Library in thuishoort. De vendor naam groepeert de Library bestanden, en dat bestaat zo als directory struktuur op de plaats waar ze geïnstalleerd zijn.
Kiezen
Je kan hier dus de Libraries die je in je project wil gebruiken kiezen, verwijderen, wijzigen (bv andere versie beschikbaar).
Elke library vermeldt ook welke klasse of module ze ter beschikking stelt, niet de details van welke methodes of eigenschappen ze aanbiedt. In de huidige versie van Gambas 3.9.2 vermeldt het ook niet de extra gegevens over de Library (auteur, beschrijving).
2. Libary maken (IDE)
Start de Gambas IDE, menu Bestand, Nieuw project: “1 Project Type”: ….
Dit scherm helpt je niet in je keuze; het project type “library” wordt niet vermeld!
Neem bv het eerste, command line application
, kies een directory en een naam (bv “DemoLibraryCLI”). Ok.
Je krijgt een project met alleen een MMain, die ook opstartklasse is (zwart pijtlje ervoor).
Ga naar Project, Eigenschappen, Algemeen; bij “Project Type” kies je Bibliotheek (ipv Normaal).
Vul de “verkoper” (vendor) in; bv TestVendor (je kan hier geen leestekens of spaties gebruiken; deze naam wordt gebruikt als directorynaam – zie boven). Beschrijving en Auteurs is niet verplicht. Ok.
Maak bij Bronnen een nieuwe module “MDate”. In het edit venster tik je onder ‘Gambas module file en de lege lijn:
Export
Bewaar.
' Gambas class file
'
' uitleg van wat de klasse doet
Export
' hieronder de code v/d klasse
In de linkse kolom krijgt de Modulenaam een gele stip; die geeft aan dat ze geëxporteerd wordt.
De andere, onzichtbare klassen kunnen dienen voor testcode enz.
Geef in het editorvenster wat code in; bv een publieke constante waarde waarin je favoriete formatteringscode voor de datum zit:
Public const sDateFormat As String = "dd-mm-yy"
en een procedure die die gebruikt:
Public Sub GetDateFormat(dDate As Date) As String
Return Format(dDate, sDateFormat)
End
Beiden zijn Public en kunnen dus extern gebruikt worden nadien.
Ps: Als je zelf iets moet benaderen in de directorystruktuur: ./ is waar de library zelf staat, ../ zou verwijzen naar het hoofdproject.
In MMain kan je code zetten om je module te testen; die MMain wordt toch niet geëxporteerd; bv:
(wordt ook zo aangegeven in de documentatie in “How to test a library”)
Print MDate.GetDateFormat(Now())
Als je dit project uitvoert, wordt de datum gedrukt als 20-10-18.
Als je een uitvoerbaar bestand maakt (plaats: bv je zelfgemaakt gambas project executables map “gb3Run”) met de naam DemoLibraryCLI.gambas, wordt ook een extra bestand gemaakt in een verborgen subdirectory je home directory.
/home/username/.local/share/gambas3/lib/TestVendor/DemoLibraryCLI:0.0.gambas
Het versienummer zit mee in de bestandsnaam (maar mist het laatste teken).
Ga naar je DemoLibaryApp (of maak die), en selecteer de library. (volg de instructies zoals hierboven).
De library is met Toevoegen zichtbaar onder TestVendor als DemoLibraryCLI met versie 0.0.
Met “ok” kan je ze kiezen, en je krijgt ze zichtbaar (met een versienummer 0.0.1) en “Voorziet in: MDate!”
3. Libary maken van bestaand project
upd 26022019
4. Library installeren
De meest luie manier om een eigen library te installeren op een andere machine, is een ssh verbinding te maken naar de pc waarop je het programma gemaakt hebt (en werkend hebt met de nodige libraries). Je kopieert de hele subdirectory van je vendor/lib01/ naar de bestemmingsmachine.
Een andere manier is het oorspronkelijke project van de library als tar.gz over te brengen naar de bestemming, en daar uit te pakken en “make executable”/”uitvoeringsbestand maken” (compileren alleen is niet genoeg), zie boven bij 1. Library gebruiken.
Om bestandsnamen te maken, namen van mappen, e-mail adressen, tekst voor opslag in een database veld, html, enz is het soms nodig om enkel bepaalde tekens te gebruiken. Enkele “sub-sets”:
Letters en cijfers:
Chr(i) waarbij i is:
Normale standaard tekens:
Chr(i) waarbij i is:
Extended:
Chr(i) waarbij i is:
Weergeven:
Public Sub Main()
Dim sStandaard, sExtend, sPureText As String
Dim iCount As Short
For iCount = 48 To 57
sPureText &= Chr(iCount)
Next
For iCount = 65 To 90
sPureText &= Chr(iCount)
Next
For iCount = 97 To 122
sPureText &= Chr(iCount)
Next
For iCount = 32 To 126
sStandaard &= Chr(iCount)
Next
For iCount = 128 To 255
sExtend &= Chr(iCount)
Next
Print "sPureText = " & sPureText
Print "sStandaard = " & sStandaard
Print "sExtend = " & sExtend
Om later eens te gebruiken …
Ik vond in een voorbeeld app in Gambas volgend stukje code:
Public Sub Add(ImagePath As String)
Dim img As Image
Dim newPicture As Result
'Dim pictureData As String
Dim scale As Float
Dim eTime As Float
newPicture = databaseConnection.Create("pictures")
' Save temp image as png file
img = Image.Load(ImagePath)
img.Save(tempFile)
newPicture["image"] = File.Load(tempFile)
' Create image thumb
If img.Width > thumbSize Or img.Height > thumbSize Then
' Calc factor to scale isotropic
scale = Min(ThumbSize / img.Width, ThumbSize / img.Height)
img = img.Stretch(img.Width * scale, img.Height * scale)
img.Save(tempFile)
End If
newPicture["thumb"] = File.Load(tempFile)
' Add description and update
newPicture["description"] = "Image " & File.BaseName(ImagePath) & " added: " & Format(Now, "dddd, dd mmmm yyyy hh:nn:ss")
eTime = Timer
newPicture.Update()
Print "Done in "; Format(Timer - eTime, "#.###"); " s"
If Exist(tempFile) Then Kill tempFile
Catch
Error.Raise("Add database record error
Meldingen van Gambas op Raspberry Pi dateren al van Gambas2, maar de huidige combinatie van hardware en software noopt eerder tot Gambas3. Dat kan, zowel op de eigen Raspbian als op andere Linux besturingssystemen voor Pi…
Raspbian
Neem een terminal venster en doe:
sudo apt-get update
sudo apt-get install gambas3
Daarna zit Gambas3 in het menu onder programmeren!
(Menu/Programming/Gambas3)
Er zijn bovendien een aantal voorbeelden inbegrepen, terwijl in de huidige gambas3 versie eerder verwezen wordt naar een online repository van programma’s. Inderdaad, deze versie is “oud”:
About Gambas: 3.5.4
Terwijl bv op een huidige openSUSE 42.3 Gambas aan 3.9.2 is!
Update 06/2018
In de nieuwe Raspbian 9 is het ondertussen ook 3.9.1
OpenSUSE 42.3
Een ander voorbeeld, stel dat je opensuse 42.3 geïnstalleerd hebt op je raspberry pi; dan krijg je dus inderdaad Gambas 3.9.2!
PiCam Master
Hier zou wat code kunnen zitten, te checken:
https://github.com/charlie-ogier/PiCam.
Dit programma is bedoeld om op de Raspberry Pi te draaien (niet op je pc). Het maakt een ramdisk om de beelden op te slaan.
nb: De camera moet aktief zijn in de Raspberry Pi instellingen.
Het programma geeft een “live” preview van het camerabeeld.
De preview leeft een eigen leven, en staat niet mooi op de daarvoor schijnbaar bedoelde ruimte op het scherm. Er zit een tool bij om de Preview op zijn plaats te krijgen, is blijkbaar schermafhankelijk. De volgende keer staat het beeld wel op zijn plaats, de aanpassingen worden bewaard.
Foto
Je kan met een eenvoudige druk op de knop een foto maken, of opeenvolgende foto’s met een tijdsverschil.
De foto wordt bewaard in de map ~/Pictures/PiCam
, de eerste foto heet 0000.jpg
, en is bij 800×800 zon 360 Kb.
Er zijn instellingen voor resolutie, er is mogelijkheid het beeld te kantelen, te spiegelen, timer aanpassing, enz.
Er zijn een hele reeks “Effecten” en er is een “Exposure” keuzelijst.
Ik had hier versie 0.2.6 gemaakt op Gambas 3.8.4 in 2016 door Charlie Ogier.
Bron: gambaswiki.org/wiki/doc/library
Library
Een library dient om gemeenschappelijk code tussen verschillende projecten te delen.
Een library is een Gambas programmma (executable), dat gebruikt kan worden in een ander project.
Voor eigen gebruik ga je dus steeds een library gebruiken, en geen component.
Locatie
Als een gambas project een library lib01 nodig heeft, wordt die gezocht op volgende plaatsen
(en ook in deze volgorde):
uitvoerbare projectdirectory/lib01.gambas
$XDG_DATA_HOME/gambas3/lib/vendorname/lib01:versie.gambas
~/.local/share/gambas3/lib/vendorname/lib01:version.gambas
Project-Property_Tab_Library_directory-value/vendorname/lib01:versie.gambas
/usr/lib[/multiarch]/gambas3/vendorname/lib01:versie.gambas
/usr/bin/vendorname/lib01:versie.gambas
1. is de oudste manier
2./3. hangt af van het bestaan van $XDG_DATA_HOME, en gaat over installatie voor de user (single userwide copy; bv handig tijdens testen).
4. is een instelling in het gebruikend gambasproject (project eigenschappen)
5. is voor gebruik op een meergebruikerssysteem, waar je de library wil delen/gemeenschappelijk (dezelfde) gebruiken.
6. zoals 5., maar bij 6. gaat een gewoon gambas programma gebruikt worden als library (oudere manier).
$XDG_DATA_HOME hoort bij de specificaties van freedesktop.org en veronderstelt een basisdirectory waarin gebruikers-data wordt opgeslagen. Vgl $XDG_CONFIG_HOME voor gebruikers configuratie gegevens.
vendorname: zie Projecteigenschappen, veld “vendor” (of “verkoper” in de NL-talige versie).
Als deze leeg gebleven is bij creatie van de library, krijgt de locatie de mapnaam “(unknown)”:
.local/share/gambas3/lib/(unknown)/myownlib:0.0.1.gambas
Als je de vendorname alsnog invult, komt de lib in de nieuwe directory struktuur -inclusief die vendorname- terecht (en blijft de “unknown” versie bestaan).
Maken
Je kan ze ook op niveau van het systeem installeren (zie boven “Locatie”)
Gebruiken
Het gebruikend project: open Project, Properties. Kies “Libaries” blad. Dan krijg je een venster met het “Runtime library search path”, en een lege lijn plus lege ruimte eronder.
Met “+ Add” knop voeg je er toe.
Je krijgt een venster “Select a Library”; ik zie in mijn geval een library staan – of niet (**)- in de directory waarin dit nieuwe project zit; selecteer, “ok”.
Zichtbaar in de lijst:
vendor > Lib01 0.0.1
Location: /home/naam/.local/share/gambas3/lib/vendor/Lib01:0.0.gambas
Provides: Class1, Class2
Je kan de library hier ook verwijderen, en van plaats veranderen in de lijst.
Nota/Problemen (*)(**)
Ik had nogal eens problemen waarbij ik nadien de library niet kon gebruiken; ik kon ze niet selecteren/vinden vanuit de IDE.
De library in ~/.local/share/gambas3/lib/myvendor bleek ook een gekke naam te hebben met een dubbel versienummer.
Ik heb gemerkt dat ik best:
– Project type : normaal (ipv library)
– Compileren naar .gambas programma ineens in de juiste directory in Library compileren door uitvoeringsbestand te maken. Dat moet voldoende zijn. Maar..
~/.local/share/gambas3/lib/myvendor/libprj.gambas
(of de .gambas er naar kopieren).
– Als je de Library gebruikt in een project op dezelfde computer, moet je de IDE sluiten en terug starten om de libraries terug te lezen, anders ziet hij de nieuwe versie van de library niet, en kan je ze niet selecteren (momenteel in Gambas 3.14.3).
– opletten met versienummer; get from VERSION of de eigen project nummering kunnen dooreen/uiteenlopen…
Meer
Meer libraries: dan moet je letten op de volgorde in deze lijst; die moet juist zijn.
(volgens documentatie: van bovenaan/eerste tot onderaan/laatste).
Gevorderd?
De documentatie houdt daar zowat op; niets over:
Versienummer
Als je in de library code Application.Version gebruikt in een procedure, en je roept die op vanuit een gebruikend programma, dan wordt die zo letterlijk uitgevoerd dat je de versie van je uitvoerend programma te zien krijgt, en niet die van de library.
Je kan het versienummer in een Version.txt bestandje in de Data directory van je library zetten, en de inhoud van die file terugsturen in plaats van Application.Version.
Beter nog, als je het bestand “VERSION” noemt, en in het project het vakje “Get from VERSION file” aanklikt, wordt dat ook automatisch gebruikt binnen je library programma zelf.
Zie ook Versie van je bibliotheek (Library Version)
Update v.d. library
Hoe een library updaten?
TestLib is de library.
TestLib.gambas is de executable daarvan.
De file is ook terug te vinden als:
/home/username/.local/share/gambas3/lib/vendorname/TestLib:0.0.1.gambas
TestProgram op hetzelfde systeem is het programma dat deze lib gebruikt.
Wanneer krijgt TestProgram een “nieuwe versie” van TestLib in gebruik?
De library wordt dus geladen bij het starten van het programma.
Bron:
How To Program Components In Gambas (gambaswiki.org/wiki/dev/gambas)
Component
Gambas componenten zijn gedeelde bibliotheken die geschreven zijn in C, C++ of in Gambas zelf. Ze voegen nieuwe klassen toe aan de Gambas programmeeromgeving, en vormen een uitbreiding van de Gambas taal. Ze zijn voor algemeen gebruik bestemd, en worden dus verspreid met de gambas broncode.
Component maken
Project type: Component.
Je moet in de code EXPORTEER code gebruiken en de component voorzien van alles wat de IDE nodig heeft (eigenschappen met standaardwaarden, help enz).
—
Ook interessant: het object model van Gambas gambaswiki.org/wiki/doc/object-model