交通灯控制系统课程设计（基于STAR-ES598PCI)

最新推荐文章于 2024-07-22 18:58:45 发布
最新推荐文章于 2024-07-22 18:58:45 发布
阅读量2.6k 收藏
点赞数 1
分类专栏： 汇编 8086 文章标签： 8086 汇编
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/sinat_19473755/article/details/53645107
版权 
;PA LED
;PC7 K7 (特种车)
;PC6 K6 MAINROAD
;PC5 K5 BRANCHROAD

.MODEL TINY
;DISPLAY
EXTRN Display8:NEAR;    CS5
;INIT8255
COM_ADD EQU 0F003H; CS1
PA_ADD  EQU 0F000H
PB_ADD  EQU 0F001H
PC_ADD  EQU 0F002H
;INIT8259
IO8259_0 EQU 0E000H;    CS2
IO8259_1 EQU 0E001H
;INIT8253
COM_ADDR EQU 0D003H;     CS3
T0_ADDR EQU  0D000H
T1_ADDR EQU  0D001H
T2_ADDR  EQU 0D002H

WR_COM_AD_L EQU 0C004H  ;写左半屏指令地址Cs4
WR_COM_AD_R EQU 0C000H  ;写右半屏指令地址
WR_DATA_AD_L    EQU 0C006H  ;写左半屏数据地址
WR_DATA_AD_R    EQU 0C002H  ;写右半屏数据地址
RD_BUSY_AD  EQU 0C001H  ;查忙地址
RD_DATA_AD  EQU 0C003H  ;读数据地址
X   EQU 0B8H        ;起始显示行基址
Y   EQU 040H        ;起始显示列基址
FirstLine   EQU 0C0H        ;起始显示行
    .STACK 100
    .DATA
BUFFER  DB 8 DUP(?)
Counter db ?
ReDisplayFlag DB 0
HUNDREDFLAG DB 0
LRFLAG DB 0
LED_Data    DB 01111101B
        DB 11111101B
        DB 10111101B
        DB 11010111B
        DB 11011111B
        DB 11011011B

;--  文字:  G  --
;--  宋体12;  此字体下对应的点阵为：宽x高=8x16   --
Line0_1 DB  0C0H,030H,008H,008H,008H,038H,000H,000H,007H,018H,020H,020H,022H,01EH,002H,000H
;--  文字:  a  --
;--  宋体12;  此字体下对应的点阵为：宽x高=8x16   --
Line0_2 DB  000H,000H,080H,080H,080H,080H,000H,000H,000H,019H,024H,022H,022H,022H,03FH,020H
;--  文字:  r  --
;--  宋体12;  此字体下对应的点阵为：宽x高=8x16   --
Line0_3 DB  080H,080H,080H,000H,080H,080H,080H,000H,020H,020H,03FH,021H,020H,000H,001H,000H
;--  文字:  d  --
;--  宋体12;  此字体下对应的点阵为：宽x高=8x16   --
Line0_4 DB  000H,000H,000H,080H,080H,088H,0F8H,000H,000H,00EH,011H,020H,020H,010H,03FH,020H
;--  文字:  e  --
;--  宋体12;  此字体下对应的点阵为：宽x高=8x16   --
Line0_5 DB  000H,000H,080H,080H,080H,080H,000H,000H,000H,01FH,022H,022H,022H,022H,013H,000H
;--  文字:  n  --
;--  宋体12;  此字体下对应的点阵为：宽x高=8x16   --
Line0_6 DB  080H,080H,000H,080H,080H,080H,000H,000H,020H,03FH,021H,000H,000H,020H,03FH,020H
;--  文字:     --
;--  宋体12;  此字体下对应的点阵为：宽x高=8x16   --
Line0_7 DB  000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H
;--  文字:  V  --
;--  宋体12;  此字体下对应的点阵为：宽x高=8x16   --
Line0_8 DB  008H,078H,088H,000H,000H,0C8H,038H,008H,000H,000H,007H,038H,00EH,001H,000H,000H
;--  文字:  0  --
;--  宋体12;  此字体下对应的点阵为：宽x高=8x16   --
Line0_9 DB  000H,0E0H,010H,008H,008H,010H,0E0H,000H,000H,00FH,010H,020H,020H,010H,00FH,000H
;--  文字:  .  --
;--  宋体12;  此字体下对应的点阵为：宽x高=8x16   --
Line0_10 DB  000H,000H,000H,000H,000H,000H,000H,000H,000H,030H,030H,000H,000H,000H,000H,000H
;--  文字:  1  --
;--  宋体12;  此字体下对应的点阵为：宽x高=8x16   --
Line0_11 DB  000H,010H,010H,0F8H,000H,000H,000H,000H,000H,020H,020H,03FH,020H,020H,000H,000H

;--  文字:  白  --
Line1_1 DB  000H,000H,0F8H,008H,008H,00CH,00AH,009H,008H,008H,008H,008H,0F8H,000H,000H,000H
DB  000H,000H,0FFH,041H,041H,041H,041H,041H,041H,041H,041H,041H,0FFH,000H,000H,000H
;--  文字:  天  --
Line1_2 DB  040H,040H,042H,042H,042H,042H,042H,0FEH,042H,042H,042H,042H,042H,040H,040H,000H
DB  080H,080H,040H,020H,010H,00CH,003H,000H,003H,00CH,010H,020H,040H,080H,080H,000H
;--  文字: 模   --
Line1_3 DB     010H,010H,0D0H,0FFH,090H,014H,0E4H,0AFH,0A4H,0A4H,0A4H,0AFH,0E4H,004H,000H,000H
DB  004H,003H,000H,0FFH,000H,089H,04BH,02AH,01AH,00EH,01AH,02AH,04BH,088H,080H,000H
;--  文字:  式  --
Line1_4 DB    010H,010H,090H,090H,090H,090H,090H,010H,010H,0FFH,010H,010H,011H,016H,010H,000H
DB  000H,020H,060H,020H,03FH,010H,010H,010H,000H,003H,00CH,010H,020H,040H,0F8H,000H

