【正文】 ======= 。 按鍵掃描 。===================================================== saomiao: jb , qq0 setb bt2 ajmp qq qq0: jb , qq1 setb bt3 ajmp qq qq1: jb , qq2 setb bt4 ajmp qq qq2: jb , qq4 setb bt8 ajmp qq qq4: setb bt6 clr bt2 clr bt3 clr bt4 clr bt8 qq: ret 。===================================================== 。 圖形下移子程序 。===================================================== xialuo: mov a, 35h 8 rl a mov 35h, a ret 。============================================ 。 判斷子程序 。===================================================== panduan: jnb bt2, ww0 clr bt2 jnb bt6, ww0 clr bt6 call youyi ajmp ww ww0: jnb bt3, ww1 clr bt3 jnb bt6, ww1 clr bt6 call zuoyi ajmp ww ww1: jnb bt4, ww2 clr bt4 jnb bt6, ww2 clr bt6 call zhuan ajmp ww ww2: jnb bt8, ww clr bt8 jnb bt6, ww clr bt6 call kuaixia ww: ret 。============================================================ 9 。 快速下落子程序 。============================================================= kuaixia: setb bt9 ret 。============================================================ 。 滿(mǎn)屏子程序 。============================================================ manping: mov 41h, 0ffh mov 42h, 0ffh mov 43h, 0ffh mov 44h, 0ffh mov 45h, 0ffh mov 46h, 0ffh mov 47h, 0ffh mov 48h, 0ffh ret 。============================================================ 。 清屏子程序 。============================================================ qingping: mov 41h, 00h mov 42h, 00h mov 43h, 00h mov 44h, 00h mov 45h, 00h mov 46h, 00h mov 47h, 00h mov 48h, 00h ret 。============================================ 。 下移顯示 。===================================================== xianshi0: mov a, 35h mov p1, 31h mov p2, a call delay 10 rl a mov p1, 00 mov p1, 32h mov p2, a call delay rl a mov p1, 00 mov p1, 33h mov p2, a call delay mov p1, 00 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 mov 39h, a anl a,47h cjne a,00,dd9 mov 32h, 39h mov a, 31h rr a mov 39h,00 mov 39h, a anl a,46h cjne a,00,dd9 mov 31h, 39h dec 51h dd9: ret 。===============圖形左移子程序 ====================================== 。通過(guò)圖形移動(dòng)一位 ,與靜止圖形相與 ,為零則移動(dòng) ,否則原地不動(dòng) 。 。===================================================== 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