Difference between revisions of "LIST 1 7.TXT"
(Created page with "<pre> **************************************************************************** * * * CO...") |
m (2 revisions imported) |
||
| (One intermediate revision by one other user not shown) | |||
| Line 1: | Line 1: | ||
<pre> | <pre> | ||
| − | + | ****************************************************************** | |
| − | * | + | * * |
| − | * | + | * 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 | ||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
</pre> | </pre> | ||
Back to [[ASM_Tutorial]] | Back to [[ASM_Tutorial]] | ||
[[Category: ASSEMBLEUR 68000 sur ATARI ST Part 1 ]] | [[Category: ASSEMBLEUR 68000 sur ATARI ST Part 1 ]] | ||
Latest revision as of 01:00, 4 June 2018
******************************************************************
* *
* 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
