Show Posts
Pages: [1] 2
1  Using Arduino / Programming Questions / Re: Programming arduino with other programs on: February 27, 2013, 02:00:18 pm
hi WildBill,

it is possible to program Arduino with Bascom.
I am 'translating' the C programms in to Bascom programms.
look at https://sites.google.com/site/bpluswestland/calendar/arduino-goes-bascom
there you can read how to install the stuff and download free Bascom.
you find also some samples of Bascom for arduino.
there ar more programms, i must upload them.

greetings, Dré Jansen
2  International / Nederlands / Re: Bascom voor Arduino on: September 06, 2012, 12:45:52 pm
hoi LG046,

Nee, je hoeft geen 200 euro te betalen, mag wel (op mijn rekening natuurlijk)
Het kan gratis! vandaar die brede grijns op mijn gezicht ;-)

Bascom downloaden van www.mcselec.com  kies voor Bascom AVR.
Na installeren selecteer je via: options > compiler > chip = m328pdef.dat

Er zijn wat hulp programma’s nodig, zoals WINAVR
downloaden van: http://sourceforge.net/projects/winavr/files/latest/download?source=files
Na downloaden moet je dit installeren en je hebt er verder geen omkijken meer naar.

Dan is er nog AVRDUDE downloaden van http://www.nongnu.org/avrdude/.
Maak een map aan op C:\avrdude
Plaats hier het gedownloade zip bestand: avrdude-5.11-Patch7610-win32.zip

Start het reeds geïnstalleerde Bascom programma, klik op:  OPTIONS >> PROGRAMMER
Selecteer:  EXTERNAL PROGRAMMER. 
Geef het programma met pad aan C:\AVRDUDE\avrdude.exe
Daaronder de parameter:
-C c:\avrdude\avrdude.conf -p m328p -P com19 -c arduino -b 115200 -U flash:w:{FILE}:i
Da’s een hele volle regel, het beste is om te kopiëren en de plakken.
Vergeet vooral niet ‘use HEX file’ aan te vinken!

LET OP!! Er is nóg iets dat je niet mag vergeten, in de instellingregel staat ergens ….com19….
Verander dat in jouw communicatiepoort, want anders werkt het natuurlijk niet!
Klik op OK om de instellingen op te slaan.

Als je met de PC wilt communiceren, dan is dat met de volgende instellingen:  9600 8 n 1 
er is een Bascom forum op. http://www.mcselec.com/
daar vind je ook alle uitleg, handleiding etc etc.


groeten, en  veel suc6 !
Dré Jansen
3  International / Nederlands / Re: muziek on: August 04, 2012, 01:01:00 pm
geacht forum,

het probleem is opgelost!
een Fransman gaf mij de volgende link:
http://www.mcselec.com/index.php?option=com_content&task=view&id=221&Itemid=57
klik en schrik, luister naar de vele melodieën

Arduino's frequentie is wat hoger, met als gevolgd dat de tonen ook wat hoger zijn, maar dat is een kwestie van aanpassen

groeten, Dré
4  International / Nederlands / muziek on: August 03, 2012, 01:37:34 pm
geacht forum,

In oefening: toneMelody wordt een klein muziekje gespeeld.
dit wordt gepresenteerd op pootje D8.
naar verluid worden de noten dmv PWM gemaakt.
reist meteen de vraag: HOE??
want PWM doet niets aan de verandering van de frequentie, alleen als je de prescale aanpast veranderd de toonhoogte. verander je de dutycycle (dat wat PWM eigenlijk is) dan blijft de freq gelijk, alleen het vollume veranderd.
alle drie de timers hebben een A en B deel, da's 6 uitgangen: D3-D5-D6-D9-D10-D11 dus NIET D8
en toch wordt op D8 de luidspreker aangesloten.
kan iemand mij uitleggen hoe dit werkt?

groeten, Dré
5  International / Nederlands / Re: Onderdelen apendages on: July 31, 2012, 02:45:00 pm
hoi Suukerjunk, 

tsja, net iets te laat ;-)  nu heb ik het zelf al gemaakt.
maar toch bedankt, want als het nauwkeuriger moet dan weet ik nu waar ze te koop zijn.

wat mij opvalt, is, dat het programma geen toonvariatie geeft bij harder/zachter drukken.
ik verwachtte dat eigenlijk wel.
ligt dat toch aan mijn zelfbouwsensoren of is dat ook bij de originele sensoren?

