#定義uchar無符號字符
uchar str= "我是學生"；
主()
{
uchar n；
while(1)
{
x byte[n+0x 2000]= str[n]；
n++；
if(str[n]= = ' \ 0 ')break；
}
while(1)；
}
ORG 0000H
LJMP總管
ORG 0030H
主要:
MOV R2，#0
循環:
MOV DPTR，#標簽
加壹個，R2
MOVC A，@A+DPTR
推送ACC
JZ分機
MOV DPTR，#2000H
DPL MOV
加壹個，R2
MOV·DPL
流行ACC
MOVX @DPTR
R2公司
分機:
SJMP元
選項卡:
' DB 'I '，' '，' a '，' m '，' '，' a '，' '，' s '，' t '，' u '，' d '，' e '，' n '，' t '
結束