system.asm

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

??CFILE (C:\H8S\LTMeas\LTDriver\SYSTEM.C)
??CFILE (H8S2144.h)
??CFILE (C:\H8S\LTMeas\LTDriver\SYSTEM.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\SYSTEM.C)
??CFILE (extern.h)
??CFILE (C:\H8S\LTMeas\LTDriver\SYSTEM.C)
	segment	TEXT ATR_CODE
public	_intmask
_intmask:
	PUSH.L	ER6
	MOV.L	ER7,ER6
                                         
??FUNCDEF(???intmask) ??VOID
??VAR ??SINT ??SYMBOL(???sel) ??OFFSET(8)
??FUNCEND
??BEGINBLOCK(57)
??CLINE 58
	MOV.W	@(+8,ER6),R0
	MOV.W	#3,R1
	MOV.L	#?00001,ER2
?00007:
	OR.W	R1,R1
	BEQ	?00009:8
	MOV.W	@ER2+,R3
	CMP.W	R3,R0
	BNE	?00008:8
	MOV.L	@ER2,ER3
	JMP	@ER3
?00008:
	ADDS	#4,ER2
	DEC.W	#1,R1
	BRA	?00007:8
?00009:
	MOV.L	@ER2,ER3
	JMP	@ER3

??BEGINBLOCK(59)
?00004:
??CLINE 61
	LDC.B	#H'00, CCR					; 慡妱傝崬傒嫋壜		
??CLINE 62
	BRA	?00002:8
?00005:
??CLINE 64
	LDC.B	#H'80, CCR					; NMI/狠嫩百谕拶1偺傒嫋壜		
??CLINE 65
	BRA	?00002:8
?00006:
??CLINE 68
	LDC.B	#H'c0, CCR					; NMI偺傒嫋壜
??CLINE 69
	BRA	?00002:8
?00003:
??CLINE 71
	BRA	?00002:8
??ENDBLOCK(72)
??CLINE 72
	BRA	?00002:8
?00001:
	DC.W	H'0000
	DC.L	?00004
	DC.W	H'0001
	DC.L	?00005
	DC.W	H'0002
	DC.L	?00006
	DC.L	?00003
?00002:
??ENDBLOCK(73)
??CLINE 73
_intmask_end:

	POP.L	ER6
	RTS

	segment	TEXT ATR_CODE
public	_system_init
_system_init:
	PUSH.L	ER6
	MOV.L	ER7,ER6
	SUBS	#2,ER7
                           
??FUNCDEF(???system_init) ??VOID
??FUNCEND
??BEGINBLOCK(85)
??VAR ??UCHAR ??SYMBOL(???wk) ??OFFSET(-1)
??CLINE 88
	MOV.B	@H'00FFFFC5:8,R0L
	MOV.B	R0L,@(-1,ER6)
??CLINE 89
	MOV.B	R0L,R1L
	EXTU.W	R1
	OR.W	#H'0080,R1
	MOV.L	#H'00FFFFC5,ER2
	MOV.B	R1L,@ER2
??CLINE 95
	MOV.L	#_str00000,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFC4,ER1
	MOV.B	R0L,@ER1
??CLINE 105
	MOV.L	#_str00001,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFF86,ER1
	MOV.B	R0L,@ER1
??CLINE 116
	MOV.L	#_str00002,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFF87,ER1
	MOV.B	R0L,@ER1
??CLINE 132
	MOV.L	#_str00003,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFEE4,ER1
	MOV.B	R0L,@ER1
??CLINE 140
	MOV.L	#_str00004,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFEDC,ER1
	MOV.B	R0L,@ER1
??CLINE 143
	MOV.L	#_str00004,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFEDC,ER1
	MOV.B	R0L,@ER1
??CLINE 147
	MOV.L	#_str00004,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFED8,ER1
	MOV.B	R0L,@ER1
??CLINE 154
	MOV.L	#_str00003,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFA2,ER1
	MOV.B	R0L,@ER1
??CLINE 155
	MOV.L	#_str00003,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	EXTU.W	R0
	MOV.L	#H'00FFFFA8,ER1
	MOV.W	R0,@ER1
??ENDBLOCK(156)
??CLINE 156
_system_init_end:

	MOV.L	ER6,ER7
	POP.L	ER6
	RTS

	segment	TEXT ATR_CODE
public	_busc_init
_busc_init:
                                                                      
??FUNCDEF(???busc_init) ??VOID
??FUNCEND
??BEGINBLOCK(168)
??CLINE 169
	MOV.L	#_str00005,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFC6,ER1
	MOV.B	R0L,@ER1