ik varieer tussen 1V en 4V, dat lijkt me een redelijk breed regelgebied.
het voorbeeld programma geeft drie verschillende tonen, meer niet.
ik zou dus ook gewone schakelaars kunnen gebruiken voor hetzelfde resultaat.

groeten, Dré
6  International / Nederlands / Re: Onderdelen apendages on: July 31, 2012, 10:13:24 am
Zelfbouw druksensor.

Onlangs kocht ik een Arduino Uno en ben stap voor stap de oefeningen gaan uitvoeren.
Zo kwam ik op de oefening: TONEKEYBOARD.INO
De benodigde druksensoren zijn nergens te koop, op dit forum werd geadviseerd ze zelf te maken.
Dat advies heb ik opgevolgd, hieronder de door mij genomen stappen.
Misschien heeft een ander er ook wat aan, voor de kosten hoef je het niet te laten.



Benodigdheden:   stukje dubbelzijdig plakband
      Stukje ESD-schuim, waarin chips worden gestoken
      Stukje aluminium folie (pakje sigaretten, latoenkoper, o.i.d.)
      Wat losse soepele draadjes, die je al voor het breadboard gebruikt.

Neem een stukje metalen pijp, slijp (of vijl) er een scherp randje aan, of neem een originele holpijp.
Sla daarmee cirkeltjes uit het dubbelzijdige plakband, de ESD schuim en de metaalfolie.
Knip het stukje plakband af, stop er een schuimcirkeltje in en plaats het metaalcirkeltje er bovenop.
Leg daarboven het (deels afgestripte) draadje en plak er een stukje dubbelzijdig plakband overheen.
Keer het geheel om, en haal het beschermfolie van het dubbelzijdige plakband.
Je ziet nu de andere kant van de ESD schuim, leg daar eveneens een stukje metaalfolie op.
Wederom draadje en stukje dubbelzijdig tape. Sensor gereed!

In mijn situatie varieerde de weerstand van 4K-ohm tot 4M-ohm.
In serie met een weerstand van 12K komt dat op een spanning van 1V en knijp je er flink in, dan heb je 4V.
Uiteraard is dit sterk afhankelijk van het type ESD schuim, de oppervlakte en dikte van het schuim cirkeltje.

Door de beschermfolie van de dubbelzijdige tape te verwijderen kan je ze ergens opplakken.
Zo kan je een piano maken. De fantasie is grenzeloos.
Ik heb er 4 gemaakt, maar die zijn ondanks dat alles is geslagen met dezelfde holpijp, toch enorm verschillend.

Veel suc6,
groeten, Dré
7  International / Nederlands / Onderdelen apendages on: July 25, 2012, 10:20:14 am
goede dag,

ik ben bezig met de voorbeeld programmatuur.
nu ben ik begonnen met tonekeyboard  (ja, ik ben pas begonnen)
hiervoor zijn drie druksensoren nodig, maar die kan ik nergens kopen of terugvinden

zie de onderste drie zwarte cirkeltjes die via de 10K weerstanden worden aangesloten
waar kan ik deze dingen kopen?

ik ben een beetje aan het klooien met potmeters, maar dat geeft alleen maar wat gebrom uit de luidspreker
hulde aan de tekenaar van de componentenopstelling, prachtig getekend.

groeten, Dré Jansen
8  International / Nederlands / Re: Bascom voor Arduino on: July 24, 2012, 11:29:01 am
Hoi Rob,

Inderdaad, als je met C vertrouwd bent dan is dat natuurlijk de juiste weg.
Voor mij is dat Basic, en Bascom is voor mij de juiste weg.
Ik heb er lang niets meer aan gedaan, dus ben ik de Arduino voorbeeld programma's in Bascom aan het vertalen
Niet dat de mensheid hierop zit te wachten, maar ik steek ver veel van op, heb er plezier in, en daar draait het uiteindelijk allemaal om. Het werkt prima, als je interesse hebt in mijn schrijfsels, dan kan je ze krijgen.

Ik ben nu bezig met het voorbeeld van het keyboard, het muziek instrument.
Ik zoek naar de druk gevoelige weerstanden, daarom kom ik weer op dit forum, waar ik al bijna gewist was.
Maar gelukkig kan en mag ik er toch nog op komen. (dank u, moderator)

