.mmregs
FP	.set	AR7
	.c_mode                           ;.c_mode告訴匯編器調(diào)用和轉(zhuǎn)移在正常的16位
	                                  ;地址范圍內(nèi)，這是匯編器默認(rèn)的情況
	;.file	"pp.c"                    ;???                  
	.sect	".text"
	.global	_PtoD
   ;.sym	_PtoD,_PtoD, 32, 2, 0
	;.func	2                         ;???

;***************************************************************
;* FUNCTION DEF: _PtoD                                         *
;***************************************************************
_PtoD:
;* A     assigned to _source
	;.sym	_source,0, 20, 17, 16
	;.sym	_data,2, 20, 9, 16
	;.sym	_page,3, 4, 9, 16
	;.sym	_source,0, 20, 1, 16
        FRAME     #-1                    ;???
        NOP
        STL       A,*SP(0)              ; |3| 
        MVDK      *SP(2),*(AR2)         ; |4| 
		LD        *SP(3),16,A              ; |4| 
        OR        *SP(0),A
        READA     *AR2
        
        FRAME     #1
        RET
        ; return occurs
;	.endfunc	5,000000000h,1
	                                  ;Datetmp=0x5555
	                                  ;DtoP(start,&Datetmp,0)
	                                  ;PtoD(start,&data,0)
	                                  ;if (data != 0x5555) 
	                                  ;return(1)
  
	.sect	".text"
	.global	_DtoP
;	.sym	_DtoP,_DtoP, 32, 2, 0
;	.func	7                        ;???

;***************************************************************
;* FUNCTION DEF: _DtoP                                         *
;***************************************************************
_DtoP:
;* A     assigned to _source
	;.sym	_source,0, 20, 17, 16
	;.sym	_data,2, 20, 9, 16
	;.sym	_page,3, 4, 9, 16
	;.sym	_source,0, 20, 1, 16
        FRAME     #-1
        NOP
        STL       A,*SP(0)              
        MVDK      *SP(2),*(AR2)         ; |9| AR2中的值為多少???
	    LD        *SP(3),16,A              ; |4| 
        OR        *SP(0),A
        WRITA     *AR2
        
       
        
        FRAME     #1
        RET
        ; return occurs
;	.endfunc	10,000000000h,1