??CLINE 179
	MOV.L	#_str00006,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFC7,ER1
	MOV.B	R0L,@ER1
??ENDBLOCK(187)
??CLINE 187
_busc_init_end:

	RTS

	segment	TEXT ATR_CODE
public	_intc_init
_intc_init:
	PUSH.L	ER6
	MOV.L	ER7,ER6
	SUBS	#2,ER7
                           
??FUNCDEF(???intc_init) ??VOID
??FUNCEND
??BEGINBLOCK(199)
??VAR ??UCHAR ??SYMBOL(???wk) ??OFFSET(-1)
??CLINE 202
	MOV.L	#_str00003,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFEE8,ER1
	MOV.B	R0L,@ER1
??CLINE 213
	MOV.L	#_str00003,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFEE9,ER1
	MOV.B	R0L,@ER1
??CLINE 224
	MOV.L	#_str00007,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFEEA,ER1
	MOV.B	R0L,@ER1
??CLINE 235
	MOV.L	#_str00003,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFC2,ER1
	MOV.B	R0L,@ER1
??CLINE 246
	MOV.L	#_str00003,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFEEC,ER1
	MOV.B	R0L,@ER1
??CLINE 254
	MOV.L	#_str00003,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFEED,ER1
	MOV.B	R0L,@ER1
??CLINE 262
	MOV.B	@H'00FFFEEB:16,R0L
	MOV.B	R0L,@(-1,ER6)
??CLINE 263
	MOV.L	#_str00003,ER2
	PUSH.L	ER2
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFEEB,ER1
	MOV.B	R0L,@ER1
??ENDBLOCK(274)
??CLINE 274
_intc_init_end:

	MOV.L	ER6,ER7
	POP.L	ER6
	RTS

	segment	TEXT ATR_CODE
public	_port_init
_port_init:
                                                                      
??FUNCDEF(???port_init) ??VOID
??FUNCEND
??BEGINBLOCK(286)
??CLINE 287
	MOV.L	#_str00008,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.B	R0L,@_io_p1
??CLINE 291
	MOV.L	#_str00008,ER1
	PUSH.L	ER1
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.B	R0L,@_io_p2
??CLINE 295
	MOV.L	#_str00003,ER1
	PUSH.L	ER1
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.B	R0L,@_io_p3
??CLINE 300
	MOV.L	#_str00008,ER1
	PUSH.L	ER1
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.B	R0L,@_io_p4
??CLINE 301
	MOV.L	#_str00003,ER1
	PUSH.L	ER1
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFB7,ER1
	MOV.B	R0L,@ER1
??CLINE 311
	MOV.L	#_str00003,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFBA,ER1
	MOV.B	R0L,@ER1
??CLINE 312
	MOV.L	#_str00009,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.B	R0L,@_io_p5
??CLINE 319
	MOV.L	#_str00003,ER1
	PUSH.L	ER1
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFBB,ER1
	MOV.B	R0L,@ER1
??CLINE 321
	MOV.L	#_str00008,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.B	R0L,@_io_p6
??CLINE 333
	MOV.L	#_str00003,ER1
	PUSH.L	ER1
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFBF,ER1
	MOV.B	R0L,@ER1
??CLINE 334
	MOV.L	#_str00010,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.B	R0L,@_io_p8
??CLINE 344
	MOV.L	#_str00011,ER1
	PUSH.L	ER1
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFC1,ER1
	MOV.B	R0L,@ER1
??CLINE 345
	MOV.L	#_str00012,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.B	R0L,@_io_p9
??CLINE 356
	MOV.L	#_str00003,ER1
	PUSH.L	ER1
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFAA,ER1
	MOV.B	R0L,@ER1
??CLINE 357
	MOV.L	#_str00008,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.B	R0L,@_io_pa
??CLINE 370
	MOV.L	#_str00003,ER1
	PUSH.L	ER1
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.L	#H'00FFFFBC,ER1
	MOV.B	R0L,@ER1
??CLINE 371
	MOV.L	#_str00013,ER0
	PUSH.L	ER0
	JSR	@_B8
	ADDS.L	#H'00000004,ER7
	MOV.B	R0L,@_io_pb
??CLINE 382
	MOV.B	@_io_p1,R1L
	MOV.L	#H'00FFFFB0,ER2
	MOV.B	R1L,@ER2
??CLINE 383
	MOV.B	@_io_p2,R0L
	MOV.L	#H'00FFFFB1,ER1
	MOV.B	R0L,@ER1