In dat keyboard programma wordt gebruik gemaakt van een bibliotheek.
ik kan de C-programma's wel lezen, de toelichting en commentaren kan ik ook lezen, dat is de bron van mijn geknutsel. de bibliotheek kan ik wel lezen, maar of ik er wat aan heb? dat weet ik nog niet.
Ik vermoed dat er met PWM een toon wordt gemaakt, de bibliotheek staan de voorgebakken noten.
Of dat werkelijk zo is, weet ik niet.

In Bascom kan je ook gebruik maken van bibliotheken, dat zal zeker aan de orde komen
Ik ben al vanaf eind zestiger jaren lid van Elektuur, later Elektor dus ik ben bekend met die materie.
Er heeft enkele jaren geleden een komplete Bascom cursus in Elektor gestaan.
Elektor heeft een boek uitgegeven speciaal voor de Atmel (Arduino) processor er is een vergelijkbaar boek over C en Atmega. Ja, ook dat boek heb ik gekocht, en ook het boek van Wim Dolman Micro controllers en de taal C. kortom, ik weet dat C erg moeilijk is.

ik heb meegedaan aan het FEZ project, een robotje. (overigens staat er nu een te koop voor E 50,- kijk maar eens op de HCC robotica site) normaal betaal je meer dan het dubbele.
Van een particulier die C ook erg moeilijk vind. Ik doe de mijne nog niet weg, wie weet komt het er ooit nog eens van.

Groeten, Dré
9  International / Nederlands / Re: Bascom voor Arduino on: July 10, 2012, 10:30:36 am
hoi Jantje en Henk,

Bij nader inzien hebben jullie gelijk, het is inderdaad niet slim om in deze C wereld Bascom te promoten.
Ik heb met FEZ (een ander C platform) onprettige ervaringen met C opgedaan.

In een grijs verleden had ik positieve Bascom ervaringen, die mij ooit een eerste prijs hebben opgeleverd (reisje naar Californië).
Binnen de B-plus groep, waarvan ik lid ben, wordt uitsluitend met Bascom gewerkt. Daar vind ik veel ondersteuning.
In de Robotica groep waar ik ook al lid van ben, zijn twee kampen, het C# en Bascom kamp.
Allebij erg goed. Ik heb voldoende ondersteuning, mogelijk zijn er meerderen die met mij meevoelen, vandaar dit proefbalonnetje.

Als iemand binnen dit forum C toch te moeilijk vind, dan moet hij Bascom eens proberen. Andersom kan en mag natuurlijk ook.
Uitproberen kost niets, er is een gratis demoverzie.
Jullie zijn helemal los op C, houden zo!

groeten, Dré Jansen

10  International / Nederlands / Re: power voeding on: July 10, 2012, 10:07:32 am
hoi Henk,

Nee, geen vuurwerk, maar bij mij is het precies andersom, de - zit in het midden en de + aan de kant.
Gelukkig is er een 'klootzak diode' in de voeding opgenomen, anders had ik zeker vuurwerk gehad.
Die diode staat keurig in het schema en de beschrijving vermeld, maar ik wilde hem liever niet uittesten.
Veronderstel dat het toch niet waar is, wat er staat.  Gelukkig heeft die diode zijn werk goed gedaan.

Vorig jaar ben ik met C# begonnen, het Fez- bordje met robot.
In de beschrijving van Fez staat dat het printje pin compartible is met de Basic stamp van BOE-bot.
Dus kocht ik uitsluitend het printje en prikte dat in de BOE-bot.... Vuurwerk!!
De pin die 3V uit de FEZ naar BOEbot basisprint is dezelfde als de pin waarmee BOE-bot de aangelegde spanning naar het processorbordje stuurt, in mijn geval was dat 9V=.
Dat was iets te veel voor Fez, en ik mocht een nieuwe kopen. Transport, douanekosten bij elkaar bijna 100 euro! Vandaar dat ik nu wat minder vertrouwen heb in beweringen van de fabrikant.

Twee Fez bordjes later ben ik tot de conclusie gekomen dat C# niet voor mij bedoeld is.
Ik ben overgestapt naar Bascom (Fez is geen Atmel, gelukkig is Arduino dat wel)
Arduino is bovendien een stuk voordeliger, dus de keuze is snel gemaakt.

