subad.asm

日立单片机H8S2144例程.包括AD,DA等程序(用于光源)但对于H8S2144使用者来说有很大的帮助.

??CFILE (C:\H8S\LTMeas\LTDriver\subAD.c)
??CFILE (global.h)
??CFILE ($$string.h)
??CFILE ($$stddef.h)
??CFILE ($$string.h)
??CFILE (global.h)
??CFILE ($$stdio.h)
??CFILE ($$stdarg.h)
??CFILE ($$stdio.h)
??STRUCTDEF(???_iobuf,1,5,8)
??VAR ??UINT ??SYMBOL(???flag) ??OFFSET(0)
??VAR ??UINT ??SYMBOL(???fd) ??OFFSET(2)
??VAR ??SINT ??SYMBOL(???hold) ??OFFSET(4)
??VAR ??UCHAR ??SYMBOL(???use) ??OFFSET(6)
??VAR ??UCHAR ??SYMBOL(???state) ??OFFSET(7)
??STRUCTEND
??STRUCTDEF(???_iobtmp,2,2,10)
??VAR ??SCHAR ??SYMBOL(???use) ??OFFSET(0)
??VAR ??STRUCT(???_iobuf,1) ??SYMBOL(???file) ??OFFSET(2)
??STRUCTEND
??CFILE (global.h)
??CFILE ($$stdlib.h)
??STRUCTDEF(???div_t,3,2,4)
??VAR ??SINT ??SYMBOL(???quot) ??OFFSET(0)
??VAR ??SINT ??SYMBOL(???rem) ??OFFSET(2)
??STRUCTEND
??STRUCTDEF(???ldiv_t,4,2,8)
??VAR ??SLONG ??SYMBOL(???quot) ??OFFSET(0)
??VAR ??SLONG ??SYMBOL(???rem) ??OFFSET(4)
??STRUCTEND
??CFILE (global.h)
??CFILE ($$math.h)
??CFILE (global.h)
??CFILE (C:\H8S\LTMeas\LTDriver\subAD.c)
??CFILE (H8S2144.h)
??CFILE (C:\H8S\LTMeas\LTDriver\subAD.c)
??CFILE (Extern.h)
??CFILE (C:\H8S\LTMeas\LTDriver\subAD.c)
??CFILE (Data.h)
??CFILE (C:\H8S\LTMeas\LTDriver\subAD.c)
	segment	TEXT ATR_CODE
public	_AD_IF
_AD_IF:
	PUSH.L	ER6
	MOV.L	ER7,ER6
	SUB.L	#10,ER7
                         
??FUNCDEF(???AD_IF) ??SSHORT
??FUNCEND
??BEGINBLOCK(7)
??VAR ??SINT ??SYMBOL(???i) ??OFFSET(-2)
??VAR ??SINT ??SYMBOL(???j) ??OFFSET(-4)
??VAR ??SSHORT ??SYMBOL(???M_IF_H) ??OFFSET(-6)
??VAR ??SSHORT ??SYMBOL(???M_IF_L) ??OFFSET(-8)
??VAR ??SSHORT ??SYMBOL(???M_IF) ??OFFSET(-10)
??CLINE 10
	MOV.B	@H'00FFFFBC:8,R0L
	OR.B	#H'20,R0L
	MOV.L	#H'00FFFFBC,ER1
	MOV.B	R0L,@ER1
??CLINE 11
	MOV.W	#H'0001,R0
	MOV.W	R0,@(-2,ER6)
	BRA	?00001:8
?00000:
	MOV.W	@(-2,ER6),R0
	INC.W	#H'0001,R0
	MOV.W	R0,@(-2,ER6)
?00001:
	MOV.W	@(-2,ER6),R0
	CMP.W	#H'0032,R0
	BGT	?00002:8
??BEGINBLOCK(11)
??CLINE 12
	MOV.B	@H'00040001:24,R0L
	EXTU.W	R0
	MOV.W	R0,@(-4,ER6)
??ENDBLOCK(12)
	BRA	?00000:8
?00002:
??CLINE 14
	MOV.B	@H'00040000:24,R0L
	EXTU.W	R0
	MOV.W	R0,@(-8,ER6)
??CLINE 15
	MOV.B	@H'00040001:24,R1L
	EXTU.W	R1
	MOV.W	R1,@(-6,ER6)
??CLINE 16
	MOV.W	R1,R2
	AND.W	#H'000F,R2
	MOV.W	R2,@(-6,ER6)
