簡單顯示 _隨機查詢_以本次記錄為起點查詢

TJ0109_2 DATA 51H ;1至9洞數據統計TJ0109_3 DATA 52H ;1至9洞數據統計TJ1018_1 DATA 53H ;10至18洞數據統計TJ1018_2 DATA 54H ;10至18洞數據統計TJ1018_3 DATA 55H ;10至18洞數據統計TJ0118_1 DATA 56H ;1至18洞數據統計TJ0118_2 DATA 57H ;1至18洞數據統計TJ0118_3 DATA 58H ;1至18洞數據統計SHUJU_G  DATA 56HSHUJU_S  DATA 57HSHUJU_B  DATA 58HSHUJU_W  DATA 75HSHUJU_Z  DATA 76H;;;;;;;;;;;;;;;;;;;;;;;;;;;DON1 DATA    31H    ;洞1數據DON2 DATA    32HDON3 DATA    33HDON4 DATA    34HDON5 DATA    35HDON6 DATA    36HDON7 DATA    37HDON8 DATA    38HDON9 DATA    39HDON10 DATA    3AHDON11 DATA    3BHDON12 DATA    3CHDON13 DATA    3DHDON14 DATA    3EHDON15 DATA    3FHDON16 DATA    40HDON17 DATA    41HDON18 DATA    42H;;;;;;;;;;;;;;;;;;;;;;;KS  BIT P0.0            ;開始JA  BIT P0.1            ;加JD  BIT P0.2            ;減CX  BIT P0.3            ;查詢;;;;;;;;;;;;;;;;;;;;;;;;;ORG   0H                        ;程序代碼由地址0開始執行MAIN:;;;;;;;;;;;;;;;;;;;;;;;;按任意鍵進入人員編號設置SX_RY:MOV P3,#0FFH  ;;;;;;關閉顯示JB  KS,SX_RY_1JNB KS,$AJMP  BISAI_1SX_RY_1:JB  JA,SX_RY_2JNB JA,$AJMP  BISAI_1SX_RY_2:JB  JD,SX_RY_3JNB JD,$AJMP  BISAI_1SX_RY_3:JB  CX,SX_RY_4JNB CX,$AJMP  BISAI_1SX_RY_4:AJMP SX_RYRET;;;;;;;;;;;;;;;;;;;;;;;;;;;;數據調用SHUJU_T:LCALL SHUJU_1_9LCALL SHUJU_10_18LCALL  SHUJU_0118RET;;;;;;;;;;;;;;;;;;;;;;;;洞位將沖突的數據暫時保存起來BISAI_1:  MOV R1,#1MOV R0,#31HBISAI_1_A:MOV SHUJU_Z,R0 ;將數據暫時保存MOV SHUJU_W,R1LCALL SHUJU_TBISAI_1_B:;;;;;;;;;;作為查詢時的返回入口MOV R0,SHUJU_Z ;將數據送回MOV R1,SHUJU_WMOV R2,#50MOV R3,#50BISAI_1_2:LCALL XSLED_CXDEC R2MOV A,R2CJNE A,#0,BISAI_1_4BISAI_1_3: LCALL XSLED_CX_2DEC R3MOV A,R3CJNE A,#0,BISAI_1_6AJMP BISAI_1_ARETBISAI_1_4: JB CX,BISAI_1_4_BJNB CX,$MOV SHUJU_Z,R0 ;將數據暫時保存MOV SHUJU_W,R1LCALL CX_1_BRETBISAI_1_4_B:JB KS,BISAI_1_5JNB KS,$INC R0INC R1MOV A,R1CJNE A,#19,BISAI_1_2LCALL BISAI_37RETBISAI_1_5:  MOV A,@R0LCALL BISAI_TMOV @R0,AAJMP BISAI_1_2RETBISAI_1_6: JB CX,BISAI_1_6_BJNB CX,$MOV SHUJU_Z,R0 ;將數據暫時保存MOV SHUJU_W,R1LCALL CX_1_BRETBISAI_1_6_B:JB KS,BISAI_1_7JNB KS,$INC R0INC R1MOV A,R1CJNE A,#19,BISAI_1_3LCALL BISAI_37RETBISAI_1_7:  MOV A,@R0LCALL BISAI_TMOV @R0,AAJMP BISAI_1_3RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;比賽完成，不再進行數據登記BISAI_37:MOV R0,#100  ;;;;;;;; 修改參數，就可以改變顯示的延時時間MOV R1,#100   ;;;;;;;; 修改參數，就可以改變顯示的延時時間XS_1:    LCALL ANJIAN_SXLCALL XSLEDMOV P3,#0FFHDEC R0MOV A,R0CJNE A,#0,XS_1DEC R1MOV A,R1CJNE A,#0,XS_2LCALL ANJIAN_SXRETXS_2:    MOV R0,#100AJMP XS_1RET;;;;;;;;;;;;;;;;;;;;;;;;;;洞位數據調整BISAI_T:  JB JA,BISAI_T_1JNB JA,$INC ARETBISAI_T_1:JB JD,BISAI_T_2JNB JD,$DEC ARETBISAI_T_2:RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;顯示時，按下，延時恢復ANJIAN_SX:JB  KS,ANJIAN_SX_1JNB KS,$AJMP  BISAI_37ANJIAN_SX_1:JB  JA,ANJIAN_SX_2JNB JA,$AJMP  BISAI_37ANJIAN_SX_2:JB  JD,ANJIAN_SX_3JNB JD,$AJMP  BISAI_37ANJIAN_SX_3:JB  CX,ANJIAN_SX_4JNB CX,$AJMP  CX_1ANJIAN_SX_4:RET;;;;;;;;;;;;;;;;;;;數據0118SHUJU_0118:MOV A,TJ0109_1MOV B,TJ1018_1ADD A,BMOV TJ0118_1,AMOV A,TJ0109_2MOV B,TJ1018_2ADD A,BMOV TJ0118_2,AMOV A,TJ0109_3MOV B,TJ1018_3ADD A,BMOV TJ0118_3,AMOV A,TJ0118_3MOV B,#10DIV ABMOV TJ0118_3,BADD A,TJ0118_2MOV B,#10DIV ABMOV TJ0118_2,BADD A,TJ0118_1MOV B,#10DIV ABMOV TJ0118_1,BRET				   
				
            

				
					
					
				
			
                
			
							

                
			            

                            	              		              		上一頁
              		1
              		              			              		              	              				              				2
              					              						              						              				下一頁