8535/Bascom: Dlaczego to nie dziala? :(

Jun 02, 2004 3 Replies

Plytko-kabelkologia dziala bez zarzutu; ma to byc pod MIDI; na wejscie podlaczam instrument MIDI, ktory na pewno transmituje... Ma sie jeno LED zaswiecic, jak cokolwiek w UARTcie sie pojawi...



----------------- '$sim



$regfile = "8535def.dat" $crystal = 8000000 $baud = 31250



Dim Rxflag As Bit Dim Rx As Byte Dim Tx As Byte Dim A As Byte '****** Przerwania On Urxc Rec_isr Enable Urxc Enable Interrupts



'****** Porty Config Portb = Output 'tu jest LED 'Uart - D0 Rx D1 Tx 'Config Portd = &B11111110 ' dawalem "z" i bez tego



'****** Program glowny Set Portb.0 'wygaszony LED Enable Serial 'Main loop Do nop Loop



'****** Procedury Rec_isr: Rx = Udr Rxflag = 1 Reset Portb.0 Return


----------------- W symulacji wychodzi ok, ale LED nie mrugnie nawet :(



U¿ytkownik "jh" snipped-for-privacy@radio.kielce.com.pl> napisa³ w wiadomo¶ci news:c9lj7b$6pf$ snipped-for-privacy@nemesis.news.tpi.pl...

[ciach]

A mo¿e masz ¼le pod³±czon± diodê:-) Sprawd¼ najpierw miernikiem, czy zmienia siê stan na wyj¶ciu.

Tymczasem Jarek

Albo napisz g³upi programik tego typu: $regfile = "8535def.dat" $crystal = 8000000

Config Portb = Output 'tu jest LED

Do Set Portb.0 'wygaszony LED waitms 250 Reset Portb.0 waitms250 Loop

je¶li led bêdzie Ci migaæ z czêstotliwo¶ci± oko³o 2Hz, to jest good (wtedy szukaj w transmisji i uarice problemów).. jak bêdzie migaæ z inn±, tzn. ¿e masz inny kwarc lub co¶ (wtedy ciê¿ko, ¿eby uart dzia³a³ ok, je¶li jest z³a czêstotliwo¶æ)... a jak nie bêdzie migaæ, to problem nie jest w uarcie, tylko w samym procku, diodzie LED lub co¶...

Znalazlem przyczyne. Cos nie kontaktowala nozka procka... Dziwne... ale wyjety i wsadzony dziala... Wysyla i odbiera poprawnie. Dzieki za pomoc.

Jacek

Join the Discussion

Have something to add? Share your thoughts — no account required.

Didn't find your answer?

Ask the community — no account required