LIST 1 7.TXT/fr: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
Olivier.jan (talk | contribs) (Replacing content with updated version) |
||
(2 intermediate revisions by 2 users not shown) | |||
Line 1: | Line 1: | ||
+ | {{Languages|LIST 1 7.TXT}} |
||
<pre> |
<pre> |
||
****************************************************************** |
****************************************************************** |
||
Line 4: | Line 5: | ||
* COURS D'ASSEMBLEUR 68000 SUR ATARI ST * |
* COURS D'ASSEMBLEUR 68000 SUR ATARI ST * |
||
* * |
* * |
||
− | * par Le |
+ | * par Le Féroce Lapin (from 44E) * |
* * |
* * |
||
− | * Listing |
+ | * Listing numéro 1 / Cours numéro 7 * |
* * |
* * |
||
****************************************************************** |
****************************************************************** |
||
DEBUT MOVE.L #MENU,-(SP) passe adresse phrase |
DEBUT MOVE.L #MENU,-(SP) passe adresse phrase |
||
− | MOVE.W #9,-(SP) |
+ | MOVE.W #9,-(SP) numéro fonction |
TRAP #1 appel Gemdos |
TRAP #1 appel Gemdos |
||
ADDQ.L #6,SP correction pile |
ADDQ.L #6,SP correction pile |
||
* attente appui touche |
* attente appui touche |
||
− | MOVE.W #7,-(SP) fonction |
+ | MOVE.W #7,-(SP) fonction numéro 7 |
TRAP #1 du gemdos |
TRAP #1 du gemdos |
||
ADDQ.L #2,SP correction pile |
ADDQ.L #2,SP correction pile |
||
− | * test du |
+ | * test du résultat |
CMP.W #"Q",D0 q majuscule ? |
CMP.W #"Q",D0 q majuscule ? |
||
BEQ QUITTER oui, bye bye |
BEQ QUITTER oui, bye bye |
||
Line 29: | Line 30: | ||
CMP.W #"v",D0 V minuscule ? |
CMP.W #"v",D0 V minuscule ? |
||
BNE DEBUT non. On a donc une autre lettre |
BNE DEBUT non. On a donc une autre lettre |
||
− | * comme |
+ | * comme réponse. Ce n'est pas valable donc on recommence au début |
AFFICHAGE MOVE.L #MESSAGE,-(SP) adresse de 'coucou' |
AFFICHAGE MOVE.L #MESSAGE,-(SP) adresse de 'coucou' |
||
− | MOVE.W #9,-(SP) |
+ | MOVE.W #9,-(SP) numéro fonction |
TRAP #1 appel Gemdos |
TRAP #1 appel Gemdos |
||
ADDQ.L #6,SP correction pile |
ADDQ.L #6,SP correction pile |
||
Line 39: | Line 40: | ||
TRAP #1 |
TRAP #1 |
||
ADDQ.L #2,SP |
ADDQ.L #2,SP |
||
− | BRA DEBUT retour au |
+ | BRA DEBUT retour au début |
QUITTER MOVE.W #0,-(SP) |
QUITTER MOVE.W #0,-(SP) |
Latest revision as of 00:36, 17 December 2023
****************************************************************** * * * COURS D'ASSEMBLEUR 68000 SUR ATARI ST * * * * par Le Féroce Lapin (from 44E) * * * * Listing numéro 1 / Cours numéro 7 * * * ****************************************************************** DEBUT MOVE.L #MENU,-(SP) passe adresse phrase MOVE.W #9,-(SP) numéro fonction TRAP #1 appel Gemdos ADDQ.L #6,SP correction pile * attente appui touche MOVE.W #7,-(SP) fonction numéro 7 TRAP #1 du gemdos ADDQ.L #2,SP correction pile * test du résultat CMP.W #"Q",D0 q majuscule ? BEQ QUITTER oui, bye bye CMP.W #"q",D0 q minuscule ? BEQ QUITTER oui, bye bye CMP.W #"V",D0 v majuscule ? BEQ AFFICHAGE oui -> affiche le message CMP.W #"v",D0 V minuscule ? BNE DEBUT non. On a donc une autre lettre * comme réponse. Ce n'est pas valable donc on recommence au début AFFICHAGE MOVE.L #MESSAGE,-(SP) adresse de 'coucou' MOVE.W #9,-(SP) numéro fonction TRAP #1 appel Gemdos ADDQ.L #6,SP correction pile * On attend un appui sur une touche pour contempler MOVE.W #7,-(SP) TRAP #1 ADDQ.L #2,SP BRA DEBUT retour au début QUITTER MOVE.W #0,-(SP) TRAP #1 SECTION DATA MENU DC.B 27,"E",27,"p" DC.B "QUITTER (Q) OU VOIR LE MESSAGE (V) ?" DC.B 27,"q",13,10,0 EVEN MESSAGE DC.B "COUCOU",0
Back to ASM_Tutorial