1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40
| MonProg SEGMENT
ORG 100h
ASSUME CS:MonProg
Start: JMP debut
Table DW mess0
DW mess1
DW mess2
DW mess3
mess0 DB 'Ceci est le premier message...$'
mess1 DB 'Bonjour, comment allez-vous ?$'
mess2 DB 'bienvenue en France...','$'
mess3 DB 'ce message émet un beep', 07h,'$'
WRITEMNO PROC NEAR
PUSH BX,
PUSH AX,
MOV AH,0
SHL AX,1 ;multiplie le num. de message par 2 ; pour obtenir un offset dans la table
MOVE BX, OFFSET Table
ADD BX,AX
MOV DX, [BX]
MOV AH,09
INT 21h
POP AX
POP BX
RET
WRITEMNO ENDP
Debut: MOV AL,0
CALL WRITEMNO
MOV AL,1
CALL WRITEMNO
INT 20h
MonProg ENDS
END Start |
Partager