??CLINE 17
	MOV.W	R2,R1
	MOV.W	#H'0100,R3
	MULXS.W	R3,ER1
	ADD.W	R0,R1
	MOV.W	R1,@(-10,ER6)
??CLINE 19
	MOV.B	@H'00FFFFBC:8,R4L
	AND.B	#H'DF,R4L
	MOV.L	#H'00FFFFBC,ER0
	MOV.B	R4L,@ER0
??CLINE 20
	MOV.W	@(-10,ER6),R1
	MOV.W	R1,R0
??ENDBLOCK(21)
??CLINE 21
_AD_IF_end:

	MOV.L	ER6,ER7
	POP.L	ER6
	RTS

	segment	TEXT ATR_CODE
public	_AD_Im
_AD_Im:
	PUSH.L	ER6
	MOV.L	ER7,ER6
	SUB.L	#10,ER7
                         
??FUNCDEF(???AD_Im) ??SSHORT
??FUNCEND
??BEGINBLOCK(24)
??VAR ??SINT ??SYMBOL(???i) ??OFFSET(-2)
??VAR ??SINT ??SYMBOL(???j) ??OFFSET(-4)
??VAR ??SSHORT ??SYMBOL(???M_Im_H) ??OFFSET(-6)
??VAR ??SSHORT ??SYMBOL(???M_Im_L) ??OFFSET(-8)
??VAR ??SSHORT ??SYMBOL(???M_Im) ??OFFSET(-10)
??CLINE 27
	MOV.B	@H'00FFFFBC:8,R0L
	OR.B	#H'20,R0L
	MOV.L	#H'00FFFFBC,ER1
	MOV.B	R0L,@ER1
??CLINE 29
	MOV.W	#H'0001,R0
	MOV.W	R0,@(-2,ER6)
	BRA	?00004:8
?00003:
	MOV.W	@(-2,ER6),R0
	INC.W	#H'0001,R0
	MOV.W	R0,@(-2,ER6)
?00004:
	MOV.W	@(-2,ER6),R0
	CMP.W	#H'0032,R0
	BGT	?00005:8
??BEGINBLOCK(29)
??CLINE 30
	MOV.B	@H'00040002:24,R0L
	EXTU.W	R0
	MOV.W	R0,@(-4,ER6)
??ENDBLOCK(30)
	BRA	?00003:8
?00005:
??CLINE 33
	MOV.B	@H'00040003:24,R0L
	EXTU.W	R0
	MOV.W	R0,@(-8,ER6)
??CLINE 35
	MOV.B	@H'00040002:24,R1L
	EXTU.W	R1
	AND.W	#H'000F,R1
	MOV.W	R1,@(-6,ER6)
??CLINE 36
	MOV.W	R1,R2
	MOV.W	#H'0100,R3
	MULXS.W	R3,ER2
	ADD.W	R0,R2
	MOV.W	R2,@(-10,ER6)
??CLINE 38
	MOV.B	@H'00FFFFBC:8,R4L
	AND.B	#H'DF,R4L
	MOV.L	#H'00FFFFBC,ER0
	MOV.B	R4L,@ER0
??CLINE 39
	MOV.W	@(-10,ER6),R1
	MOV.W	R1,R0
??ENDBLOCK(40)
??CLINE 40
_AD_Im_end:

	MOV.L	ER6,ER7
	POP.L	ER6
	RTS

	segment	TEXT ATR_CODE
public	_AD_Temp
_AD_Temp:
	PUSH.L	ER6
	MOV.L	ER7,ER6
	SUB.L	#10,ER7
                         
??FUNCDEF(???AD_Temp) ??SSHORT
??FUNCEND
??BEGINBLOCK(43)
??VAR ??SINT ??SYMBOL(???i) ??OFFSET(-2)
??VAR ??SINT ??SYMBOL(???j) ??OFFSET(-4)
??VAR ??SSHORT ??SYMBOL(???M_Temp_H) ??OFFSET(-6)
??VAR ??SSHORT ??SYMBOL(???M_Temp_L) ??OFFSET(-8)
??VAR ??SSHORT ??SYMBOL(???M_Temp) ??OFFSET(-10)
??CLINE 46
	MOV.B	@H'00FFFFBC:8,R0L
	OR.B	#H'20,R0L
	MOV.L	#H'00FFFFBC,ER1
	MOV.B	R0L,@ER1
??CLINE 48
	MOV.W	#H'0001,R0
	MOV.W	R0,@(-2,ER6)
	BRA	?00007:8
