PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : Anfängerfrage zu Bascom



kalletronic
23.03.2007, 14:32
hi Leute,

ich hab mir grad mal die Demo von Bascom runtergezogen und mal etwas rumexperimentiert. Ich hab mal vestucht einen taster von Port c
auf einem Pin von Port B 1:1 auszugeben, dazu hab ich folgenden Code verwendet:



$regfile = "m8def.dat" 'Die Anweisung bestimmt Controllertyp, hier AVR Mega 32
$crystal = 16000000 'Die Frequenz des verwendeten Quarzes

'Sie muss auch beim PC Terminalprogramm identisch sein

Config Portb.6 = Output 'Ein Pin wird als Ausgang konfiguriert PC0 (also Pin0 von Port C)
Config Pinc.7 = Input
Led Alias Portb.6
Taster Alias Pinc.7
Portc.7 = 1

Dim A As Bit

do
Led == Taster
A == Taster
loop


wenn ich das jetzt im simulator teste, bekomm ich folgendes Ergebnis:
Taster = 1 => Led & Variable a =0
Taster = 0 => Led & Variable a =1

was muß ich da anders schreiben, damit ich bei Taster =1 auch die Led & Variable a =1 ](*,)

Danke für eure Hilfe
gruß kalle

linux_80
23.03.2007, 19:50
Hallo,

der Taster schaltet gegen Masse, also wenn er nicht gedrückt ist, ist er 1.

Um das umzudrehen muss man einfach sagen LED ist nicht Taster zB.:

LED = Not Taster

Und ein = reicht.

kalletronic
25.03.2007, 19:30
hi Linux, danke für die Hilfe. Das mit den 2 = hab ich mir schon gedacht!