So-net無料ブログ作成
検索選択

今日は 15pF と 150pF で発振しました [ディップメータ]

フランクリン回路の初段G1とG2を入れ替えて10uHのコイルで発振させました。

帰還コンデンサは1000pFに換えました。

帰還抵抗100kVRは回しても 、余り関係しません。

2段目ドレイン抵抗20kVRも低すぎなければ問題はありません。

LEDの輝度差が邪魔をしてボケボケ写真です。

sIMG_0495.jpg

 

sIMG_0498.jpg

計算では大体これくらいの周波数ですが、ソース抵抗20kVRは前よりクリチカルになりました。

発振が強くなるとLEDも明るくなります。

もっと上を発振させるには 3SK166A の方が向いているかも知れません。

次の画像は0.1mmX10本のリッツ線を15ターン巻いたコイルです。

ディップメータ用はダンピング抵抗が入っているので発振しにくいのですが、

これには入っていないため発振しました。

この発振は基本と1/10を含んでいるようで、プローブ感度を1/1にしないと表示されません。

またバリコン全範囲では発振が停止します。

一つはポリバリコンなので損失が大きいこともあるのでしょう、

エアバリコンに換えて、3SK166Aでもやってみます、この場合電圧によっては電流が大きいので、

ソース抵抗にも同じMESFETを使った方がよいかも知れません。

この辺りの回路はブレッドボードが使えないのが難点です。

sIMG_0504.jpg

 


コメント(6) 

pa.exe cvasm16 jalv2 等のバッチ起動 [jalv2_PIC]

それぞれ次のような 所にあり そこの書いたバッチから起動できます。

バッチファイルは、コピーしてショートカットの貼り付けで好きな所に置けます。(普通はソースの所)

\pa-3.0.5s\MSDOS\pa.exe  と device.rc と *.h

インクルードは           .include    16f84.h   

「set source=D:\_users\_pa\_app\(ソースファイルの位置を示して、拡張子を取ったファイル名)
@ECHO OFF
C:\pa-3.0.5s\MSDOS\pa -l %source%.asm > %source%.err
echo on
pause
exit 」                                                 ************************

インクルードは        include 'C:\pictools\16c54.inc'

\pictools\CVASM16.EXE と DEVCODES.TBL と *.inc

「set sample=D:\_users\_cvasm\_apps\(ソースファイルの位置を示して、拡張子を取ったファイル名)

echo off
C:\pictools\CVASM16.EXE %sample%.src /L /D /M > %sample%.err
echo on
pause
exit 」                                                 ***************************

パスカル式の jalv2.exe は 普通パスが深いので 環境変数の登録するか

ローカルディスクの \\\compiler\jalv2.exeと \lib\*.jal

を使うように決まった形式のバッチがあります。

インクルードは      *.jal です。

 

バッチから起動できて余り間違いがないと リストやエラーファイルも出来てきます 。

 


コメント(0) 

pa.exe の デバイスファイル [PIC]

16f628a と 16f648a をでっち上げました。

C:\pa-3.0.5s\MSDOS\ 下に置いたバッチファイルのショートカットを

D:\_users\_pa\_app\ に作り これを 編集して nFCD128D.asm のソースを

nFCD128Dの名前で登録し、ショートカットから起動しますと

バッチのショートカットから起動出来ます。


set source=D:\_users\_pa\_app\mmFCD128D
C:\pa-3.0.5s\MSDOS\pa -l %source%.asm > %source%.err
pause

D:\_users\_pa\_app 下に mmFCD128D.lst mmFCD128D.err

が出来てきました。

16f628aでは動作しません、(16f628aにしても出来ました)16f877ですと動作して mmFCD128D.hex も エラーを含んで 上記のファイルが出来ました。

 mmFCD128D.lst

「  66  16f628a.h                                .include    16f628a.h        ; ここでは16f628aを選択
    1                                   
Error: Syntax error.」

 mmFCD128D.err

「Error D:\_users\_pa\_app\mmFCD128D.asm:213 Syntax error.
 213         retlw    8    ;gnum=4  n=8 」

16f648aを一緒にすると見れないので削除しました。 まだゴミが入っていますが、コメントアウトしています。

不明なレジスタ名もありますが、有りそうなモノは活かしてあります。

「  
        .nlist

;
;    pic16f628a header file version 3.00
;    copyright (c) 1997-2000 by masahiro ochiai
;

        .16f628a            ; pic16f628aに設定

