CRÉATION D'UN CADRE SIMPLE (MODE GRAPHIQUE)

;   +--------------------------------------------+
;  /                ASSEMBLEUR                    \
;  |            ------------------                |
;  |                                              |
;  |  par Benjamin DUPLEX  (Tripo)                |
;  |  le 25/01/2005                               |
;  |  > benjamin.du@wanadoo.fr                    |
;  |                                              |
;  |                                              |
;  |  * COMPILATEUR : NASM 0.98                   |
;  |  * VERSION : Windows                         |
;  |                                              |
;  |  * COMPILATION :                             |
;  |    nasm Cadre.asm -o Cadre.com               |
;  |                                              |
;  |  * LANCEMENT :                               |
;  |    Cadre.com                                 |
;  |                                              |
;  \+--------------------------------------------+/


; NOTE :
; ======
; Pour quitter le programme, vous n'avez qu'à appuyer sur une touche




bits 16						; programme 16 bits
[ORG 100h]					; commence à l'adresse 0x100 (.com)

[SECTION .data]					; zone de déclarations des constantes

	messageQuit db 'Au revoir',13,10,'$'	; msg utilisé lors de la fermeture du programme



[SECTION .text]					; zone de code du programme

	CALL	.MODE_AFF_MODE_GRAPH		; passage en mode graphique
	CALL	.CADRE				; affichage du cadre
	CALL	.TOUCHE				; attente d'une touche
	CALL	.MODE_AFF_MODE_TEXT		; passage en mode text
	MOV	DX, messageQuit
	CALL	.AFFICHAGE_MSG			; affichage du message à l'écran
	CALL	.QUIT				; quitte le programme




;  ------------------------------------------------------------
;	FONCTION QUI AFFICHE UN CADRE
;  ------------------------------------------------------------

.CADRE:
	MOV	AL, 90				; couleur du cadre

	; première ligne verticale (à gauche)
	MOV	BX, 0				; point de départ
	MOV	CX, 200				; point d'arrivé
	MOV	SI, 0				; colonne choisie
	MOV	DX, 0				; trait vertical
	CALL	.AFF_TRAIT			; affichage du trait

	; deuxième ligne verticale (à droite)
	MOV	BX, 0				; point de départ
	MOV	CX, 200				; point d'arrivé
	MOV	SI, 319				; colonne choisie
	MOV	DX, 0				; trait vertical
	CALL	.AFF_TRAIT			; affichage du trait

	; première ligne horizontale (en haut)
	MOV	BX, 0				; point de départ
	MOV	CX, 319				; point d'arrivé
	MOV	SI, 0				; ligne choisie
	MOV	DX, 1				; trait horizontal
	CALL	.AFF_TRAIT			; affichage du trait

	; deuxième ligne horizontale (en bas)
	MOV	BX, 0				; point de départ
	MOV	CX, 319				; point d'arrivé
	MOV	SI, 199				; ligne choisie
	MOV	DX, 1				; trait horizontal
	CALL	.AFF_TRAIT			; affichage du trait

	RET




;  ------------------------------------------------------------
;	FONCTION QUI AFFICHE UN TRAIT EN FONCTION DES PARAMETRES
;
;	-> BX : point de départ
;	-> CX : point d'arrivé
;	-> SI : ligne/colonne choisie
;	-> DX : vertical/horizontal
;
; 	APPEL LA FONCTION CONCERNEE SUIVANT DX
;  ------------------------------------------------------------

.AFF_TRAIT:
	CMP	DX, 0				; on compare DX à 0
	JZ	.AFF_TRAIT_VERTICAL		; si DX = 0 alors on affiche un trait vertical
	JNZ	.AFF_TRAIT_HORIZONTAL		; sinon on affiche un trait horizontal
	RET




;  ------------------------------------------------------------
;	FONCTION QUI AFFICHE UN TRAIT VERTICAL EN 
;	FONCTION DES PARAMETRES
;
;	-> BX : point de départ
;	-> CX : point d'arrivé
;	-> SI : ligne/colonne choisie
;	-> DX : vertical/horizontal
;
;  ------------------------------------------------------------

