【正文】 ============================================================================TAB1: DB 4DH,61H,6BH,65H,72H,3AH,4CH,47H,0FEH,53H,57H,57H,0FEH,21H,00H。=====================================================================DELAY1:MOV R5,100D4: MOV R4,248D5: DJNZ R4,D5 DJNZ R5,D4 RET。=====================================================================。送顯示 POP ACC RET。送顯示 POP B MOV A,B ADD A,30H 。SHOW: PUSH ACC MOV B,10 DIV AB ADD A,30H 。由堆棧取出A ACALL WRITE_LCD_DATA 。設(shè)置LCD的第二行地址 ACALL WRITE_LCD_COM 。入棧保護A MOV A,B 。顯示數(shù)據(jù) RET 。加載數(shù)據(jù) INC X 。 MOV B,X 。設(shè)置位置 MOV A,39。設(shè)置位置 ACALL SHOW 。顯示 MOV A,MIN 。:39。顯示數(shù)據(jù) INC X 。加載數(shù)據(jù) MOV X,5 。ASCII 轉(zhuǎn)換并在第二行顯示數(shù)字子程序。沒查完，繼續(xù)PROC :POP ACC RET。DDRAM地址設(shè)置指令，寫顯示起始地址，第一行第一個位置 ACALL WRITE_LCD_COM MOV DPTR,TAB1LPPP1:MOV A,00H MOVC A,A+DPTR 。在LCD的第一行顯示Maker:LG SWW !。R5置存入21H RET 。(R4)乘2加C DA A MOV R4,A 。(R5)乘2 ADD A,R5 DA A MOV R5,A 。結(jié)果存回R4 MOV A,R2 DJNZ R3,AD_CHULI1。結(jié)果存回R5 MOV A,R4 。(R5)乘2加C ADDC A,R5 DA A 。十進制調(diào)整的次數(shù) MOV A,20H AD_CHULI1: RLC A MOV R2,A 。十進制轉(zhuǎn)換的低位寄存器 MOV R4,00H 。出口：處理后的數(shù)據(jù) (R4)=高位，(R5)=低位。AD轉(zhuǎn)換值處理子程序。轉(zhuǎn)換結(jié)果發(fā)給20H RET 。下一個脈沖 DJNZ R1,AD_READ 。讀取DO端數(shù)據(jù) RLC A 。計數(shù)器初值，讀取8位數(shù)據(jù)， AD_READ: CLR AD_CLK 。第三個脈沖 SETB AD_DAT CLR AD_CLK NOP SETB AD_CLK 。第二個脈沖 CLR AD_DAT CLR AD_CLK CLR AD_DAT 。在負(fù)跳變之前加一個DI反轉(zhuǎn)操作 CLR AD_CLK SETB AD_DAT 。DI置1，起始位 SETB AD_CLK 。一個轉(zhuǎn)換周期開始 CLR AD_CLK CLR AD_CS 。 AD_CONV: 。ZUOZHUAN1:CLR 。YOUZHUAN1:CLR 。調(diào)用左轉(zhuǎn)子程序 SJMP NO1Q3: NOP NOP JB ,NO1 LCALL YOUZHUAN1 。 JNB ,Q3 。小車后退尋跡子程序。================================================LANGTUI:SETB SETB LCALL DLY RET。================================================。調(diào)用右轉(zhuǎn)子程序 SJMP NO3 A1: NOP NOP JB ,NO3 LCALL ZUOZHUAN 。 JNB ,A1 。XUNJI3發(fā)揮部分循跡子程序。ZUOZHUAN:CLR CLR CLR CLR SETB LCALL DLYNO: RET。右轉(zhuǎn)子程序。調(diào)用左轉(zhuǎn)子程序 SJMP NO 。 SJMP NO Q0: NOP NOP JB ,NO LCALL YOUZHUAN 。======================================================XUNJI1: JNB ,Q0 。======================================================。LANGJIN:前進行車子程序。清時間存 SETB DENG RET。延時5秒，并顯示 LCALL DLY DJNZ R5,ZZ1 SETB STOP_CHE 。再次確認(rèn)轉(zhuǎn)TINGCHE JNC TINGCHE RET TINGCHE:CLR CLR CLR CLR SETB 。===================================================================== HEIXIAN:MOV C, ORL C, JNC TING 。HEIXIAN:判斷是否到終點子程序。把時間存儲區(qū)域清空 SETB DENG SETB DIIWW: RET 。關(guān)掉AD轉(zhuǎn)換 SETB STOP_AD0832 。找到平衡停車5秒 LCALL CONV 。顯示時間并延時一段時間 LCALL DLY LCALL CONV LCALL DLY LCALL CONV LCALL DLY LCALL CONV LCALL AD_CONV LCALL AD_CHULI LCALL DELAY MOV A,21H CLR C 。小車前進 LCALL DLY LCALL XUNJI1 CLR CLR 。若小于70H則轉(zhuǎn) LJMP WW1 。若小于40H則轉(zhuǎn) CJNE A,70H,XUANZE7 。再次調(diào)用AD轉(zhuǎn)換處理程序 LCALL AD_CHULI LCALL DELAY MOV A,21H CLR C CJNE A,40H,XUANZE2 。停車 LCALL CONV LCALL DLY LCALL CONV 。小車后退 LCALL CONV LCALL DLY 。停車 LCALL CONV LCALL DLY LCALL CONV LCALL DLY 。PIGHENG:尋找平衡標(biāo)志位子程序。禁止LCD POP ACC RET。將數(shù)據(jù)寫入LCD SETB E 。選擇寫模式 SETB E 。禁止LCD SETB RS 。======================================================= WRITE_LCD_DATA: PUSH ACC ACALL CHECKBUSY 。=======================================================。使能LCD CLR E 。使能LCD MOV D0_D7,A 。選擇指令寄存器 CLR RW 。調(diào)檢查忙碌子程序 CLR E 。寫入IR寄存器子程序。判斷由LCD讀入第七位BF是否為1，若為1，表示LCD忙 POP ACC RET。將LCD的D0D7由P1口送A，以便查第七位BF是否為0 CLR E 。P1口寫1，準(zhǔn)備寫入 SETB E 。選擇指令寄存器 SETB RW 。檢查忙碌子程序。寫顯示起始地址，第二行第一個位置80H8FH ACALL WRITE_LCD_COM RET。8位2行5*7點陣 ACALL WRITE_LCD_COM MOV A,00001100B 。======================================================= INIT_LCD: MOV A,00000001B 。==================================================== 。一小時到？ INC HOUR MOV MIN,0 MOV A,HOUR CJNE A,24,TT MOV SEC,0 MOV MIN,0 。一秒鐘到? MOV DEDA,0 INC SEC MOV A,SEC CJNE A,60,TT 。==================================================== T0_INT:PUSH ACC MOV TH0,99 MOV TL0,24 。===================================================。賦5S初值 SETB TR0 。設(shè)定T0工作模式 MOV IE,82H 。T0中斷初始化。清空 MOV SEC,00H MOV DEDA,00H RET。時間存儲區(qū)域初始化。調(diào)用后退尋跡程序 SJMP LOOP3 。調(diào)用電子表顯示程序 LCALL LANGTUI 。并記錄這段時間。=======================================================。調(diào)用判斷到終點并停車程序 JB STOP_CHE,LOOP3 。調(diào)用前進行車程序 LCALL XUNJI1 。=======================================================LOOP2: LCALL CONV 。LOOP2完成小車從平衡位置尋跡走到蹺蹺板終端功能。判斷是否停AD標(biāo)志位 WWW: SJMP LOOP1 。再次確認(rèn)A值 SJMP WWW1 XUANZE0:JC WWW WWW1: LCALL PINGHENG 。調(diào)用AD數(shù)據(jù)轉(zhuǎn)換程序 LCALL CONV 。不等，A值小于70H則轉(zhuǎn) CLR C LCALL AD_CONV 。AD轉(zhuǎn)換的低位值與70H比較 SJMP WWW1 。發(fā)揮部分尋跡 LCALL XUNJI1 。調(diào)用電子表顯示程序 LCALL DELAY LCALL DELAY LCALL LANGJIN 。調(diào)用AD轉(zhuǎn)換程序 LCALL AD_CHULI 。并顯示這段路程所需時間。===================================================================