Om ervaring te krijgen ben ik bezig alle Arduino voorbeeldprogramma's te vertalen in Bascom.
Dat gaat redelijk voorspoedig.

Groeten, Dré

11  International / Nederlands / Re: Bascom voor Arduino on: July 08, 2012, 07:42:40 am
Aanvulling:

vertaalde programma's: AnalogReadSerial; BareMinium; Blink; DitalReadSerial; Fade; ReadAlalogVoltage.
ik ga rustig verder, leer er veel van, maar hier komen geen reacties.

de vertalingen omvatten de volgende bestanden: het originele  xx.ino bestand; xx.bas en xx.hex
het hex bestand is het eigenlijke programma dat ook door Arduino wordt geupload maar helaas niet laat zien.

hieronder de BAS bestanden, het origineel hebben jullie al, en aan een HEX bestand zie je niet veel.
download het gratis Bascom programma van MCSelec.com en je kan zelf het HEX bestand maken.

=============
'(
AnalogReadSerial
Leest de analoge ingang port A0 (= C.0)  en geeft het resultaat op de monitor.
sluit de loper van een potmeter aan op A0 en de overige twee op massa en +5V
')
$regfile = "m328def.dat"                        ' Atmega-328p
$crystal = 16000000                              ' 16 Mhz Kristal
$baud = 9600                                        'communicatiesnelheid terminal
$hwstack = 32                                       ' default use 32 for the hardware stack
$swstack = 10                                       'default use 10 for the SW stack
$framesize = 40                                     'default use 40 for the frame space

Config Adc = Single , Prescaler = Auto , Reference = Avcc   'A-D convertor inschakelen

Do                                                        ' begin van het programma
   Print "{012}"                                     'maak het scherm schoon.
   Print "waarde is " ; Getadc(0)             'druk waarde af (op beeldscherm)
   Waitms 100                                       ' wacht 1000 ms
Loop                                                    ' einde programma, begin opnieuw
End

========================

'(
BareMinimum
het minimale dat nodig is voor het programmeren.
het eerste gedeelte de instellingen en declaraties
ook subroutines moeten worden gedeclareerd.
Tussen do en loop komt het zich herhalende deel van het programma
')
$regfile = "m328pdef.dat"                        ' Atmega-328p
$crystal = 16000000                                  ' 16 Mhz Kristal
$baud = 9600                                           'communicatiesnelheid terminal
$hwstack = 32                                          ' default use 32 for the hardware stack
$swstack = 10                                          'default use 10 for the SW stack
$framesize = 40                                        'default use 40 for the frame space

' hier de declaraties en instellingen

Do                                                           ' begin van het programma

' hier de zich steeds herhalende routines

Loop                                                      ' begin opnieuw bij do
End                                                        ' einde programma

=======================

'(
Blink
laat onboard ledje knipperen 1 seconde aan, een seconde uit.
dit ledje zit aangesloten op digitale poort B5 bij Arduino bekend als D13
')

$regfile = "m328def.dat"                         ' Atmega-328
$crystal = 16000000                                ' 16 Mhz Kristal
Ddrb.5 = 1                                             ' maak van poort B5 een uitgang

Do                                                         ' begin van het programma
 Toggle Portb.5                                      ' verander poort b5 van waarde is hij hoog, dan wordt hij laag en andersom.
   Waitms 1000                                       ' wacht 1 seconde
Loop                                                     ' einde programma, begin opnieuw
End

==========================

'(
  DigitalReadSerial
  leest de waarde van datapootje D2 en presenteert dit op de monitor.
  let op, de interne pull-up weerstand is UITgeschakeld, zelf toevoegen!
  schakel naar massa met pull-up weerstandje naar +5V
  het knopje moet een naam krijgen: ik noem hem: 'knopje'
')
$regfile = "m328pdef.dat"                        ' Atmega-328p
$crystal = 16000000                                ' 16 Mhz Kristal
$baud = 9600                                          ' communicatiesnelheid terminal
$hwstack = 32                                         ' default use 32 for the hardware stack
$swstack = 10                                         ' default use 10 for the SW stack
$framesize = 40                                       ' default use 40 for the frame space

Ddrd.2 = 0                                              ' maakt van poort D pootje 2 een ingang
 Knopje Alias Pind.2                                ' geeft naam: knopje aan de latch van poort D2