;const word device_id    = 0x1060
;const byte pictype[]    = "16f628a"
;const byte datasheet[] = "40044"
;const byte pgmspec[]    = "41196"

;pragma  target  cpu   pic_14             -- (banks = 4)
;pragma  target  chip  16f628a
;pragma  target  bank  0x0080
;pragma  target  page  0x0800
;pragma  stack     8
;pragma  code     2048                     -- (words)
;pragma  eeprom  0x2100,128
;
;pragma  data     0x20-0x6f,0xa0-0xef,0x120-0x14f
;pragma  shared  0x70-0x7e,0x7f-0x7f

;var volatile byte _pic_accum shared at { 0x7e,0xfe,0x17e,0x1fe }    -- (compiler)
;var volatile byte _pic_isr_w shared at { 0x7f,0xff,0x17f,0x1ff }    -- (compiler)

;const word  _fuses_ct               = 1
;const word  _fuse_base            = 0x2007
;const word  _fuses                = 0b_0011_1111_1111_1111
;const word  _id_ct                = 4
;const word  _id_base[_id_ct]       = { 0x2000,0x2001,0x2002,0x2003 }
;const word  _id[_id_ct]           = { 0x0000,0x0000,0x0000,0x0000 }

;var volatile byte     fsr                       at { 0x4,0x84,0x104,0x184 }
;var volatile byte     _fsr                       at { 0x4,0x84,0x104,0x184 }        -- (compiler)
;var volatile byte     porta                       at { 0x5 }
;var volatile byte     portb                       at { 0x6,0x106 }
;var volatile byte     pclath                    at { 0xa,0x8a,0x10a,0x18a }
;var volatile byte     _pclath                   at { 0xa,0x8a,0x10a,0x18a }        -- (compiler)
;var volatile byte     intcon                    at { 0xb,0x8b,0x10b,0x18b }
;var volatile byte     pir1                       at { 0xc }
;var volatile word     tmr1                       at { 0xe }
;var volatile byte     tmr1l                       at { 0xe }
;var volatile byte     tmr1h                       at { 0xf }
;var volatile byte     t1con                       at { 0x10 }
;var volatile byte     tmr2                       at { 0x11 }
;var volatile byte     t2con                       at { 0x12 }
;var volatile word     ccpr1                       at { 0x15 }
;var volatile byte     ccpr1l                    at { 0x15 }
;var volatile byte     ccpr1h                    at { 0x16 }
;var volatile byte     ccp1con                   at { 0x17 }
;var volatile byte     rcsta                       at { 0x18 }
;var volatile byte     txreg                       at { 0x19 }
;var volatile byte     rcreg                       at { 0x1a }        
;var volatile byte     option_reg                at { 0x81,0x181 }
;var volatile byte     cmcon                       at { 0x1f }

indf        equ    0        ;indirect addressing
indirect    equ    0        ; backwards compatability
tmr0        equ    1
pcl            equ    2
status        equ    3        ; status
fsr            equ    4
porta        equ    5
ra            equ    5        ; backwards compatability
portb        equ    6
rb            equ    6        ; backwards compatability
pclath        equ    0ah
intcon        equ    0bh
pir1        equ    0ch
tmr1l        equ    0eh
tmr1h        equ    0fh
t1con        equ    10h
tmr2        equ    11h
t2con        equ    12h
ccpr1l        equ    15h
ccpr1h        equ    16h
ccp1con        equ    17h
rcsta        equ    18h
txreg        equ    19h
rcreg        equ    1ah
cmcon        equ    1fh        ;comparetor
option_reg    equ    1        ;*        ;option register
option        equ    81h        ;*    option ; backwards compatab
trisa        equ    5        ;*
trisb        equ    6        ;*
pie1        equ    0ch        ;*
pcon        equ    0eh        ;*
pr2            equ    18h        ;*
txsta        equ    18h        ;*
spbrg        equ    19h        ;*
eedata        equ    0ch        ;*
eeadr        equ    0dh        ;*
eecon1        equ    0ch        ;*
eecon2        equ    0dh        ;*
vrcon        equ    1fh        ;*    reference

;                3.
irp            equ    3.7        ;  page select
rp1            equ    3.6        ;  page select
rp0            equ    3.5        ;  page select
to            equ    3.4        ; time out bit
pd            equ    3.3        ; power down bit
z            equ    3.2        ;  zero flag
dc            equ    3.1        ;  digit carry/borrow flag
c            equ    3.0        ;  carry/borrow flag