.AFF_TRAIT_VERTICAL:
	SUB	CX, BX				; calcul de la longueur du trait (arrivé - départ)
	MOV	DX, BX				; on place le curseur au premier point du trait
  .BOUCLE_TV:
	PUSH	CX				; on place la longueur restante à écrire en mémoire
	MOV	CX, SI				; on met dans DX la colonne choisie
	CALL	.AFF_POINT			; affichage du point
	INC	DX				; point suivant
	POP	CX				; on retire la longueur du trait qu'il reste à écrire de la mémoire
	DEC	CX				; on la décrémente (car on vient d'écrire un point)
	CMP	CX, 0				; on la compare à 0
	JNZ	.BOUCLE_TV			; si CX <> 0, alors on boucle
	RET					; sinon on quitte




;  ------------------------------------------------------------
;	FONCTION QUI AFFICHE UN TRAIT HORIZONTAL EN 
;	FONCTION DES PARAMETRES
;
;	-> BX : point de départ
;	-> CX : point d'arrivé
;	-> SI : ligne/colonne choisie
;	-> DX : vertical/horizontal
;
;  ------------------------------------------------------------

.AFF_TRAIT_HORIZONTAL:
	SUB	CX, BX				; calcul de la longueur du trait (arrivé - départ)
	MOV	DX, CX				; met dans DX la valeur de CX
	MOV	CX, BX				; on place le curseur au premier point du trait
  .BOUCLE_TH:
	PUSH	DX				; on place la longueur restante à écrire en mémoire
	MOV	DX, SI				; on met dans DX la ligne choisie
	CALL	.AFF_POINT			; affichage du point
	INC	CX				; point suivant
	POP	DX				; on retire la longueur du trait qu'il reste à écrire de la mémoire
	DEC	DX				; on la décrémente (car on vient d'écrire un point)
	CMP	DX, 0				; on la compare à 0
	JNZ	.BOUCLE_TH			; si DX <> 0, alors on boucle
	RET					; sinon on quitte


.AFF_POINT:
	MOV	AH, 0Ch				; fonction 0Ch
	INT	10h				; interruption 10h (BIOS)
	RET




;  ------------------------------------------------------------
;	FONCTION PERMETTANT DE METTRE L'ECRAN EN MODE GRAPHIQUE
;		-> 320x200x256
;  ------------------------------------------------------------

.MODE_AFF_MODE_GRAPH:
    	MOV	AX, 0013h  			; fonction 00h -> sous-fonction 13h (320x200)
	INT	10h				; interruption 10h (BIOS)
	RET




;  ------------------------------------------------------------
;	FONCTION PERMETTANT DE METTRE L'ECRAN EN MODE TEXTE
;		-> 80x25
;  ------------------------------------------------------------

.MODE_AFF_MODE_TEXT:
    	MOV	AX, 0003h  			; fonction 00h -> sous-fonction 03h (80x25)
	INT	10h				; interruption 10h (BIOS)
	RET




;  ------------------------------------------------------------
;	FONCTION QUI AFFICHE SE QUI SE TROUVE DANS LE REGISTRE
;	DX
;  ------------------------------------------------------------

.AFFICHAGE_MSG:
	MOV	AH, 09h				; fonction 09h (affichage d'une chaine de caractère)
	INT	21h				; interruption 21h (DOS)
	RET




;  ------------------------------------------------------------
;	FONCTION QUI ATTEND UNE TOUCHE
;  ------------------------------------------------------------

.TOUCHE:
	MOV	AH, 01h				; fonction 01h (lecture d'une touche)
	INT	21h        			; interruption 21h (DOS)
	RET



;  ------------------------------------------------------------
;	FONCTION QUI REND LA MAIN AU DOS
;  ------------------------------------------------------------

.QUIT:
	MOV	AX, 4C00h 			; fonction 4Ch (rend la main au DOS)
						; 00h correspond au code 'aucune erreur' et est retourné au programme appelant
	INT	21h				; interruption 21h (DOS)