Do
   If Knopje = 0 Then                               ' bij ingedrukt knopje ligt de ingang aan massa potentiaal
      Print "knopje ingedrukt"
      Else
      Print "knopje los"                              ' bij een losgelaten knopje zorgt de pull-up weerstand voor 5V op de ingang
   End If
Loop
End

=========================

'(
  DigitalReadSerial-2
  Leest De Waarde Van Datapootje D2 En Presenteert dit Op De Monitor.
  in dit programma wordt de interne pull-up weerstand ingeschakeld
  het on-board LEDje wordt ook aangestuurd.
  verder is dit programma gelijk aan het origineel
  uitsluitend een knopje is vodoende, schakel D2 naar massa.
  het knopje moet een naam krijgen: ik noem hem: 'knopje'
  hier is nog geen rekening met debounce gehouden.
')
$regfile = "m328pdef.dat"                          ' Atmega-328p
$crystal = 16000000                                   ' 16 Mhz Kristal
$baud = 9600                                            'communicatiesnelheid terminal
$hwstack = 32                                           ' default use 32 for the hardware stack
$swstack = 10                                           'default use 10 for the SW stack
$framesize = 40                                         'default use 40 for the frame space

Ddrb.5 = 1                                                'maakt van poort D13 een uitgang  (LEDje)
Ddrd.2 = 0                                                'maakt van poort D2 een ingang
Portd.2 = 1                                               'schakel voor D2 de pull-up weerstand in
 Knopje Alias Pind.2                                 ' geeft naam: knopje aan de latch van poort D2

Do
   Print "{012}"                                         ' scherm schoonmaken
   If Knopje = 0 Then                                ' bij ingedrukt knopje ligt de ingang aan massa potentiaal
      Print "knopje ingedrukt"
       Set Portb.5                                        ' ledje aan
      Else
      Print "knopje los"                               ' bij een losgelaten knopje zorgt de pull-up weerstand voor 5V op de ingang
      Reset Portb.5                                     ' ledje uit
   End If
   Waitms 100                                           ' voor wat rust in de tent
Loop
End

================================

' Fade
' het faden van een led op pootje D9 met PWM
' fade van helder naar 0 in stapjes van 5 met pauzes van 30 ms

$regfile = "m328pdef.dat"                        ' Atmega-328p
$crystal = 16000000                                ' 16 Mhz Kristal
$baud = 9600                                          ' communicatiesnelheid terminal
$hwstack = 32                                         ' default use 32 for the hardware stack
$swstack = 10                                         ' default use 10 for the SW stack
$framesize = 40                                       ' default use 40 for the frame space

Ledje Alias Pwm1a                                  ' PWM poort naam van ledje geven
Config Timer1 = Pwm , Prescale = 1 , Compare A Pwm = Clear Down       ' PWM generator instellen
Dim Helder As Byte                                 ' lichtintensiteit van ledje

Do                                                          ' begin
   For Helder = 0 To 255 Step 5               ' in stapjes van 5 naar donker
      Pwm1a = Helder                               ' lampje aansturen
      Waitms 30                                        ' effe wachte
   Next Helder                                         ' volgende stap

   For Helder = 255 To 0 Step -5             'terugstappen naar vol licht
   Pwm1a = Helder                                  ' lampje instellen
   Waitms 30                                           ' effe wachte
Next Helder                                            ' volgende stapje
Loop                                                      ' overnieuw
End

=======================================

tot zo ver deze vertalingen
mocht er geen belangstelling zijn, dan was dit mijn laatste mailing.
groeten, Dré

12  International / Nederlands / Re: power voeding on: July 01, 2012, 06:27:02 am
Hoi Jo3ri,

Op internet is heel veel over Bascom te vinden.
Gesprekken worden meestal in het Engels gevoerd, en ook dat is voor mij net iets te moeilijk.
ik kan wel Engels, voldoende voor een pub-conversatie maar voor serieuze zaken zoals dit forum toch net niet goed genoeg. daarom ben ik blij met deze Nederlandse groep.
ik heb het Bascom-boek, maar ook het C-boek gekocht.

binnen deze groep merk ik dat elektronica moeilijk wordt gevonden.
nee, ik ben geen hoogwaardig elektronicus, maar ik heb voor dit forum voldoende elektronica kennis.

