【正文】 33h jnb , hui2 call yyizhou hui2: ret 。==================================================== yizhou: mov a, 51h cjne a,5, tt7 jmp tt tt7: cjne a,6, tt0 call yyizhou jmp tt tt0: cjne a,7, tt1 call yyizhou call yyizhou call zhuanpan0 jmp tt tt1: cjne a,8, tt2 call yyizhou call yyizhou call yyizhou call zhuanpan0 jmp tt tt2: cjne a,9, tt3 call yyizhou call yyizhou call yyizhou call yyizhou call zhuanpan0 jmp tt tt3: cjne a,4, tt4 call zyizhou jmp tt tt4: cjne a,3, tt5 call zyizhou call zyizhou jmp tt 25 tt5: cjne a,2, tt6 call zyizhou call zyizhou call zyizhou call zhuanpan1 jmp tt tt6: cjne a,1, tt call zyizhou call zyizhou call zyizhou call zyizhou call zhuanpan1 tt: ret 。 圖形旋轉(zhuǎn)子程序 。===================================================== youyi: mov a, 31h jnb , cc0 ajmp cc20 cc0: mov a, 32h jnb , cc1 ajmp cc20 cc1: mov a, 33h jnb , cc ajmp cc20 cc: mov a, 35h cjne a,0feh,zz0 call scd0 ajmp cc20 zz0: mov a, 35h cjne a,0fdh,zz1 call scd1 16 ajmp cc20 zz1: mov a, 35h cjne a,0fbh,zz2 call scd2 ajmp cc20 zz2: mov a, 35h cjne a,0f7h,zz3 call scd3 ajmp cc20 zz3: mov a, 35h cjne a,0efh,zz4 call scd4 ajmp cc20 zz4: mov a, 35h cjne a,0bfh,cc20 call scd5 ajmp cc20 cc20: ret scd0: mov a, 33h rl a mov 39h,00 mov 39h, a anl a,43h cjne a,00,cc2 mov 33h, 39h mov a, 32h rl a mov 39h,00 mov 39h, a anl a,42h cjne a,00,cc2 mov 32h, 39h mov a, 31h rl a 17 mov 39h,00 mov 39h, a anl a,41h cjne a,00,cc2 mov 31h, 39h inc 51h cc2: ret scd1: mov a, 33h rl a mov 39h,00 mov 39h, a anl a,44h cjne a,00,cc3 mov 33h, 39h mov a, 32h rl a mov 39h,00 mov 39h, a anl a,43h cjne a,00,cc3 mov 32h, 39h mov a, 31h rl a mov 39h,00 mov 39h, a anl a,42h cjne a,00,cc3 mov 31h, 39h inc 51h cc3: ret scd2: mov a, 33h rl a mov 39h,00 mov 39h, a anl a,45h 18 cjne a,00,cc4 mov 33h, 39h mov a, 32h rl a mov 39h,00 mov 39h, a anl a,44h cjne a,00,cc4 mov 32h, 39h mov a, 31h rl a mov 39h,00 mov 39h, a anl a,43h cjne a,00,cc4 mov 31h, 39h inc 51h cc4: ret scd3: mov a, 33h rl a mov 39h,00 mov 39h, a anl a,46h cjne a,00,cc5 mov 33h, 39h mov a, 32h rl a mov 39h,00 mov 39h, a anl a,45h cjne a,00,cc5 mov 32h, 39h mov a, 31h rl a mov 39h,00 19 mov 39h, a anl a,44h cjne a,00,cc5 mov 31h, 39h inc 51h cc5: ret scd4: mov a, 33h rl a mov 39h,00 mov 39h, a anl a,47h cjne a,00,cc6 mov 33h, 39h mov a, 32h rl a mov 39h,00 mov 39h, a anl a,46h cjne a,00,cc6 mov 32h, 39h mov a, 31h rl a mov 39h,00 mov 39h, a anl a,45h cjne a,00,cc6 mov 31h, 39h inc 51h cc6: ret scd5: mov a, 33h rl a mov 39h,00 mov 39h, a anl a,48h cjne a,00,cc7 20 mov 33h, 39h mov a, 32h rl a mov 39h,00 mov 39h, a anl a,47h cjne a,00,cc7 mov 32h, 39h mov a, 31h rl a mov 39h,00 mov 39h, a anl a,46h cjne a,00,cc7 mov 31h, 39h inc 51h cc7: ret 。通過圖形移動一位 ,與靜止圖形相與 ,為零則移動 ,否則原地不動 。===================================================== zuoyi: mov a, 31h jnb , dd1 ajmp dd dd1: mov a, 32h jnb , dd2 ajmp dd dd2: mov a, 33h jnb , dd3 ajmp dd dd3: mov a, 35h cjne a,0feh,sa0 call sad0 ajmp dd sa0: mov a, 35h cjne a,0fdh,sa1 call sad1 ajmp dd sa1: mov a, 35h cjne a,0fbh,sa2 11 call sad2 ajmp dd sa2: mov a, 35h cjne a,0f7h,sa3 call sad3 ajmp dd sa3: mov a, 35h cjne a,0efh,sa4 call sad4 ajmp dd sa4: mov a, 35h cjne a,0bfh,dd call sad5 ajmp dd dd: ret sad0: mov a, 33h rr a mov 39h,00 mov 39h, a anl a,43h cjne a,00,dd4 mov 33h, 39h mov a, 32h rr a mov 39h,00 mov 39h, a anl a,42h cjne a,00,dd4 mov 32h, 39h mov a, 31h rr a mov 39h,00 mov 39h, a anl a,41h 12 cjne a,00,dd4 mov 31h, 39h dec 51h dd4: ret sad1: mov a, 33h rr a mov 39h,00 mov 39h, a anl a,44h cjne a,00,dd5 mov 33h, 39h mov a, 32h rr a mov 39h,00 mov 39h, a anl a,43h cjne a,00,dd5 mov 32h, 39h mov a, 31h rr a mov 39h,00 mov 39h, a anl a,42h cjne a,00,dd5 mov 31h, 39h dec 51h dd5: ret sad2: mov a, 33h rr a mov 39h,00 mov 39h, a anl a,45h cjne a,00,dd6 mov 33h, 39h mov a, 32h 13 rr a mov 39h,00 mov 39h, a anl a,44h cjne a,00,dd6 mov 32h, 39h mov a, 31h rr a mov 39h,00 mov 39h, a anl a,43h cjne a,00,dd6 mov 31h, 39h dec 51h dd6: ret sad3: mov a, 33h rr a mov 39h,00 mov 39h, a anl a,46h cjne a,00,dd7 mov 33h, 39h mov a, 32h rr a mov 39h,00 mov 39h, a anl a,45h cjne a,00,dd7 mov 32h, 39h mov a, 31h rr a mov 39h,00 mov 39h, a anl a,44h cjne a,00,dd7 14 mov 31h, 39h dec 51h dd7: ret sad4: mov a, 33h rr a mov 39h,00 mov 39h, a anl a,47h cjne a,00,dd8 mov 33h, 39h mov a, 32h rr a mov 39h,00 mov 39h, a anl a,46h cjne a,00,dd8 mov 32h, 39h mov a, 31h rr a mov 39h,00 mov 39h, a anl a,45h cjne a,00,dd8 mov 31h, 39h dec 51h dd8: ret sad5: mov a, 33h rr a mov 39h,00 mov 39h, a anl a,48h cjne a,00,dd9 mov 33h, 39h mov a, 32h rr a 15 mov 39h,00