¿Cómo puedo dibujar un triángulo vertical de asteriscos, también conocido como estrellas?

Dec 15 2020

Soy un estudiante de licenciatura en informática y quería saber cómo cambiar este código ensamblador con el gotoxy x,ycomando para mostrar las estrellas en la salida como se muestra en la imagen de abajo.

nextline macro
    mov ah,2
    mov dl,13
    int 21h
    mov dl,10
    int 21h
endm

gotoxy macro x,y
     mov dl,x
     mov dh,y
     mov bh,0
     mov ah,2
     int 10h
endm
.MODEL SMALL
 .STACK 64

 .DATA
   msg1  DB  'Enter a number : $' msg2 DB 'Wrong number!!$'
   n     db  ?
   x     db  0
   y     db  0

 .CODE
   MAIN:
     MOV AX, @DATA             
     MOV DS, AX
l3:
     LEA DX, msg1           
     MOV AH, 9
     INT 21H

     MOV AH, 1                
     INT 21H
     cmp al,'1'
     jl  l4 
     cmp al,'9'
     jg  l4
     jmp l5  
     
l4:  nextline
     LEA DX, msg2           
     MOV AH, 9
     INT 21H 
     nextline
     jmp l3 

l5:  sub al,'0'
     mov n,al

     mov cl,1 
l1:  
     mov ch,1
l2:

     mov al,n
     sub al,ch
     mov x,al
     mov y,cl
     gotoxy x,y      
     mov dl,'*'
     mov ah,2
     int 21h
     inc ch
     cmp ch,cl
     jle l2

     inc cl
     cmp cl,n
     jle l1     

          
     MOV AH, 4CH                 
     INT 21H

END MAIN

Respuestas

3 SepRoland Dec 15 2020 at 05:30

Ayuda si haces una tabla con lo que quieres ver en la pantalla:

fila sangría asteriscos
1 4 1
2 3 3
3 2 5
4 1 7
5 0 9

y luego ver la regularidad de todo y cómo producir los números sabiendo que n=5:

fila sangría asteriscos
1 4 = (n - 1) 1 = (1 + 1) - 1
2 3 = (n - 2) 3 = (2 + 2) - 1
3 2 = (n - 3) 5 = (3 + 3) - 1
4 1 = (n - 4) 7 = (4 + 4) - 1
5 0 = (n - 5) 9 = (5 + 5) - 1
fila n - fila fila + fila - 1
     mov cl, 1     ; Row from 1 to 5
T1:
     mov al, n     ; Indentation AL = (n - row)
     sub al, cl
     mov x, al     ; \
     mov y, cl     ; |
     gotoxy x,y    ; / This could easily become "GOTOXY AL, CL",
                   ;   no longer needing the x and y variables
     mov dl, '*'
     mov bl, cl    ; Number of asterisks BL = (row + row - 1)
     add bl, cl
     dec bl
T2:
     mov ah, 02h   ; DOS.PrintCharacter
     int 21h
     dec bl
     jnz T2

     inc cl        ; Next row
     cmp cl, n
     jbe T1