LIST 3 7.TXT/fr: Difference between revisions
Jump to navigation
Jump to search
(Created page with "<pre> **************************************************************************** * * * CO...") |
No edit summary |
||
| Line 4: | Line 4: | ||
* 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 3 / Cours num�ro 7 * |
* * |
* * |
||
**************************************************************************** |
**************************************************************************** |
||
| − | * Efface l' |
+ | * Efface l'�cran en affichant escape+E avec gemdos 9 |
MOVE.L #CLS,-(SP) |
MOVE.L #CLS,-(SP) |
||
MOVE.W #9,-(SP) |
MOVE.W #9,-(SP) |
||
| Line 19: | Line 19: | ||
PROCHAINE MOVE.B #255,LETTRE initialise la lettre |
PROCHAINE MOVE.B #255,LETTRE initialise la lettre |
||
ADD.B #1,COLONE et change de colone |
ADD.B #1,COLONE et change de colone |
||
| − | MOVE.B (A6)+,D6 |
+ | MOVE.B (A6)+,D6 pr�l�ve une lettre et pointe la suivante |
| − | CMP.B #0,D6 fin du text |
+ | CMP.B #0,D6 fin du text � afficher ? |
BEQ FIN oui -> fin |
BEQ FIN oui -> fin |
||
| Line 28: | Line 28: | ||
ADDQ.L #6,SP |
ADDQ.L #6,SP |
||
| − | CMP.B LETTRE,D6 cette lettre c' |
+ | CMP.B LETTRE,D6 cette lettre c'�tait la bonne ? |
| − | BEQ PROCHAINE oui donc on passe |
+ | BEQ PROCHAINE oui donc on passe � la suivante |
SUB.B #1,LETTRE non donc on recommence |
SUB.B #1,LETTRE non donc on recommence |
||
Revision as of 15:04, 23 November 2023
**************************************************************************** * * * COURS D'ASSEMBLEUR 68000 SUR ATARI ST * * * * par Le F�roce Lapin (from 44E) * * * * Listing num�ro 3 / Cours num�ro 7 * * * **************************************************************************** * Efface l'�cran en affichant escape+E avec gemdos 9 MOVE.L #CLS,-(SP) MOVE.W #9,-(SP) TRAP #1 ADDQ.L #6,SP MOVEA.L #TXT_FINAL,A6 adresse du txt_final dans A6 PROCHAINE MOVE.B #255,LETTRE initialise la lettre ADD.B #1,COLONE et change de colone MOVE.B (A6)+,D6 pr�l�ve une lettre et pointe la suivante CMP.B #0,D6 fin du text � afficher ? BEQ FIN oui -> fin AFFICHAGE MOVE.L #TXT,-(SP) affiche la lettre MOVE.W #9,-(SP) gemdos 9 car la lettre est incluse TRAP #1 dans un phrase (escape+Y...) ADDQ.L #6,SP CMP.B LETTRE,D6 cette lettre c'�tait la bonne ? BEQ PROCHAINE oui donc on passe � la suivante SUB.B #1,LETTRE non donc on recommence BRA AFFICHAGE FIN MOVE.W #7,-(SP) attend un appui sur une touche TRAP #1 ADDQ.L #2,SP MOVE.W #0,-(SP) et bye bye! TRAP #1 *----------------------------------------------* SECTION DATA CLS DC.B 27,"E",0 EVEN TXT DC.B 27,"Y",42 COLONE DC.B 42 LETTRE DC.B 0,0 TXT_FINAL DC.B "FEROCE LAPIN",0
Back to ASM_Tutorial