;--  文字:  主  --
Line2_1 DB  000H,008H,008H,008H,008H,008H,009H,0FAH,008H,008H,008H,008H,008H,008H,000H,000H
DB  040H,040H,041H,041H,041H,041H,041H,07FH,041H,041H,041H,041H,041H,040H,040H,000H
;--  文字:  干  --
Line2_2 DB  080H,080H,082H,082H,082H,082H,082H,0FEH,082H,082H,082H,082H,082H,080H,080H,000H
DB  000H,000H,000H,000H,000H,000H,000H,0FFH,000H,000H,000H,000H,000H,000H,000H,000H
;--  文字: 道   --
Line2_3 DB  040H,040H,042H,0CCH,000H,008H,0E9H,0AAH,0B8H,0A8H,0A8H,0AAH,0E9H,008H,000H,000H
DB  000H,040H,020H,01FH,020H,040H,05FH,04AH,04AH,04AH,04AH,04AH,05FH,040H,040H,000H
;--  文字:  来  --
Line2_4 DB  000H,008H,008H,028H,0C8H,008H,008H,0FFH,008H,008H,088H,068H,008H,008H,000H,000H
DB  021H,021H,011H,011H,009H,005H,003H,0FFH,003H,005H,009H,011H,011H,021H,021H,000H
;--  文字:  车  --
Line2_5 DB  000H,008H,088H,048H,028H,018H,00FH,0E8H,008H,008H,008H,008H,008H,008H,000H,000H
DB  008H,008H,009H,009H,009H,009H,009H,0FFH,009H,009H,009H,009H,009H,008H,008H,000H


;--  文字: 夜  --
Line3_1 DB  004H,004H,084H,0E4H,01CH,004H,005H,0C6H,03CH,0A4H,024H,024H,0E4H,004H,004H,000H
DB  002H,001H,000H,0FFH,000H,082H,081H,046H,028H,010H,029H,046H,041H,080H,080H,000H
;--  文字: 间  --
Line3_2 DB  000H,0F8H,001H,006H,000H,0F0H,012H,012H,012H,0F2H,002H,002H,002H,0FEH,000H,000H
DB  000H,0FFH,000H,000H,000H,01FH,011H,011H,011H,01FH,000H,040H,080H,07FH,000H,000H
;--  文字:  模  --
Line3_3 DB  010H,010H,0D0H,0FFH,090H,014H,0E4H,0AFH,0A4H,0A4H,0A4H,0AFH,0E4H,004H,000H,000H
DB  004H,003H,000H,0FFH,000H,089H,04BH,02AH,01AH,00EH,01AH,02AH,04BH,088H,080H,000H
;--  文字: 式  --
Line3_4 DB  010H,010H,090H,090H,090H,090H,090H,010H,010H,0FFH,010H,010H,011H,016H,010H,000H
DB  000H,020H,060H,020H,03FH,010H,010H,010H,000H,003H,00CH,010H,020H,040H,0F8H,000H

;--  文字:  次  --
Line4_1 DB  000H,002H,00CH,080H,060H,080H,040H,030H,00FH,0C8H,008H,008H,028H,018H,000H,000H
DB  002H,002H,07EH,001H,080H,040H,020H,018H,006H,001H,006H,018H,020H,040H,080H,000H
;--  文字:  干  --
Line4_2 DB  080H,080H,082H,082H,082H,082H,082H,0FEH,082H,082H,082H,082H,082H,080H,080H,000H
DB  000H,000H,000H,000H,000H,000H,000H,0FFH,000H,000H,000H,000H,000H,000H,000H,000H
;--  文字: 道   --
Line4_3 DB  040H,040H,042H,0CCH,000H,008H,0E9H,0AAH,0B8H,0A8H,0A8H,0AAH,0E9H,008H,000H,000H
DB  000H,040H,020H,01FH,020H,040H,05FH,04AH,04AH,04AH,04AH,04AH,05FH,040H,040H,000H
;--  文字:  来  --
Line4_4 DB  000H,008H,008H,028H,0C8H,008H,008H,0FFH,008H,008H,088H,068H,008H,008H,000H,000H
DB  021H,021H,011H,011H,009H,005H,003H,0FFH,003H,005H,009H,011H,011H,021H,021H,000H
;--  文字:  车  --
Line4_5 DB  000H,008H,088H,048H,028H,018H,00FH,0E8H,008H,008H,008H,008H,008H,008H,000H,000H
DB  008H,008H,009H,009H,009H,009H,009H,0FFH,009H,009H,009H,009H,009H,008H,008H,000H

        .CODE

START:      
;*************8255init*********************
        MOV AX,@DATA
        MOV DS,AX
        NOP
        CALL    DelayTime
        MOV Counter,0
        CALL  LedDisplay
        MOV DX,COM_ADD
        MOV AL,88H
        OUT DX,AL
        MOV DX,PA_ADD
        MOV AL,0FFH
            OUT DX,AL
                    ;8253
        MOV DX,COM_ADDR
        MOV AL,00110101B;00110101B
        OUT DX,AL
        NOP
        LEA BX,LED_Data
        NOP
;*************8259init*********************
        CALL Init8259
        CALL WriIntver

    ;   CALL    LCD_INIT    ;液晶初始化
    ;CALL   DelayTime   
    ;CALL   DisLine1    ;第2行显示”白天模式”
    ;CALL   DelayTime   
    ;CALL   DisLine3    ;第4行显示”黑夜模式 ”
;   CALL    DelayTime

        STI
;*****************main**********************        

MAINLOOP:   
        CALL SWITCHMODE

