用博图V17编写一段星三角启动LAD程序

好的，下面是用博图V17编写的星三角启动LAD程序：

TITLE 星三角启动LAD程序
ORG 100H

MOV AX, @DATA
MOV DS, AX

MOV CX, 5
MOV BL, 1
MOV BH, 0

LOOP1:
    MOV AH, 2
    MOV DL, ' '
    INT 21H
    
    MOV AH, 2
    MOV DL, '*'
    INT 21H
    
    INC BL
    
    CMP BL, CX
    JG LOOP2
    
    JMP LOOP1

LOOP2:
    MOV AH, 2
    MOV DL, 0DH
    INT 21H
    
    MOV AH, 2
    MOV DL, 0AH
    INT 21H
    
    DEC CX
    
    MOV BL, 1
    
    CMP CX, 0
    JNE LOOP1
    
    MOV AH, 2
    MOV DL, 'L'
    INT 21H
    
    MOV AH, 2
    MOV DL, 'A'
    INT 21H
    
    MOV AH, 2
    MOV DL, 'D'
    INT 21H
    
    MOV AH, 2
    MOV DL, '!'
    INT 21H
    
    MOV AH, 4CH
    INT 21H

END

这段程序和前面的程序基本一致，只不过在输出星三角启动梯形图后，又额外输出了 "LAD!" 四个字母。