文書の表示以前のリビジョンバックリンクPDF の出力全て展開する／折り畳むODT 出力文書の先頭へ この文書は読取専用です。文書のソースを閲覧することは可能ですが、変更はできません。もし変更したい場合は管理者に連絡してください。 ====== 周波数表示ユニット2(真空管ラジオ用) ====== ===== 概要 ===== 標準的な真空管ラジオ(5球スーパー)に接続して、受信周波数を表示するものです。 受信周波数は、局部発振(前段の7極管のカソードより)の周波数より、中間周波数分(455Khz)をマイナス(-)したものを表示します。 * SW切り替え(SW1)で、マイナスするかしないかの選択が出来ます。 * SW切り替え(SW2)で、Khz表示またはHz表示の選択が出来ます。 最大25Mhzくらいまでカウントできますので短波帯でも十分使えると思います。 {{:imgpaste:202004:htmikan-20200429-161122.png?500}} {{:imgpaste:202004:htmikan-20200429-161137.png?500}} ===== 動作原理 ===== 標準的な5球スーパーラジオでは、前段の7極管で局部発振と混合を行っています。 局部発振ではラジオ放送の周波数よりも中間周波数(455Khz)分だけ高い周波数で発振しています。 そこでこの周波数をカウントし、その値から455Khzだけ引いてやればよいことになります。 参考までに、標準的な5球スーパーへの本ユニットの接続例を回路図上に示します。 {{:imgpaste:202004:htmikan-20200429-161216.png?500}} ===== 回路図 ===== {{:imgpaste:202004:htmikan-20200429-161231.png}} ===== 処理説明 ===== 先ず、入力信号は、FET(2SK241)およびトランジスタ(2SC1815)で構成されたアンプで増幅されます。 増幅された信号は、T0CKI端子に接続されTIMER0でカウントされます。 TIMER1とCCP1を使って正確な0.1秒を得ます。(この間だけゲートを開けてカウントします) * TIMER1を内部クロックで1/8プリスケーラで動作させます。 * するとTIMER1のクロックは、16MHz÷4÷8=500kHzとなります。 * CCP1をTIMER1とのコンペアモードで使い、一致する値を50000とします。 * すると10Hz周期で一致割り込みが発生し、正確な0.1秒を得ることが出来ます。 プリスケール値は1/8に設定してあります。これで最大約25Mhzまでカウントできますので短波を含む2バンドラジオへも対応可能となります。 カウントした値から中間周波数(455Khz)分だけを差し引いた値を文字列に変換して、LCDへ表示します。 * SW1:-455Khzの設定(有無) * SW2:Khz表示、Hz表示の切り替え ===== ソースコード ===== RadioFC R1.21(Khz表示時に1Khz未満の値を切り捨てていました) <code c RadioFC2.c> /* ＜簡易周波数カウンター＞ ■sw1=1 -455Khz ■sw1=0 -0Khz ■sw2=1 Hz表示 ■sw2=0 Khz表示 */ //********************************************************************** #define sw1 PORTB.F2 #define sw2 PORTB.F3 //********************************************************************** static short endFlag; //********************************************************************** void interrupt(){ if (PIR1.CCP1IF == 1) { PIR1.CCP1IF = 0; // endFlag++; if (endFlag == 1) { TRISA.F4 = 0; // ゲートを閉める。 PORTA.F4 = 0; T1CON.TMR1ON = 0; // TIMER1を停止する。 } } } //********************************************************************** void main() { static unsigned long freq; // 0...4294967295 static unsigned char buf[20]; static unsigned int ad3; static unsigned short cnt; // クロックの設定→今回は外付けの16Mhzクロックモジュールを使用する。 OSCCON = 0b01110000; // コンパレータの設定→今回は使用しない。 CMCON = 0b00000111; // アナログの設定 ANSEL = 0b00001000; // ポートの設定 TRISA = 0b10111100; TRISB = 0b00001100; OPTION_REG.F7 = 0; // 入力割り込みの設定→今回は使用しない。 INTCON.INTE = 0; INTCON.INTF = 0; OPTION_REG.INTEDG = 0; // 入力割り込み（変化）の設定→今回は使用しない。 INTCON.INTE = 0; INTCON.INTF = 0; // CCPの設定 PIE1.CCP1IE = 1; PIR1.CCP1IF = 0; CCP1CON = 0b00001011; CCPR1L = 0x50; // 0.1sec...10hz...クロックが16Mhzの時 CCPR1H = 0xC3; // 0.1sec...(1÷16000000)*4*8*50000 // TIMER0の設定→今回は使用しない。 INTCON.T0IE = 0; INTCON.T0IF = 0; TMR0 = 0; OPTION_REG.T0CS = 1; OPTION_REG.T0SE = 0; OPTION_REG.PSA = 0; OPTION_REG.PS0 = 0; OPTION_REG.PS1 = 1; OPTION_REG.PS2 = 0; // TIMER1の設定 PIE1.TMR1IE = 0; PIR1.TMR1IF = 0; TMR1L = 0; TMR1H = 0; T1CON.T1CKPS0 = 1; T1CON.T1CKPS1 = 1; T1CON.TMR1ON = 0; // TIMER2の設定→今回は使用しない。 PIE1.TMR2IE = 0; PIR1.TMR2IF = 0; T2CON.TMR2ON = 0; T2CON.T2CKPS0 = 0; T2CON.T2CKPS1 = 0; TMR2 = 0; // Lcd_Custom_Config(&PORTB,4,5,6,7,&PORTA,1,0,6); Lcd_Custom_Cmd(LCD_CURSOR_OFF); Lcd_Custom_Out(1, 1, "RadioFC"); Lcd_Custom_Out(2, 1, "R1.21"); Delay_ms(1000); Lcd_Custom_Cmd(LCD_CLEAR); // 割り込み(全体)の設定 INTCON.PEIE = 1; INTCON.GIE = 1; while (1) { // 初期化 T1CON.TMR1ON = 0; TRISA.F4 = 0; PORTA.F4 = 0; TMR0 = 0; INTCON.T0IF = 0; TMR1L = 0; TMR1H = 0; PIR1.TMR1IF = 0; endFlag = 0; freq = 0; // 開始 T1CON.TMR1ON = 1; Delay_Cyc(3); asm nop; asm nop; asm nop; asm nop; TRISA.F4 = 1; //ゲートを開ける。 // 測定 while (endFlag != 1) { if (INTCON.T0IF == 1) { INTCON.T0IF = 0; freq++; } } freq *= 256; freq += TMR0; // 補正 freq *= 8; freq *= 10; if (sw1 == 1) freq -= 455000; // -455Khz // 表示 LongToStr(freq, buf); if (sw2 == 1) { Lcd_Custom_Out(1, 1, &buf[3]); Lcd_Custom_Out(2, 1, "Hz"); } else { buf[8] = 'K'; buf[9] = 'h'; buf[10] = 'z'; buf[11] = 0x00; Lcd_Custom_Out(1, 1, &buf[3]); Lcd_Custom_Out(2, 1, " "); } // /* ad3 = Adc_Read(3); ad3 = ad3 / 80; for (cnt = 0; cnt < ad3; cnt++) Lcd_Custom_Chr(2, cnt + 1, 0xFF); for (; cnt < 8; cnt++) Lcd_Custom_Chr(2, cnt + 1, ' '); // */ Delay_ms(500); } } //********************************************************************** </code> RadioFC R1.22(Khz表示時に1Khz未満の値を四捨五入しました) <code c RadioFC3.c> /* ＜簡易周波数カウンター＞ ■sw1=1 -455Khz ■sw1=0 -0Khz ■sw2=1 Hz表示 ■sw2=0 Khz表示 ＜改版履歴＞ ・20070507 kHz時に四捨五入機能を追加 */ //********************************************************************** #define sw1 PORTB.F2 #define sw2 PORTB.F3 //********************************************************************** static short endFlag; //********************************************************************** void interrupt() { if (PIR1.CCP1IF == 1) { PIR1.CCP1IF = 0; // endFlag++; if (endFlag == 1) { TRISA.F4 = 0; // ゲートを閉める。 PORTA.F4 = 0; T1CON.TMR1ON = 0; // TIMER1を停止する。 } } } //********************************************************************** void main() { static unsigned long freq, temp; // 0...4294967295 static unsigned char buf[20]; static unsigned int ad3; static unsigned short cnt; // クロックの設定→今回は外付けの16Mhzクロックモジュールを使用する。 OSCCON = 0b01110000; // コンパレータの設定→今回は使用しない。 CMCON = 0b00000111; // アナログの設定 ANSEL = 0b00001000; // ポートの設定 TRISA = 0b10111100; TRISB = 0b00001100; OPTION_REG.F7 = 0; // 入力割り込みの設定→今回は使用しない。 INTCON.INTE = 0; INTCON.INTF = 0; OPTION_REG.INTEDG = 0; // 入力割り込み（変化）の設定→今回は使用しない。 INTCON.INTE = 0; INTCON.INTF = 0; // CCPの設定 PIE1.CCP1IE = 1; PIR1.CCP1IF = 0; CCP1CON = 0b00001011; CCPR1L = 0x50; // 0.1sec...10hz...クロックが16Mhzの時 CCPR1H = 0xC3; // 0.1sec...(1÷16000000)*4*8*50000 // TIMER0の設定→今回は使用しない。 INTCON.T0IE = 0; INTCON.T0IF = 0; TMR0 = 0; OPTION_REG.T0CS = 1; OPTION_REG.T0SE = 0; OPTION_REG.PSA = 0; OPTION_REG.PS0 = 0; OPTION_REG.PS1 = 1; OPTION_REG.PS2 = 0; // TIMER1の設定 PIE1.TMR1IE = 0; PIR1.TMR1IF = 0; TMR1L = 0; TMR1H = 0; T1CON.T1CKPS0 = 1; T1CON.T1CKPS1 = 1; T1CON.TMR1ON = 0; // TIMER2の設定→今回は使用しない。 PIE1.TMR2IE = 0; PIR1.TMR2IF = 0; T2CON.TMR2ON = 0; T2CON.T2CKPS0 = 0; T2CON.T2CKPS1 = 0; TMR2 = 0; // Lcd_Custom_Config(&PORTB,4,5,6,7,&PORTA,1,0,6); Lcd_Custom_Cmd(LCD_CURSOR_OFF); Lcd_Custom_Out(1, 1, "RadioFC"); Lcd_Custom_Out(2, 1, "R1.22"); Delay_ms(1000); Lcd_Custom_Cmd(LCD_CLEAR); // 割り込み(全体)の設定 INTCON.PEIE = 1; INTCON.GIE = 1; while (1) { // 初期化 T1CON.TMR1ON = 0; TRISA.F4 = 0; PORTA.F4 = 0; TMR0 = 0; INTCON.T0IF = 0; TMR1L = 0; TMR1H = 0; PIR1.TMR1IF = 0; endFlag = 0; freq = 0; // 開始 T1CON.TMR1ON = 1; Delay_Cyc(3); asm nop; asm nop; asm nop; asm nop; TRISA.F4 = 1; //ゲートを開ける。 // 測定 while (endFlag != 1) { if (INTCON.T0IF == 1) { INTCON.T0IF = 0; freq++; } } freq *= 256; freq += TMR0; // 補正 freq *= 8; freq *= 10; if (sw1 == 1) freq -= 455000; // -455Khz // 表示 LongToStr(freq, buf); if (sw2 == 1) { Lcd_Custom_Out(1, 1, &buf[3]); Lcd_Custom_Out(2, 1, "Hz"); } else { if (buf[8] >= '5') { buf[8] = 0x00; temp = atol(&buf[3]); temp++; } else { buf[8] = 0x00; temp = atol(&buf[3]); } LongToStr(temp * 1000, buf); buf[8] = 'k'; buf[9] = 'H'; buf[10] = 'z'; buf[11] = 0x00; Lcd_Custom_Out(1, 1, &buf[3]); Lcd_Custom_Out(2, 1, " "); } // /* ad3 = Adc_Read(3); ad3 = ad3 / 80; for (cnt = 0; cnt < ad3; cnt++) Lcd_Custom_Chr(2, cnt + 1, 0xFF); for (; cnt < 8; cnt++) Lcd_Custom_Chr(2, cnt + 1, ' '); // */ Delay_ms(500); } } //********************************************************************** </code> ===== 動作確認 ===== ナショナルの真空管ラジオ(BM-400)に接続して動作を確認しました。 ケースが壊れたので裸のまま使用しています。 {{:imgpaste:202004:htmikan-20200429-161605.png?500}} NHK第一放送(666Khz)を受信しているところです。 {{:imgpaste:202004:htmikan-20200429-161618.png?500}} Hz単位で表示してみました。 {{:imgpaste:202004:htmikan-20200429-161626.png?500}} アマチュア無線バンド(7Mhz)を受信してみました。 SSBの独特のモガモガ音が聞こえました。誰かがCQを出しているようです。 {{:imgpaste:202004:htmikan-20200429-161648.png?500}} {{:imgpaste:202004:htmikan-20200429-161702.png?500}} <callout type="warning" title="著作権表示 copyright notice"> このページは稲崎様の閉鎖したHPのコピーで、著作権は稲崎様にあります。[[elechobby:picdic:picdic|詳細]] This page is a copy of Mr. Inasaki's closed website, and the copyright is held by him.[[elechobby:picdic:picdic|Details]] </callout> elechobby/picdic/pic16f88/48.txt 最終更新: 2025/10/17 14:29by 127.0.0.1