ポチの玉手箱

DS3234sはRTCとの事ですが揮発メモリ(RAM)付きの水晶みたいです。精度は2ppmとのことで年差約63秒で、どこかで買った水晶に比べると随分、高精度です。
ppm(parts per million)はピコではなく、100万分の1です。秋月のHPのデータシートは短いので検索して長いデータシートを入手してください
SPI経由でRAMにアクセスして、時刻の設定、読出しを行うと言う単純なインタフェースです（半年前の記憶・・）
RAMはバッテリでバックアップしており、時刻情報が消えることはありません

問題は最初の時刻設定で、時刻設定のプログラムをシリアルダウンローダで起動するため、ロードに１０秒程度の掛かるため、上手く設定できません
そこで、GPSで衛星が獲得出来たタイミングでDS3234へ時刻情報を書き込むようにしました。
衛星が獲得できる前は、DS3234から時刻情報を取得するようにしました

上記の処理はmain.cで行っています

/*----------------------------------------------------------------------------/ / FatFs - FAT file system module R0.08b (C)ChaN, 2011 /-----------------------------------------------------------------------------/ / FatFs module is a generic FAT file system module for small embedded systems. / This is a free software that opened for education, research and commercial / developments under license policy of following terms. / / Copyright (C) 2011, ChaN, all right reserved. / / * The FatFs module is a free software and there is NO WARRANTY. / * No restriction on use. You can use, modify and redistribute it for / personal, non-profit or commercial products UNDER YOUR RESPONSIBILITY. / * Redistributions of source code must retain the above copyright notice. / /------------------------------------------------------------------------------/ /*----------------------------------------------------------------------------*/ /* FatFs Module Sample Program / Renesas SH7262 (C)ChaN, 2010 */ /*----------------------------------------------------------------------------*/ /* EV Board: FRK-SH2A */ /* Console: SCI2 N81 38400bps */ /* MMC/SDC: SPI mode via RSPI0 */ /*----------------------------------------------------------------------------*/ #include <machine.h> #include <stdio.h> #include "iodefine.h" //#include "vect.h" #include "integer.h" //#include "scif.h" #include "monitor.h" //#include "diskio.h" #include "ff.h" #include "ffconf.h" #include "usb.h" /* Generic ioctl command (defined for FatFs) */ #define CTRL_SYNC 0 /* Flush disk cache (for write functions) */ #define GET_SECTOR_COUNT 1 /* Get media size (for only f_mkfs()) */ #define GET_SECTOR_SIZE 2 /* Get sector size (for multiple sector size (_MAX_SS >= 1024)) */ #define GET_BLOCK_SIZE 3 /* Get erase block size (for only f_mkfs()) */ #define CTRL_ERASE_SECTOR 4 /* Force erased a sector group (for only _USE_ERASE) */ /* Disk Status Bits (DSTATUS) */ #define STA_NOINIT 0x01 /* Drive not initialized */ #define STA_NODISK 0x02 /* No medium in the drive */ #define STA_PROTECT 0x04 /* Write protected */ #define PCLK 24000000UL //#define xdev_out(func) charput = (void(*)(unsigned char))(func) extern void (*xfunc_out)(unsigned char); void xputs (const char* str); void xprintf (const char* fmt, ...); void xsprintf (char* buff, const char* fmt, ...); void xdprintf (void (*func)(unsigned char), const char* fmt, ...); void put_dump (const void* buff, unsigned long addr, int len); void trc_print(struct TRCD * trcdp); //#define xdev_in(func) charget = (unsigned char(*)(void))(func) extern unsigned char (*xfunc_in)(void); int xgets (char* buff, int len); int xdgets (unsigned char (*func)(void), char* buff, int len); int xatoi (char** str, long* res); /* Status of Disk Functions */ typedef BYTE DSTATUS; /* Results of Disk Functions */ typedef enum { RES_OK = 0, /* 0: Successful */ RES_ERROR, /* 1: R/W Error */ RES_WRPRT, /* 2: Write Protected */ RES_NOTRDY, /* 3: Not Ready */ RES_PARERR /* 4: Invalid Parameter */ } DRESULT; #include "usb_firm\inc\usb_firm.h" #include "trace.h" void Serial_Puts(char *p); // Debug void charput(char c); void abort(void); // Debug void abort(void){} // Debug volatile unsigned int Timer_Sec, cc=1; // * パフォーマンスタイマ (1Hz加算) struct TRCD * trcp_old=0; char GMT[40]; int nn=0, St_clock=0, St_times=0; // *--------------------------------------------------------- // * 1000Hz --> 1Hzインターバルタイマ (CMT0) // Debug // *--------------------------------------------------------- void init_cmt0(void) { // CPG.FRQCR.WORD = 0x1104; // *--- FRQCR設定 内部クロック比 I:B:P = 144MHz:48MHz:24MHz --- CPG.FRQCR.WORD = 0x0104; // *--- FRQCR設定 内部クロック比 I:B:P = 144MHz:48MHz:24MHz --- CPG.STBCR7.BIT.MSTP72 = 0; // *--- STBCR7設定 CMTクロック供給開始 --- CMT.CMSTR.BIT.STR0 = 0; // *--- CMSTR設定 CMCNT0カウント停止 --- CMT.CMCNT0.WORD = 0x0000; // *--- CMCNT0設定 0クリア --- CMT.CMCSR0.WORD = 0x0043; // *--- CMCSR0設定 CMI発生許可 クロック設定[Pφ/512] --- // CMT.CMCOR0.WORD = PCLK / 8 / 1000 - 1; // *--- Set clock divider CMT.CMCOR0.WORD = PCLK / 512 ; // *--- 1 Sec Timer CMT.CMSTR.BIT.STR0 = 0x1; // *--- CMSTR設定 CMCNT0カウント開始 --- // * 割り込み優先レベル設定レジスタ10 INTC.IPR10.BIT._CMT0 = 1; // * コンペアマッチタイマ チャネル1 } void #ifndef HEW // __attribute__((interrupt_handler)) #endif int_cmt_cmi0(void) { struct TRC * trcp; trcp = SOT; if( CMT.CMCSR0.BIT.CMF == 1 ) { } // CMT.CMCNT0.WORD = 0x0000; // *--- CMCNT0設定 0クリア <<<---　自動でクリア CMT.CMCSR0.BIT.CMF = 0; // * コンペアマッチフラグをクリア Timer_Sec++; // *--- 1 Sec Up PORT.PCDR0.BIT.PC8DR = ~PORT.PCDR0.BIT.PC8DR; // Switch LED On <----> Off loop: if ( trcp->trcurp != trcp->trcprp ) { if ( trcp_old != trcp->trcurp ) { trcp_old = trcp->trcurp; return; } if ( trcp->trcprp->TTT.MTYPE == 0) Serial_Puts(trcp->trcprp->trcd); else trc_print( trcp->trcprp ); trcp->trcprp++; if ( trcp->trcprp >= EOT ) trcp->trcprp = SOD; goto loop; } } static void Timer_Start ( void ) { CMT.CMSTR.BIT.STR0 = 0x0; // *--- CMSTR設定 CMCNT0カウント停止!! --- Timer_Sec = 0; // CMT.CMCNT0.WORD = 0x0000; // *--- CMCNT0設定 0クリア --- CMT.CMSTR.BIT.STR0 = 0x1; // *--- CMSTR設定 CMCNT0カウント開始!! --- } static UINT Timer_Stop ( void ) // *--- Delay in unit of ms { int tictac; tictac = (int)CMT.CMCNT0.WORD; // CMT.CMSTR.BIT.STR0 = 0x0; // *--- CMSTR設定 CMCNT0カウント停止!! --- // LED点滅のため敢えて止めない return Timer_Sec*1000 + (tictac*1000)/(24000000/512); // return msec } /**** -- TRACE -- *******************************************************/ void trc_init() { struct TRC * trcp; char * p ; trcp = SOT; for ( p = (char *)trcp; p < (char *)EOT; p++) *p = 0x00; /* All '0' Clear */ trcp->trcurp = SOD; /* Top of Trace Area */ trcp->trcprp = SOD; /* All Printed */ trcp->trcwrap = 0 ; /* Do Not Wrap */ } void trc_put(char * inp) { int i; struct TRC * trcp; struct TRCD * trdp; trcp = SOT; trdp = trcp->trcurp++; /* CRITICAL SECTION */ if ( trcp->trcurp >= EOT ) /* Over ? */ { trcp->trcurp = SOD; /* Return to Top */ trcp->trcwrap = 1; /* Wrapped */ } for (i=0; i<118; i++) { trdp->trcd[i] = *inp++; if ( trdp->trcd[i] == 0 ) break; } trdp->TTT.MTYPE = 0x00 ; /* BASIC MSG type */ } void trc_data(char * inp, int mid, USB_U16 mlen) { int i; struct TRC * trcp; struct TRCD * trdp; trcp = SOT; trdp = trcp->trcurp++; /* CRITICAL SECTION */ if ( trcp->trcurp >= EOT ) /* Over ? */ { trcp->trcurp = SOD; /* Return to Top */ trcp->trcwrap = 1; /* Wrapped */ } trdp->TTT.MTYPE = 1 ; /* trace DATA type */ trdp->TTT.MID = mid ; trdp->TTT.MLEN = mlen>100 ? 100 : mlen ; for (i=0; i<trdp->TTT.MLEN; i++) { trdp->trcd[i] = *inp++; } } void h2cx( char * inp, char * outp, int keta ) { int i; const char C[]="0123456789ABCDEF"; for (i=0; i<keta; i++,inp++) { *outp++ = C[(int)( *inp & 0xF0 ) / 16] ; *outp++ = C[(int)( *inp & 0x0F ) ] ; } } char h2c( char * inc ) { printf("%c,%c", *inc, *(inc+1) ); return ((*inc++) & 0x0F)*16 + (*(inc) & 0x0F); } void c2h( char * inp, char * outp, int keta ) { int i; const char C[]="0123456789ABCDEF"; for (i=0; i<keta; i++,inp++) { *outp++ = C[(int)( *inp & 0xF0 ) / 16] ; *outp++ = C[(int)( *inp & 0x0F ) ] ; } } void h2cs( char * inp, int cp, char * fmt, int keta ) { int i; const char C[]="0123456789ABCDEF"; char buff[256], * outp; for ( i=0; fmt[i] != 0x00; i++) buff[i] = fmt[i]; // Debug outp = &buff[0] + cp; for (i=0; i<keta; i++,inp++) { *outp++ = C[(int)( *inp & 0xF0 ) / 16] ; *outp++ = C[(int)( *inp & 0x0F ) ] ; if ( (i+1)% 4 == 0 ) *outp++ = ' ' ; if ( (i+1)%16 == 0 ) *outp++ = ' ' ; if ( (i+1)%32 == 0 ){ *outp++ = '\n' ; *outp++ = ' ' ; *outp++ = ' ' ; *outp++ = ' ' ; *outp++ = ' ' ; *outp++ = ' ' ; *outp++ = ' ' ; *outp++ = ' ' ; } } *outp++ = '\n' ; *outp++ = 0x00 ; Serial_Puts( buff ); // Debug } void dump( char * inp, int bp , int len) { int i, j, k, bpp; const char C[]="0123456789ABCDEF"; char buff[128], * outp, c; for ( i=0; i<128; i++) buff[i]=' '; outp = &buff[0]; bpp = bp; *outp++ = C[(bpp & 0xF000) / 4096] ; *outp++ = C[(bpp & 0x0F00) / 256] ; *outp++ = C[(bpp & 0x00F0) / 16] ; *outp++ = C[(bpp & 0x000F) ] ; *outp++ = ' '; *outp++ = ' '; buff[ 81] = '|'; buff[114] = '|'; buff[115] = '\n'; buff[116] = 0; for (i=0; i<len; i++,inp++) { *outp++ = C[(int)( *inp & 0xF0 ) / 16] ; *outp++ = C[(int)( *inp & 0x0F ) ] ; if ( (i+1)% 4 == 0 ) *outp++ = ' ' ; if ( (i+1)%16 == 0 ) *outp++ = ' ' ; c = *inp; if ( (c>=0x20) && (c<0x7f)) buff[82+(i%32)] = c; else buff[82+(i%32)] = '.'; if ( (i+1)%32 == 0 ){ Serial_Puts( buff ) ; for ( j= 7; j< 78; j++) buff[j]=' '; for ( j=82; j<114; j++) buff[j]=' '; outp = buff; bpp = bpp + 32; *outp++ = C[(bpp & 0xF000) / 4096] ; *outp++ = C[(bpp & 0x0F00) / 256] ; *outp++ = C[(bpp & 0x00F0) / 16] ; *outp++ = C[(bpp & 0x000F) ] ; *outp++ = ' '; *outp++ = ' '; } } if ( (len%32) != 0 ) Serial_Puts( buff ) ; Serial_Puts( "\n" ); // Debug } /* コンソール文字列出力(最新新-規追加) ******************************************/ void Serial_Puts(char *p) // Debug { // Debug unsigned char c; // Debug while( *p != 0) { // Debug c = *p++; // Debug if ( c == 0x0A ) { // Debug charput( 0x0D ); // Debug charput( 0x0A ); // Debug } // Debug else // Debug charput( c ); // Debug // Debug } // Debug } // Debug void trc_print(struct TRCD * trcdp) { const char fmt1[]= "<-- CW=", fmt2[]= "--> CR=", fmt3[]= "<-- [DATA_STAGE WRITE]=", fmt4[]= "<-- W0=", fmt5[]= "--> R0=", fmt6[]= "<-- W1=", fmt7[]= "--> R1="; // 0123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890 // 0 1 2 3 4 5 6 7 8 int i; // Debug // Debug switch ( trcdp->TTT.MID ) { // Debug case 1 : { // Debug h2cs( trcdp->trcd, sizeof(fmt1)-1, fmt1, trcdp->TTT.MLEN ); // Debug break; // Debug } // Debug case 2 : { // Debug h2cs( trcdp->trcd, sizeof(fmt2)-1, fmt2, trcdp->TTT.MLEN ); // Debug break; // Debug } // Debug case 3 : { // Debug h2cs( trcdp->trcd, sizeof(fmt3)-1, fmt3, trcdp->TTT.MLEN ); // Debug break; // Debug } // Debug case 4 : { // Debug h2cs( trcdp->trcd, sizeof(fmt4)-1, fmt4, trcdp->TTT.MLEN ); // Debug break; // Debug } // Debug case 5 : { // Debug h2cs( trcdp->trcd, sizeof(fmt5)-1, fmt5, trcdp->TTT.MLEN ); // Debug break; // Debug } // Debug case 6 : { // Debug h2cs( trcdp->trcd, sizeof(fmt6)-1, fmt6, trcdp->TTT.MLEN ); // Debug break; // Debug } // Debug case 7 : { // Debug h2cs( trcdp->trcd, sizeof(fmt7)-1, fmt7, trcdp->TTT.MLEN ); // Debug break; // Debug } // Debug // Debug default: // Debug Serial_Puts( "\n--- Unkown Trace Data ---\n" ); // Debug // Debug } // Debug } void charput(char c) { if( c == '\n' ) { while( SCIF2.SCFSR.BIT.TEND == 0 ) ; SCIF2.SCFTDR.BYTE = 0x0d; SCIF2.SCFSR.BIT.TEND = 0; while( SCIF2.SCFSR.BIT.TEND == 0 ) ; SCIF2.SCFTDR.BYTE = 0x0a; SCIF2.SCFSR.BIT.TEND = 0; } else { while( SCIF2.SCFSR.BIT.TEND == 0 ) ; SCIF2.SCFTDR.BYTE = c; SCIF2.SCFSR.BIT.TEND = 0; } } unsigned char charget(void) { unsigned char x; /*""FUNC COMMENT""************************************************************** * ID : * Outline : SCIF チャネル2 1文字受信処理 *------------------------------------------------------------------------------ * Return Value : 受信データ *------------------------------------------------------------------------------ *""FUNC COMMENT END""**********************************************************/ /* ==== 受信エラー、ブレーク信号検出、オーバランエラーの確認 ==== */ if((SCIF2.SCFSR.WORD & 0x0090u ) || (SCIF2.SCLSR.BIT.ORER == 1)) { /* 受信エラー処理(受信データの破棄） */ SCIF2.SCSCR.BIT.RE = 0; /* 受信禁止 */ SCIF2.SCFCR.BIT.RFRST = 1; /* 受信FIFO リセット */ SCIF2.SCFCR.BIT.RFRST = 0; /* 受信FIFO リセット解除 */ SCIF2.SCFSR.WORD &= ~0x0091u; /* ER,BRK,DR ビットクリア */ SCIF2.SCLSR.BIT.ORER = 0; /* ORER クリア */ SCIF2.SCFSR.BIT.RDF = 0; /* RDF ビットクリア */ SCIF2.SCSCR.BIT.RE = 1; /* 受信許可 */ return 0; } while(SCIF2.SCFSR.BIT.RDF == 0){ /* 受信データが指定トリガ数以上か？(RDF==1?) */ if(SCIF2.SCFSR.BIT.DR == 1){ /* データ受信後、一定時間経過したか？(DR==1?) */ break; /* FIFO 内にデータがあるのでRDF フラグ待ちをやめる */ } } x = SCIF2.SCFRDR.BYTE; /* 受信FIFO データレジスタ(SCFRDR0)から受信データを読み出す */ /* ==== FIFO 受信データを読み出し後、DR をクリア ==== */ SCIF2.SCFSR.BIT.DR = 0; /* FIFO が空の場合DR ビットはクリアされます */ /* ==== シリアルステータスレジスタ(SCFSR0)のRDF をクリアする ==== */ SCIF2.SCFSR.BIT.RDF = 0; /* RDF ビットクリア */ charput(x); // エコーバック return x; } /*---------------------------------------------------------*/ /* Work Area */ /*---------------------------------------------------------*/ DWORD acc_size; /* Working variables (fs command) */ WORD acc_files, acc_dirs; FILINFO Finfo; /* Working variables (fs/fl command) */ #if _USE_LFN char Lfname[_MAX_LFN + 1]; #endif char Line[128]; /* Console input buffer */ FATFS Fatfs; /* File system object */ FIL File1, File2; /* File objects */ DIR Dir; /* Directory object */ //BYTE Buff[32768]; /* Data buffer */ //UINT Buff[8192]; /* Data buffer */ //volatile UINT Timer; /* Performance timer (1kHz increment) */ /*---------------------------------------------------------*/ /* User Provided Timer Function for FatFs module */ /*---------------------------------------------------------*/ /* This is a real time clock service to be called from */ /* FatFs module. Any valid time must be returned even if */ /* the system does not support a real time clock. */ /* This is not required in read-only configuration. */ /*--------------------------------------------------------------------------*/ /* Monitor */ /*--------------------------------------------------------------------------*/ static int xstrlen (const char *str) { int n = 0; while (*str++) n++; return n; } static char *xstrcpy (char* dst, const char* src) { char c, *d = dst; do { c = *src++; *d++ = c; } while (c); return dst; } static void *xmemset (void *p, int c, int sz) { char *pf = (char*)p; while (sz--) *pf++ = (char)c; return p; } static char *xstrchr (const char *str, int c) { while (*str) { if (*str == (char)c) return (char*)str; str++; } return 0; } void put_lcd(char * pb) { char *pc, hhmmss[10]; int i, j, k, w, y, h, m, d, yy, mm, dd, NoD, rem; volatile int c0, c1, s17, s18; static char jst[24][3] = { "09", "10", "11", "12", "13", "14", "15", "16", "17","18", "19", "20", "21", "22", "23", "00", "01", "02", "03","04", "05", "06", "07", "08" }; static char wk[7][4] = { "Wed", "Thr", "Fri", "Sat", "Sun", "Mon", "Tue" }; unsigned char str[32]; static char wr[2]={0x80,0x00}; static char rd[2]={0x00,0x00}; char buff[128], st[48]; if ( strncmp( pb, "$GPRMC", 6 ) == 0 ) { GMT[ 0] = '2' ; GMT[ 1] = '0' ; GMT[ 2] = *( pb + 61 ); GMT[ 3] = *( pb + 62 ); GMT[ 4] = '/' ; GMT[ 5] = *( pb + 59 ); GMT[ 6] = *( pb + 60 ); GMT[ 7] = '/' ; GMT[ 8] = *( pb + 57 ); GMT[ 9] = *( pb + 58 ); GMT[10] = ' ' ; GMT[11] = ' ' ; GMT[12] = ' ' ; GMT[13] = ' ' ; GMT[14] = ' ' ; GMT[15] = ' ' ; GMT[16] = ' ' ; GMT[17] = '\n' ; // GMT[18] = ' ' ; // GMT[19] = ' ' ; GMT[20] = ' ' ; GMT[21] = ' ' ; GMT[22] = ' ' ; GMT[23] = ' ' ; GMT[24] = ' ' ; GMT[25] = ' ' ; GMT[26] = *( pb + 7 ); GMT[27] = *( pb + 8 ); GMT[28] = ':' ; GMT[29] = *( pb + 9 ); GMT[30] = *( pb + 10 ); GMT[31] = ':' ; GMT[32] = *( pb + 11 ); GMT[33] = *( pb + 12 ); GMT[34] = 0x00 ; y = (GMT[ 2] & 0x0F) * 10 + (GMT[ 3] & 0x0F); m = (GMT[ 5] & 0x0F) * 10 + (GMT[ 6] & 0x0F); d = (GMT[ 8] & 0x0F) * 10 + (GMT[ 9] & 0x0F); NoD = GregorianToDayNumber( 2000+y, m, d ); h = (GMT[26] & 0x0F) * 10 + (GMT[27] & 0x0F); if ( (h+9)>23 ) { NoD++; rem = YMD( NoD, &yy, &mm, &dd ); GMT[ 2] = ((yy - 2000)/10) | 0x30; GMT[ 3] = ((yy - 2000)%10) | 0x30; GMT[ 4] = '/' ; GMT[ 5] = ((mm)/10) | 0x30; GMT[ 6] = ((mm)%10) | 0x30; GMT[ 7] = '/' ; GMT[ 8] = ((dd)/10) | 0x30; GMT[ 9] = ((dd)%10) | 0x30; } w = NoD % 7 ; GMT[11] = '[' ; GMT[12] = wk[w][0] ; GMT[13] = wk[w][1] ; GMT[14] = wk[w][2] ; GMT[15] = ']' ; j = ( GMT[26] - '0' ) * 10 + GMT[27] - '0'; GMT[26] = jst[j][0]; GMT[27] = jst[j][1]; if ( GMT[19] > '0' ) { // * Not store Clock yet. AND Acquire Satellites lcd_locate(0, 0); lcd_puts( GMT ); } } else if ( strncmp( pb, "$GPGGA", 6 ) == 0 ) { GMT[18] = *( pb + 45 ); GMT[19] = *( pb + 46 ); if ( St_times>2 && St_clock==0 && GMT[19] > '0' ) { // * Not store Clock yet. AND Acquire Satellites St_clock = 1; ST_clock(); } else { if ( GMT[18] == '0' && GMT[19] == '0' ) { io_cmd_exe_rdmode(rd, 1, str, 26); h2cx( str, buff, 26 ); // printf( buff ); k = (int)( (int)str[17] * 4 + (unsigned int)str[18] / 32) * 25; c0 = k / 100; c1 = (( k - c0 * 100 ) + 5) / 10; // printf ("k=%6d, c0=%4d, c1=%4d, str[17]=%4d, str[18]=%4d\n", k, c0, c1, str[17], str[18]); // printf ("\n str[3]=%d\n", str[3]); sprintf(st, "20%02X/%02X/%02X [%s]\n%02X:%02X:%02X %2d.%01dc", str[6], str[5], str[4], wk[(str[3]+3)%7], str[2], str[1], str[0], c0, c1); lcd_locate(0, 0); lcd_puts(st); } } St_times++; } } int ST_clock( ) { volatile int i, j, k, c0, c1, s17, s18; static char wr[2]={0x80,0x00}; static char rd[2]={0x00,0x00}; static char wk[7][4]={"Sun\0", "Mon\0", "Tue\0", "Wed\0", "Thu\0", "Fri\0", "Sat\0"}; // 現 在 時 刻 ALARM1 ALARM2 0E // Write 秒 分 時 曜 日 月 年 秒 分 時 日 分 時 日 // 80 - 00 00 00 04 27 07 11 static char dt[16]={0x00,0x49,0x04,0x02,0x16,0x04,0x12,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00}; char old_str[32], st[48], buff[128]; // unsigned char str[32]; int DayOfWeek; //レジスタバンクの使用を許可 // INTC.IBCR.WORD = 0xFFFF; // set_imask(0); dt[0] = h2c(&GMT[32]); // 秒　受信遅延分の補正 printf("\n Before dt[0]=%d, ", (int)dt[0]); dt[0] = dt[0] + 3; // 秒　受信遅延分の補正 printf("After dt[0]=%d\n", (int)dt[0]); dt[1] = h2c(&GMT[29]); // 分 if ( (int) dt[0] > 59 ) dt[1] = dt[1] + 1; //　６０秒を超えたら繰り上げ dt[2] = h2c(&GMT[26]); // 時 dt[4] = h2c(&GMT[ 8]); // 日 dt[5] = h2c(&GMT[ 5]); // 月 dt[6] = h2c(&GMT[ 2]); // 年 DayOfWeek = GregorianToDayNumber( (int) dt[6], (int) dt[5], (int) dt[4] ); dt[03] = ( ( DayOfWeek + 1 ) % 7) + 1; // 曜日 io_cmd_exe(&wr[0], 1, &dt[0], 15); // 時刻セット printf("\n\n\n %02X/%02X/%02X %02X:%02X:%02X\n\n", dt[6],dt[5],dt[4], dt[2],dt[1],dt[0]); printf("\n\n\n\n C L O C K S E T ! ! \n\n\n\n\n"); /* for ( i=0; i<30; i++) str[i] = old_str[i] = 0x00; loop: io_cmd_exe_rdmode(rd, 1, str, 26); if ( strcmp(str, old_str) == 0 ) goto loop; for ( i=0; i<26; i++) old_str[i] = str[i]; h2c( str, buff, 26 ); // printf( buff ); k = (int)( (int)str[17] * 4 + (unsigned int)str[18] / 32) * 25; c0 = k / 100; c1 = (( k - c0 * 100 ) + 5) / 10; // printf ("k=%6d, c0=%4d, c1=%4d, str[17]=%4d, str[18]=%4d\n", k, c0, c1, str[17], str[18]); sprintf(st, "20%02X/%02X/%02X [%s]\n%02X:%02X:%02X %2d.%01dc", str[6], str[5], str[4], wk[str[3]-1], str[2], str[1], str[0], c0, c1); lcd_locate(0, 0); lcd_puts(st); goto loop; */ printf("\n\n\n\nE n d !!\n\n\n\n\n"); } int GregorianToDayNumber( int y, int m, int d ) { // ×月 １月 ２月 3月 4月 5月 6月 7月 8月 9月 10月 11月 12月 13月 14月 static int DoM_1[16]={99999999, 305, 336, -1, 30, 60, 91, 121, 152, 183, 213, 244, 274, 305, 336, 364 } ; int ret; if ( y < 1 || m < 1 || m > 12 || d < 1 || d > 31 ) return -1; if ( m < 3 ) { // １月　→　前年の　１３月 // m = m + 12; // ２月　→　前年の　１４月 y = y - 1; } ret = y * 365 + y/4 - y/100 + y/400 + DoM_1[m] + d ; return ret; } int YMD( int NoD, int *yp, int *mp, int *dp ) { // 3月 4月 5月 6月 7月 8月 9月 10月 11月 12月 13月 14月 static int DoM_1[15] = { -1, 30, 60, 91, 121, 152, 183, 213, 244, 274, 305, 336, 365 } ; int y, m, d, remainder, i, leap_day; if ( NoD < 0 ) return -1; y = d = leap_day = 0; m = 3; i = NoD/146097 ; y = i * 400; remainder = NoD - i * 146097; if ( remainder == 146096 ) leap_day = 3; // うるう日 i = remainder/36524 ; y = y + i * 100; remainder = remainder - i * 36524; if ( leap_day != 3 && remainder == 36523 ) leap_day = 2; // うるう日ではない i = remainder/1461 ; y = y + i * 4; remainder = remainder - i * 1461; if ( leap_day != 2 && remainder == 1460 ) leap_day = 1; // うるう日 i = remainder/365 ; y = y + i ; remainder = remainder - i * 365; *yp = y ; if ( leap_day == 3 || leap_day == 1 ) { // うるう日 *mp = 2; *dp = 29; return remainder; } for ( i=1; i<13; i++) { if ( remainder <= DoM_1[i] ) goto escape; m++; } printf("\n\n >>>>>>>>>>>>>>>>> E R R O R (YMD Calucuration!)<<<<<<<<<<<<<<<<<<<<<\n\n"); return -1; escape: if ( m>12 ) { m=m-12; *yp = ++y; } *mp = m; *dp = remainder - DoM_1[i-1]; return remainder; } /*--------------------------------------------------------------------------*/ /* Main */ /*--------------------------------------------------------------------------*/ int main (void) { char *ptr, *ptr2, *P, x, *pLine, *pbuf, *pbuff, buf[256], buff[256]; long p1, ret, s1, s2, cnt; struct TRC * trcp; trcp = SOT; // scif2_init(); /* SCIF2初期化 (TinyMonの初期化に任せる)*/ init_led(); lcd_init(); trc_init(); init_cmt0(); /* CMT0初期化 */ H_ModeInit(); /* USBホスト初期化 */ set_imask(0); /* 割り込みマスクレベル(0)の指定 */ Serial_Puts( "\n--- Hello USB World!! ---\n\n\n" ); // Debug // RSPI1の初期設定 sf_init_serial_flash(); UsbDeviceStateold = DVST_UNMOUNTED; // Debug UsbDeviceState = DVST_UNMOUNTED; // Initial Status = unmount UsbDeviceState = DVST_DETACHED; // Initial Status = unmount lcd_locate(0, 0); lcd_puts("Hello world!!"); p1 = 0; pbuf = buf; pbuff = buff; //**** Startup message *********************************************** for (;;) { charput('>'); pLine = Line; loop: if ( trcp->trcurp != trcp->trcprp ) { if ( trcp->trcprp->TTT.MTYPE == 0) Serial_Puts(trcp->trcprp->trcd); else trc_print( trcp->trcprp ); trcp->trcprp++; if ( trcp->trcprp >= EOT ) trcp->trcprp = SOD; goto loop; } if ( UsbDeviceState < DVST_READ) H_main(); else { ret = H_DataIn( 2, 64, buff ); pbuff = buff; if ( ret == USB_SUCCESS ) { for ( s1 = 0; s1<USBRcvDataCount[2]; s1++) { if ( *pbuff == 0x0a ) { // Line feed ? *pbuf++ = 0x0a; *pbuf++ = 0x00; if ( strncmp( buf, "$GPRMC", 6 ) == 0 ) Serial_Puts(buf); put_lcd( buf ); pbuf = buf; } else { *pbuf++ = *pbuff++; if ( pbuf > ( buf + 100 ) ) pbuf--; } } } else printf("\n-H_DataIn() return = %d.\n", ret); } if ( SCIF2.SCFSR.BIT.RDF == 0 ) goto loop; x = SCIF2.SCFRDR.BYTE; /* 受信FIFO データレジスタ(SCFRDR0)から受信データを読み出す */ /* ==== FIFO 受信データを読み出し後、DR をクリア ==== */ SCIF2.SCFSR.BIT.DR = 0; /* FIFO が空の場合DR ビットはクリアされます */ /* ==== シリアルステータスレジスタ(SCFSR0)のRDF をクリアする ==== */ SCIF2.SCFSR.BIT.RDF = 0; /* RDF ビットクリア */ charput(x); // エコーバック if ( x != 0x0D ) { *pLine++ = x ; goto loop; } *pLine++ = 0x00; *pLine++ = 0x00; *pLine++ = 0x00; Serial_Puts("\n"); P = ptr = Line; } } 　
　
　
　
　
　　

ホームセンタでアナログテスターを買って来ました。デジタルのテスターは持っているのですが、更新間隔がながくDS3234のSQWの出力のようなパルス波形は上手く測れないことが分かったからです。で、測ってみると上が0.8V（下は0.3V）ぐらいしかありません。ここには高輝度LEDを直接接続しています。これじゃ、SH2Aに割り込みを起こすのは無理。やっと理由が分かりました。（ハンドパワー（静電気？）の方は未だ分かっていません）
そこで、トランジスタで増幅しました。回路には全く自信ありません




抵抗はイメージで、縞々は実際の抵抗値と異なります
　
　
ベースに繋ぐ抵抗は10KΩ程度が良いことを最近知りました・・。