Uiteraard kan ik daar anderen mee helpen, zij zien dan vanzelf wel hoe zaken in Bascom wordt aangestuurd of uitgelezen. Bascom is gratis, dus daar kan het niet aan liggen.
als deze mensen dan de Bascom taal zien, is het niet de vraag OF ze overstappen, maar WANNEER ze overstappen. ;-)

groeten, Dré
13  International / Nederlands / Re: Bascom voor Arduino on: July 01, 2012, 04:57:29 am
Geacht Forum,

Ik heb hieronder drie maal het programma van het knipperledje (D13) in Bascom herschreven.
Hierover zou ik uw mening willen horen.

BLINK-1
Het programma zoals het in Bascom geschreven zou kunnen worden.
Commentaar staat achter een ' (apostrofje)

BLINK-2
Hier worden de Arduino-namen toegepast.
De vertaling gebeurd IN het hoofdprogramma zelf

BLINK-3
Hier is een apart bestand geschreven, waarin de aliassen worden benoemd.
Het doel: hoofdprogramma overzichtelijk houden.

Dit programma heeft een aanvulling: ' Arduino_configuratie.bas
In die aanvulling worden additionele zaken benoemd, zoals aliassen
Als voorbeeld heb ik hier meerdere zaken benoemd, die voor het knipperledje niet worden gebruikt.

Persoonlijk kies ik er voor om de alias-benamingen IN het hoofdprogramma te plaatsen.
De reden is, dat je dan alles bij elkaar hebt.
Met commentaar en verwijzingen zal het programma toch wel overzichtelijk blijven
Uiteraard kan het in de toekomst toch anders blijken te zijn, de tijd zal het leren.
Verder ben ik van mening om als ik een alias voor portB.5 gebruik, dit dan maar meteen LEDje te noemen.
D13 is net zo onduidelijk als B5. daarmee zijn de Arduino benamingen om zeep geholpen.
Bovendien programmeren we hier in Bascom, niet in C.

Wat is uw mening hierover?
Programma's zijn rechtstereeks in Bascom over te nemen.

================================
' BLINK-1

' on board LEDje op D13 knipperen

$regfile = "m328def.dat"            ' Atmega-328
$crystal = 16000000                    ' 16 Mhz Kristal
' de twee instellingen (Regfile en crystal) mogen ook worden weggelaten, omdat dit al in de compiler is aangegeven.
' omdat de compiler zijn instellingen wel eens 'vergeet' zou ik dit als standaard blijven gebruiken.

Ddrb.5 = 1                                 ' maak van poort B5 een uitgang

Do                                             ' begin van het programma
   Toggle Portb.5                       ' verander poort b5 van waarde is hij hoog, dan wordt hij laag.
   Waitms 1000                           ' wacht 1000 ms
Loop                                          ' einde programma, begin opnieuw
End

=====================================
' BLINK-2
'
' on board LEDje op D13 knipperen
' bij deze vertaling wordt de poortnaam vooraf aangepast aan de naam die bij Arduino wordt gebruikt
' de Bascomnaam B5 krijgt een alias D13   (D13 Alias PORTB.5)
' als je dan toch aliassen gebruikt, benoem dan niet de poortnaam, maar geef het de naam van de toepassing
' bijvoorbeeld portb.5 = motor       (motor Alias portb.5)

$regfile = "m328def.dat"            ' Atmega-328
$crystal = 16000000                    ' 16 Mhz Kristal

D13 Alias Portb.5                       ' je kan hier elke willekeurige benaming toewijzen.
Ddrb.5 = 1                                  ' maak van poort D13 een uitgang

Do                                              ' begin van het programma
   Toggle D13                              ' verander poort D13 van waarde
   Waitms 1000                            ' wacht 1000 ms
Loop                                           ' einde programma, begin opnieuw
End

=======================================

' BLINK-3
'
' on board LEDje op D13 laten knipperen

$regfile = "m328def.dat"            ' Atmega-328
$crystal = 16000000                    ' 16 Mhz Kristal

$include "blink-3_config.bas"     ' hierin worden onder andere de namen toegewezen
' dit bestand mag elke naam en extensie hebben.

Do                                              ' begin van het programma
 Toggle D13                                ' verander poort D13 van waarde
   Waitms 1000                            ' wacht 1000 ms
Loop                                          ' einde programma, begin opnieuw
End


==========================================
' Arduino configuratie

