2005年07月

/*------------------------------------------------------*/
/*  ファイル名：  ad02.c                                */
/*  内容：        8ビットAD変換                         */
/*  日付：        2005.07.20(Wed)                       */
/*  作成者：      ono                                   */
/*------------------------------------------------------*/

#include<oaks_sfr.h>
#pragma INTERRUPT adint
#pragma INTERRUPT ta0int

void adint(){
  p7=~(ad4l); /* 下位8ビット */
  ir_adic=0;
}

void ta0int(){
  adst=1;  /* A/D変換開始 */
}

int main(void)
{
  pd10=0x00;     /* P10/ANを入力に設定 */

  adcon0=0x84;
  /* AN4,単発モード,ソフトウェアトリガ,A/D変換停止,fAD/2 */
  adcon1=0x20;   /* 8ビット,Vref接続,ANEX0,ANEX1は使用しない */
  adcon2=0x01;   /* サンプル＆ホールドあり */
  adic=0x06;    /* 割り込みレベル設定 */

  /* 以下、LED出力のための設定 */
  p7=0xff;
  pd7=0xff;

  /* タイマＡ「OAKS16プログラミングテキスト」(P77)参照 */
  ta0mr=0x80;    /* タイマモード,パルス出力なし,ゲート機能なし,f32(2us) */
  ta0=27500;     /* 55ms */
  ta0ic=0x05;    /* 割り込みレベル設定 */
  ta0s=1;        /* タイマＡ開始 */

  _asm("\tFSET  I");  /* 割り込み許可 */
  
  while(1){
    ;
  }
  return(0);
}

    .lword    dummy_int     ; Key input interrupt(for user)(vect 14);
    .glb _adint
    .lword    _adint        ; A-D(for user)(vector 14)
    .lword    dummy_int     ; uart2 transmit(for user)(vector 15)
    .lword    dummy_int     ; uart2 receive(for user)(vector 16)
    .lword    dummy_int     ; uart0 transmit(for user)(vector 17)
    .lword    dummy_int     ; uart0 receive(for user)(vector 18)
    .lword    0fcb6bh       ; uart1 transmit(for user)(vector 19)
    .lword    0fcb6bh       ; uart1 receive(for user)(vector 20)
    .glb _ta0int
    .lword    _ta0int       ; timer A0(for user)(vector 21)
    .lword    dummy_int     ; timer A1(for user)(vector 22)

	mov.b	#02h,0ah
;	bset	1,0ah
	mov.b	#00h,04h		;set processer mode 
;	bclr	1,0ah
	mov.b	#00h,0ah
;記述がない場合には、分周なしを追加 -----
	mov.b	#01h,0ah
	mov.b	#08h,06h
	mov.b	#00h,0ah
;----------------------------------------

/*------------------------------------------------------*/
/*  ファイル名：ad01.c                                  */
/*  内容：      8ビットAD変換                           */
/*  日付：      2005.07.19(Tue)                         */
/*  作成者：    ono                                     */
/*------------------------------------------------------*/

#include<oaks_sfr.h>

/* 約10us待ち */
void wait_10u(void){
#pragma ASM
    MOV.W #14H,A0
LOOP3:
    NOP
    NOP
    NOP
    DEC.W A0
    JNZ LOOP3
#pragma ENDASM
}

/* 約1ms待ち */
void wait_1m(void){
#pragma ASM
    MOV.W #7d0H,A0
LOOP2:
    NOP
    NOP
    NOP
    DEC.W A0
    JNZ LOOP2
#pragma ENDASM
}

/* 約 i ms待ち */
void wait_m(int i){
 int j;
  for(j=0; j<i; j++){
    wait_1m();
  }
}

int main(void)
{
  pd10=0x00;
  adcon0=0x8c;
  adcon1=0x20;
  adcon2=0x01;
  p7=0xff;
  pd7=0xff;
  
  while(1){
    adst=0;
    wait_m(55); /* PSDのデータ待ち */
    adst=1;
    wait_10u(); /* A/D変換待ち */
    p7=~(ad4l); /* 下位8ビット */
  }
  return(0);
}

	mov.b	#02h,0ah
;	bset	1,0ah
	mov.b	#00h,04h		;set processer mode 
;	bclr	1,0ah
	mov.b	#00h,0ah
;記述がない場合には、分周なしを追加 -----
	mov.b	#01h,0ah
	mov.b	#08h,06h
	mov.b	#00h,0ah
;----------------------------------------