;                0bh.
gie            equ    0bh.7        ;  
peie        equ    0bh.6        ;  
t0ie        equ    0bh.5        ;  
inte        equ    0bh.4        ;  
rbie        equ    0bh.3        ;  
t0if        equ    0bh.2        ;  
intf        equ    0bh.1        ;  
rbif        equ    0bh.0        ;  

;                0ch.
eeif        equ    0ch.7        ;  
cmif        equ    0ch.6        ;  
rcif        equ    0ch.5        ;  
txif        equ    0ch.4        ;  
ccp1if        equ    0ch.2        ;  
tmr2if        equ    0ch.1        ;  
tmr1if        equ    0ch.0        ;  

;                10h.
t1ckps1        equ    10h.5        ;  
t1ckps0        equ    10h.4        ;  
t1oscen        equ    10h.3        ;  
t1sync        equ    10h.2        ;  
tmr1cs        equ    10h.1        ;  
tmr1on        equ    10h.0        ;  

;                12h.
toutps3        equ    12h.6        ;  
toutps2        equ    12h.5        ;  
toutps1        equ    12h.4        ;  
toutps0        equ    12h.3        ;  
tmr2on        equ    12h.2        ;  
t2ckps1        equ    12h.1        ;  
t2ckps0        equ    12h.0        ;  

;                17h.
ccp1x        equ    17h.5        ;  
ccp1y        equ    17h.4        ;  
ccp1m3        equ    17h.3        ;  
ccp1m2        equ    17h.2        ;  
ccp1m1        equ    17h.1        ;  
ccp1m0        equ    17h.0        ;  

;                18h.
spen        equ    18h.7        ;  
rx9            equ    18h.6        ;  
sren        equ    18h.5        ;  
cren        equ    18h.4        ;  
aden        equ    18h.3        ;  
ferr        equ    18h.2        ;  
oerr        equ    18h.1        ;  
rx9d        equ    18h.0        ;  

;                1fh.
c2out        equ    1fh.7        ;  
c1out        equ    1fh.6        ;  
c2inv        equ    1fh.5        ;  
c1inv        equ    1fh.4        ;  
cis            equ    1fh.3        ;  
cm2            equ    1fh.2        ;  
cm1            equ    1fh.1        ;  
cm0            equ    1fh.0        ;  

;                1.
rbpu        equ    1.7            ;  
intedg        equ    1.6            ;  
t0cs        equ    1.5            ;  
t0se        equ    1.4            ;  
psa            equ    1.3            ;  
ps2            equ    1.2            ;  
ps1            equ    1.1            ;  
ps0            equ    1.0            ;  

;                0ch.
eeie        equ    0ch.7        ;  
cmie        equ    0ch.6        ;  
rcie        equ    0ch.5        ;  
txie        equ    0ch.4        ;  
ccp1ie        equ    0ch.2        ;  
tmr2ie        equ    0ch.1        ;  
tmr1ie        equ    0ch.0        ;  

;                0eh.
oscf        equ    0eh.3        ;  
por            equ    0eh.1        ;  
bo            equ    0eh.0        ;  
bor            equ    0eh.0        ;  
bod            equ    0eh.0        ;  

;                18h.
csrc        equ    18h.7        ;  
tx9            equ    18h.6        ;  
txen        equ    18h.5        ;  
sync        equ    18h.4        ;  
brgh        equ    18h.2        ;  
trmt        equ    18h.1        ;  
tx9d        equ    18h.0        ;  

;                1ch.
wrerr        equ    1ch.3        ;  
wren        equ    1ch.2        ;  
                1ch.
wr            equ    0ch.1        ;  
rd            equ    0ch.0        ;  

;                1fh.
vren        equ    1fh.7        ;  
vroe        equ    1fh.6        ;  
vrr            equ    1fh.5        ;  
vr3            equ    1fh.3        ;  
vr2            equ    1fh.2        ;  
vr1            equ    1fh.1        ;  
vr0            equ    1fh.0        ;  

;    configuration bit
;    don't edit

_fuse@        equ    2007h
_data@        equ    2100h

;8200        128        14
                                        ;_boden_on             equ        3fffh        
                                        ;_boden_off             equ        3fbfh        