?00006:
	MOV.W	@(-2,ER6),R0
	INC.W	#H'0001,R0
	MOV.W	R0,@(-2,ER6)
?00007:
	MOV.W	@(-2,ER6),R0
	CMP.W	#H'0032,R0
	BGT	?00008:8
??BEGINBLOCK(48)
??CLINE 49
	MOV.B	@H'00040004:24,R0L
	EXTU.W	R0
	MOV.W	R0,@(-4,ER6)
??ENDBLOCK(49)
	BRA	?00006:8
?00008:
??CLINE 52
	MOV.B	@H'00040005:24,R0L
	EXTU.W	R0
	MOV.W	R0,@(-8,ER6)
??CLINE 54
	MOV.B	@H'00040004:24,R1L
	EXTU.W	R1
	AND.W	#H'000F,R1
	MOV.W	R1,@(-6,ER6)
??CLINE 55
	MOV.W	R1,R2
	MOV.W	#H'0100,R3
	MULXS.W	R3,ER2
	ADD.W	R0,R2
	MOV.W	R2,@(-10,ER6)
??CLINE 57
	MOV.B	@H'00FFFFBC:8,R4L
	AND.B	#H'DF,R4L
	MOV.L	#H'00FFFFBC,ER0
	MOV.B	R4L,@ER0
??CLINE 58
	MOV.W	@(-10,ER6),R1
	MOV.W	R1,R0
??ENDBLOCK(59)
??CLINE 59
_AD_Temp_end:

	MOV.L	ER6,ER7
	POP.L	ER6
	RTS

	segment	TEXT ATR_CODE
public	_AD_Itec
_AD_Itec:
	PUSH.L	ER6
	MOV.L	ER7,ER6
	SUB.L	#10,ER7
                         
??FUNCDEF(???AD_Itec) ??SSHORT
??FUNCEND
??BEGINBLOCK(63)
??VAR ??SINT ??SYMBOL(???i) ??OFFSET(-2)
??VAR ??SINT ??SYMBOL(???j) ??OFFSET(-4)
??VAR ??SSHORT ??SYMBOL(???M_Itec_H) ??OFFSET(-6)
??VAR ??SSHORT ??SYMBOL(???M_Itec_L) ??OFFSET(-8)
??VAR ??SSHORT ??SYMBOL(???M_Itec) ??OFFSET(-10)
??CLINE 66
	MOV.B	@H'00FFFFBC:8,R0L
	OR.B	#H'20,R0L
	MOV.L	#H'00FFFFBC,ER1
	MOV.B	R0L,@ER1
??CLINE 68
	MOV.W	#H'0001,R0
	MOV.W	R0,@(-2,ER6)
	BRA	?00010:8
?00009:
	MOV.W	@(-2,ER6),R0
	INC.W	#H'0001,R0
	MOV.W	R0,@(-2,ER6)
?00010:
	MOV.W	@(-2,ER6),R0
	CMP.W	#H'0032,R0
	BGT	?00011:8
??BEGINBLOCK(68)
??CLINE 69
	MOV.B	@H'00040006:24,R0L
	EXTU.W	R0
	MOV.W	R0,@(-4,ER6)
??ENDBLOCK(69)
	BRA	?00009:8
?00011:
??CLINE 72
	MOV.B	@H'00040007:24,R0L
	EXTU.W	R0
	MOV.W	R0,@(-8,ER6)
??CLINE 74
	MOV.B	@H'00040006:24,R1L
	EXTU.W	R1
	AND.W	#H'000F,R1
	MOV.W	R1,@(-6,ER6)
??CLINE 75
	MOV.W	R1,R2
	MOV.W	#H'0100,R3
	MULXS.W	R3,ER2
	ADD.W	R0,R2
	MOV.W	R2,@(-10,ER6)
??CLINE 77
	MOV.B	@H'00FFFFBC:8,R4L
	AND.B	#H'DF,R4L
	MOV.L	#H'00FFFFBC,ER0
	MOV.B	R4L,@ER0
??CLINE 78
	MOV.W	@(-10,ER6),R1
	MOV.W	R1,R0
??ENDBLOCK(79)
??CLINE 79
_AD_Itec_end:

	MOV.L	ER6,ER7
	POP.L	ER6
	RTS

