LISTING5.TXT: Difference between revisions
Jump to navigation
Jump to search
Olivier.jan (talk | contribs) (Replacing content of with translated version) Tag: Removed redirect |
Olivier.jan (talk | contribs) mNo edit summary |
||
Line 55: | Line 55: | ||
</pre> |
</pre> |
||
Back to [[ASM_Tutorial]] |
Back to [[ASM_Tutorial]] |
||
− | [[Category: 68000 |
+ | [[Category: 68000 ASSEMBLY ON ATARI ST Part 1 ]] |
Latest revision as of 01:00, 17 December 2023
********************************************************************** * * * 68000 ASSEMBLER COURSE ON ATARI ST * * * * by The Fierce Rabbit (from 44E) * * * * Second series * * * * Listing number 5 * ********************************************************************** INCLUDE "B:\START.S" MOVE.L #MESSAGE,-(SP) hello and clear screen MOVE.W #9,-(SP) TRAP #1 ADDQ.L #6,SP DC.W $A000 line A initialization MOVE.W #1,24(A0) foreground color CLR.W 26(A0) background color MOVE.W #2,36(A0) display type 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) motif address MOVE.W #3,50(A0) number of motif words (-1) CLR.W 54(A0) no clipping DC.W $A005 call to function MOVE.W #7,-(SP) wait for key press TRAP #1 ADDQ.L #4,SP MOVE.W #0,-(SP) and bye bye TRAP #1 *---------------------------------------* SECTION DATA MESSAGE DC.B 27,"E","Rectangle tracing with line A",0 EVEN * Pattern, in .W I wrote it in binary to see the design better.* 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