Bascom will nicht wie ich will

[Adrian B. (badenzer)]

Hallihallo,

ich habe mir heute mein Pollin Atmel Evaluationsboard zusammen gelötet.
Hab gleich mal was mit Bascom versucht:

$regfile = "m16def.dat"                                     ' specify the used micro
$crystal = 8000000                                          ' used crystal frequency

$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 Pind.5 = Output
Config Pind.6 = Output



 Do


     Pind.5 = 0
     Pind.6 = 1
     Wait 1
     Pind.6 = 0
     Pind.5 = 1
        Wait 1
  loop

Pind.5 & Pind.6 sind laut Doku die beiden LEDs. Diese müssten jetzt im 
sekunden Takt abwechselnd blinken, oder?
Das machen sie nämlich nicht :-(

[Netzteilbauer (Gast)]

Pind.x ist für eingänge gedacht. bei Ausgaben muß es Portd.x heisen.

[Adrian B. (badenzer)]

Wenn doch nur alles so einfach wäre :-D

Danke, jetzt leuchtet auch was :-)

Allerdings vergeht länger als eine Sekunde. Liegt das an $crystal = 
8000000?

Bei waitms 250 & $crystal = 16000000 dauert der Wechsel gute 4 Sekunden 
^^

[Adrian B. (badenzer)]

Habs rausgefunden. Der ATMega16 ist ja intern mit 1 MHz getaktet.
Mit $crystal = 1000000 klappt es :-)

[Werner (Gast)]

Also das muß so aussehen:

regfile = "m16def.dat"                                     ' specify the used micro
$crystal = 8000000                                          ' used crystal frequency

$sim

$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 Portd.5 = Output
Config Portd.6 = Output



 Do


     Portd.5 = 0
     Portd.6 = 1
     Wait 1
     Portd.6 = 0
     Portd.5 = 1
        Wait 1
  loop

PIND definiert Eingänge, PORTD die Ausgänge!