DAYTIMEMODE:    
        CALL    LCD_INIT    ;液晶初始化
        CALL    DisLine0
        CALL    DisLine1    ;第2行显示”白天模式”
        MOV DX,PA_ADD   
        MOV AL,0
        XLAT
        OUT DX,AL
        ;CALL DL10S
        ;MOV BUFFER+3,01H
        ;LEA SI,BUFFER
        ;CALL Display8
    ;   CALL  LedDisplayH
        MOV LRFLAG,1
        MOV HUNDREDFLAG,1
        MOV CX,100
        MOV Counter,0
START2: 
        ;DEC Counter
        ;TEST  Counter,5
        ;JZ K1
        ;MOV HUNDREDFLAG,0
;K1:        
        MOV AL,Counter
        SUB AL,1
        DAS
        MOV Counter,AL
        CALL  LedDisplay

        MOV AL,1
        XLAT
        OUT DX,AL
        CALL DL500ms
        MOV AL,0
        XLAT
        OUT DX,AL
        CALL DL500ms
        LOOP START2


        MOV CX,100
        MOV Counter,0   
STARTn: 

        MOV HUNDREDFLAG,0
        ;DEC Counter
        ;TEST  Counter,5
        ;JZ K1
        ;MOV HUNDREDFLAG,0
;K1:        
        MOV AL,Counter
        SUB AL,1
        DAS
        MOV Counter,AL
        CALL  LedDisplay

        MOV AL,1
        XLAT
        OUT DX,AL
        CALL DL500ms
        MOV AL,0
        XLAT
        OUT DX,AL
        CALL DL500ms
        LOOP STARTn

        MOV AL,2
        XLAT 
        OUT DX,AL
        CALL DL3S
        MOV AL,3
        XLAT 
        OUT DX,AL


        ;CALL DL5S
        MOV LRFLAG,0    
        MOV CX,100
        MOV Counter,0
START3: 
    ;   DEC Counter
        MOV AL,Counter
        SUB AL,1
        DAS
        MOV Counter,AL
        CALL  LedDisplay


        MOV AL,4
        XLAT
        OUT DX,AL
        CALL DL500ms
        MOV AL,3
        XLAT 
        OUT DX,AL
        CALL DL500ms
        LOOP START3

        MOV AL,5
        XLAT
        OUT DX,AL
        CALL DL3S
        JMP MAINLOOP
;*****************SWITCHMODE***********************
SWITCHMODE:
        MOV DX,PC_ADD
            IN AL,DX
            TEST AL,10000000B            ;10000000选择PC7口(NIGHT)
            JZ NEXT1
            JMP NIGHTMODE

NEXT1:          MOV DX,PC_ADD
            IN AL,DX
            TEST AL,01000000B            ;01000000选择PC6口BRANCHROAD&MAINROAD
            JZ NEXT2
            JMP SPMAINROAD
NEXT2:
        MOV DX,PC_ADD
            IN AL,DX
            TEST AL,00100000B            ;00100000选择PC6口BRANCHROA&MAINROAD
            JZ LONGJMP
            JMP SPBRANCHROAD
LONGJMP:    JMP DAYTIMEMODE
;*****************SPECIALMODE**********************
SPMAINROAD:

        MOV DX,PA_ADD
        MOV AL,01111101B
        OUT DX,AL
        NOP
        ;CALL DL500ms
        MOV DX,PA_ADD
        CALL    LCD_INIT
        CALL    DisLine0
        CALL    DisLine2    ;显示”主干道来车 ”
        JMP START
SPBRANCHROAD:
        MOV DX,PA_ADD
        MOV AL,11010111B
        OUT DX,AL
        ;CALL DL500ms
        CALL    LCD_INIT
        CALL    DisLine0
        CALL    DisLine4    ;显示”次干道来车 ”
        JMP START
NIGHTMODE:
        CALL    LCD_INIT
        CALL    DisLine0
        CALL    DisLine3    ;显示”黑夜模式 ”
        MOV DX,PA_ADD
        MOV AL,10111011B
        OUT DX,AL
        CALL DL500ms
        MOV DX,PA_ADD
        MOV AL,0FFH
        OUT DX,AL
        CALL DL500ms



        JMP START
;*****************ENDOFSPECIALMODE***************
;*****************ENDOFMAIN**********************

;*****************LEDDISPLAY*********************
  LedDisplay    PROC NEAR
        MOV AL,Counter
        MOV AH,AL
        AND AL,0FH
        MOV BUFFER,AL
        AND AH,0F0H
        ROR AH,4
        MOV BUFFER+1,AH
        MOV BUFFER+2,10H
        MOV BUFFER+3,10H        
        MOV BUFFER+4,10H
        MOV BUFFER+5,10H
        MOV BUFFER+6,10H
        MOV BUFFER+7,10H                
        LEA SI,BUFFER
        CALL Display8
        RET
 LedDisplay  ENDP

;*****************DELAY500MS*********************
DL500ms PROC NEAR
        MOV DX,T0_ADDR
    MOV AL,00H
    OUT DX,AL
    MOV AL,10H
    OUT DX,AL
    MOV DX,COM_ADDR
    MOV AL,77H
    OUT DX,AL
    MOV DX,T1_ADDR
    MOV AL,00H
    OUT DX,AL
    MOV AL,10H
    OUT DX,AL
DELAY:  MOV DX,PC_ADD
        IN AL,DX                     ;
        TEST AL,10H
        JZ DELAY;jump if zero
        NOP

        RET
DL500ms ENDP

DL3S        PROC NEAR 
        PUSH CX
        MOV CX,6
DL3S1:      CALL DL500ms
        LOOP DL3S1
        POP CX
        RET
        ENDP

DL5S        PROC NEAR
        PUSH CX
        MOV CX,10
DL5S1:      CALL DL500ms
        LOOP DL5S1
        POP CX
        RET
ENDP

DL10S       PROC NEAR
        PUSH CX
        MOV CX,20
DL10S1:     CALL DL500ms
        LOOP DL10S1
        POP CX
        RET