_protect@on    equ    000fh                    ;_cp_on                 equ        1fffh        
_protect@off    equ    3fffh                ;_cp_off              equ        3fffh        

;d_protect@on    equ    000fh                ;_data_cp_on          equ        3effh        
;d_protect@off    equ    3fffh                ;_data_cp_off         equ        3fffh        

_pwrt@on    equ    3ff7h                    ;_pwrte_off             equ        3fffh        
_pwrt@off    equ    3fffh                    ;_pwrte_on             equ        3ff7h        

_wdt@on        equ    3fffh                    ;_wdt_on              equ        3fffh        
_wdt@off    equ    3ffbh                    ;_wdt_off             equ        3ffbh        

_osc@hs        equ    3ffeh                    ;_hs_osc              equ        3feeh        
_osc@xt        equ    3ffdh                    ;_xt_osc              equ        3fedh        
_osc@lp        equ    3ffch                    ;_lp_osc              equ        3fech        

_osc@rc        equ    3fffh                    ;_rc_osc_clkout         equ        3fffh        
                                        ;_rc_osc_noclkout     equ        3ffeh        
                                        ;_intosc_osc_clkout     equ        3ffdh        
                                        ;_intosc_osc_noclkout equ        3ffch        
                                        ;_extclk_osc         equ        3fefh        

                                        ;_lvp_on             equ        3fffh        
                                        ;_lvp_off             equ        3f7fh        

                                        ;_mclre_on             equ        3fffh        
                                        ;_mclre_off             equ        3fdfh        

;****************************************
;*    コンフィギュレーション        *
;****************************************
;    「device.rc」内のromサイズ指定を大きくして
;    rom内データとして配置できるようにしている
;    「.osc xt」「.pwrt on」という指定は使わない

;*****    コンフィギューレーション データ    *****
;    org    2007h
;    ;    32109876543210
;    dw    11111100110001b
;    ;    |||||||||+||++----- 0    オシレータ 内部発振 ra6 1mhz出力
;    ;    ||||||||| |+------- 2    ウオッチドッグ なし
;    ;    ||||||||| +-------- 3    パワーアップタイマー あり
;    ;    ||||||||+---------- 5    ra5は/mclrに
;    ;    |||||||+----------- 6    ブラウンアウトデテクトなし
;    ;    ||||||+------------ 7    rb4 lvp しない
;    ;    |||||+------------- 8    データプロテクト しない
;    ;    +++++-------------- 9    コードプロテクト しない
;-- symbolic fuse definitions
;-- -------------------------

まだ何か間違いがあるようです。


コメント(0) 

CVASM16 使ってみました [PIC]

ダウンロードした中に「apps」が有って、

その中の「LCD_DRVR.SRC」 をコンパイルしてみました。

WS001239.JPG

WS001240.JPG

WS001241.JPG

必要な情報は画像の中に全部有ります 。

WS001242.JPG

ビルドオールしますと 「lcd_drvr.HEX」が出来ていました。

あとどの様なデバイスがあるか調べてみます。

WS001244.JPGWS001243.JPG

なければ、デバイスの追加が出来るのかも調べてみます。

液晶周波数カウンタ のビルドをしました、

判る範囲でソースの修正をしましたが、つぎのえらーが120個以上出ます。

「ERROR D:\_USERS\_CVASM\_APPS\NFCD128D.SRC 314 : syntax error in operand
   314    0052-                                 clr    vfo[0]

ERROR D:\_USERS\_CVASM\_APPS\NFCD128D.SRC 531 : syntax error in operand
   531    00E3-                                 addwf    vfo[3],1    ;0     |         | 」


エラーの意味する所は判るのですが、どの様に直したらいいのか判りません。


コメント(0) 

やっとこフランクリン回路 [ディップメータ]

1コイル 1コンデンサの共振回路で ディップメータを作りたい・・を目標にしています。

3SK240(少ない電流で19mSくらいのようです)を3個使って発振回路とバッファアンプを作りました。

3SK240はGaAsカスケード型で下側エレメントをG1をGNDに繋ぎ

ソースに20kのVRを繋ぎ定電流回路にしました。

G2で信号を受けドレインには赤LEDを直列に入れました。

2段目はソース共通で 同じくG1とG2はGNDに接続、両FETの中点はそれぞれ接続して

1個の定電流回路にしたかったのですが接続することは出来ないので分離はしていますが、

