簡單顯示 _隨機查詢_以本次記錄為起點查詢 作者： 時間：2016-11-30 來源：網絡 加入技術交流群 掃碼加入和技術大咖面對面交流海量資料庫查詢 收藏 <a target='_blank'><img src='https://ad.eepw.com.cn/www/delivery/avw.php?zoneid=88&cb=INSERT_RANDOM_NUMBER_HERE&n=a635e61e' border='0' alt='' /></a> <a target='_blank'><img src='https://ad.eepw.com.cn/www/delivery/avw.php?zoneid=87&cb=INSERT_RANDOM_NUMBER_HERE&n=a576c0a2' border='0' alt='' /></a> ;;;;;;;;;;;;;數據累加，盡量使用一個R爭取不要沖突使用SHUJU_1_9:MOV TJ0109_1,#0MOV TJ0109_2,#0MOV TJ0109_3,#0MOV R0,#31HSHUJU_1_9_2:MOV A,@R0ADD A,TJ0109_3MOV B,#100DIV ABMOV R1,A;;;;;;baiMOV A,BMOV B,#10DIV ABMOV R2,A;;;;;shiMOV TJ0109_3,B;;;;geMOV A,TJ0109_2MOV B,R2ADD A,BMOV B,#10DIV ABMOV R3,AMOV TJ0109_2,B;;;shiMOV A,R1MOV B,R3ADD A,BMOV TJ0109_1,AINC R0MOV A,R0CJNE A,#3AH,SHUJU_1_9_2RETSHUJU_10_18:MOV TJ1018_1,#0MOV TJ1018_2,#0MOV TJ1018_3,#0MOV R0,#3AHSHUJU_10_18_2:MOV A,@R0ADD A,TJ1018_3MOV B,#100DIV ABMOV R1,A;;;;;;baiMOV A,BMOV B,#10DIV ABMOV R2,A;;;;;shiMOV TJ1018_3,B;;;;geMOV A,TJ1018_2MOV B,R2ADD A,BMOV B,#10DIV ABMOV R3,AMOV TJ1018_2,B;;;shiMOV A,R1MOV B,R3ADD A,BMOV TJ1018_1,AINC R0MOV A,R0CJNE A,#43H,SHUJU_10_18_2RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;比賽結束使用查詢功能CX_1: MOV R1,#1MOV R0,#31HCX_1_1: JB KS,CX_1_2JNB KS,$LCALL BISAI_37RETCX_1_2: JB JA,CX_1_3JNB JA,$INC R1INC R0MOV A,R0CJNE A,#43H,CX_1_1AJMP CX_1CX_1_3: JB JD,CX_1_4JNB JD,$DEC R1DEC R0MOV A,R0CJNE A,#30H,CX_1_1AJMP CX_2RETCX_1_4: LCALL XSLED_CXAJMP CX_1_1RETCX_2: MOV R1,#18MOV R0,#42HAJMP CX_1_1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;比賽過程查詢數據CX_1_C: MOV R1,#1MOV R0,#31HCX_1_B: JB KS,CX_1_2_BJNB KS,$LCALL BISAI_1_BRETCX_1_2_B: JB JA,CX_1_3_BJNB JA,$INC R1INC R0MOV A,R1CJNE A,#19,CX_1_3_BAJMP CX_1_CRETCX_1_3_B: JB JD,CX_1_4_BJNB JD,$DEC R1DEC R0MOV A,R1CJNE A,#0,CX_1_BAJMP CX_2_BRETCX_1_4_B: LCALL XSLED_CXAJMP CX_1_BRETCX_2_B: MOV R1,#18MOV R0,#42HAJMP CX_1_B;;;;;;;;;;;;;;;;;;;;數據顯示XSLED_CX:LCALL XSLEDMOV A,R1 ;;;;;;;;;;;;;設置洞位1LCALL LED_LED_10MOV A,@R0 ;;;;;;;;;;;;;將相應洞位數據傳給ALCALL LED_LED_10RET;;;;;;;;;;;;;;;;;;;;閃爍數據顯示XSLED_CX_2:LCALL XSLEDMOV A,R1 ;;;;;;;;;;;;;設置洞位1LCALL LED_LED_10;MOV A,@R0 ;;;;;;;;;;;;;將相應洞位數據傳給A;LCALL LED_LED_10RET;;;;;;;;;;;;;;;;;;;;;;;;;運行時數碼管顯示XSLED:MOV P3,#0D0HMOV A,TJ0118_1LCALL LEDINC P3MOV A,TJ0118_2LCALL LEDINC P3MOV A,TJ0118_3LCALL LEDINC P3RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;數碼顯示調用程序LED: MOV DPTR,#TABLEMOVC A,@A+DPTRMOV P1,ALCALL DELAY1RET;;;;;;;;;;;;;;;;;;;;;;;;;;;; 除以100得百位數LED_LED_100:MOV B,#100DIV ABLCALL LEDINC P3MOV A,B;;;;;;;;;;;;;;;;;;;;;;;;;;;除以10得十位數LED_LED_10:MOV B,#10DIV ABLCALL LEDINC P3MOV A,B;;;;;;;;;;;;;;;;;;;;;;;;;;不除得個位數LED_LED_1:LCALL LEDINC P3RETTABLE:DB 0C0H ;"0"DB 0F9H ;"1"DB 0A4H ;"2"DB 0B0H ;"3"DB 99H ;"4"DB 92H ;"5"DB 82H ;"6"DB 0F8H ;"7"DB 80H ;"8"DB 90H ;"9"DB 0FFH ;"-"DB 0FFH ;"-"DB 0BFH ;"-"DB 0BFH ;"-"DELAY1:MOV R7,#10L1: MOV R6,#50DJNZ R6,$DJNZ R7,L1RETEND 上一頁 1 2 下一頁
加入技術交流群
評論