Quantcast
Channel: MCS Electronics Forum
Viewing all articles
Browse latest Browse all 20563

BASCOM-AVR : A Weird One, RTC : REPLY

$
0
0
got the pcb's right before Xmas, but we in Holland have 2 official Christmas days, so today i had a look. The pcb's were sent directly to me. They were in anti static bags so that was good. There was also a battery inserted which is not such a good idea. Odd is that the battery reads 3.6V while I thought cr2032 was 3v3. Anyway, i removed the bat, i measured the connections and soldered a make connector so i could use my stk600 and female wires. The stk600 was already on my desk. And it is running on 3v3. I connected gnd, vcc, scl and sda from the stk to the i2c board. O, my board has provision for a 1wire sensors but there was none mounted. I modified the scan program for xmega. And loaded it : [code:1:5e1e9e3fb1]$regfile = "xM128a1def.dat" ' the used chip $crystal = 32000000 ' frequency used 'first enable the osc of your choice Config Osc = Enabled , 32mhzosc = Enabled 'configure the systemclock Config Sysclock = 32mhz , Prescalea = 1 , Prescalebc = 1_1 Config Com1 = 19200 , Mode = Asynchroneous , Parity = None , Stopbits = 1 , Databits = 8 Config Twic = 100000 'CONFIG TWI will ENABLE the TWI master interface i2cinit Dim Twi_start As Byte , j as byte , b as byte Print "Scan start" For B = 0 To 254 Step 2 'for all odd addresses I2cstart 'send start I2cwbyte B 'send address If Err = 0 Then 'we got an ack Print "Slave at : " ; B ; " hex : " ; Hex(b) ; " bin : " ; Bin(b) End If I2cstop 'free bus Next Print "End Scan" End [/code:1:5e1e9e3fb1] it worked : Scan start Slave at : 160 hex : A0 bin : 10100000 Slave at : 208 hex : D0 bin : 11010000 End Scan Dean, maybe you can test at a lower voltage too? There were no jumpers on the board. And i did not check of all the chips can handle 5V. I also did not check the pull up. Maybe it is an idea that i send this board to you? since it is working properly. Or you have an idea? It would be nice to clear up the mystery.

Viewing all articles
Browse latest Browse all 20563

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>