??CFILE (C:\H8S\LTMeas\LTDriver\subAD.c)
extern _strcpy
extern _strncpy
extern _strcat
extern _strncat
extern _strcmp
extern _strncmp
extern _strcoll
extern _strxfrm
extern _strchr
extern _strrchr
extern _strspn
extern _strcspn
extern _strpbrk
extern _strstr
extern _strlen
extern _strerror
extern _strtok
extern _memcpy
extern _memmove
extern _memcmp
extern _memchr
extern _memset
extern __iob
extern _remove
extern _rename
extern _tmpfile
extern _tmpnam
extern _fclose
extern _fflush
extern _fopen
extern _freopen
extern _setbuf
extern _setvbuf
extern _fprintf
extern _fscanf
extern _printf
extern _scanf
extern _sprintf
extern _sscanf
extern _vfprintf
extern _vprintf
extern _vsprintf
extern _fgetc
extern _fgets
extern _fputc
extern _fputs
extern _puts
extern _gets
extern _putchar
extern _ungetc
extern _fread
extern _fwrite
extern _fgetpos
extern _fseek
extern _fsetpos
extern _ftell
extern _clearerr
extern _feof
extern _ferror
extern _perror
extern _atof
extern _atoi
extern _atol
extern _strtod
extern _strtol
extern _strtoul
extern _rand
extern _srand
extern _calloc
extern _free
extern _malloc
extern _realloc
extern _abort
extern _atexit
extern _exit
extern _getenv
extern _system
extern _bsearch
extern _qsort
extern _abs
extern _div
extern _labs
extern _ldiv
extern _mblen
extern _mbtowc
extern _wctomb
extern _mbstowcs
extern _wcstombs
extern _acos
extern _asin
extern _atan
extern _atan2
extern _cos
extern _sin
extern _tan
extern _cosh
extern _sinh
extern _tanh
extern _exp
extern _frexp
extern _ldexp
extern _log
extern _log10
extern _modf
extern _pow
extern _sqrt
extern _ceil
extern _fabs
extern _floor
extern _fmod
extern _set_daif
extern _select_ch
extern _range_out
extern _onoff_out
extern _duty_out
extern _mon_select
extern _sisyagonyuu
extern _dot
extern _atoin
extern _atoln
extern _system_init
extern _port_init
extern _busc_init
extern _intc_init
extern _itimer_init
extern _start_timer
extern _check_timer
extern _stop_timer
extern _wdt_init
extern _wdt_clr
extern _sci_bps
extern _rs_pointer_init
extern _rs_rs_cmd
extern _rs_er_cmd
extern _rs_cs_sts
extern _rs_dr_sts
extern _rs_cd_sts
extern _rs_ci_sts
extern _rs_232ttl
extern _rs_putcheck
extern _rs_txbufempty
extern _rs_putc
extern _rs_puts
extern _rs_putn
extern _rs_getcheck
extern _rs_getc
extern _rs_getch
extern _rs_gets
extern _rs_getn
extern _rs_txcont_job
extern _rs_job
extern _tx_job
extern _IntTimer
extern _IntERI0
extern _IntERI1
extern _IntERI2
extern _IntRXI0
extern _IntRXI1
extern _IntRXI2
extern _IntTXI0
extern _IntTXI1
extern _IntTXI2
extern _srom_puts
extern _srom_fill
extern _srom_gets
extern _rs_send_interrupt
extern _rs_send_enable
extern _Set_WatchDog
extern _B8
extern _B16
extern _intmask
extern _e2prom_wt_pro
extern _e2prom_rd_pro
extern _rs_init
extern _rs_send
extern _rs_recv_err
extern _rs_recv
extern _rs_recv_job
extern _rs_send_job
extern _rs_cmdcheck_job
extern _rs_inttx
extern _com_rcv_proc
extern _key_incheck
extern _rscomctl
extern _wait
extern _subAD
extern _const_start
extern _g_DrivePole
extern _g_Range
extern _g_SetIf
extern _g_Duty
extern _g_CwPulse
extern _g_CalIfaR1
extern _g_CalIfbR1
extern _g_CalIfbR2
extern _g_CalIfaR2
extern _g_CalIfbR3
extern _g_CalIfaR3
extern _const_end
extern _g_OnOff
extern _g_RsSend_CT
extern _rs_sending
extern _g_RsSend_Bf
extern _g_RsRecv_Bf
extern _g_RsRecv_CT
extern _rs_rceving
extern _rs_sd_flg
extern _rs_rx_buf
extern _rs_tx_buf
extern _t1tmf
extern _t1tmt
;
;
	segment	DATA_CONST ATR_CDATA

	segment	DATA ATR_DATA

	segment	BSS ATR_DATA

	end