ENDP
;*****************INTERRUPT*********************
Init8259 PROC NEAR
    MOV DX,IO8259_0
    MOV AL,13H
    OUT DX,AL
    MOV DX,IO8259_1
    MOV AL,08H
    OUT DX,AL   
    MOV AL,09H
    OUT DX,AL
    MOV AL,0FEH
    OUT DX,AL
    RET
Init8259 ENDP
WriIntver PROC NEAR
    PUSH ES
    MOV AX,0
    MOV ES,AX
    MOV DI,20H
    LEA AX,INT_0
    STOSW
    MOV AX,CS
    STOSW
    POP ES
    RET
WriIntver ENDP
;*****************INTERRUPT_HANDLER*********************
INT_0:      
        ;JMP START
        PUSH DX
        PUSH AX
        MOV AL,Counter
        ADD AL,1
        DAA
        MOV DX,PA_ADD
        MOV AL,01111111B
        OUT DX,AL
;       MOV Counter,AL
;       MOV ReDisplayFlag,1
        MOV DX,IO8259_0
        MOV AL,20H
        OUT DX,AL
        MOV Counter,0
        CALL  LedDisplay
        JMP START
        POP AX
        POP DX
        IRET
;延时程序
DelayTime   PROC    NEAR    
    MOV CX,0    
    LOOP        $  
    LOOP        $  
    RET     
DelayTime   ENDP        
;显示”白天模式”
DisLine1    PROC    NEAR    
    LEA SI,Line1_1  
    MOV AL,4        ;A-起始显示行地址，第2行
    MOV AH,32   ;B-起始显示列地址，第32列，以下同
    CALL    WordDISL    ;左半屏，显示一个字子程序
    LEA SI,Line1_2  
    MOV AL,4    
    MOV AH,48   
    CALL    WordDISL    
    LEA SI,Line1_3  
    MOV AL,4    
    MOV AH,0    
    CALL    WordDISR    ;右半屏，显示一个字子程序
    LEA SI,Line1_4  
    MOV AL,4    
    MOV AH,16   
    CALL    WordDISR    
    RET     
DisLine1    ENDP    

;显示”主干道来车”
DisLine2    PROC    NEAR    
    LEA SI,Line2_1  
    MOV AL,4        ;A-起始显示行地址，第2行
    MOV AH,32   ;B-起始显示列地址，第32列，以下同
    CALL    WordDISL    ;左半屏，显示一个字子程序
    LEA SI,Line2_2  
    MOV AL,4    
    MOV AH,48   
    CALL    WordDISL    
    LEA SI,Line2_3  
    MOV AL,4    
    MOV AH,0    
    CALL    WordDISR    ;右半屏，显示一个字子程序
    LEA SI,Line2_4  
    MOV AL,4    
    MOV AH,16   
    CALL    WordDISR    
    LEA SI,Line2_5  
    MOV AL,4    
    MOV AH,32   
    CALL    WordDISR    
    RET     
DisLine2    ENDP    


    ;显示”次干道来车”
DisLine4    PROC    NEAR    
    LEA SI,Line4_1  
    MOV AL,4        ;A-起始显示行地址，第2行
    MOV AH,32   ;B-起始显示列地址，第32列，以下同
    CALL    WordDISL    ;左半屏，显示一个字子程序
    LEA SI,Line4_2  
    MOV AL,4    
    MOV AH,48   
    CALL    WordDISL    
    LEA SI,Line4_3  
    MOV AL,4    
    MOV AH,0    
    CALL    WordDISR    ;右半屏，显示一个字子程序
    LEA SI,Line4_4  
    MOV AL,4    
    MOV AH,16   
    CALL    WordDISR    
    LEA SI,Line4_5  
    MOV AL,4    
    MOV AH,32   
    CALL    WordDISR    
    RET     
DisLine4    ENDP

;第4行显示黑夜模式”
DisLine3        PROC        NEAR    
    LEA SI,Line3_1  
    MOV AL,4        ;A-起始显示行地址，第6行
    MOV     AH,32   ;B-起始显示列地址，第32列，以下同
    CALL    WordDISL    ;左半屏，显示一个字子程序
    LEA SI,Line3_2  
    MOV AL,4    
    MOV AH,48   
    CALL    WordDISL    
    LEA SI,Line3_3  
    MOV AL,4    
    MOV AH,0    
    CALL    WordDISR    ;右半屏，显示一个字子程序
    LEA SI,Line3_4  
    MOV AL,4    
    MOV AH,16   
    CALL    WordDISR    
    RET     
DisLine3        ENDP            
;液晶初始化
LCD_INIT    PROC    NEAR    
    MOV AL,3EH  ;初始化左半屏，关显示
    CALL        WRComL  ;写指令子程序
    MOV AL,FirstLine    ;设置起始显示行，第0行
    CALL    WRComL  
    MOV AL,3EH  ;初始化右半屏，关显示
    CALL    WRComR  ;写指令子程序
    MOV     AL,FirstLine    ;设置起始显示行，第0行
    CALL    WRComR  
    CALL    LCDClear    ;清屏
    MOV AL,3FH  ;开显示
    CALL    WRComL  
    MOV AL,3FH  ;开显示
    CALL        WRComR  
    RET     
LCD_INIT        ENDP        
;清屏
LCDClear    PROC        NEAR    
;清左半屏
    MOV AL,0    ;起始行，第0行
    MOV AH,0        ;起始列，第0列
LCDClearL1: PUSH        AX  
    MOV     CX,64   
    CALL        SETXYL  ;设置起始显示行列地址
LCDClearL2: MOV AL,0    
    CALL    WRDATAL 
    LOOP    LCDClearL2  
    POP AX  
    INC AX  
    CMP AL,8    ;共8行
    JNZ LCDClearL1  
;清右半屏
    MOV     AL,0        ;起始行，第0行
    MOV AH,0        ;起始列，第0列
