Iterators: Difference between revisions

Content added Content deleted
No edit summary
Line 27: Line 27:
.loop:
.loop:
LEA Days_Of_The_Week,A0
LEA Days_Of_The_Week,A0
LEA Colors,A1
MOVE.W D1,D2
MOVE.W D1,D2
LSL.W #2,D2
LSL.W #2,D2
MOVEA.L (A0,D2),A3
MOVEA.L (A0,D2),A3
JSR PrintString ;unimplemented hardware-dependent printing routine
JSR PrintString ;unimplemented hardware-dependent printing routine
MOVEA.L (A1,D2),A3
JSR PrintString
ADDQ.W #1,D1
ADDQ.W #1,D1
DBRA D7,.loop
DBRA D7,.loop
Line 36: Line 39:
Part2:
Part2:
LEA Days_Of_The_Week,A0
LEA Days_Of_The_Week,A0
LEA Colors,A1
MOVEA.L (A0),A3
MOVEA.L (A0),A3
JSR PrintString
JSR PrintString
Line 41: Line 45:
JSR PrintString
JSR PrintString
MOVEA.L (16,A0),A3
MOVEA.L (16,A0),A3
JSR PrintString
MOVEA.L (A1),A3
JSR PrintString
MOVEA.L (12,A1),A3
JSR PrintString
MOVEA.L (16,A1),A3
JSR PrintString
JSR PrintString


Part3:
Part3:
LEA Days_Of_The_Week,A0
LEA Days_Of_The_Week,A0
LEA Colors,A1
MOVEA.L (24,A0),A3
MOVEA.L (24,A0),A3
JSR PrintString
JSR PrintString
Line 50: Line 61:
JSR PrintString
JSR PrintString
MOVEA.L (8,A0),A3
MOVEA.L (8,A0),A3
JSR PrintString
MOVEA.L (20,A1),A3
JSR PrintString
MOVEA.L (8,A1),A3
JSR PrintString
MOVEA.L (4,A1),A3
JSR PrintString
JSR PrintString


Line 78: Line 95:
Saturday:
Saturday:
DC.B "Saturday",0
DC.B "Saturday",0
EVEN</lang>
EVEN

Colors:
DC.L Red,Orange,Yellow,Green,Blue,Purple

Red:
DC.B "Red",0
even
Orange:
DC.B "Orange",0
even
Yellow:
DC.B "Yellow",0
even
Green:
dc.b "Green",0
even
Blue:
dc.b "Blue",0
even
Purple:
dc.b "Purple",0
even</lang>


=={{header|BASIC256}}==
=={{header|BASIC256}}==