' digitale variabelen
D0 Alias Portd.0                                            ' = RxD
D1 Alias Portd.1                                            ' = TxD
D2 Alias Portd.2
D3 Alias Portd.3                                            ' = PWM
D4 Alias Portd.4
D5 Alias Portd.5                                            ' = PWM
D6 Alias Portd.6                                            ' = PWM
D7 Alias Portd.7
D8 Alias Portb.0
D9 Alias Portb.1                                            ' = PWM
D10 Alias Portb.2                                           ' = PWM
D11 Alias Portb.3                                           ' = PWM
D12 Alias Portb.4
D13 Alias Portb.5                                           ' onboard LEDje

' analoge variabelen
A0 Alias 0                                                  ' Portc.0
A1 Alias 1                                                  ' Portc.1
A2 Alias 2                                                  ' Portc.2
A3 Alias 3                                                  ' Portc.3
A4 Alias 4                                                  ' Portc.4
A5 Alias 5                                                  ' Portc.5

' aan en uit waarden
Const Aan = 1                                               ' pin = hoog
Const Uit = 0                                               ' pin = laag

===========================================
groeten, Dré Jansen
14  International / Nederlands / Bascom voor Arduino on: June 29, 2012, 12:00:33 pm
Waarde Forumleden,

Binnen dit forum is wel duidelijk geworden hoe het moet, dus dat hoef ik niet te vertellen.
De voorbeeldprogramma’s zijn in de taal C geschreven.
Bascom programma's zijn eenvoudiger, makkelijker, simpeler en daardoor begrijpelijker.
Probeer het eens, en geef je mening.

BASCOM (voor uno)
Het is mijn bedoeling om Arduino met Bascom te programmeren. Bascom is een basic dialect.
Downloaden van www.mcselec.com.  kies voor Bascom AVR (ik heb verzie 2.0.7.1).
Na installeren, selecteer je via: options > compiler > chip = m328pdef.dat
Dit is het hart van Arduino. Via dit menu kan je diverse zaken instellen, daarover later meer.
Het selecteren van de juiste chip is belangrijk. Ook de kristalfrequentie moet worden ingesteld.
Dit doe je via: options > compiler > communication > frequency = 16000000 Hz
Dit is belangrijk omdat alle timer en communicatie snelheiden door het kristal wordt bepaald.
Direct uploaden naar Arduino gaat (nog) niet. Daarvoor zijn er wat hulpprogramma’s nodig.

WINAVR
Downloaden van: http://sourceforge.net/projects/winavr/files/latest/download?source=files
Na downloaden moet je dit installeren en je hebt er verder geen omkijken meer naar.
Dit met grote dank aan Abraham Vreugdenhil uit het Westland, die mij hierop attendeerde.

XLOADER
Hiermee upload je het HEX bestand in de Arduino.
(Een HEX bestand is het programmabestand voor de Arduino.)
Downloaden van: http://xloader.russemotto.com/  daar staat dan xloader.zip v1.00  678kb.
Start Xloader en zet de communicatie op 115100 bps
Kies het device Uno(Atmega328)
Xloader heeft een beperking, je kan geen com-poort hoger dan 9 kiezen.
Mocht het zo zijn dat de Uno een hogere poort heeft toegewezen gekregen, dan moet je dat wijzigen.
Het is nu een kwestie van hex-bestand kiezen, dit hex bestand is door Bascom gemaakt.
De Sketch van Arduino maakt ook een hex-bestand, maar slaat dit niet op, zoals Bascom wel doet.
Selecteer het te uploaden bestand en je bent in zaken, uploaden en het werkt.

Wijzigen com-poort
Ga (in Windows) naar: configuratiescherm > systeem > apparaatbeheer > poorten
Kies de Uno en wijs een lager poortnummer toe.

Nu is het een kwestie van ervaring opdoen. Door de in C geschreven  voorbeeldprogramma’s in Bascom te vertalen. Controle doe je door de werking van beide programma’s met elkaar te vergelijken.

Groeten, Dré Jansen.

15  Using Arduino / Microcontrollers / Re: Arduino UNO microcontroller type? on: June 19, 2012, 12:02:47 am
Hi members,

I bought a Uno SMD R3
I want to program it with Bascom
What type Atmel is on it?
Not an atmega 328, I tested m328 def and m328pdef
I use Bascom AVR 2.0.7.1

Please give me advice.
Thanks in advance.

Greetings, Dré Jansen (Netherland)
Pages: [1] 2