{"id":105,"date":"2017-10-04T12:43:46","date_gmt":"2017-10-04T10:43:46","guid":{"rendered":"http:\/\/sq9tla.pzk.pl\/?p=105"},"modified":"2019-03-29T14:13:22","modified_gmt":"2019-03-29T13:13:22","slug":"miernik-czestotliwosci-do-lidia-80","status":"publish","type":"post","link":"https:\/\/sq9tla.pzk.pl\/index.php\/2017\/10\/04\/miernik-czestotliwosci-do-lidia-80\/","title":{"rendered":"Miernik cz\u0119stotliwo\u015bci do Lidia 80"},"content":{"rendered":"

\"\"<\/a><\/p>\n

Po przejrzeniu gotowych odbiornik\u00f3w Lidia 80 na stronie W\u0142odka\u00a0 SP5DDJ<\/a> zamarzy\u0142 mi si\u0119 miernik cz\u0119stotliwo\u015bci ale wyposa\u017cony w wy\u015bwietlacz LCD. W sklepie AVT wypatrzy\u0142em taki miernik AVT2831\u00a0<\/a> lecz nie pasowa\u0142 zakres mierzonej cz\u0119stotliwo\u015bci. Po przeanalizowaniu schematu zobaczy\u0142em, \u017ce w torze pomiarowym jest zabudowany uk\u0142ad scalony, kt\u00f3ry jest dzielnikiem cz\u0119stotliwo\u015bci. Je\u017celi usunie si\u0119 ten uk\u0142ad to przesunie si\u0119 zakres pomiaru w d\u00f3\u0142. Do projektu do\u0142\u0105czony jest program \u017ar\u00f3d\u0142owy microkontrolera Atiny, na kt\u00f3rym oparto budow\u0119 miernika. Zam\u00f3wi\u0142em kit i przyst\u0105pi\u0142em do zabawy. Na pocz\u0105tku zmontowa\u0142em ca\u0142y kit zgodnie z instrukcj\u0105,\u00a0 uk\u0142ad LB3500 zabudowa\u0142em w podstawce, kt\u00f3r\u0105 mozna uzyska\u0107 przecinaj\u0105c\u00a0 wzd\u0142u\u017c DIL18\u00a0 i uruchomi\u0142em. Na testach miernik mierzy\u0142 poprawnie. Przer\u00f3bka polega na usuni\u0119ciu preskalera LB3500 i przer\u00f3bce programu. Wyj\u015bcie uk\u0142adu (n\u00f3\u017cka 9) zwar\u0142em do listwy do wej\u015bcia.<\/p>\n

\"\"<\/a><\/p>\n

Nast\u0119pnie trzeba by\u0142o zmieni\u0107 program. Wystarczy poprawi\u0107 w linii 47 oryginalnego programu korekcj\u0119 na warto\u015b\u0107\u00a00.0000040694875<\/strong><\/em> i miernik zacznie wskazywa\u0107 poprawn\u0105 warto\u015b\u0107. Ilo\u015b\u0107 pustych znak\u00f3w wy\u015bwietlacza sk\u0142oni\u0142a mnie jeszcze do dodania nazwy radia, emisji i znaku. Moim zadaniem je\u017celi kto\u015b planuje wsadzenie tego miernika do Lidii to nie trzeba wlutowa\u0107 tych element\u00f3w jak na poni\u017cszym schemacie. Czerwonym przewodem jest zaznaczony mostek kt\u00f3ry mo\u017cna wykona\u0107 kynarem. Elementy w czerwonym polu s\u0105 zb\u0119dne.<\/p>\n

\"\"<\/a><\/p>\n

Poni\u017cej zamie\u015bci\u0142em zmodyfikowany program, kt\u00f3ry zosta\u0142 skompilowany baskomem i wgrany w uk\u0142ad ATiny programatorem.<\/p>\n

\n
\u00a0<\/span><\/pre>\n\n\n
$regfile = \"attiny2313.dat\"\n Enable Interrupts\n $crystal = 16000000\n Config Lcd = 16 * 2 'konfiguracja LCD\n Config Lcdpin = Pin , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 = Portb.7 , E = Portb.3 , Rs = Portb.2\n Config Portd = Input\n Set Portd.5\n Dim Freq As Long\n Dim F As Single\n Dim Pomoc As Byte\n Dim L As Byte\n Cursor Off\n Dim S As String * 4\n Config Timer1 = Counter , Edge = Rising 'konfiguracja timerow\n Enable Timer1\n Start Timer1\n Config Timer0 = Timer , Prescale = 1024\n Enable Timer0\n Start Timer0\n\nOn Timer0 Sek\n On Timer1 Fr\n Cls\n Do\n Loop\n\nFr:\n Incr Pomoc 'jesli przepe\u0142nienie timera1 to zwieksz zmienna pomocnicza\n Return 'potrzebna do obliczenia czestotliwosci\n\nSek:\n Incr L\n If L = 61 Then Gosub Licz 'jezeli procesor odliczy jedna sekunde to skok do podprogramu licz\n Return\n\nLicz:\n Stop Timer1\n L = 0\n Cls\n\nFreq = 65536 * Pomoc\n Freq = Freq + Timer1 'tutaj mozna wprowadzi\u0107 offset'np offset -455kHz to odjecie od zmiennej freq wartosci 455000\/32.5559\n F = Freq * 0.0000040694875 'obliczenie czestotliwosci i korekcja wp\u0142ywu rezonatora i pojemnosci z nim pracujacych oraz niedok\u0142adno\u015bci odmierzenia 1 sekundy\n\nS = Fusing(f , \"#.#####\") 'formatowanie wyniku i wyswietlenie go na wyswietlaczu\n Locate 1 , 1\n Lcd \"*Lidia80* ZNAK\" 'tu mo\u017cesz wpisa\u0107 sw\u00f3j znak wywo\u0142awczy\n Locate 2 , 1\n Lcd S ; \" MHz, SSB\"\n Pomoc = 0\n Timer0 = 0 'zerowanie timerow i zmiennych pomocniczych\n Timer1 = 0\n Start Timer1\n\nReturn<\/code><\/pre>\n","protected":false},"excerpt":{"rendered":"
Po przejrzeniu gotowych odbiornik\u00f3w Lidia 80 na stronie W\u0142odka\u00a0 SP5DDJ zamarzy\u0142 mi si\u0119 miernik cz\u0119stotliwo\u015bci ale wyposa\u017cony w wy\u015bwietlacz LCD. W sklepie AVT wypatrzy\u0142em taki miernik AVT2831\u00a0 lecz nie pasowa\u0142 zakres mierzonej cz\u0119stotliwo\u015bci. Po przeanalizowaniu schematu zobaczy\u0142em, \u017ce w torze pomiarowym jest zabudowany uk\u0142ad scalony, kt\u00f3ry jest dzielnikiem cz\u0119stotliwo\u015bci. Je\u017celi usunie si\u0119 ten uk\u0142ad to Czytaj dalej... \"Miernik cz\u0119stotliwo\u015bci do Lidia 80\"<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":[],"categories":[1],"tags":[],"_links":{"self":[{"href":"https:\/\/sq9tla.pzk.pl\/index.php\/wp-json\/wp\/v2\/posts\/105"}],"collection":[{"href":"https:\/\/sq9tla.pzk.pl\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/sq9tla.pzk.pl\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/sq9tla.pzk.pl\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/sq9tla.pzk.pl\/index.php\/wp-json\/wp\/v2\/comments?post=105"}],"version-history":[{"count":14,"href":"https:\/\/sq9tla.pzk.pl\/index.php\/wp-json\/wp\/v2\/posts\/105\/revisions"}],"predecessor-version":[{"id":340,"href":"https:\/\/sq9tla.pzk.pl\/index.php\/wp-json\/wp\/v2\/posts\/105\/revisions\/340"}],"wp:attachment":[{"href":"https:\/\/sq9tla.pzk.pl\/index.php\/wp-json\/wp\/v2\/media?parent=105"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/sq9tla.pzk.pl\/index.php\/wp-json\/wp\/v2\/categories?post=105"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/sq9tla.pzk.pl\/index.php\/wp-json\/wp\/v2\/tags?post=105"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}