Hallo,
Ik ben nu bezig met de at90s1200 te programmeren, en mijn doel is simpel. Ik wil een knop uitlezen die op het eerste ledjes van portd is aangesloten. Als reactie hierop wil ik dat alle ledjes op portb gaan branden. Ik krijg dit helaas niet voorelkaar en ik wou jullie vragen om mijn programmaatje te bekijken en een oplossing proberen te zoeken. BvD
Dim Knop As Bit
Config Portb = Output
Config Portd = Input
Begin:
Knop = Pind
If Knop = 1 Then
Portb = 255
End If
Goto Begin
End
[Bericht gewijzigd door K Sipma op ]
Ik heb het antwoord in een duister hoekje gevonden.
----------------------------
De demo versie die je kunt downloaden ondersteund
de AT90S2313 volledig. Let op, de AT90S1200 is NIET
bruikbaar. De Bascom compiler maakt gebruik van
het RAM geheugen, en dat heeft de AT90S1200 niet.
Verder is de BasCom compiler een prima compiler
om snel een programma te maken. Werk er ook zo nu
en dan mee.
Wertk als Visual Basic, controleert direct de door jouw
getypte code. Niks mis mee.
Robert
------------------------
Ik moet nu dus bezig met AVRStudio, weet iemand ook een tutorial hiervoor? Het liefst nederlands, en kan iemand mij op weg helpen door het bovenstaande script te vertalen naar Assembler (AVRstudio) BvD !!!
[Bericht gewijzigd door K Sipma op ]
Frits Kieftenbelt
Ohm sweet Ohm | www.picbasic.nl
Zoals je het nu hebt is 1x knop indrukken, alle LED's aan, maar noot meer uit, is dat de bedoeling?
Zo niet, waar zouden ze volgens jou dan uit moeten gaan?
Dus even omschrijven wat het nu niet goed doet en wat het volgens jou zou moeten doen.
En wat betekent PIND?
(Edit: Sorry Xie dat je het antwoord al hebt gevonden)