【正文】 ；顯示費(fèi)用 xianfee proc near push ax mov dx,20ch mov eax,80808080h out dx,eax mov dx,200h mov eax,0c0c0c0c0h out dx,eax mov dx,204h mov eax,0c0c0c0c0h out dx,eax mov dx,208h mov eax,0a0f0000h out dx,eax mov al,fee2 and al,0f0h 計(jì)程車 計(jì)價(jià)器設(shè)計(jì)報(bào)告 35 shr al,4 and al,0fh lea bx,mess1 xlat mov dx,200h out dx,al mov al,fee2 and al,0fh xlat mov dx,204h out dx,al mov al,fee1 and al,0fh xlat mov dx,205h out dx,al lea bx,mess2 mov al,fee1 and al,0f0h shr al,4 xlat mov dx,201h out dx,al lea bx,mess1 mov al,danjia and al,0fh xlat mov dx,207h out dx,al lea bx,mess2 mov al,danjia 計(jì)程車 計(jì)價(jià)器設(shè)計(jì)報(bào)告 36 and al,0f0h shr al,4 xlat mov dx,203h out dx,al pop ax ret xianfee endp 。延時(shí)程序 delay proc near push cx mov cx,8fh dlp : nop loop dlp pop cx ret delay endp 。 ；鍵盤掃描 jpsaomiao proc push ax push bx push cx mov bl,0f7h nxtcol: mov al,bl mov dx,308h out dx,al mov dx,300h in al,dx and al,0fh cmp al,0fh jnz fndkey ror bl,1 jc nxtcol mov al,0ffh 計(jì)程車 計(jì)價(jià)器設(shè)計(jì)報(bào)告 33 mov key,al jmp kscanover fndkey:shl bl,4 or bl,al call delay mov al,00h lea si,anjiantz lpjian: mov cl,[si] cmp bl,cl jz transkey inc al inc si jmp lpjian transkey:mov key,al kscanover: pop cx pop bx pop ax ret jpsaomiao endp 。 ；超出 3 公里部分費(fèi)用增加 1角 feejia proc near mov al,fee1 add al,01h daa mov fee1,al jnc feeover mov al,fee2 add al,01h daa mov fee2,al feeover: ret feejia endp 。 計(jì)算每角錢行駛距離 zhuan proc near mov bl,00h mov cl,01h mov al,danjia mov danjia1,al zhuanag: mov al,danjia1 add al,danjia daa mov danjia1,al jnc zhuan1 inc bl zhuan1: mov al,cl 計(jì)程車 計(jì)價(jià)器設(shè)計(jì)報(bào)告 31 add al,01h daa mov cl,al cmp bl,0ah jnz zhuanag mov jiaogl,cl ret zhuan endp 。======================================= ；速度轉(zhuǎn)換（ km/h===》 m/s）程序 sptrans proc near mov bl,speed1 mov al,00h mov speed,al pd1: cmp bl,00h jz pd2 mov al,speed add al,03h daa mov speed,al dec bl jmp pd1 pd2: mov al,speed2 cmp al,03h jc transover cmp al,06h jc jia1m cmp al,09h jc jia2m mov al,speed add al,03h daa mov speed,al jmp transover jia1m:mov al,speed add al,01h daa mov speed,al jmp transover 計(jì)程車 計(jì)價(jià)器設(shè)計(jì)報(bào)告 28 jia2m:mov al,speed add al,02h daa mov speed,al transover: ret sptrans endp 。起步價(jià)顯示黃光，單價(jià)顯示綠光 mov eax,0a0f0000h out dx,eax ；判斷默認(rèn)開始鍵 ss2: call setsaomiao call keyup mov al,key cmp al,0ffh jz ss1 cmp al,0ch C 鍵 默認(rèn) 價(jià)格計(jì)價(jià) jnz ss3 mov al,fee1s fee1s 保存 默認(rèn)值或上次設(shè)定值 mov fee1,al mov al,fee2s mov fee2,al mov al,danjias mov danjia,al call xianfee call zhuan jmp goon1 計(jì)程車 計(jì)價(jià)器設(shè)計(jì)報(bào)告 21 ss3: mov dx,208h 第 3片 8255 顯示 橫桿 mov eax,0a050000h out dx,eax mov al,0bfh mov dx,202h out dx,al mov dx,206h out dx,al ；設(shè)置起始價(jià)百位 call setsaomiao 等待 按鍵 mov al,key 將 Key 賦值到 fee2 的 高四位 lea si,mess1 mov al,key and ah,00h add si,ax mov al,[si] mov dx,200h out dx,al call keyup mov al,key shl al,4 and al,0f0h mov fee2,al ；設(shè)置起始價(jià)十位 call setsaomiao mov al,key 將 Key 賦值到 fee2 的低 四位 and al,0fh or al,fee2 mov fee2,al mov fee2s,al mov al,key 計(jì)程車 計(jì)價(jià)器設(shè)計(jì)報(bào)告 22 lea bx,mess1 xlat mov dx,204h out dx,al call keyup ；設(shè)置起始價(jià)的 個(gè) 位 call setsaomiao mov al,key 將 Key 賦值 到 fee1 的 高 四位 shl al,4 and al,0f0h mov fee1,al mov al,key lea bx,mess2 xlat mov dx,201h out dx,al call keyup ；設(shè)置起始價(jià)小數(shù) 位 call setsaomiao mov al,key and al,0fh or al,fee1 mov fee1,al mov fee1s,al mov al,key lea bx,mess1 xlat mov dx,205h out dx,al call keyup 計(jì)程車 計(jì)價(jià)器設(shè)計(jì)報(bào)告 23 ；等到確認(rèn)鍵 lp1: call set