それなりにそれぞれ定電流作用を持ちソースの結合で2段目のドレインに1段目G2の逆転信号を発生するはずです。

その点から100pFのコンデンサで取りだし1MΩのゲート抵抗を通しGNDに繋ぎます、

この点からはG1G2を並列にして3SK240で受けソースに2.2kの負荷を付け、ドレインに電源を 接続して

周波数計に繋ぎました。

2段目の負荷抵抗は20kのVRを繋ぎ、ここから100kのVRで100pFを通して1段目のG1に戻してあります。

電源は5vで 10uF、0.1uF、0.01uFのパスコンを適所に配しました。

3つのVRは少しずつ回して一番安定な所にしました。

(後でまとめて抵抗値を決定します)

AM用ポリバリコン、大の方に局発用コイル(350uH)を繋いだ共振回路を

バリコンを回して測定すると 2555.5KHz~756.7KHz の間を変化しました。

バリコンセンターをGNDに繋いでいなかったので手を近づけると周波数は変化しますが、

十分離すと安定に発振していました。

sIMG_0481.jpg

sIMG_0485.jpg

sIMG_0487.jpg

sIMG_0490.jpg

計算上 15~150pF と 350uH では 2196~694KHz ですので 大まかな変化比はカバーできたようです。

回路周辺を高インピーダンスに仕上げるため片面紙エポを使い、(回路が決まったら入らないパターンは後で剥ぎ取ります)

上下には銅板の電源バスを使いインピーダンスを下げ 、信号や給電には細い銅板を使いました。

MESEFTの候補には 3SK240(中インピーダンス) と 3SK166A(ローインピーダンス) を予定しました。

MESFETの差動増幅は単体FETではないため上段を能動素子と考え下段を定電流素子に近いと考えています。

バッファ段は単体FETを考えましたが、コンダクタンスの小さいのしかなかったので、同じ素子を選んでいます。

負荷の1000pFは発振回路から見ればほとんど影響のない値と思われます。

WS001237.JPG

回路関係抵抗は予想より低い値でした。

 


コメント(0) 

PA.EXE とCVASMについて [PIC]

両方ともパララックスのアセンブラの発展系らしい。

秋月はパララックスからスタンプを買っていたことがあり、その後は独自でスタンプを作ったようです。

秋のPA.EXEとパララックスの類似性、同じくCVASMの類似性について調べてみると少しずつ、

方言というか違いが出てきている。

類似というと「jalv2」があるが パスカルから始まったようで、記述の構造が違い、

少し違和感がある。

次はMPLABとCVASMと の比較表です。

pa.exeとも少し似ているが初期設定部分やマクロ、オペコードに違いがある。


This table is designed to help the CVASM16 user
to understand source code written in Microchip format.
It can also be a valuable reference
when converting source to TechTools format.
When doing this, keep in mind that CVASM16 will accept ALL of
Microchip's instruction set, but not
Microchip's directives and  macros.