LCDClearR1: PUSH        AX  
    MOV     CX,64   
    CALL    SETXYR  ;设置起始显示行列地址
LCDClearR2: XOR AL,AL   
    CALL    WRDATAR 
    LOOP    LCDClearR2  
    POP AX  
    INC     AL  
    CMP AL,8        ;共8行
    JNZ LCDClearR1  
    RET     
LCDClear    ENDP        
;显示字体，显示一个数据要占用X行两行位置
;左半屏显示一个字节/字：AL-起始显示行序数X(0-7)；AH-起始显示列序数Y(0-63)；SI-显示字
数据首地址
ByteDisL        PROC    NEAR    
    MOV     CX,8      ;显示8个字节数据，用于显示一个英文/符号
    CALL        DispL   
    RET     
ByteDisL    ENDP        
WordDisL    PROC    NEAR    
    MOV CX,16   ;显示16字节数据，用于显示一个汉字
    CALL    DispL   
    RET     
WordDisL    ENDP        
DispL   PROC    NEAR    
    PUSH    AX  
    PUSH        CX  
    CALL    SETXYL  ;设置起始显示行列地址
    CALL    DisplayL    ;显示上半行数据
    POP CX  
    POP AX  
    INC AL  
    CALL    SETXYL  ;设置起始显示行列地址
    CALL        DisplayL        ;显示下半行数据
    RET         
DispL   ENDP        
;右半屏显示一个字节/字：AL-起始显示行序数X(0-7)；AH-起始显示列序数Y(0-63)；SI-显示字
数据首地址
ByteDisR        PROC    ENAR    
    MOV CX,8       ;显示8个字节数据，用于显示一个英文/符号
    CALL    DispR   
    RET     
ByteDisR    ENDP        
WordDisR    PROC    NEAR    
    MOV CX,16   ;显示16字节数据，用于显示一个汉字
    CALL    DispR   
    RET     
WordDisR    ENDP        
DispR   PROC        NEAR    
    PUSH        AX  
    PUSH        CX  
    CALL        SETXYR  ;设置起始显示行列地址
    CALL        DisplayR        ;显示上半行数据
    POP CX  
    POP AX  
    INC AL  
    CALL    SETXYR  ;设置起始显示行列地址
    CALL    DisplayR    ;显示下半行数据
    RET     
DispR   ENDP        
;显示图形   
;显示左半屏一行图形,AL-X起始行序数(0-7)，AH-Y起始列地址序数(0-63)
LineDisL    PROC    NEAR    
    MOV     CX,64   
    CALL    SETXYL  ;设置起始显示行列
    CALL    DisplayL        ;显示数据
    RET         
LineDisL    ENDP        
;显示右半屏一行图形,AL-X起始行地址序数(0-7)，AH-Y起始列地址序数(0-63)
LineDisR    PROC    NEAR    
    MOV CX,64   
    CALL    SETXYR  ;设置起始显示行列
    CALL    DisplayR    ;显示数据
    RET         
LineDisR    ENDP        
;基本控制
;显示左半屏数据，R7-显示数据个数
DisplayL        PROC        NEAR    
    LODSB       
    CALL        WRDataL ;写左半屏数据
    LOOP    DisplayL    
    RET     
DisplayL    ENDP        
;显示右半屏数据，R7-显示数据个数
DisplayR    PROC        NEAR    
    LODSB       
    CALL        WRDataR ;写左半屏数据
    LOOP    DisplayR    
    RET     
DisplayR    ENDP        
;设置左半屏起始显示行列地址,AL-X起始行序数(0-7)，AH-Y起始列序数(0-63)
SETXYL  PROC    NEAR    
    OR  AL,X        ;行地址=行序数+行基址
    CALL    WRComL  
    MOV AL,AH   
    OR  AL,Y        ;列地址=列序数+列基址
    CALL        WRComL  
    RET     
SETXYL  ENDP        
;设置右半屏起始显示行列地址,AL-X起始行序数(0-7)，AH-Y起始列序数(0-63)
SETXYR  PROC    NEAR    
    OR  AL,X        ;行地址=行序数+行基址
    CALL        WRComR  
    MOV AL,AH   
    OR  AL,Y        ;列地址=列序数+列基址
    CALL    WRComR  
    RET     
SETXYR  ENDP        
;写左半屏控制指令，A-写入指令
WRComL  PROC        NEAR    
    MOV DX,WR_COM_AD_L  
    OUT     DX,AL   
WRComL1:    MOV DX,RD_BUSY_AD   
    IN  AL,DX   
    TEST    AL,80H  ;检查液晶显示是否处于忙状态
    JNZ WRComL1 
    RET     
WRComL  ENDP        
;写右半屏控制指令，A-写入指令
WRComR      PROC        NEAR    
    MOV DX,WR_COM_AD_R  
    OUT DX,AL   
WRComR1:    MOV DX,RD_BUSY_AD   
    IN  AL,DX   
    TEST        AL,80H  ;检查液晶显示是否处于忙状态
    JNZ WRComR1 
    RET     
WRComR  ENDP        
;写左半屏数据，A-写入数据  
WRDataL PROC        NEAR    
    MOV DX,WR_DATA_AD_L 
    OUT     DX,AL   
WRDataL1:   MOV DX,RD_BUSY_AD   
    IN  AL,DX   
    TEST        AL,80H  ;检查液晶显示是否处于忙状态
    JNZ WRDataL1    
    RET     
WRDataL ENDP        
;写右半屏数据，A-写入数据  
WRDataR PROC        NEAR    
    MOV     DX,WR_DATA_AD_R 
    OUT DX,AL   
WRDataR1:   MOV DX,RD_BUSY_AD   
    IN  AL,DX   
    TEST        AL,80H      ;检查液晶显示是否处于忙状态
    JNZ WRDataR1    
    RET     
WRDataR ENDP        

