LISTING5.TXT/fr: Difference between revisions

From Atari Wiki
Jump to navigation Jump to search
No edit summary
(Replacing content with updated version)
 
(2 intermediate revisions by 2 users not shown)
Line 1: Line 1:
  +
{{Languages|LISTING5.TXT}}
 
<pre>
 
<pre>
 
**********************************************************************
 
**********************************************************************
Line 4: Line 5:
 
* COURS D'ASSEMBLEUR 68000 SUR ATARI ST *
 
* COURS D'ASSEMBLEUR 68000 SUR ATARI ST *
 
* *
 
* *
* par Le F�roce Lapin (from 44E) *
+
* par Le Féroce Lapin (from 44E) *
 
* *
 
* *
* Seconde s�rie *
+
* Seconde série *
 
* *
 
* *
* Listing num�ro 5 *
+
* Listing numéro 5 *
 
**********************************************************************
 
**********************************************************************
   
 
INCLUDE "B:\START.S"
 
INCLUDE "B:\START.S"
   
MOVE.L #MESSAGE,-(SP) coucou et efface �cran
+
MOVE.L #MESSAGE,-(SP) coucou et efface écran
 
MOVE.W #9,-(SP)
 
MOVE.W #9,-(SP)
 
TRAP #1
 
TRAP #1
Line 30: Line 31:
 
MOVE.W #3,50(A0) nombre de mots du motif (-1)
 
MOVE.W #3,50(A0) nombre de mots du motif (-1)
 
CLR.W 54(A0) pas de clipping
 
CLR.W 54(A0) pas de clipping
DC.W $A005 appel la fonction
+
DC.W $A005 appel à la fonction
   
 
MOVE.W #7,-(SP) attente appui touche
 
MOVE.W #7,-(SP) attente appui touche
Line 41: Line 42:
 
MESSAGE DC.B 27,"E","Tracage de rectangle avec ligne A",0
 
MESSAGE DC.B 27,"E","Tracage de rectangle avec ligne A",0
 
EVEN
 
EVEN
* Motif, en .W Je l'ai �crit en binaire pour mieux voir le dessin.*
+
* Motif, en .W Je l'ai écrit en binaire pour mieux voir le dessin.*
 
MOTIF DC.W %1100110011001100
 
MOTIF DC.W %1100110011001100
 
DC.W %1100110011001100
 
DC.W %1100110011001100
Line 51: Line 52:
 
PILE DS.L 1
 
PILE DS.L 1
 
END
 
END
  +
 
</pre>
 
</pre>
 
Back to [[ASM_Tutorial]]
 
Back to [[ASM_Tutorial]]

Latest revision as of 00:53, 17 December 2023

**********************************************************************
*                                                                    *
*               COURS D'ASSEMBLEUR 68000 SUR ATARI ST                *
*                                                                    *
*                   par Le Féroce Lapin (from 44E)                   *
*                                                                    *
*                           Seconde série                            *
*                                                                    *
*                         Listing  numéro 5                          *
**********************************************************************

         INCLUDE   "B:\START.S"

         MOVE.L    #MESSAGE,-(SP)    coucou et efface écran
         MOVE.W    #9,-(SP)
         TRAP      #1
         ADDQ.L    #6,SP

         DC.W      $A000             initialisation ligne A

         MOVE.W    #1,24(A0)         couleur du premier plan
         CLR.W     26(A0)            couleur du second
         MOVE.W    #2,36(A0)         type d'affichage
         MOVE.W    #50,38(A0)        X1
         MOVE.W    #50,40(A0)        Y1
         MOVE.W    #200,42(A0)       X2
         MOVE.W    #300,44(A0)       Y2
         MOVE.L    #MOTIF,46(A0)     adresse du motif
         MOVE.W    #3,50(A0)         nombre de mots du motif (-1)
         CLR.W     54(A0)            pas de clipping
         DC.W      $A005             appel à la fonction

         MOVE.W    #7,-(SP)          attente appui touche
         TRAP      #1
         ADDQ.L    #4,SP
         MOVE.W    #0,-(SP)          et bye bye
         TRAP      #1
*---------------------------------------*
         SECTION DATA
MESSAGE  DC.B      27,"E","Tracage de rectangle avec ligne A",0
         EVEN
* Motif, en .W Je l'ai écrit en binaire pour mieux voir le dessin.*
MOTIF    DC.W      %1100110011001100
         DC.W      %1100110011001100
         DC.W      %0011001100110011
         DC.W      %0011001100110011

         SECTION BSS
         DS.L      100
PILE     DS.L      1
         END

Back to ASM_Tutorial