f = File Register         w = Working Register or "W"
Microchip          Description                     TechTools Equivalent
____________________________________________
Byte-oriented File Register operations
____________________________________________
ADDWF     f,0      Add f into w                     ADD      W,f
ADDWF     f,1      Add W into f                     ADD      f,w
ANDWF     f,0      And f into w                     AND      W,f
ANDWF     f,1      And W into f                     AND      f,w
CLRF     f          Clear f                         CLR      f
CLRW             Clear W                         CLR      W
COMF     f,0      Complement f, store in w         MOV      W,/f
COMF     f,1      Complement f, store in f         NOT      f
DECF     f,0      Decrement f, store in w         MOV      W,--f
DECF     f,1      Decrement f, store in f         DEC      f
DECFSZ     f,0      Decrement f into w, skip if 0     MOVSZ      W,--f
DECFSZ     f,1      Decrement f into f, skip if 0     DECSZ      f
INCF     f,0      Increment f into w              MOV      W,++f
INCF     f,1      Increment f into f              INC      f
INCFSZ     f,0      Increment f into w, skip if 0     MOVSZ      W,++f
INCFSZ     f,1      Increment f into f, skip if 0     INCSZ      f
IORWF     f,0     Or W and f into w                 OR      W,f
IORWF     f,1      Or W and f into f                 OR      f,W
MOVF     f,0      Move f into w                     MOV     W,f
MOVF     f,1      Move f to itself                 TEST      f
MOVWF     f          Move W to f                     MOV      f,W
NOP              No operation                     NOP
RLF      f,0     Rotate f left w/carry, in w     MOV      W,<<fr
RLF      f,1     Rotate f left w/carry, in f     RL      f
RRF      f,0     Rotate f right w/carry, in w     MOV      W,>>f
RRF      f,1     Rotate f right w/carry, in f     RR      f
SUBWF     f,0     Subtract W from f in w             MOV      W,f-W
SUBWF     f,1     Subtract W from f in f             SUB      f,W
SWAPF     f,0     Swap nibbles of f in w             MOV      W,<>f
SWAPF     f,1     Swap nibbles of f in f             SWAP      f
XORWF     f,0     Xor W and f in w                 XOR      W,f
XORWF     f,1     Xor W and f in f                 XOR      f,W
__________________________________________
Bit-oriented File Register operations*
__________________________________________
BCF      f,b     Bit clear f                     CLRB      bit
BSF      f,b     Bit set f                          SETB      bit
BTFSC     f,b     Bit test f, skip if clear         SNB     bit
BTFSS     f,b     Bit test f, skip if set          SB         bit
____________________________________
Literal and Control operations
____________________________________
ADDLW     lit      Add literal into W         ('xx)      ADD      W,#lit
ANDLW     lit      And literal into                  AND     W,#lit
CALL     addr     Call to address          ('5x)     CALL      addr8
                 ('xx)                              CALL      addr11
CLRWDT              Clear WDT and prescaler         CLR     WDT
GOTO     addr     Go to address             ('5x)      JMP      addr9
                 ('xx)                              JMP      addr11
IORLW     lit      Or literal into W                 OR      W,#lit
MOVLW     lit      Move literal into W             MOV     W,#lit
OPTION             Move W into OPTION      ('5x)      MOV      !OPTION,W
RETFIE             Return from interrupt      ('xx)      RETI
RETLW     lit      Return with literal in W          RETW      lit
                 Return, clearing W      ('5x)      RET
RETURN             Return from subroutine  ('xx)      RET
SLEEP             Clear WDT and enter sleep mode  SLEEP
SUBLW     lit      Subtract W from literal ('xx)      MOV      W,#lit-W
TRIS     port     Move W into port's TRIS ('5x)      MOV      !port,W
XORLW     lit      Xor literal into W              XOR    W,#lit
________________________________
Special Instructions
____________________________________
ADDCF     f,0      Add carry to f, store in w '      ADDCF      f,0
ADDCF     f,1      Add carry to f, store in f '      ADDB      f,C
ADDDCF     f,0      Add digit carry to f,store in w ADDDCF  f,0
ADDDCF     f,1      Add digit carry to f,store in f ADDB      f,DC
B         k          Branch                  ('5x)      JMP      addr9
                                          ('xx)      JMP      addr11
BC         k          Branch on Carry '          ('5x)      JC         addr9
                                         ('xx)      JC      addr11
BDC      k          Branch on Digit Carry ' ('5x)      JB      DC,addr9
                                         ('xx)      JB      DC,addr11
BNC      k          Branch on No Carry '      ('5x)      JNC      addr9
                                         ('xx)      JNC      addr11
BNDC     k          Branch on No Digit Carry('5x)      JNB      DC,addr9
                                         ('xx)      JNB      DC,addr11
BNZ      k          Branch on No Zero '     ('5x)      JNZ      addr9
                                         ('xx)      JNZ      addr11
BZ          k          Branch on Zero '        ('5x)      JZ      addr9
                                         ('xx)      JZ      addr11
CLRC              Clear Carry                      CLC
CLRDC              Clear Digit Carry                 CLRB      DC
CLRZ              Clear zero                         CLZ
LCALL      k          Long Call '              ('5x)      LCALL      addr11
                                         ('xx)      LCALL      addr13
LGOTO      k          Long Goto                  ('5x)      LJMP      addr11
                                         ('xx)      LJMP      addr13
MOVFW      k          Move f into W                     MOV      W,f
NEGF      f,0      Negate f, store in w '          NEGF      f,0
NEGF      f,1      Negate f, store in f '          NEGF      f,1
SETC              Set carry                         STC
SETDC              Set digit carry                  SETB      DC
SETZ              Set zero                          STZ
SKPC              Skip if carry                     SC
SKPDC              Skip if digit carry              SB      DC
SKPNC              Skip if not carry                 SNC
SKPNDC              Skip if not digit carry         SNB      DC
SKPNZ              Skip if not zero                 SNZ
SKPZ              Skip if zero                      SZ
SUBCF      f,0      Subtract carry from f, in w '      SUBCF      f,0
SUBCF      f,1      Subtract carry from f, in f '      SUBB      f,C
SUBDCF      f,0      Sub digit carry from f, in w '  SUBDCF  f,0
SUBDCF      f,1      Sub digit carry from f, in f '  SUBB      f,DC
TSTF      f          Test  f                         TEST      f
 


コメント(0) 

アイワのMDレコーダ AM-F70

古い携帯電話から外した、単3より太いリチュームがあって、
これは元の充電器と保護回路を分解ドッキングして4.2Vまで充電できます。


FUJIのカメラ用充放電保護ICを入れると3.6vまで下がってしまい使えないので、

これを秋月の金属電池ホルダに放り込んで、ポリマーSWを付け、色んな物の電源に使っています。

うんと前にアイワでMDレコーダを買ったんですが、鉛2セルのガム型バッテリー(4v)で直ぐにヘタって使えなくなってしまいました。(リードアシド電池だから音が良いという言葉に釣られて・・)

最近知ったのですがいつの間にかガム型電池はリチューム(4.2v)に換わっていました。
このかわりに木製のバッテリー型で線を引き出しリチュームセルを繋ぐと短時間ですが動作するようになりました。

その後リポ電池を見つけ、取り替えましたが電圧関係は同じみたいです。

(おそらく30%くらいしか充電していないようです)
調べると単3-3本アルカリ電池BOXがあって4.5vのACアダプタの換わりにつかえるようで、これも作ってみます。

sIMG_0473.jpg

sIMG_0472.jpg

sIMG_0765.jpg

sIMG_0762.jpg

ケースをもっとしっかりした物に換えました。

リチューム電池は約4.6Vくらいですが。USBコネクタの横型最短を作り、

小型(電話用)の2極プラグを4mmくらい長く突き出すようにして、

本来のバッテリーケース蓋に穴を開けて、中に木製張り子の電池型を入れ、正規の接続で繋がるようにしました。

容量は700ma/hです。(元と同じですが大部長く使用できる感じがします)

録音、編集ボタンが硬すぎて押せないので、裏スポンジ付きマウスパッドを加工して

スポンジが赤ボタンを押し、手前の部分を過熱して曲げボタンに引っ掛かって押しやすい用にして、

ボンドでくっつけました。

これで簡単に録音編集モードに入れます。

*********************************


全部消すとブランクディスクになる
一度少し開け OPEN にして 閉めると TOC READ をする
1曲目がないと演奏できない

★トラック選択
再生中 (一時停止) 上SEARCH(右ボタン) JYOG回し でトラック選択

★録音、編集選択
再生中 (一時停止) 上EARCH(右ボタン) 赤ボタン 約3秒スライド上げボタン 編集モード表示
硬いのでウンと押し上げないと 録音、編集モードに入らない

スライド赤ボタンを離し

★編集モード選択
トラックネーム、ディスクネーム、コンバインデバイド
リナンバー、ムーブ000、イレース、オールイレース

MODEボタン を押して上記を 機能選択 ERASE 上ENTERボタン(左) ERASE? 上ENTERボタンで決定 消去

★録音モード
全停止中 赤ボタン スライドボタン 短く 録音モード 録音が直ぐに始まる
全停止中 赤ボタン スライドボタン 約3秒押す 録音待機モード

★バックライト ON/OFF
全停止中 DISPボタン 約3秒押す CLOCK SET 表示。
MODEボタン を押すと順番に BEEPOFF EarGRD EL OFF (終わり)と変化する。
各モードで 上ENTERボタン を押すたびに OFF と ON が繰り返し表示される。


有り難うございます、SONYさんからレコーダのマニュアルを送って頂きました。

マニュアルでは電池はリチュームなんですが、拙が買ったときはリードアシド電池であったように記憶しています。

これは管理が大変で直ぐダメになってしまい、今回リチュームを繋ぐと動作はしますが、「4.04V」で充電停止してしまいます。


コメント(0) 

朝食

今朝は寒かったのでパンに豆板醤を塗った。

小鉢は粉茶、ヨーグルトも 豆板醤入り。

クリームチーズフランス産牛のマーク入り 、他のメーカは銀紙を剥がして冷蔵庫に入れておくと、

半分くらいに目減りする、何かが添加されて入るみたいで、それが乾燥するらしい。

sIMG_0464.jpg

 


コメント(0) 

2SK192Aの発振 [ディップメータ]

コイルは局発用の350uHと15~150pFの共振回路で測ってみました。

7mSと小さいので発振し難いようです。

コモンソース抵抗は10kΩの中点では発振しました。

小さすぎますと帰還が掛からず発振は停止します。

ゲート受け側のコンデンサは反対側負荷抵抗に繋がるコンデンサの影響を受けます。

負荷のコンデンサが小さい場合は 帰還抵抗100kVRは小さい目で発振し

DCカットコンデンサ0.1uFは200pFくらいの方が共振回路に景況を与え難いようです。

オシロプローブの1/1 と1/10を繋いで周波数カウンタを繋ぎますと

バリコン可変範囲で 1833KHz~728KHzの確認が出来ました。

sIMG_0458.jpg

このこけしみたいな物はミシン針のホルダーです。

DCプラグは+極が2本内側を向いていて受けの方にも1文字の切り込みがあり、

これに合うと導通が切れます 、+極を針で押して強く当たるようにすると切れなくなりました。

sIMG_0455.jpg

sIMG_0460.jpg

今度は3SK240で試してみます。

3SK240(IDSS 14mA 19mS)はmesfet(GaAs)などで出来た(毒性があるそうです)

ショットキバリア型絶縁ゲート(JFETも) 電界効果型トランジスタ

同じ物がカスケードに接続され2つのゲート、ドレイン、ソースが引き出されています。

両ゲートをゼロvに繋ぎドレインに5vをかけるとIDSSに相当する電流が流れ、

ドレインに赤LEDを繋ぐと、1.65vの電圧降下があり、3.35vが掛かります。

コモン抵抗が10KΩですと、0.89vの電圧、89uA流れます。

(計算では3.35-0.89=2.45 300uAくらいです)

両ソースに抵抗を繋ぎ、反転段両ゲート(G1)を0vに繋ぎ、(上側FETだけを使う)

負荷抵抗を 振幅の取れる 抵抗に調整し小コンデンサを通して次段FET(2SK508)のソース抵抗から

信号を取り出すと、

帰還抵抗、コンデンサから共振回路に与える影響が少ないかも知れません。

sIMG_0462.jpg

3SK166A(IDSS 20mA 40mS)もがありますが 、これはこの次にします。

 

 


コメント(0) 

やっとこさフランクリン回路のシミュレート [ディップメータ]

こんにちは

複バリコンを使うコルピッツ回路では制約が出る 、今までのディップメータを

単バリコン単コイルにするため ラムダダイオードで回路を組んでは失敗ばかりしていましたが、

sIMG_0446.jpg

2SK192Aのスパイスモデルが見つかって、やっとこさフランクリン回路のシミュレートが出来ました。

外部と内部の共振回路をスイッチで切り換えるとディップメータや共振解析器に使えそうです。

複バリコンも(AM、FM) SWで切り換えて計測範囲を広げる工夫も考えられます。

水晶の周波数を計るには1MΩ位の抵抗を並列にしたり、

Qの高い共振回路に使うには100kΩくらいのVRを共振回路に並列に繋いでおく方法も考えられます。

回路例では中波ラジオのタンク回路を想定していて、複数の回路のマッチングに使う予定です。

バリコンの目盛板は、ディジタル周波数表示を使えば不必要で、周波数計の精度によります 。

ディップして信号が弱くなり、カウンタが計測しなくなったときは少し離せば、また表示されるので心配有りません。

 

WS001231.JPG

 

WS001236.JPG

 

sIMG_0444.jpg

ラジオが動作したら、次のシグナルインジェクタ (1.308MHz水晶も付いています) 

sIMG_0329.jpg

http://calibration.skr.jp/shouhin_list/fczdeta/036/036.html

036  初級 RF/AF ノイズインジェクタ

 2SA1115 2SC1845 を使いNPNのコレクタに水晶発振器の電源を繋いで 220pFと 0.01uF

でミックスして出力しています。


コメント(2) 
メッセージを送る

この広告は前回の更新から一定期間経過したブログに表示されています。更新すると自動で解除されます。