DATA  SEGMENT
         SIN  DB        1,2,4,7,12,17,24,31,40,50,60,71,82,95,107,120,132,145,157
              DB        170,181,193,203,213,222,230,237,243,248,252,254,255,255,254
              DB        251,247,242,236,229,221,212,202,191,179,168,155,143,130,117
              DB        105,92,80,69,58,48,38,30,22,16,11,7,4,2,1
        OVER  DB        'show over?',0DH,0AH,'$'
        DATA  ENDS

        CODE  SEGMENT
              ASSUME    CS:CODE,DS:DATA
      START:
              MOV       AX,DATA
              MOV       DS,AX
   
              MOV       DX,0C410H

              MOV       AL,0        ;產生鋸齒波
         P1:  OUT       DX,AL
              INC       AL
              CMP       AL,0FFH
              JNZ       P1
 
              MOV       AL,0        ;產生三角波
         P2:  OUT       DX,AL
              INC       AL
              CMP       AL,0FFH
              JNZ       P2
        P22:  OUT       DX,AL
              DEC       AL
              CMP       AL,0
              JNZ       P22

              MOV       BX,OFFSET SIN           ;產生正弦波
              MOV       SI,0
         P3:  MOV       AL,[BX+SI]
              OUT       DX,AL
              INC       SI
              CMP       SI,65
              JNZ       P3

       EXIT:  MOV       DX,OFFSET OVER          ;停止轉換，等待輸入
              MOV       AH,09H
              INT       21H         ;顯示結束語句

              MOV       AH,4CH
              INT       21H
              
        CODE  ENDS
              END       START