提取整数的个十百位送数码管显示有什么问题？

大家帮我看看阿，这个提取整数的个十百位的程序送数码管显示有什么问题？
把个位送tube2，十位送tube3，百位送tube4，我是用了4个数码管，tube1显示0
从0-9显示0000到0090都OK，
大于9就不行了，就显示0000了，
按rb。2则timid加1；要求从数码管上计数，谢谢！


main3
snb rb.2 ;
goto $-1 ;判断按键
clrb intcon.5 ;
clrb intcon.7 ;关中断
mov data1,timid ;提取timid中的整数的个十百位送数码管显示
call change ;
call display ;显示
jb rb.0,reset;
jb rb.2,main31 ;
goto main3
main31
snb rb.2 ;
goto $-1 ;
cje timid,#255,main3 ;
inc timid ;
mov data1,timid ;
call change ;
call display ;
goto main3 ;
change ；提取
clr tube1 ;
cjae data1,#100,change1 ;
cjae data1,#10,change2 ;
mov tube2,data1 ;
clr tube3 ;小于10直接送显示
clr tube4 ;
retfie
change1
inc tube4 ;大于100，减100，计算次数，则为百位
sub data1,#100 ;
cjae data1,#100,change1 ;
cjae data1,#10,change2 ;
clr tube3 ;
mov tube2,data1 ;
retfie
change2 ；大于10，减10 ，计算次数，则为10位
inc tube3 ;
sub data1,#10 ;
cjae data1,#10,change2 ;
mov tube2,data1 ;
retfie

[ 此贴被xhjab在2009-08-19 00:10重新编辑 ]