【文章內(nèi)容簡介】 PTR,MENU_PIC1 。圖片名的字數(shù)，待修改MOV R2,6LCALL PLAYMOV COM,91HMOV DPTR,MENU_PIC2MOV R2,6LCALL PLAYMOV COM,89HMOV DPTR,MENU_PIC3MOV R2,6LCALL PLAYMOV COM,99HMOV DPTR,MENU_PIC4MOV R2,6LCALL PLAYMOV COM,80H 。游標地址設(shè)定ACALL WRILCALL DELAYMOV COM,0FH 。顯示打開，光標關(guān)，反白顯示關(guān)ACALL WRILCALL DELAYLJMP SCAN_PIC。若游標在88H處，說明選中得是制作人，接下來則顯示制作人的菜單ZHI:CJNE R1,88H,KEYSCAN_JZHI_MENU_SHOW:MOV COM,81HMOV DPTR,MENU_ZHI1 。制作人名的字數(shù)，待修改MOV R2,6LCALL PLAYMOV COM,91HMOV DPTR,MENU_ZHI2MOV R2,6LCALL PLAYMOV COM,80H 。游標地址設(shè)定ACALL WRILCALL DELAYMOV COM,0FH 。顯示打開，光標關(guān)，反白顯示關(guān)ACALL WRILCALL DELAYLJMP KEYSCAN_J 。 鍵盤掃描詩歌菜單LK:MOV R1,80HSHI_KEY1:MOV P2,11111111BMOV A,P2CLR CSUBB A,11111110BJZ SHI_UPMOV A,P2CLR CSUBB A,11111101BJZ SHI_DOWNMOV A,P2CLR CSUBB A,11111011BJZ SHI_BACKMOV A,P2CLR CSUBB A,11110111BJZ SHI_SURELJMP SHI_KEY1。向上選擇詩歌SHI_UP: 。確定游標位置ACALL DELAY10 。延時10毫秒消觸點抖動 JB ,SHI_KEY1 。去除干擾信號JNB ,$ 。 等待按鍵松開CJNE R1,80H,SHI_UP1MOV R1,98HLJMP SHI_YOUBIAO_WRISHI_UP1:CJNE R1,90H,SHI_UP2 MOV R1,80H LJMP SHI_YOUBIAO_WRISHI_UP2:CJNE R1,88H,SHI_UP3 MOV R1,90H LJMP SHI_YOUBIAO_WRISHI_UP3:CJNE R1,98H,SHI_KEY1 MOV R1,88H LJMP SHI_YOUBIAO_WRI。向下選擇詩歌SHI_DOWN: 。確認游標位置ACALL DELAY10 。延時10毫秒消觸點抖動JB ,SHI_KEY1 。去除干擾信號JNB ,$ 。等待按鍵松開 CJNE R1,80H,SHI_DOWN1 MOV R1,90H LJMP SHI_YOUBIAO_WRISHI_DOWN1: CJNE R1,90H,SHI_DOWN2 MOV R1,88H LJMP SHI_YOUBIAO_WRISHI_DOWN2: CJNE R1,88H,SHI_DOWN3 MOV R1,98H LJMP SHI_YOUBIAO_WRISHI_DOWN3: CJNE R1,98H,SHI_KEY1 MOV R1,80HSHI_YOUBIAO_WRI: MOV COM,R1 。寫游標 LCALL WRI LCALL DELAY MOV COM,0FH LCALL WRI LCALL DELAY SS1: LJMP SHI_KEY1。返回到主菜單SHI_BACK: ACALL DELAY10 。延時10毫秒消觸點抖動 JB ,SS1。SHI_KEY1 。去除干擾信號 JNB ,$ 。等待按鍵松開 LJMP MENU 。 詩歌已選擇，開始閱讀SHI_SURE: ACALL DELAY10 。延時10毫秒消觸點抖動 JB ,SS1 。去除干擾信號 JNB ,$ 。等待按鍵松開LCALL CLEAR。 一定要清屏，否則上一層菜單多出來的字也會在這里顯示的 CJNE R1,80H,SHI_SURE1 MOV DPTR,DAB1 LCALL PLAY1 LJMP SHI_NEXTSHI_SURE1: CJNE R1,90H,SHI_SURE2 MOV DPTR,DAB2 LCALL PLAY1 LJMP SHI_NEXTSHI_SURE2: CJNE R1,88H,SHI_SURE3 MOV DPTR,DAB3 LCALL PLAY1 LJMP SHI_NEXTSHI_SURE3: CJNE R1,98H,SHI_NEXT MOV DPTR,DAB4 LCALL PLAY1。閱讀詩歌時的鍵盤掃描SHI_NEXT: NOPSHI_NEXT_KEY: MOV P2,11111111B MOV A,P2 CLR C SUBB A,11111110B JZ SHI_NEXT_UP MOV A,P2 CLR C SUBB A,11111101B JZ SHI_NEXT_DOWN MOV A,P2 CLR C SUBB A,11111011B JZ SHI_NEXT_BACK LJMP SHI_NEXT_KEY。當正在閱讀詩歌時，可直接按上，下鍵來選擇上一首或下一首SHI_NEXT_UP: ACALL DELAY10 。延時10毫秒消觸點抖動 JB ,SHI_NEXT_KEY 。去除干擾信號 JNB ,$ 。等待按鍵松開 CJNE R1,80H,SHI_NEXT_UP1 。若現(xiàn)在游標的地址為80H，則現(xiàn)在在屏幕上顯示得是第一首詩（DAB1），那么上一幅DAB4 MOV R1,98H 。通過標記游標的位置來識別現(xiàn)在顯示的是哪一首詩 MOV DPTR,DAB4 LJMP SHI_WRISHI_NEXT_UP1: CJNE R1,90H,SHI_NEXT_UP2 MOV R1,80H MOV DPTR,DAB1 LJMP SHI_WRISHI_NEXT_UP2: CJNE R1,88H,SHI_NEXT_UP3 MOV R1,90H MOV DPTR,DAB2 LJMP SHI_WRISHI_NEXT_UP3: CJNE R1,98H,SHI_NEXT_KEY MOV R1,88H MOV DPTR,DAB3 LJMP SHI_WRISHI_NEXT_DOWN: ACALL DELAY10 。延時10毫秒消觸點抖動 JB ,SHI_NEXT_KEY 。去除干擾信號 JNB ,$ 。等待按鍵松開 CJNE R1,80H,SHI_NEXT_DOWN1 MOV R1,90H MOV DPTR,DAB2 LJMP SHI_WRISHI_NEXT_DOWN1: CJNE R1,90H,SHI_NEXT_DOWN2 MOV R1,88H MOV DPTR,DAB3 LJMP SHI_WRISHI_NEXT_DOWN2: CJNE R1,88H,SHI_NEXT_DOWN3 MOV R1,98H MOV DPTR,DAB4 LJMP SHI_WRISHI_NEXT_DOWN3: CJNE R1,98,SHI_NEXT_KEY_J 。超出范圍，不能直接跳到SHI_NEXT_KEY,故先跳到SHI_NEXT_KEY_J MOV R1,80H MOV DPTR,DAB1SHI_WRI:LCALL PLAY1SHI_NEXT_KEY_J: LJMP SHI_NEXT_KEY。返回到上一級菜單SHI_NEXT_BACK: ACALL DELAY10 。延時10毫秒消觸點抖動 JB ,SHI_NEXT_KEY_J 。去除干擾信號 JNB ,$ 。等待按鍵松開 LCALL CLEAR LJMP SHI_MENU_SHOW。圖片程序，與詩歌類似 。鍵盤掃描SCAN_PIC: MOV R1,80HPIC_KEY1: MOV P2,11111111B MOV A,P2 CLR C SUBB A,11111110B JZ PIC_UP MOV A,P2 CLR C SUBB A,11111101B JZ PIC_DOWN MOV A,P2 CLR C SUBB A,11111011B JZ PIC_BACK MOV A,P2CLR CSUBB A,11110111BJZ PIC_SURELJMP PIC_KEY1。向上選擇圖片PIC_UP: 。確定游標位置ACALL DELAY10 。延時10毫秒消觸點抖動JB ,PIC_KEY1 。去除干擾信號JNB ,$ 。等待按鍵松開CJNE R1,80H,PIC_UP1MOV R1,98HLJMP PIC_YOUBIAO_WRIPIC_UP1:CJNE R1,90H,PIC_UP2MOV R1,80HLJMP PIC_YOUBIAO_WRIPIC_UP2:CJNE R1,88H,PIC_UP3MOV R1,90HLJMP PIC_YOUBIAO_WRIPIC_UP3:CJNE R1,98H,PIC_KEY1MOV R1,88HLJMP PIC_YOUBIAO_WRI。向上選擇圖片PIC_DOWN: 。確定游標位置ACALL DELAY10 。延時10毫秒消觸點抖動JB ,PIC_KEY1 。去除干擾信號JNB ,$ 。等待按鍵松開CJNE R1,80H,PIC_DOWN1MOV R1,90HLJMP PIC_YOUBIAO_WRIPIC_DOWN1:CJNE R1,90H,PIC_DOWN2MOV R1,88HLJMP PIC_YOUBIAO_WRIPIC_DOWN2:CJNE R1,88H,PIC_DOWN3MOV R1,98HLJMP PIC_YOUBIAO_WRIPIC_DOWN3:CJNE R1,98H,PIC_KEY1MOV R1,80HPIC_YOUBIAO_WRI:MOV COM,R1LCALL WRILCALL DELAYMOV COM,0FHLCALL WRILCALL DELAYSB2: LJMP PIC_KEY1。返回主菜單PIC_BACK:ACALL DELAY10 。延時10毫秒消觸點抖動JB ,SB2 。去除干擾信號JNB ,$ 。等待按鍵松開LJMP MENU。圖片已選擇，開始閱讀PIC_SURE:ACALL DELAY10 。延時10毫秒消觸點抖動JB ,SB2 。去除干擾信號JNB ,$ 。等待按鍵松開CJNE R1,80H,PIC_SURE1MOV DPTR,PICTURE_1LCALL P