;**** A P P L I C A T I O N   N O T E   A V R 1 0 0  ************************
;*
;* 標題:		測試指令功能源理
;* 版本:		1.0
;*最后更新日期:	2000.08.08
;*
;* 支援 E-mail:	gzsl@sl.com.cn
;*
;* 描述
;*  用AVR Studio調試軟件窗口觀察指令執行變化情況
;* 作者: SL.
;*程序適用于所有單片機
;***************************************************************************
.include "8515def.inc"
.org  $0000
	rjmp	RESET		;復位
	
;****************************************************************************
;*
;* 調試LPM指令。
;*
;*
;****************************************************************************

.org $0010
RESET:
.EQU randtb=$0100
.def rdatal=R10
.def rdatah=r11
.def temp=r21
LP:ldi temp,0x00		;準備取低位數據
  ldi     zh,high(randtb*2)	;送入Z寄存器地址
  ldi     zl,low(randtb*2)	;$0200
  add zl,temp			;得低位地址
  lpm				;把$0200低位數送R0
  mov rdatal,r0			;保存數據
  ldi temp,0x01			;準備取高位數據
  ldi     zh,high(randtb*2)	;送入Z寄存器地址
  ldi     zl,low(randtb*2)	;$0200
  add zl,temp			;得低位地址
  lpm				;把$0200高位數送R0
  mov rdatah,r0			;保存數據
  RJMP LP	;打開寄存器、CPU、程序存儲窗口,再查看程序執行

.org      randtb
.db       0x5a,0x7b,0x5b,0x4f,0x66,0x6d,0x7d,0x07