Kód: Egész kijelölése
' 104.7 mhz my local radio ANR default startup freq
I2cstart
I2cwbyte &HC2
I2cwbyte &H09
I2cwbyte &H04
I2cwbyte &B10001000 'control byte
I2cwbyte &B10100101 'ports byte
I2cstop
'wait some time
Waitms 10
Frq = 2308 ' 104.7 mhz my local radio ANR
Lcdfrq = Frq * 0.05
Lcdfrq = Lcdfrq - 10.7
Print Fusing(lcdfrq , "###.##") ; " Mhz " ; Frq
Do
If fm1216_setup = 1 Then
Call Fm1216
Fm1216_setup = 0
Lcdfrq = Frq * 0.05
Lcdfrq = Lcdfrq - 10.7
Print Fusing(lcdfrq , "###.##") ; " Mhz " ; Frq
End If
'Frequency up button step 0.05 mhz
If Pina.0 = 0 Then
Tfrq = Frq + 1
If Tfrq <= Hifm Then Frq = Tfrq 'max 108 mhz
Waitms 180 'Bitwait Pina.0 , Set
fm1216_setup = 1
End If
'Frequency down button step 0.05 mhz
If Pina.1 = 0 Then
Tfrq = Frq - 1
If Tfrq >= Lowfm Then Frq = Tfrq 'min 87.5 mhz
Waitms 180 ' Bitwait Pina.1 , Set
fm1216_setup = 1
End If
Loop
End
'tuning into a new frq (87.5 to 108 Mhz)
Sub Fm1216
A = High(frq)
B = Low(frq)
I2cstart
I2cwbyte &HC2
I2cwbyte A
I2cwbyte B
I2cwbyte &B10001000 'control byte
I2cwbyte &B10100101 'ports byte
If Err = 1 Then Print " Hiba Setting"
I2cstop
Waitms 10
End Sub
[code]
A 11 es lábon amit az adatlap tunning voltage moniror- nak ír, ahogy tuningolok úgy változik a feszültség 7 és kb 10 volt között. szal valamit csinál, de mégsem azt amit kéne :-)
Neten összesen 2 kódot találtam amiket meglestem mind mást ír ( őszintén szólva adatlapot vagy nem értem vagy azokkal a címzésekkel se csinált semmit )
Tudnátok nekem valami okosat javasolni? Megköszönném ismét :-D :oops: 
FM1216ME_MK3 adatlapját is megtaláltam az is más paramétereket használ mint a sima FM1216 is, viszont egyikkel se megy.