;第3行显示"STAR ES51PRO"
DisLine0    PROC    NEAR    
    LEA SI,Line0_1  
    MOV AL,2    ;A-起始显示行地址，第4行
    MOV AH,16   ;B-起始显示列地址，第16列，以下同
    CALL    ByteDISL    ;左半屏，显示一个字节子程序
    LEA SI,Line0_2  
    MOV AL,2    
    MOV AH,24   
    CALL    ByteDISL    
    LEA SI,Line0_3  
    MOV AL,2    
    MOV AH,32   
    CALL    ByteDISL    
    LEA SI,Line0_4  
    MOV AL,2    
    MOV AH,40   
    CALL    ByteDISL    
    LEA SI,Line0_5  
    MOV AL,2    
    MOV AH,48   
    CALL    ByteDISL    
    LEA SI,Line0_6  
    MOV AL,2    
    MOV AH,56   
    CALL    ByteDISL    
    LEA SI,Line0_7  
    MOV AL,2    
    MOV AH,0    
    CALL    ByteDISR    ;右半屏字节显示数据
    LEA SI,Line0_8  
    MOV AL,2    
    MOV AH,8    
    CALL    ByteDISR    
    LEA SI,Line0_9  
    MOV AL,2    
    MOV AH,16   
    CALL    ByteDISR    
    LEA SI,Line0_10 
    MOV AL,2    
    MOV AH,24   
    CALL    ByteDISR    
    LEA SI,Line0_11 
    MOV AL,2    
    MOV AH,32   
    CALL    ByteDISR        

    RET     
