小松菜がでかくなりすぎました。 ほとんど食べないでほっておいたやつ
菜の花も咲き始め
途中から切って それでも太い！
小松菜 蕎麦の揚げたのを投入して 小松菜だけ鍋
白菜だけ鍋やホウレン草だけ鍋を続けた結果、ウサギか！虫か！ってくらい葉っぱ好きで 小松菜だけ鍋も美味しいです
青梅市の河辺グランドの駐車場 多摩川に向かって止まってました。 ナンバーが６６０でした。Ｓ６６０に６６０のナンバーって全国にどれだけいるの？？？？
１００ｍ以上先（推定）望遠でパチリ その後、行って、隣に止めて記念写真撮ろうかとも思ったのでが先を急いだいたので止めましたとさ
多摩川に向かって駐車のＳ６６０
３月１８日の続き ３月１２日の送信部と合わせて観て下さい
送信側も２０Ｍｈｚにして、受信側も２０Ｍｈｚにクロックを変更して、それに合わせて時間関数を変更したらできちゃいました。
下の画は、受信側です。右側のコネクタのところに電源と、信号線で計４本です。
８個のＬＥＤと２桁の７segＬＥＤで送信側のポートＢデータを表示してます。通信は、問題ないのですが、残念なことに、点発光ｎＬＥＤは、右がＭＳＢ、左がＬＳＢと逆！ ７ｓｅｇＬＥＤも下の桁が左側です。号泣！ 配線しなおさないと。
送信側で、デバック用（ターゲット用）のポートＢとこの送信側のポートＢを配列接続し、ＰＩＣ書き込み器をＩＣＳＰ接続したら書き込みエラーになります。なにか対策を考えねば
回路を変更しました。点灯の桁も正常、書き込みも問題なし 回路図は後日ＵＰ予定
直した表示
というわけでアセンブラです。
;LBA.ASM
;なんちゃってシリアル受信
list p=16F84
INCLUDE "p16F84A.inc"
__CONFIG _HS_OSC & _WDT_OFF & _PWRTE_ON & _CP_OFF
ORG 00h
;******
T1 EQU 0Ch
T2 EQU T1+1
T3 EQU T2+1
T4 EQU T3+1
TF EQU T4+1
M1 EQU TF+1
M2 EQU M1+1
M3 EQU M2+1
M4 EQU M3+1
;******
BSF STATUS, RP0
; CLRF TRISA
MOVLW B'00000011'
MOVWF TRISA
CLRF TRISB
; MOVLW B'11111111'
; MOVWF TRISB
BCF OPTION_REG,NOT_RBPU
BCF STATUS, RP0
;メイン
START
CLRF M2
CLRF M3
CLRF M4
CLRF T3
CLRF PORTA
CLRF PORTB
START_RX
MOVLW H'8'
MOVWF M1
START_RX1
BTFSS PORTA,0
GOTO START_RX1
;デバック用 次の１行
; BSF PORTA,3
; BCF PORTA,2
; BCF PORTA,3
CALL TIM24
; BCF PORTA,3
BTFSS PORTA,0
GOTO START_RX1
CALL SCAN
;デバック用 次の１行
; GOTO START_RX1
START_DATA
CALL TIM24
;タイマでもよいけどなぜか2個重ねてもできたときもある
; BTFSC PORTA,0
; GOTO START_DATA
BTFSC PORTA,0
GOTO START_DATA
START_BIT
BTFSS PORTA,0
GOTO START_BIT
;デバック用 次の1行
; BCF PORTA,2
BCF STATUS,0
BTFSC PORTA,1
; BSF PORTA,2
BSF STATUS,0
RRF M2,1
DECFSZ M1,F
GOTO START_DATA
MOVF M2,W
MOVWF M3
; MOVWF PORTB
;このチェク意味ないけどね気分で
CHK_PA0
BTFSC PORTA,0
GOTO CHK_PA0
CLRF PORTA
GOTO START_RX
;********************
;スタート検出 ２４μＳ
TIM24
MOVLW D'38'
MOVWF T1
TIMLOOP24
DECFSZ T1,F
GOTO TIMLOOP24
RETURN
;********************
;スタートタイマ
TIM2
MOVLW D'2'
MOVWF T2
TIMLOOP2
CALL TIM24
DECFSZ T2,F
GOTO TIMLOOP2
RETURN
;********************
;ダイナミック点灯
SCAN
; RETURN
BTFSC M4,4
GOTO LED2
BTFSC M4,3
GOTO LED1
MOVLW D'00010000'
MOVWF M4
MOVF M3,W
MOVWF PORTB
MOVLW D'00000100'
MOVWF PORTA
RETURN
;***********************
LED1
MOVLW D'00000100'
MOVWF M4
MOVF M3,W
ANDLW H'F'
CALL LED
MOVWF PORTB
MOVLW D'00001000'
MOVWF PORTA
RETURN
;**********************************
LED2
MOVLW D'00001000'
MOVWF M4
SWAPF M3,0
ANDLW H'F'
CALL LED
MOVWF PORTB
MOVLW D'00010000'
MOVWF PORTA
RETURN
;***********************
;７sgＬＥＤテーブル
;カソードコモン ＰＢ０?７＝ａ?ｇ
LED
ADDWF PCL,F
RETLW H'3F'
RETLW H'06'
RETLW H'5B'
RETLW H'4F'
RETLW H'66'
RETLW H'6D'
RETLW H'7D'
RETLW H'07'
RETLW H'7F'
RETLW H'6F'
RETLW H'77'
RETLW H'7C'
RETLW H'39'
RETLW H'5E'
RETLW H'79'
RETLW H'71'
END