??CLINE 384
	MOV.B	@_io_p3,R0L
	MOV.L	#H'00FFFFB4,ER3
	MOV.B	R0L,@ER3
??CLINE 385
	MOV.B	@_io_p4,R0L
	MOV.L	#H'00FFFFB5,ER4
	MOV.B	R0L,@ER4
??CLINE 386
	MOV.B	@_io_p5,R0L
	MOV.L	#H'00FFFFB8,ER1
	MOV.B	R0L,@ER1
??CLINE 387
	MOV.B	@_io_p6,R0L
	MOV.L	#H'00FFFFB9,ER1
	MOV.B	R0L,@ER1
??CLINE 388
	MOV.B	@_io_p8,R0L
	MOV.L	#H'00FFFFBD,ER1
	MOV.B	R0L,@ER1
??CLINE 389
	MOV.B	@_io_p9,R0L
	MOV.L	#H'00FFFFC0,ER1
	MOV.B	R0L,@ER1
??CLINE 390
	MOV.B	@_io_pa,R0L
	MOV.L	#H'00FFFFAB,ER1
	MOV.B	R0L,@ER1
??CLINE 391
	MOV.B	@_io_pb,R0L
	MOV.L	#H'00FFFFBE,ER1
	MOV.B	R0L,@ER1
??ENDBLOCK(392)
??CLINE 392
_port_init_end:

	RTS

??CFILE (C:\H8S\LTMeas\LTDriver\SYSTEM.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 _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 _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
;
public _io_p1
public _io_p2
public _io_p3
public _io_p4
public _io_p5
public _io_p6
public _io_p8
public _io_p9
public _io_pa
public _io_pb
;
	segment	DATA_CONST ATR_CDATA
_str00000:	DC.B	030H,030H,030H,031H,031H,030H,030H,031H,0H
_str00001:	DC.B	030H,031H,030H,030H,031H,031H,030H,031H,0H
_str00002:	DC.B	030H,030H,030H,031H,031H,031H,031H,031H,0H
_str00003:	DC.B	030H,030H,030H,030H,030H,030H,030H,030H,0H
_str00004:	DC.B	030H,031H,031H,031H,030H,030H,030H,030H,0H
_str00005:	DC.B	031H,031H,030H,031H,030H,031H,031H,031H,0H
_str00006:	DC.B	030H,030H,031H,031H,030H,030H,031H,031H,0H
_str00007:	DC.B	031H,031H,031H,030H,030H,030H,030H,030H,0H
_str00008:	DC.B	031H,031H,031H,031H,031H,031H,031H,031H,0H
_str00009:	DC.B	030H,030H,030H,030H,030H,031H,030H,031H,0H
_str00010:	DC.B	031H,031H,030H,031H,031H,031H,031H,031H,0H
_str00011:	DC.B	031H,030H,030H,030H,030H,030H,030H,030H,0H
_str00012:	DC.B	030H,031H,031H,031H,031H,031H,031H,031H,0H
_str00013:	DC.B	031H,030H,031H,030H,031H,031H,031H,031H,0H

	segment	DATA ATR_DATA

	segment	BSS ATR_DATA
??VAR ??UCHAR ??SYMBOL(???io_p1) ??OFFSET(0)
_io_p1:	DCB.B	1,0
??VAR ??UCHAR ??SYMBOL(???io_p2) ??OFFSET(1)
_io_p2:	DCB.B	1,0
??VAR ??UCHAR ??SYMBOL(???io_p3) ??OFFSET(2)
_io_p3:	DCB.B	1,0
??VAR ??UCHAR ??SYMBOL(???io_p4) ??OFFSET(3)
_io_p4:	DCB.B	1,0
??VAR ??UCHAR ??SYMBOL(???io_p5) ??OFFSET(4)
_io_p5:	DCB.B	1,0
??VAR ??UCHAR ??SYMBOL(???io_p6) ??OFFSET(5)
_io_p6:	DCB.B	1,0
??VAR ??UCHAR ??SYMBOL(???io_p8) ??OFFSET(6)
_io_p8:	DCB.B	1,0
??VAR ??UCHAR ??SYMBOL(???io_p9) ??OFFSET(7)
_io_p9:	DCB.B	1,0
??VAR ??UCHAR ??SYMBOL(???io_pa) ??OFFSET(8)
_io_pa:	DCB.B	1,0
??VAR ??UCHAR ??SYMBOL(???io_pb) ??OFFSET(9)
_io_pb:	DCB.B	1,0

	end