DisLine0 ENDP               
END START
ChenGarden
关注
  • 1
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
单片机设计一个十字路口交通灯模拟控制系统（51单片机实训）
foneyao的博客
06-21 2万+
1.东西、南北两个方向都通行25s（绿灯亮），警告5s（黄灯亮），禁行30s（红灯亮），用LED模拟交通灯 2.各个方向用数码管显示剩余时间 3.考虑到异常状态 东西发生异常时，东西通行，南北禁止，东西方向绿灯闪，南北方向红灯闪60s 南北方向异常时，南北通行，东西禁行，南北方向绿灯闪，东西方向红灯闪60s 4.两种异常用外部中断0和外部中断1管理，外接开关模拟异常发生 proteus电路图如下：（如有需要原图的可评论找我拿） 代码如下： #include<reg51.h> sbit SN_g
数据结构课程设计之 交通咨询系统设计（c++）
xuese_luochen的博客
01-13 1万+
题目 设计目的： 熟练掌握迪杰斯特拉算法和费洛伊德算法，能够利用它们解决最短路径问题。 掌握图的深度，广度遍历算法。 掌握快速排序算法。 内容： 设计一个交通咨询系统，通过读取全国城市距离图（在https://pan.baidu.com/s/1MOl4Lf_SgSnYWHFm29z70w中有三个csv文件用来读取，提取码是5n1o，如想按照我的程序运行必须将这三个文件放在和cpp和.h同一个文件夹内，如修改程序请将读取文件内容函数进行修改—1.csv是邻接矩阵（只有0和1），2.csv是下三角城市间距离，3
数据库课程设计-图书馆管理系统(2.数据库实现-基于mysql)
凛_Lin~~的博客
01-11 2万+
数据库课程设计-图书馆管理系统(2.数据库实现-基于mysql) 使用mysql 8.0.25和navicat进行实现
基于Star UML3.1版本的课程结业设计餐饮管理系统
helpluozhao123的博客
06-12 2万+
课程论文报告 教 学 院 计算机学院 课程名称 UML建模技术 题 目 餐饮管理系统 专 业 计算机科学与技术 班 级 学 号 姓 名 指导教师 2021 年 6 月 20 日 目录 引言 2 课题背景 3 一、 系统需求分析 3 (一) 问题分析 3 (二) 系统功能分析 5 二、 用例设计建模 7 2.1用例图概述 7 2.2餐饮管理用例图: 8 三、 类图设计建模 19 四、 顺序图设计建模 20 4.1顺序图概述: 20 4.2构建顺序图 20 五、 通信图(合作
基于STC89C52单片机的温度控制系统设计方案与软硬件实现
毕业作品网站
10-01 5888
测温电路的设计，可以使用热敏电阻之类的传感器件利用其感温效应，（如电阻随温度的变化有一个变化的曲线，即利用它的变化特性曲线）温度的变化使得电阻发生了变化根据欧姆定律，电阻的变化会带来电流或这电压的变化。再将随被测温度变化的电压或电流采集过来，然后进行模拟信号换成数字信号（A/D）转换，将数字信号送入单片机，用单片机进行数据的处理，将温度显示在电路上，这样就可以将被测温度显示出来。整个设计总体分为以下几个部分：控制部分、显示部分、温度采集部分、按键控制部分，输出部分。3.2 DS18B20的工作原理。
Java课程设计【学生信息管理系统】
热门推荐
振华OPPO的博客世界
06-01 7万+
这次课程设计总体来说是一次非常有意义的任务，因为在这次课程设计中我学会了很多GUI编程和流类的知识，提高了编程的能力，也增加了对编程的兴趣。虽然这是一个小项目，但是能把它做好也是有很大的满足感。虽然一开始遇到很多问题，但自己都咬牙克服、迎难而上，每天都在钻研程序，然后将自己的思想与同学们交流。可以说，没有付出就没有回报，只要你肯付出，就会有收获。一件事，你只要用心去做了，将它做好，无论结果如何，你都不会留有遗憾的。
【愚公系列】软考高级-架构设计师 045-决策支持系统DSS
时光隧道
04-29 3万+
决策支持系统（DSS）是一种信息系统，旨在帮助决策者在复杂问题或未结构化问题中做出决策。它结合了数据、模型、分析工具和用户界面，以提供决策所需的信息和支持。DSS可以针对不同的决策场景提供多种功能和工具，包括数据查询和分析、模型建立和模拟、可视化展示、假设测试等。
C#课程设计----------C#学生成绩管理系统
程序员小R的博客
12-17 2万+
课设不用愁 C#学生成绩管理系统 学生选课及成绩查询系统是一个学校不可缺少的部分，传统的人工管理档案的方式存在着很多的缺点，如：效率低、保密性差等，所以开发一套综合教务系统管理软件很有必要，它应该具有传统的手工管理所无法比拟的优点，如：检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大的提高学校的管理效率，有助于推进学校的信息化建设。 1.首先来看下总体结构（...
SpringBoot2整合ElasticSearch(包含ElasticSearch入门+spring-boot-starter-data-elasticsearch)
★【World Of Moshow 郑锴】★
07-22 6851
作为互联网热点知识的ElasticSearch，怎能不学。如果你有空余时间，欢迎入门；如果你没空余时间，也欢迎走马观花看一眼。走过如果不要错过，这是一篇自我感觉相对对入门者来说比较全面的文章了，希望对大家有帮助，有什么疑问或者建议欢迎留言讨论。
8255控制交通灯实验 c语言 main,单片机8255控制交通灯实验.doc
weixin_42122306的博客
05-19 2891
单片机8255控制交通灯实验集 美 大 学计 算 机 工 程 学 院实 验 报 告课程名称单片机原理、接口及应用实验名称8255控制交通灯实验实验类型设计型姓名学号日期地点成绩教师评语：1.实验目的与要求了解8255芯片的工作原理，熟悉其初始化编程方法以及输入、输出程序设计技巧。学会使用8255并行接口芯片实现各种控制功能，如本实验(控制交通灯)等。熟悉8255内部结构与单片机的接口逻辑，熟悉82...
前言及汇编（30小时精通C++和外挂实战）
qq_44870829的博客
07-22 1030
对C++疑惑C++学习意义何在？什么地方能用到C++主要内容C++（只学习核心语法，面向有基础的人）语法通过反汇编窥探底层Windows编程项目实战（X86汇编、植物大战僵尸外挂）If-else和switch那个效率高（直接看汇编代码）引用的本质是什么？多态\需函数的实现原理是什么？函数（方法）的函数、局部变量在内存中是如何布局的？看一下植物大战僵尸的外挂功能1，打开外挂程序，程序监控是否打开游戏，若无，当中内容无法点击。
qt练习控件label控件-lineEdit控件样例代码
07-30
qt练习控件label控件-lineEdit控件样例代码
【JCR一区级】麻雀搜索算法SSA-CNN-LSTM-Attention故障诊断分类预测【含源码 5689期】.zip
07-30
CSDN海神之光上传的全部代码均可运行，亲测可用，直接替换数据即可，适合小白； 1、代码压缩包内容 主函数：Main .m； 数据； 调用函数：其他m文件；无需运行 运行结果效果图； 2、代码运行版本 Matlab 2019b；若运行有误，根据提示修改；若不会，可私信博主； 3、运行操作步骤 步骤一：将所有文件放到Matlab的当前文件夹中； 步骤二：双击打开除Main.m的其他m文件； 步骤三：点击运行，等程序运行完得到结果； 4、仿真咨询 如需其他服务，可私信博主或扫描博主博客文章底部QQ名片； 4.1 CSDN博客或资源的完整代码提供 4.2 期刊或参考文献复现 4.3 Matlab程序定制 4.4 科研合作 智能优化算法-CNN-LSTM-Attention分类系列程序定制或科研合作方向： 4.4.1 遗传算法GA/蚁群算法ACO-CNN-LSTM-Attention分类 4.4.2 粒子群算法PSO/蛙跳算法SFLA-CNN-LSTM-Attention分类 4.4.3 灰狼算法GWO/狼群算法WPA-CNN-LSTM-Attention分类 4.4.4 鲸鱼算法WOA/麻雀算法SSA-CNN-LSTM-Attention分类 4.4.5 萤火虫算法FA/差分算法DE-CNN-LSTM-Attention分类
详解MATLAB Simulink通信系统建模与仿真
07-30
第1 章 MATLAB 基础与通信系统仿真 1.1 MATLAB 简介 1.2 MATLAB 程序设计 1.3 通信系统仿真 第2 章 Simulink 仿真基础 2.1 Simulink 简介 2.2 Simulink 工作环境 2.3 Simulink 仿真的基本方法 2.4 创建自己的模块库 2.5 S-函数的编写 第3 章 通信信号与系统分析 3.1 离散信号和系统 3.2 Fourier 分析 3.3 带通信号的低通等效 3.4 随机信号分析 第4 章 信道 4.1 加性高斯白噪声信道 4.2 多径衰落信道 第5 章 模拟调制 5.1 幅度调制 5.2 角度调制 第6 章 数字基带传输 6.1 概述 6.2 二进制基带信号传输 6.3 基带PAM 信号传输 6.4 带限信道的信号传输 第7 章 数字信号载波传输 7.1 概述 7.2 载波幅度调制（PAM） 7.3 载波相位调制（PSK） 7.4 正交幅度调制（QAM） 7.5 载波频率调制（FSK） 第8 章 信道编码和交织 8.1 概述 8.2 线性分组码
SCI一区】淘金算法GRO-CNN-BiLSTM-Mutilhead-Attention多变量时序预测含源码 5642.zip
07-30
CSDN海神之光上传的全部代码均可运行，亲测可用，直接替换数据即可，适合小白； 1、代码压缩包内容 主函数：Main .m； 数据； 调用函数：其他m文件；无需运行 运行结果效果图； 2、代码运行版本 Matlab 2019b；若运行有误，根据提示修改；若不会，可私信博主； 3、运行操作步骤 步骤一：将所有文件放到Matlab的当前文件夹中； 步骤二：双击打开除Main.m的其他m文件； 步骤三：点击运行，等程序运行完得到结果； 4、仿真咨询 如需其他服务，可私信博主或扫描博主博客文章底部QQ名片； 4.1 CSDN博客或资源的完整代码提供 4.2 期刊或参考文献复现 4.3 Matlab程序定制 4.4 科研合作 智能优化算法-CNN-BiLSTM-Mutilhead-Attention回归预测系列程序定制或科研合作方向： 4.4.1 遗传算法GA/蚁群算法ACO-CNN-BiLSTM-Mutilhead-Attention回归预测 4.4.2 粒子群算法PSO/蛙跳算法SFLA-CNN-BiLSTM-Mutilhead-Attention回归预测 4.4.3 灰狼算法GWO/狼群算法WPA-CNN-BiLSTM-Mutilhead-Attention回归预测 4.4.4 鲸鱼算法WOA/麻雀算法SSA-CNN-BiLSTM-Mutilhead-Attention回归预测 4.4.5 萤火虫算法FA/差分算法DE-CNN-BiLSTM-Mutilhead-Attention回归预测
2020年首届“洪泽湖杯”中国人工智能掼蛋算法大赛第8名我就是掼蛋.zip
07-30
毕业设计是高等教育阶段学生完成学业的一个重要环节，通常在学士或硕士学业即将结束时进行。这是学生将在整个学业中所学知识和技能应用到实际问题上的机会，旨在检验学生是否能够独立思考、解决问题，并展示其专业能力的一项综合性任务。 毕业设计的主要特点包括： 独立性： 毕业设计要求学生具备独立思考和解决问题的能力。学生需要选择一个合适的课题，研究相关文献，进行实地调查或实验，并提出独立见解。 实践性： 毕业设计是将理论知识应用到实际问题中的一次实践。通过完成毕业设计，学生能够将所学的专业知识转化为实际的解决方案，加深对专业领域的理解。 综合性： 毕业设计往往要求学生运用多个学科的知识，综合各种技能。这有助于培养学生的综合素养，提高他们的综合能力。 导师指导： 学生在毕业设计过程中通常由一名指导老师或导师团队提供指导和支持。导师负责引导学生确定研究方向、制定计划、提供建议，并在整个过程中监督进展。 学术规范： 毕业设计要求学生按照学术规范完成研究，包括文献综述、研究设计、数据采集与分析、结论和讨论等环节。学生需要撰写一篇完整的毕业论文，并进行答辩。
网络音乐搜索引擎，音乐搜索器 - 多站合一音乐搜索,音乐在线试听
最新发布
07-30
网络音乐搜索引擎，音乐搜索器 - 多站合一音乐搜索,音乐在线试听 效果截图https://www.diyiyuanma.cn/3444.html 多站合一音乐搜索解决方案，数据调用的是各网站的API接口， 有的接口并不是开放的，随时可能失效，本项目相关代码仅供参考。 网络音乐搜索引擎，音乐搜索器 - 多站合一音乐搜索,音乐在线试听
这是一个旨在简化合约部署、验证、交互等操作用于生成区块链智能合约Foundry框架指令的 Web3.0开发者工具
07-30
这是一个旨在简化合约部署、验证、交互等操作用于生成区块链智能合约Foundry框架指令的 Web3.0开发者工具。
三种esprit算法实现doa估计 _rezip.zip
07-30
在信号处理领域，DOA（Direction of Arrival）估计是一项关键技术，主要用于确定多个信号源到达接收阵列的方向。本文将详细探讨三种ESPRIT（Estimation of Signal Parameters via Rotational Invariance Techniques）算法在DOA估计中的实现，以及它们在MATLAB环境中的具体应用。 ESPRIT算法是由Paul Kailath等人于1986年提出的，其核心思想是利用阵列数据的旋转不变性来估计信号源的角度。这种算法相比传统的 MUSIC（Multiple Signal Classification）算法具有较低的计算复杂度，且无需进行特征值分解，因此在实际应用中颇具优势。 1. 普通ESPRIT算法 普通ESPRIT算法分为两个主要步骤：构造等效旋转不变系统和估计角度。通过空间平移（如延时）构建两个子阵列，使得它们之间的关系具有旋转不变性。然后，通过对子阵列数据进行最小二乘拟合，可以得到信号源的角频率估计，进一步转换为DOA估计。 2. 常规ESPRIT算法实现 在描述中提到的`common_esprit_method1.m`和`common_esprit_method2.m`是两种不同的普通ESPRIT算法实现。它们可能在实现细节上略有差异，比如选择子阵列的方式、参数估计的策略等。MATLAB代码通常会包含预处理步骤（如数据归一化）、子阵列构造、旋转不变性矩阵的建立、最小二乘估计等部分。通过运行这两个文件，可以比较它们在估计精度和计算效率上的异同。 3. TLS_ESPRIT算法 TLS（Total Least Squares）ESPRIT是对普通ESPRIT的优化，它考虑了数据噪声的影响，提高了估计的稳健性。在TLS_ESPRIT算法中，不假设数据噪声是高斯白噪声，而是采用总最小二乘准则来拟合数据。这使得算法在噪声环境下表现更优。`TLS_esprit.m`文件应该包含了TLS_ESPRIT算法的完整实现，包括TLS估计的步骤和旋转不变性矩阵的改进处理。 在实际应用中，选择合适的ESPRIT变体取决于系统条件，例如噪声水平、信号质量以及计算资源。通过MATLAB实现，研究者和工程师可以方便地比较不同算法的效果，并根据需要进行调整和优化。同时，这些代码也为教学和学习DOA估计提供了一个直观的平台，有助于深入理解ESPRIT算法的工作原理。
STAR ES598PCI单板机简易计算器设计
"该资源是一份关于简易计算器系统设计的课程设计报告，旨在利用STAR ES598PCI单板机和相关接口芯片构建一个能够执行2位数四则运算的计算器。报告由合肥学院计算机科学与技术系的学生孟志华完成，指导教师为张向东...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值